NetCOBOL V11.1 メッセージ集

2.3.333 JMN1578I-S

ASSIGN句のPRINTERは，行順編成以外の順ファイルにのみ指定できます．

例題

[C1578.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    C1578.
000003 ENVIRONMENT    DIVISION.
000004 INPUT-OUTPUT   SECTION.
000005 FILE-CONTROL.
000006     SELECT AFILE ASSIGN TO PRINTER
000007                  ORGANIZATION IS LINE SEQUENTIAL.
000008 DATA           DIVISION.
000009 FILE           SECTION.
000010   FD  AFILE.
000011   01  REC-A    PIC X(10).
000012 END PROGRAM C1578.

C1578.cob 6: JMN1578I-S ASSIGN句のPRINTERは，行順編成以外の順ファイルにのみ指定できます．