引数の説明
一意名の名標 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3066.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A PIC 9999.
000007 01 B PIC 99.
000008 01 C PIC 9999.
000009 01 D COMP-1.
000010 PROCEDURE DIVISION.
000011 P-START.
000012 DIVIDE A INTO B GIVING C REMAINDER D.
000013 STOP RUN.
C3066.cob (12) : JMN3066I-S REMAINDER指定付きのDIVIDE文の受取り側項目'D'は,固定小数点項目または数字編集項目でなければなりません.