引数の説明
一意名の名標 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3175.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 AN-1 PIC 9(2) BINARY.
000006 01 AN-2 PIC X(6).
000007 01 AN-3 PIC X(10).
000008 PROCEDURE DIVISION.
000009 P-START.
000010 STRING AN-1 DELIMITED BY AN-2 INTO AN-3.
000011 STOP RUN.
C3175.cob (10) : JMN3175I-S STRING文の送出し側の項目'AN-1'のUSAGEは,DISPLAYでなければなりません.