次の方法で共有

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

  • [アーティクル]

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

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

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

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

Default

z/OS COBOL データ型から Automation データ型へ 変換エラーの可能性 必須のプロパティ設定
COMP-1 4 バイト Real (Single) b,r なし
COMP-2 8 バイトの Real (Double) b,r なし
COMP-3 パック 10 進数 通貨 p AC
COMP-3 パック 10 進数 Decimal p AC
日付と時刻 Date なし I
TIME のみ Date なし I
DATE のみ Date なし I
PIC X 可変長文字列 m 度
PIC X 翻訳なし 1 バイト符号なし整数 なし なし
PIC S9(4) COMP (整数 16 ビット) 2 バイト符号付き整数 なし なし
PIC S9(4) COMP (整数 16 ビット) Boolean なし なし
PIC S9(9) COMP (整数 32 ビット) 4 バイト符号付き整数 なし なし
OCCURS fixed TIMES Array なし なし

Note

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

COMP、COMP-3、DISPLAY 数値 COBOL データ型の場合、既定値は次の表に示す有効桁数と小数点以下桁数に基づいています。 COBOL が符号なしで DISPLAY を使用し、Automation 型を String に変更すると、COBOL 画像は PIC X に変更され、内部データ表現は同じです。 長さは変わらないため、メインフレーム プログラムには影響しません。

z/OS COBOL の精度とスケール オートメーションデータ型へ
精度 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 Decimal

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

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

z/OS COBOL データ・タイプから オートメーションデータ型へ 変換エラーの可能性 必須プロパティの設定
COMP-1 Array なし なし
COMP-2 Array なし なし
COMP-3 パック 10 進数 2 バイト符号付き整数 p,r AC
COMP-3 パック 10 進数 4 バイト符号付き整数 p,r AC
COMP-3 パック 10 進数 4 バイト Real (Single) p,r AC
COMP-3 パック 10 進数 8 バイトの Real (Double) p C
COMP-3 パック 10 進数 Boolean なし なし
COMP-3 パック 10 進数 1 バイト符号なし整数 r なし
COMP-3 パック 10 進数 Array なし なし
DISPLAY Zoned Decimal 2 バイト符号付き整数 p,r AC
DISPLAY Zoned Decimal 4 バイト Real (Single) p,r AC
DISPLAY Zoned Decimal 8 バイトの Real (Double) p,r AC
DISPLAY Zoned Decimal 通貨 p,r AC
DISPLAY Zoned Decimal Decimal p,r AC
日付と時刻 Array なし なし
TIME のみ Array なし なし
DATE のみ Array なし なし
PIC X Array なし なし
PIC X 翻訳なし Array なし なし
PIC G 可変長文字列 m DEGJ
PIC G Array なし なし
PIC S9(4) COMP (整数 16 ビット) 1 バイト符号なし整数 r なし
PIC S9(4) COMP (整数 16 ビット) Array なし なし
PIC S9(9) COMP (整数 32 ビット) Boolean なし なし
PIC S9(9) COMP (整数 32 ビット) 1 バイト符号なし整数 r なし
PIC S9(9) COMP (整数 32 ビット) Array なし なし
PIC S9(?)V9(?)COMP (16 ビット) 4 バイト Real (Single) p,r なし
PIC S9(?)V9(?)COMP (16 ビット) 8 バイトの Real (Double) p,r なし
PIC S9(?)V9(?)COMP (16 ビット) 通貨 p,r なし
PIC S9(?)V9(?)COMP (16 ビット) Decimal p,r なし
PIC S9(?)V9(?)COMP (32 ビット) 4 バイト Real (Single) p,r なし
PIC S9(?)V9(?)COMP (32 ビット) 8 バイトの Real (Double) p,r なし
PIC S9(?)V9(?)COMP (32 ビット) 通貨 p,r なし
PIC S9(?)V9(?)COMP (32 ビット) Decimal p,r なし
に応じて発生します Array なし なし

Note

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

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

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

z/OS COBOL データ型から Automation データ型へ 変換エラーの可能性 必須のプロパティ設定
DISPLAY Zoned Decimal 1 バイト符号なし整数 なし AC
DISPLAY Zoned Decimal 4 バイト符号付き整数 なし AC
DISPLAY Zoned Decimal Boolean なし AC

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

参照

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