NetCOBOL V11.0 メッセージ集

2.5.147 JMN3229I-S

CHARACTER TYPE指定またはPRINTING POSITION指定が記述された項目を含む項目@1@をWRITE文のFROM指定に記述する場合，部分参照してはいけません．

埋め込みの説明

@1@ : FROM指定の一意名

例題

[C3229.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID. C3229.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT FILE-1 ASSIGN TO S-SYS001.
000007 DATA DIVISION.
000008 FILE SECTION.
000009 FD FILE-1.
000010    01 REC-1 PIC X(80).
000011 WORKING-STORAGE SECTION.
000012    01 DATA-1.
000013     02 DATA-1-1 PIC X(10).
000014     02 DATA-1-2 PIC N(10) CHARACTER TYPE IS MODE-1.
000015    77 NN1    PIC 99.
000016    77 NN2    PIC 99.
000017 PROCEDURE DIVISION.
000018     OPEN OUTPUT FILE-1.
000019     WRITE REC-1 FROM DATA-1(NN1:NN2).
000020     CLOSE FILE-1.
000021     STOP RUN.

C3229.cob 19: JMN3229I-S CHARACTER TYPE指定またはPRINTING POSITION指定が記述された項目を含む項目'DATA-1'をWRITE文のFROM指定に記述する場合，部分参照してはいけません．