自動化から z/OS COBOL へのデータ・タイプの変換
このトピックの表をガイドとして使用して、TI で Automation データ型から COBOL データ型への変換を処理する方法を指定します。 特定のデータ型の詳細については、「 サポートされている 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 の挿入と削除がサポートされています。 |
次の表は、TI が Automation データ型を COBOL データ型に変換するために使用する既定値を示しています。
Default
Automation データ型から | z/OS COBOL データ型へ | 変換エラーの可能性 | 必須のプロパティ設定 |
---|---|---|---|
1 バイト符号なし整数 | PIC X 翻訳なし | なし | なし |
2 バイト符号付き整数 | PIC S9(4) COMP (整数 16 ビット) | なし | なし |
4 バイト符号付き整数 | PIC S9(9) COMP (整数 32 ビット) | なし | なし |
4 バイト Real (Single) | COMP-1 | br | なし |
8 バイトの Real (Double) | COMP-2 | br | なし |
ブール値 | PIC S9(4) COMP (整数 16 ビット) | なし | なし |
可変長文字列 | PIC X | m | 度 |
通貨 | COMP-3 パック 10 進数 | pr | C |
日付 (日付と時刻) | COMP-3 パック 10 進数 | pf | CI |
日付 (日付のみ) | COMP-3 パック 10 進数 | pf | CI |
日付 (時刻のみ) | COMP-3 パック 10 進数 | pf | CI |
Decimal | COMP-3 パック 10 進数 | pr | C |
配列 (任意のデータ型) | OCCURS fixed TIMES | なし | Fh |
注意
Visual Basic の単精度浮動小数点型または Visual Basic Double データ型からパック 10 進数または分散プログラム呼び出し (DPC) Zoned Decimal データ型に整数または小数部の数値を変換する場合、TI は小数点以下 1 ~ 18 桁の有効桁数に制限されます (たとえば、1.2345678901234567E+17)。 小数部の数値のパック 10 進数または DPC ゾーン 10 進データ型を変換する場合は、Visual Basic Decimal データ型に変換する必要があります。
次の表は、TI Project で設定して、前の表に示した既定値をオーバーライドするために設定できる、サポートされているその他のデータ型マッピングを示しています。
トランザクション インテグレーターでサポートされる
Automation データ型から | z/OS COBOL データ型へ | 変換エラーの可能性 | 必須のプロパティ設定 |
---|---|---|---|
1 バイト符号なし整数 | PIC S9(4) COMP (整数 16 ビット) | なし | なし |
1 バイト符号なし整数 | COMP-3 パック 10 進数 | なし | C |
2 バイト符号付き整数 | COMP-3 パック 10 進数 | なし | C |
2 バイト符号付き整数 | DISPLAY Zoned Decimal | なし | C |
4 バイト符号付き整数 | COMP-3 パック 10 進数 | なし | C |
4 バイト符号付き整数 | DISPLAY Zoned Decimal | なし | C |
4 バイト Real (Single) | PIC S9(4) COMP (整数 16 ビット) | p,r | なし |
4 バイト Real (Single) | PIC S9(9) COMP (整数 32 ビット) | p,r | なし |
4 バイト Real (Single) | COMP-3 パック 10 進数 | p,r | C |
4 バイト Real (Single) | DISPLAY Zoned Decimal | p,r | C |
8 バイトの Real (Double) | PIC S9(4) COMP (整数 16 ビット) | p,r | なし |
8 バイトの Real (Double) | PIC S9(9) COMP (整数 32 ビット) | p,r | |
8 バイトの Real (Double) | COMP-3 パック 10 進数 | p,r | C |
8 バイトの Real (Double) | DISPLAY Zoned Decimal | p,r | C |
ブール値 | PIC S9(9) COMP (整数 32 ビット) | なし | なし |
ブール値 | COMP-3 パック 10 進数 | なし | C |
可変長文字列 | PIC G | m | DEGJ |
通貨 | PIC S9(?)V9(?)COMP (16 ビット) | pr | なし |
通貨 | PIC S9(?)V9(?)COMP (32 ビット) | pr | なし |
通貨 | DISPLAY Zoned Decimal | pr | C |
Decimal | PIC S9(?)V9(?)COMP (16 ビット) | pr | なし |
Decimal | PIC S9(?)V9(?)COMP (32 ビット) | pr | なし |
Decimal | DISPLAY Zoned Decimal | pr | C |
配列 (任意のデータ型) | に応じて発生します | なし | Fh |
注意
Visual Basic の単精度浮動小数点型または Visual Basic Double データ型からパック 10 進数または DPC Zoned Decimal データ型に整数または小数部の数値を変換する場合、TI は小数点の左側の 1 ~ 18 桁の有効桁数に制限されます (例: 1.2345678901234567E+17)。
次の表は、TI ランタイム環境でサポートされる追加のサポートされるデータ型マッピングを示しています。
TI ランタイム環境でのみサポートされます
Automation データ型から | z/OS COBOL データ・タイプへ | 変換エラーの可能性 | 必須プロパティの設定 |
---|---|---|---|
1 バイト符号なし整数 | PIC S9(9) COMP (整数 32 ビット) | なし | なし |
1 バイト符号なし整数 | DISPLAY Zoned Decimal | なし | C |
ブール値 | DISPLAY Zoned Decimal | なし | C |
現時点では、オートメーションから COBOL への他のデータ型変換は TI でサポートされていません。
注意
COBOL の使用法が符号なしで DISPLAY で、オートメーションの種類を String に変更すると、COBOL 画像は PIC X に変更され、内部データ表現は同じです。 長さは変わらないため、メインフレーム プログラムには影響しません。