受注マスタを読み込んで、売上が１００円以上のデータを抽出し抽出後受注ファイルに出力する。
初期処理
①各ファイルのOPEN
②受注マスタ読込み。 主処理
①以下の処理を
AT END（EOF)
まで繰り返す。
(1)売上＞100のとき
抽出後受注ファイルに出力する。 (2)(1)以外のとき
なにもしない
(3)受注マスタ読込み。
終了処理
① 各ファイルのCLOSE
ソースプログラムリスト MF-COBOL