引数の説明
ACCEPTまたはDISPLAY. |
FROMまたはUPON. |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2965.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 PSTATE PIC X(8).
000007 LINKAGE SECTION.
000008 PROCEDURE DIVISION.
000009 DISPLAY PSTATE AT 1010
000010 UPON CONSOLE.
000011 END PROGRAM P2965.
P2965.cob (10) : JMN2965I-S AT,LINE,COLUMN,MODE,WITH等の指定のあるDISPLAY文のUPON指定にはCRTが記述されなければなりません.