tigerさん、ありがとうございます。ただ通信データでして、20億件あるので、サンプルデータの作成がちょっと手つかずで、すみません。
岩瀬さんもありがとうございます。
ちなみに numsum( peek('col_num') , 1) の部分、実際には どういう動きをするのか教えていただけませんでしょうか？
私がべたべたに書くと、下記のように膨大になってしまいます・・・・・涙
要約としては
６行目 RowNoで番号を振る
20行目 利用IPが前の行と変わっていたら、その行のRowNo()を入れておく、でなければ０をセット
そうすると
例） １００００６０００００ みたいな列ができる
それを今度は、何回もループしながら
２回目のループ １１０００６６００００
３回目のループ １１１００６６６０００
４回目のループ １１１１０６６６６００
５回目のループ １１１１１６６６６６０
６回目のループ １１１１１６６６６６６
みたいに、順次、前の行を違っていたら、前の数字を０の上に上書きする処理をして
すべての０がなくなるまでループさせて、終了
こういう汚いロジックになりました・・・・
もっとスパッと出来るロジックはないものでしょうか？
ループさせなくても、処理した直前の行の情報が判定できればいいのですが・・・・・
---------------------------------------------------------------------------------------------------------------------------------------
1 Directory;
2 DHCP:
3 LOAD Distinct
4
5 'ALL' as ALL, // テーブル全体を定義したいから
6 RowNo() as No, // 確認用
7
8 MACアドレス,
9
10 月 &'/'&if(len(日)=1,0&日,日) &' ' &時刻 As DHCP_月日時刻,
11
12 // サーバ名,
13 MSG,
14 // on,
15 利用IP,
16 // to,
17 機器利用者,
18 ホスト名,
19
20 if(利用IP<>Previous(利用IP), RowNo(),0) as IP切り替わりポインタ
21
22 FROM
23 削除可_DHCP.qvd(qvd); // ここでは絶対にWhereを付けてはいけない！！！！！！！！ Previous関数を使っているから！！！！！！ ★★★★★★★★
24
25 Store DHCP into Z:\削除可_DHCP2.qvd(qvd);
26 //DROP Tables DHCP;
27
28
29 TRACE ------------------------;
30 TRACE ループ処理に入ります;
31 TRACE ------------------------;
32
33
34 LET v回数 = 1; // 下記のDO LOOPの初回を認識したいため、1をセット
35
36
//******************************************************************************* ループ処理 開始
37 DO;
38
39 QUALIFY *;
40 Directory;
41 別名:
42 LOAD
43 ALL,
44 No,
45 MACアドレス,
46 DHCP_月日時刻,
47 MSG,
48 利用IP,
49 機器利用者,
50 ホスト名,
51 IP切り替わりポインタ
52 Resident DHCP;
53 UNQUALIFY *;
54
55 DROP Table DHCP;
56
57 Directory;
58 DHCP:
59 LOAD
60 別名.ALL as ALL,
61 別名.No as No,
62 別名.MACアドレス as MACアドレス,
63 別名.DHCP_月日時刻 as DHCP_月日時刻,
64 別名.MSG as MSG,
65 別名.利用IP as 利用IP,
66 別名.機器利用者 as 機器利用者,
67 別名.ホスト名 as ホスト名,
68
69 if(別名.IP切り替わりポインタ=0,Previous(別名.IP切り替わりポインタ),別名.IP切り替わりポインタ) as IP切り替わりポインタ
70
71 Resident 別名 Order By 別名.No; // Order By は常駐LOADでしか使えない
72
73 if $(v回数) >= 2 then // 2回目以降の場合は、チェックテーブルを削除する。 1回目には存在しないため何もしない
74 DROP Table チェック;
75 end if
76
77
78 チェック: // ユーザが切り替わった直後のみ数値が入るので、まだループ処理が必要な場合は、min(ユーザ切り替わりポインタ)がゼロになる
79 LOAD
80 ALL,
81 min(IP切り替わりポインタ) as ゼロはまだ有るか
82 Resident DHCP
83 Group By ALL;
84
85
86 LET v回数 = v回数 + 1; // 処理回数をカウント
87
88 TRACE ------------------------;
89 TRACE 処理回数 = $(v回数);
90 TRACE ------------------------;
91
92 // store DHCP into Z:\削除可_DHCP準備.qvd(qvd);
93 // drop Table DHCP;
94 drop Table 別名;
95
96 LOOP while peek('ゼロはまだ有るか')=0; // ゼロはまだあるか？のテーブルに、まだ0があればLOOPし、再処理する。全部処理すると1行目（１ユーザ目）が最小値になるのでLOOPを終了する
97
//******************************************************************************* ループ処理 終了
98
99
100
101 store DHCP into Z:\削除可_DHCP準備.qvd(qvd);
102 Drop Table DHCP;
103
104 TRACE ------------------------;
105 TRACE ループ処理完了しました;
106 TRACE ------------------------;
107
108 //************* あらためてロード
109
110 Directory;
111 DHCP:
112 LOAD
113 ALL,
114 No,
115 MACアドレス,
116 DHCP_月日時刻,
117 MSG,
118 利用IP,
119 機器利用者,
120 ホスト名,
121 IP切り替わりポインタ
122 FROM
123 Z:\削除可_DHCP準備.qvd(qvd);
124
125
126 store DHCP into 削除可_DHCP準備2.qvd(qvd);
127 Drop Table DHCP;
128
129
130 TRACE ------------------------;
131 TRACE DHCP(IP)開始終了テーブル作成;
132 TRACE ------------------------;
133
134
135 Directory;
136 DHCP:
137 LOAD
138 MinString(DHCP_月日時刻) As MIN_DHCP_月日時刻,
139 maxString(DHCP_月日時刻) As MAX_DHCP_月日時刻,
140 MSG,
141 MACアドレス,
142 利用IP,
143 機器利用者,
144 ホスト名
145 FROM
146 削除可_DHCP準備2.qvd
147 (qvd)
148 Group by MACアドレス,MSG,利用IP,機器利用者,ホスト名
149 ;
