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

2.4.280 JMN3512I-W

翻訳オプションRCS(UTF8-UCS2)またはRCS(SJIS-UCS2)指定の場合,日本語項目を含む集団項目@1@の日本語部分は日本語として大小比較されません.

引数の説明

@1@:

一意名(集団項目)

      000001 PROGRAM-ID. JMN3512I-W.
      000002 ENVIRONMENT DIVISION.
      000003 INPUT-OUTPUT SECTION.
      000004 FILE-CONTROL.
      000005     SELECT SMFILE ASSIGN SM1F.
      000006     SELECT USFILE ASSIGN SEQ1F.
      000007     SELECT GVFILE ASSIGN SEQ2F.
      000008 DATA DIVISION.
      000009 FILE SECTION.
      000010   SD SMFILE.
      000011   01 R1.
      000012     02 KEY-1 PIC X(4).
      000013     02 KEY-2.
      000014       03 KEY-1-1 PIC X(2).
      000015       03 KEY-1-2 PIC N(1).
      000016     02 R1-1  PIC X(72).
      000017   FD USFILE.
      000018   01 USR01 PIC X(80).
      000019   FD GVFILE.
      000020   01 GIV01 PIC X(80).
      000021 WORKING-STORAGE SECTION.
      000022 PROCEDURE DIVISION.
      000023     SORT   SMFILE   ON ASCENDING KEY KEY-2
      000024            USING    USFILE
      000025            GIVING   GVFILE
      000026 END PROGRAM JMN3512I-W.
    

C3512I-W.cob (23) : JMN3512I-W 翻訳オプションRCS(UTF8-UCS2)またはRCS(SJIS-UCS2)指定の場合,日本語項目を含む集団項目'KEY-2'の日本語部分は日本語として大小比較されません.

詳細な説明

日本語項目は,UCS-2のリトルエンディアン形式でデータを保持しています.日本語項目同士の大小比較では,リトルエンディアンをビッグエンディアンに変換してから比較が行われます.しかし集団項目の場合には,その内部に日本語項目が存在していても,リトルエンディアン形式のまま比較されてしまうことになります.