7.3.1 形式
PROGRAM-ID. プログラム名.
DATA DIVISION.
WORKING-STORAGE SECTION.
：
LINKAGE SECTION.
01 データ名A ADDRESS. /* インタフェースエリアアドレス */
01 データ名B ADDRESS. /* 履歴情報レコードインデクスアドレス */
01 データ名C ADDRESS. /* 編集データ指定エリアアドレス */
01 データ名D ADDRESS. /* 最大編集データサイズアドレス */
01 データ名E ADDRESS. /* 編集データサイズアドレス */
PROCEDURE DIVISION USING BY VALUE データ名A データ名B データ名C データ名D
データ名E．
：
UOCの処理
：
EXIT PROGRAM.