次の方法で共有


z/OS COBOL から Automation へのデータ・タイプの変換

トランザクション インテグレーター (TI) が COBOL データ型から Automation データ型への変換を処理する方法を設定する場合は、このトピックの表をガイドとして使用します。 特定のデータ型の詳細については、「 サポートされている TI データ型」を参照してください。

次のコード キーを使用して、各テーブルの [ 変換エラーの可能性 ] 列と [必須プロパティ設定] 列のコードを解釈します。

コード 説明
r 範囲エラーが発生する可能性があります。
b Base 2 から Base 16 への変換により、精度が低下する可能性があります。
p 図形式のスケールの指定により、精度が失われる可能性があります。
m マッピング エラーが発生する可能性があります。
f yyyyddd と hhmmss。
ある プロパティ ページの [COBOL 定義] タブの [エラー処理] で、切り捨てめ、またはエラーを指定する必要があります。
C 有効桁数と小数点以下桁数を指定するには、プロパティページの COBOL 定義 タブで 左桁数 ボックスと 右桁数 ボックスに入力します。
D プロパティ ページの [COBOL 定義] タブの [サイズ] ボックスに入力して、文字列の幅を指定する必要があります。
E コード ページなど、Unicode または EBCDIC マッピング情報が必要です。
F 長さが指定された最大値よりも短い配列の場合は、プロパティページの[COBOL 定義]タブにある[末尾のフィラー][フィラーのサイズ]を指定する必要があります。
G 文字列の処理方法を指定する必要があります。 プロパティページの「COBOL 定義」タブで、「ストリング区切り」の下にある「スペース・パッド済み」または「Null 終了」をクリックします。 次に、プロパティ ページの [COBOL 定義] タブの [エラー処理] で [切り捨て] または [エラー] をクリックして、文字列が長すぎる場合の TI の処理を指定します。
H 最大サイズが必要です。
ローカライズが必要です。
J オプションの SO と SI の挿入と削除がサポートされています。

次の表は、COBOL ソース コードをインポートするときに TI が使用する既定値を示しています。

既定値

z/OS COBOL のデータタイプより Automation データ型へ 変換エラーの可能性 必須プロパティの設定
COMP-1 4 バイト Real (Single) b,r 無し
COMP-2 8 バイト 実数 (倍精度) b,r 無し
COMP-3 パックド デシマル 通貨 p 交流
COMP-3 パックド デシマル 小数 p 交流
日付と時刻 日付 無し
TIME のみ 日付 無し
DATE のみ 日付 無し
PIC X 可変長文字列 m
PIC X 翻訳なし 1 バイト符号なし整数 無し 無し
PIC S9(4) COMP (整数 16 ビット) 2 バイト符号付き整数 無し 無し
PIC S9(4) COMP (整数 16 ビット) ボーリアン 無し 無し
PIC S9(9) COMP (整数 32 ビット) 4 バイト符号付き整数 無し 無し
一定回数発生する 配列 無し 無し

パック 10 進数または分散プログラム呼び出し (DPC) のゾーン 10 進データ型から小数部を変換する場合は、Visual Basic Decimal データ型に変換する必要があります。

COMP、COMP-3、DISPLAY の数値 COBOL データ型では、既定値は次の表に示す有効桁数とスケールに基づいています。 COBOL が符号なしで DISPLAY を使用し、自動化タイプを String に変更すると、COBOL ピクチャは PIC X に変更され、内部データ表現は同じです。 長さは変わらないため、メインフレーム プログラムには影響しません。

z/OS COBOL の精度とスケール Automation データ型への変換
精度 1 ~ 4、スケール 0 2 バイト符号付き整数
精度 5 ~ 9、スケール 0 4 バイト符号付き整数
精度 5 から 7、スケール 3 から 7 4 バイト Real
精度8-18、スケール3-18 8 バイトの Real
精度 1 から 18、スケール 1-2 通貨
精度 10 ~ 18、スケール 0 小数

次の表に、TI プロジェクトで設定して、このトピックで前述した既定値をオーバーライドできる、サポートされているその他のデータ型マッピングを示します。

トランザクション インテグレーターでサポートされる

z/OS COBOL のデータタイプより Automation データ型へ 変換エラーの可能性 必須プロパティの設定
COMP-1 配列 無し 無し
COMP-2 配列 無し 無し
COMP-3 パックド デシマル 2 バイト符号付き整数 p、r 交流
COMP-3 パックド デシマル 4 バイト符号付き整数 p、r 交流
COMP-3 パックド デシマル 4 バイト Real (Single) p、r 交流
COMP-3 パックド デシマル 8 バイト 実数 (倍精度) p C
COMP-3 パックド デシマル ボーリアン 無し 無し
COMP-3 パックド デシマル 1 バイト符号なし整数 r 無し
COMP-3 パックド デシマル 配列 無し 無し
ディスプレイゾーン10進数 2 バイト符号付き整数 p、r 交流
ディスプレイゾーン10進数 4 バイト Real (Single) p、r 交流
ディスプレイゾーン10進数 8 バイト 実数 (倍精度) p、r 交流
ディスプレイゾーン10進数 通貨 p、r 交流
ディスプレイゾーン10進数 小数 p、r 交流
日付と時刻 配列 無し 無し
TIME のみ 配列 無し 無し
DATE のみ 配列 無し 無し
PIC X 配列 無し 無し
PIC X 翻訳なし 配列 無し 無し
PIC G 可変長文字列 m DEGJ
PIC G 配列 無し 無し
PIC S9(4) COMP (整数 16 ビット) 1 バイト符号なし整数 r 無し
PIC S9(4) COMP (整数 16 ビット) 配列 無し 無し
PIC S9(9) COMP (整数 32 ビット) ボーリアン 無し 無し
PIC S9(9) COMP (整数 32 ビット) 1 バイト符号なし整数 r 無し
PIC S9(9) COMP (整数 32 ビット) 配列 無し 無し
PIC S9(?)V9(?)COMP (16 ビット) 4 バイト Real (Single) p、r 無し
PIC S9(?)V9(?)COMP (16 ビット) 8 バイト 実数 (倍精度) p、r 無し
PIC S9(?)V9(?)COMP (16 ビット) 通貨 p、r 無し
PIC S9(?)V9(?)COMP (16 ビット) 小数 p、r 無し
PIC S9(?)V9(?)COMP (32 ビット) 4 バイト Real (Single) p、r 無し
PIC S9(?)V9(?)COMP (32 ビット) 8 バイト 実数 (倍精度) p、r 無し
PIC S9(?)V9(?)COMP (32 ビット) 通貨 p、r 無し
PIC S9(?)V9(?)COMP (32 ビット) 小数 p、r 無し
条件に応じて発生する 配列 無し 無し

パック 10 進数または DPC ゾーン 10 進データ型から小数部を変換する場合は、Visual Basic Decimal データ型に変換する必要があります。

次の表は、TI ランタイム環境がサポートする、サポートされるその他のデータ型マッピングを示しています。

TI ランタイム環境でのみサポートされます

z/OS COBOL のデータタイプより Automation データ型へ 変換エラーの可能性 必須プロパティの設定
ディスプレイゾーン10進数 1 バイト符号なし整数 無し 交流
ディスプレイゾーン10進数 4 バイト符号付き整数 無し 交流
ディスプレイゾーン10進数 ボーリアン 無し 交流

現時点では、TI では、COBOL から Automation への他のデータ型変換はサポートされていません。

こちらもご覧ください

サポートされている TI データ型
データ型を Automation から z/OS COBOL に変換する]
データ型変換