埋め込みの説明
@1@ : RECORD KEY, ALTERNATE RECORD KEY, KEY IS
@2@ : エラーの原因となったデータ名
例題
[P5160.cob] 000001 @OPTIONS RCS(UCS2) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P5160. 000004 ENVIRONMENT DIVISION. 000005 INPUT-OUTPUT SECTION. 000006 FILE-CONTROL. 000007 SELECT IXFILE1 ASSIGN TO SYS001 000008 ORGANIZATION IS INDEXED 000009 RECORD KEY IS KEY1. 000010 I-O-CONTROL. 000011 DATA DIVISION. 000012 FILE SECTION. 000013 FD IXFILE1. 000014 01 IXF1REC. 000015 02 KEY1. 000016 03 PIC N(2). 000017 02 PIC X(80). 000018 WORKING-STORAGE SECTION. 000019 PROCEDURE DIVISION. 000020 END PROGRAM P5160.
P5160.cob 9: JMN5160I-W RECORD KEY句のデータ名に日本語項目を含む集団項目'KEY1'が指定されています.日本語データの実行時コード系がUNICODEの場合,この項目の日本語部分の比較は日本語として行われません.
詳細な説明
NetCOBOLでUnicodeデータを扱う場合,日本語項目の表現形式はUCS-2です.一方,集団項目(字類は英数字)の表現形式はUTF-8になります.集団項目として扱う場合は,集団に従属する日本語項目の領域にもUTF-8表現形式のデータが格納されるため,日本語項目として適切なデータになりません.