データ交換ノウハウ：メインフレームからの負のアンパック数値が文字化けする

（本記事の情報は、記事の公開日時点での情報であり、その正確性、完全性、最新性等内容を保証するものではありません。）

メインフレームからの交換データで、数値フィールドの１桁目がアルファベットになっているので、数値として読み込めないことがあります。
これは、COBOL等で生成したファイルをそのまま転送ツールの文字コード変換にかけて生成したのが原因と考えられます。

COBOLでよく使用される数値型にはパックとゾーン（アンパック）があります。<br/ > パックは、8ビットの上位下位をそれぞれ数値の一桁とし、１桁目を符号とします。
小数点位置は固定で、扱うアプリがフォーマットで定義します。つまり、データ中には小数点位置は記載されません。

アンパック（ゾーン）は、数値のキャラクタをそのまま書きますが、数値が負の場合のみ、１桁目にマスクがかかります。小数点の扱いはパックと同様です。

メインフレームでは数値文字列（「-1.123」のように見たままの形式）は可変長表現であることからあまり使用されないため、COBOLでデータ生成をする場合にはたいていパックかゾーンになります。パックはバイナリ表現のためデータのレコードレイアウトを意識しないとコード変換ができないため、ゾーンを使用する事が多いという事情があります。

問題は、サンプルデータが正の数値ばかりである場合、単純なEBCDIC/ASCIIのコード変換で大丈夫だろうと判断されてしまったことでしょう。