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

2.5.91 JMN3127I-S

FROM指定の作用対象@1@とレコード名@2@は,同じ領域を占有することはできません.

埋め込みの説明

@1@ : FROM指定の一意名
@2@ : レコード名

例題

[C3127.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3127.
000003 ENVIRONMENT  DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 FILE-CONTROL.
000006     SELECT FILE-1 ASSIGN TO SYS001.
000007 DATA  DIVISION.
000008 FILE SECTION.
000009   FD FILE-1.
000010    01 REC-1.
000011     02 REC-1-1 PIC XX.
000012     02 REC-1-2 PIC XX.
000013     02 FILLER  PIC X(76).
000014 PROCEDURE  DIVISION.
000015     WRITE REC-1 FROM REC-1-2.
000016     STOP RUN.

C3127.cob 15: JMN3127I-S FROM指定の作用対象'REC-1-2'とレコード名'REC-1'は,同じ領域を占有することはできません.