反復 DO 文の特別な形式は、TO、BY、REPEAT のいずれのオプションも使用されていないが、start 式のインスタンスが複数指定されている形式です。この場合、指定されている start 値ごとに DO グループが 1 回実行されます。
DO name 'Bob', 'Ann', 'Fred', 'Joan', 'Sue'; READ FILE(F) KEY(name) INTO(REC); CALL SEND_REPT; END;
説明
反復 DO 文の特別な形式は、TO、BY、REPEAT のいずれのオプションも使用されていないが、start 式のインスタンスが複数指定されている形式です。この場合、指定されている start 値ごとに DO グループが 1 回実行されます。