【COBOL学習｜実務向け】[COBOL実務講座] 日本語項目(N)のMOVE転記における「空白」の作法

1. 導入：なぜ日本語項目の転記に注意が必要なのか

COBOL開発の現場において、日本語項目（PIC N）の取り扱いは、単なる文字転記と侮ってはいけません。特に固定長項目へのMOVE命令は、プログラムの仕様書には現れない「暗黙の充填（パディング）」が行われます。この挙動を理解していないと、帳票出力時のズレや、他システム連携時のデータ破損といった「不可解なバグ」に直面することになります。本稿では、日本語項目を安全に扱うための転記ルールを解説します。

2. 基礎知識：日本語項目(PIC N)とマルチバイトの性質

COBOLにおける日本語項目（National/DBCS）は、1文字が通常2バイト（またはそれ以上）で構成されます。英数字項目（PIC X）のMOVEが1バイト単位で半角スペースを埋めるのに対し、日本語項目は「全角スペース（X’4040’など）」を単位として処理されます。
ここでの重要なポイントは、MOVE命令は常に転記先の項目の長さに合わせて、不足分を「全角空白」で埋めるという仕様です。この仕組みを理解せず、無理に半角スペースを代入しようとすると、マルチバイト文字のコード体系が崩れ、システム上で「文字化け」を引き起こす原因となります。

3. 実装・解決策：適切な転記の作法

基本的にはMOVEステートメントを使用するだけで、コンパイラが自動的に適切なパディングを行ってくれます。しかし、実務では「桁数の異なる項目間」での転記が頻発します。この際、転記先が転記元より長い場合は後ろが全角空白で埋まり、短い場合は右側が切り捨てられます。
現場での鉄則は、「転記先の定義を十分に確保し、MOVE後の空白除去（UNSTRINGや関数を用いたトリミング）を併用すること」です。

4. サンプルプログラム

以下のコードは、日本語項目間の転記とパディングの挙動を確認するためのテンプレートです。

       IDENTIFICATION DIVISION.
       PROGRAM-ID. MOVE-TEST.
       DATA DIVISION.
       WORKING-STORAGE SECTION.

日本語項目(N)の定義：各5文字（10バイト）

       01 SRC-NAME  PIC N(5) VALUE N'山田太郎'.
       01 DST-NAME  PIC N(5).

       PROCEDURE DIVISION.
       MAIN-LOGIC.

MOVEによる転記：自動的に全角空白が埋められる
'山田太郎' + ' ' (全角スペース) となる

           MOVE SRC-NAME TO DST-NAME.


確認用表示

           DISPLAY '転記結果: [' DST-NAME ']'.

           STOP RUN.

5. 応用・注意点：現場でのトラブル回避術

現場で最も多いトラブルは、「英数字項目（PIC X）から日本語項目（PIC N）への無理な転記」です。これを行うと、文字コードの整合性が取れず、予期せぬ1バイト欠損が発生することがあります。
また、「半角スペースを混ぜて埋めたい」という要件がある場合は、MOVE命令だけに頼らず、FUNCTION DISPLAY-OF や、STRING命令を使用して明示的に編集を行うのがプロの作法です。
「なんとなく動いている」状態から、「仕様として制御できている」状態へ。この細かなデータ操作の積み重ねが、堅牢な基幹システムを支える鍵となります。