今回の記事では、バッチプログラムで使われるロジックの一つである「コントロールブレイク」について説明します。
「コントロールブレイク」とは特にCOBOLではよく目にするロジックであり、キー項目（「商品番号」「顧客番号」「カード番号」等）順にソートされたデータに対して、キー項目が変わる度にタイトル出力や改ページ等を行うロジックです。
トランザクションファイル・トランザクションテーブル（履歴ファイル・履歴テーブル）を読み込み、帳票やハガキ等を出力する時に使われることが多いです。
フローチャートと例は以下の通りです。
【フローチャート】
【例】
・要件
商品の販売実績のデータをまとめたファイルを読み込み、商品毎にタイトルを付与して、別のファイルに出力したい。
・入力ファイルのフォーマット
カンマ区切りの固定長ファイル。
商品コード・販売日でレコードを一意に特定できるようにデータをセットする。
商品コード（７桁）
カンマ（１桁）
販売日（８桁）
カンマ（１桁）
販売個数（５桁）
カンマ（１桁）
販売金額（９桁）・入力ファイルのレコード
0000001,20180401,00100,00010000
0000001,20180402,00200,00020000
0000002,20180401,00001,00001000
0000003,20180402,00002,00002000・タイトル行のフォーマット
アスタリスク（２桁）
商品コード（７桁）
アスタリスク（２２桁）・処理の流れ
①変数「旧キー」に初期値として7桁のスペースを入れる。
（商品コードで使われていない値を初期値として使用する）
②１レコード目「0000001,20180401,00100,00010000」を読み込む。
③読み込んだレコードの商品コードと変数「旧キー」が一致するか判定する。
一致しないため、ブレイク処理として下記タイトルを出力する。
「**0000001**********************」
変数「旧キー」に現在の商品コード「0000001」をセットする。
④１レコード目のデータを出力ファイルへ出力する。
⑤２レコード目「0000001,20180402,00200,00020000」を読み込む。
⑥読み込んだレコードの商品コードと変数「旧キー」が一致するか判定する。
一致するため、ブレイク処理は行わない。
⑦２レコード目のデータを出力ファイルへ出力する。
⑧３レコード目「0000002,20180401,00001,00001000」を読み込む。
⑨読み込んだレコードの商品コードと変数「旧キー」が一致するか判定する。
一致しないため、ブレイク処理として下記タイトルを出力する。
「**0000002**********************」
変数「旧キー」に現在の商品コード「0000002」をセットする。
⑩３レコード目のデータを出力ファイルへ出力する。
⑪４レコード目「0000003,20180402,00002,00002000」を読み込む。
⑫読み込んだレコードの商品コードと変数「旧キー」が一致するか判定する。
一致しないため、ブレイク処理として下記タイトルを出力する。
「**0000003**********************」
変数「旧キー」に現在の商品コード「0000003」をセットする。
⑬４レコード目のデータを出力ファイルへ出力する。
⑭EOFのため処理を終了する。・出力ファイル
**0000001**********************
0000001,20180401,00100,00010000
0000001,20180402,00200,00020000
**0000002**********************
0000002,20180401,00001,00001000
**0000003**********************
0000003,20180402,00002,00002000
以上、「コントロールブレイク」でした。
このロジックを覚えておくと、バッチ処理を設計するのが楽になります。
プログラミングだけでなくExcelの資料作りにも役立つことがあり、意外と応用も効きます。
これまでも週１でブログを更新してきましたが、今後もこのような記事を週１ペースで書いていきたいと思います。
では、また来週！
コメント