引数の説明
ACCEPT/DISPLAY |
データ項目名 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3392.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 A PIC X(8).
000006 01 B PIC X(2).
000007 PROCEDURE DIVISION.
000008 ACCEPT A WITH PROMPT B.
000009 END PROGRAM C3392.
C3392.cob (8) : JMN3392I-S ACCEPT文のPROMPT指定の'B'は1文字の英字項目,英数字項目,日本語項目,文字定数および日本語文字定数でなければなりません.