next up previous
Next: OPENの規則 Up: PROCEDURE DIVISION Previous: COMPUTEの規則

DIVIDEの規則

DIVIDEはDIVIDE〜BY〜GIVING〜REMAINDERの構文のみ使用可能です。

【例】
     1   1   2   2   2   3   3   4   4   4   5   5   6   6   6   7
7----2---6---0---4---8---2---6---0---4---8---2---6---0---4---8---2
     DIVIDE  WK1-SEC     BY  3600
         GIVING      WK1-HH
         REMAINDER   WK1-RE.
     DIVIDE  WK1-RE      BY  60
         GIVING      WK1-MM
         REMAINDER   WK1-SS.



Masami Ogoshi 2001-11-12