データ型を OS/390 COBOL から Automation に変換する

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

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

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

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

Default

OS/390 COBOL データ型から オートメーションデータ型 考えられる変換エラー 必須プロパティの設定
COMP-1 4バイト Real (Single) b、r なし
COMP-2 8バイト実数 (Double) b、r なし
カンプ-3 パック10進数 通貨 p AC
カンプ-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バイト符号付き整数 なし なし
固定時間に実行 配列 なし なし

Note

圧縮された10進数データ型または分散プログラム呼び出し (DPC) の小数部を変換する場合は、decimal データ型 Visual Basic に変換する必要があります。

COMP、COMP 3、および数値の COBOL データ型を表示する場合、既定値は次の表に示す有効桁数と小数点以下桁数に基づきます。 COBOL で符号なしの表示を使用し、オートメーションの種類を String に変更すると、COBOL 画像は PIC X に変更されます。これは、同じ内部データ表現を持ちます。 長さは変わりません。したがって、メインフレーム プログラムには影響を与え "ない"。

OS/390 COBOL の有効桁数とスケール Automation データ型へ
有効桁数 1 から 4、スケール 0 2 バイト符号付き整数
有効桁数 5 から 9、スケール 0 4 バイト符号付き整数
Precision 5-7、scale 3-7 4 バイト Real
Precision 8-18、scale 3-18 8 バイト Real
有効桁数 1 から 18、スケール 1 から 2 通貨
有効桁数 10 から 18、スケール 0 Decimal

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

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

COBOL OS/390データ型から Automation データ型へ 変換エラーの可能性 必須のプロパティ設定
COMP-1 配列 なし なし
COMP-2 配列 なし なし
COMP-3 Packed Decimal 2 バイト符号付き整数 p,r AC
COMP-3 Packed Decimal 4 バイト符号付き整数 p,r AC
COMP-3 Packed Decimal 4 バイト Real (Single) p,r AC
COMP-3 Packed Decimal 8 バイト Real (Double) p C
COMP-3 Packed Decimal Boolean なし なし
COMP-3 Packed Decimal 1 バイト符号なし整数 r なし
COMP-3 Packed Decimal 配列 なし なし
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
日付と時刻 配列 なし なし
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ビット) Boolean なし なし
PIC S9 (9) COMP (整数32ビット) 1バイト符号なし整数 r なし
PIC S9 (9) COMP (整数32ビット) 配列 なし なし
PIC S9 (?)V9.x (?)COMP (16 ビット) 4バイト Real (Single) p、r なし
PIC S9 (?)V9.x (?)COMP (16 ビット) 8バイト実数 (Double) p、r なし
PIC S9 (?)V9.x (?)COMP (16 ビット) 通貨 p、r なし
PIC S9 (?)V9.x (?)COMP (16 ビット) Decimal p、r なし
PIC S9 (?)V9.x (?)COMP (32 ビット) 4バイト Real (Single) p、r なし
PIC S9 (?)V9.x (?)COMP (32 ビット) 8バイト実数 (Double) p、r なし
PIC S9 (?)V9.x (?)COMP (32 ビット) 通貨 p、r なし
PIC S9 (?)V9.x (?)COMP (32 ビット) Decimal p、r なし
発生します 配列 なし なし

Note

圧縮された10進数データ型または DPC ゾーン10進数データ型から小数点を変換する場合は、Visual Basic decimal データ型に変換する必要があります。

次の表に、TI 実行時環境でサポートされるその他のサポートされるデータ型のマッピングを示します。

TI 実行時環境でのみサポートされます。

OS/390 COBOL データ型から オートメーションデータ型 考えられる変換エラー 必須プロパティの設定
ゾーン10進数の表示 1バイト符号なし整数 なし AC
ゾーン10進数の表示 4バイト符号付き整数 なし AC
ゾーン10進数の表示 Boolean なし AC

この時点では、COBOL によって、COBOL からオートメーションへの他のデータ型の変換はサポートされていません。

参照

サポートされる TI データ型
データ型の Automation から OS/390 COBOL への変換
データ型の変換