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

2.5.78 JMN3098I-S

UNSTRING文で,送出し側,DELIMITED BY指定,INTO指定またはDELIMITER IN指定の作用対象のいずれかの項類が日本語ならば,これらすべての項類は日本語でかつ同じエンコードでなければなりません

例題

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

C3098.cob 12: JMN3098I-S UNSTRING文で,送出し側,DELIMITED BY指定,INTO指定またはDELIMITER IN指定の作用対象のいずれかの項類が日本語ならば,これらすべての項類は日本語で,かつ同じエンコードでなければなりません.