データの繰り返し

REPEATING DATA は、レコードにデータの繰り返しグループが含まれている入力ケースを読み込みます。 繰り返しグループごとに、 REPEATING DATA はアクティブなデータ・セット内に 1 つの出力ケースを作成します。

REPEATING DATA [FILE=file]

 [/ENCODING='encoding specification']

 /STARTS=beg col[-end col] /OCCURS={value  }
                                   {varname}

 [/LENGTH={value  }] [/CONTINUED[=beg col[-end col]]]
          {varname}

 [/ID={col loc}=varname] [/{TABLE  }] 
      {format }            {NOTABLE}

 /DATA=variable specifications

リリース履歴

リリース 16.0

• Unicode をサポートするために ENCODING サブコマンドが追加されました。

例

INPUT PROGRAM.
DATA LIST / SEQNUM 2-4 NUMPERS 6-7 NUMVEH 9-10.
REPEATING DATA STARTS=12 /OCCURS=NUMVEH
 /DATA=MAKE 1-8 (A) MODEL 9 (A) NUMCYL 10.
END INPUT PROGRAM.