マッチィング処理


旧マスタとトランザクションを読み込んで、新マスタを作成する。

初期処理

@各ファイルのOPEN

A旧マスタ読込。

Bトランザクション読込

旧マスタ読込

@旧マスタを読み込む

A読み込んだキー → MST-KEY

トランザクション読込

@トランザクションを読み込む

A読み込んだキー → TRN-KEY

     
主処理

@以下の処理を

  MST-KEY AND TRN-KEY = HIGH-VALUE

   まで繰り返す。

 (1)  MST-KEY = TRN-KEY

    (a) 削除処理か判定

      (i) 削除のとき

        (ァ) 削除処理

      (ii) (i) 以外

        (ァ) 変更処理

      (iii) 旧マスタの読込

      (C)トランザクションの読込 

 (2)  (1) 以外

    (a) MST-KEY < TRN-KEY

      (i)マスタコピー

      (2)旧マスタの読込            

    (b) (a)以外

      (i)追加処理

      (ii)トランザクションの読込  

 終了処理

@各ファイルのCLOSE

  

ソースプログラムリスト