NetCOBOL V11.0 メッセージ集

2.5.335 JMN3565I-S

翻訳オプションRCS(UTF16)またはENCODE指定時，印刷ファイルのエンコード方式と異なる'@1@'は，印刷ファイルのWRITE文には指定できません．

埋め込みの説明

@1@: 一意名

例題

000001 @OPTIONS ENCODE(UTF8,UTF32)
000002 PROGRAM-ID.  P3565.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 SPECIAL-NAMES.
000006     ALPHABET UTF16L FOR NATIONAL UTF16LE.
000007 INPUT-OUTPUT SECTION.
000008 FILE-CONTROL.
000009     SELECT FILE-1  ASSIGN TO S-SYS001.
000010 DATA DIVISION.
000011 FILE SECTION.
000012 FD FILE-1
000013     LINAGE IS PAGE-AREA LINE
000014       WITH FOOTING AT FOOT-AREA
000015       LINE AT TOP TOP-AREA
000016       LINE AT BOTTOM BOT-AREA.
000017  01 REC-1 PIC X(100).
000018 WORKING-STORAGE SECTION.
000019  01 GROUP-ITEM-1.
000020   02 PAGE-AREA PIC  9(4) COMP-3 VALUE 50.
000021   02 FOOT-AREA PIC  9(4) VALUE 10.
000022   02 TOP-AREA  PIC  9(4) VALUE  5.
000023   02 BOT-AREA  PIC  9(4) VALUE  5.
000024  01 GR.
000025   02   R-1     PIC N(5) ENCODING UTF16L.
000026   02   R-2     PIC X(30).
000027 PROCEDURE DIVISION.
000028     WRITE REC-1 FROM GR.
000029 END PROGRAM P3565.

p3565.cob 28: JMN3565I-S 翻訳オプションRCS(UTF16)またはENCODE指定時，印刷ファイルのエンコード方式と異なる'GR'は，印刷ファイルのWRITE文には指定できません．