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

2.5.77 JMN3097I-S

UNSTRING文の@1@指定の一意名@2@は,整数項目でなければなりません.

埋め込みの説明

@1@ : COUNT,POINTER,TALLYING

@2@ : 一意名の名標

例題

[C3097.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID.  C3097.
000003 ENVIRONMENT  DIVISION.
000004 DATA  DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01  A    PIC X(10).
000007 01  B    PIC XX.
000008 01  C    PIC X(4).
000009 01  D    PIC 9(3)V9  BINARY.
000010 PROCEDURE  DIVISION.
000011 P-START.
000012     UNSTRING A  DELIMITED BY B  INTO C  POINTER D.
000013     STOP RUN.

C3097.cob 12: JMN3097I-S UNSTRING文のPOINTER指定の一意名'D'は,整数項目でなければなりません.