DIVIDE ステートメント - 形式 1 - INTO 1 DIVIDE 2 ID-1 2 リテラル-1 3 INTO 4+ 4 ID-2 4.1? ROUNDED 5? ON 5.1 SIZE ERROR 命令ステートメント-1 6? NOT 6.1? ON 6.2 SIZE ERROR 命令ステートメント-2 7? END-DIVIDE
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.