引数の説明
注釈として扱う句または機能名 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C1477.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006 SELECT IN-F ASSIGN INFILE
000007 ORGANIZATION IS INDEXED
000008 RECORD KEY IS K1 PASSWORD IS P1.
000009 DATA DIVISION.
000010 FILE SECTION.
000011 FD IN-F.
000012 01 IN-R PIC X(80).
000013 WORKING-STORAGE SECTION.
000014 01 K1 PIC X(4).
000015 01 P1 PIC X(4).
000016 END PROGRAM C1477.
C1477.cob (8) : JMN1477I-I このシステムでは,'PASSWORD'は注釈扱いです.