メインフレームのCOBOL DB2はプログラム

Question

詳細質問を削除私の次の質問です - リンクの下にチェックしてください

DB2/Cursor program working in cobol

Answer 1

これは、2段階のプロセスである必要があります。まず、削除するレコードを特定し、2番目のステップでそれらのレコードを削除します。私は、あなたがフェッチしている同じテーブルからレコードを削除することはできないでしょう、その理由は2つのステップだと思います。

ステップ1：

Select Concat(A.ClientId, A.PhoneNumber, A.Timestamp) from MyTable A 
Where Concat(A.ClientId, A.PhoneNumber, A.Timestamp) 
Not IN (Select Concat(B.ClientId, B.PhoneNumber, Min(B.Timestamp)) 
    from MyTable B 
    Group by B.ClientId, B.PhoneNumber); 

ステップ2：

Delete from MyTable 
Where Concat(A.ClientId, A.PhoneNumber, A.Timestamp) IN (all the values you got from Step1); 

あなたが実行している場合は、ステップ1で実行されるすべての値を取得し、ステップ2でそのデータセットを使用するためのデータセットを作成することができます動的であれば切り取ったペーストが行います。そうでなければ、SORTを使用してデータセットを変更して、そこからクエリを作成する必要があります。それはステップ1と2の中間の別のステップになります。

。