引数の説明
被除数/除数 |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3065. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A COMP-1. 000007 01 B PIC 99. 000008 01 C PIC 9999. 000009 01 D PIC 99. 000010 PROCEDURE DIVISION. 000011 P-START. 000012 DIVIDE A BY B GIVING C REMAINDER D. 000013 DIVIDE A INTO B GIVING C REMAINDER D. 000014 STOP RUN.
C3065.cob (12) : JMN3065I-S REMAINDER指定付きのDIVIDE文の被除数は,固定小数点項目または固定小数点定数でなければなりません.
C3065.cob (13) : JMN3065I-S REMAINDER指定付きのDIVIDE文の除数は,固定小数点項目または固定小数点定数でなければなりません.