引数の説明
一意名の名標 |
例
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'は,固定小数点項目または数字編集項目でなければなりません.