ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.3.108 JMN1167I-W

I-O-CONTROL段落で,終止符は段落の最後にしか指定できません. 終止符は無効になります.

例題

[C1167.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.     C1167.
000003 ENVIRONMENT     DIVISION.
000004 INPUT-OUTPUT    SECTION.
000005 FILE-CONTROL.
000006     SELECT INFILE  ASSIGN TO INDATA.
000007     SELECT OUTFILE ASSIGN TO OUTDATA.
000008 I-O-CONTROL.
000009     MULTIPLE FILE TAPE INFILE.
000010     SAME INFILE OUTFILE.
000011 DATA           DIVISION.
000012 FILE           SECTION.
000013 FD INFILE.
000014 01 INFDAT.
000015   02 INFNUM     PIC S9(8) BINARY.
000016   02 INFMSG     PIC X(50).
000017 FD OUTFILE.
000018 01 OUTDAT.
000019   02 OUTFNUM    PIC S9(8) BINARY.
000020   02 OUTMSG     PIC X(50).
000021 END PROGRAM     C1167.

C1167.cob 9: JMN1167I-W I-O-CONTROL段落で,終止符は段落の最後にしか指定できません.終止符は無効になります.