使用本主題中的數據表做為指南,指定您希望 TI 如何處理從自動化數據類型轉換成 COBOL 數據類型的轉換。 如需特定數據類型的詳細資訊,請參閱 支援的 TI 數據類型。
使用下列程式代碼索引鍵來解譯每個數據表中 [可能轉換錯誤 ] 和 [必要屬性設定 ] 資料行中的程序代碼。
程式碼 | 說明 |
---|---|
r | 可能的範圍錯誤。 |
b | 因基底 2 到基底 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" 的插入和刪除。 |
下表顯示 TI 用來將自動化資料類型轉換成 COBOL 數據類型的預設值。
預設
從自動化數據類型 | 轉換為 z/OS COBOL 資料類型 | 可能的轉換錯誤 | 必要的屬性設定 |
---|---|---|---|
1 位元組無符號整數 | PIC X 無翻譯 | 沒有 | 沒有 |
2 位元組帶正負號的整數 | PIC S9(4) COMP (整數 16 位) | 沒有 | 沒有 |
4 位元組帶正負號的整數 | PIC S9(9) COMP (整數 32 位) | 沒有 | 沒有 |
4 位元組實數 (單一) | COMP-1 | br | 沒有 |
8 位元組實數(雙精度) | COMP-2 | br | 沒有 |
布爾邏輯 | PIC S9(4) COMP (整數 16 位) | 沒有 | 沒有 |
可變長度字串 | PIC X | m | 度 |
貨幣 | COMP-3 打包十进制 | 公關 | C |
日期(日期與時間) | COMP-3 打包十进制 | pf | CI |
日期(僅限日期) | COMP-3 打包十进制 | pf | 持續整合 |
日期(僅限時間) | COMP-3 打包十进制 | pf | CI |
十進制 | COMP-3 打包十进制 | 公關 | C |
陣列 (任何資料類型) | 發生固定次數 | 沒有 | FH |
備註
當您將整數或小數點數從 Visual Basic 的 Single 或 Double 數據型別轉換成 Packed Decimal 或 Distributed Program Call (DPC) Zoned Decimal 數據型別時,TI 的精度限制為小數點左邊 1 到 18 位數(例如 1.2345678901234567E+17)。 當您轉換小數點數 Packed Decimal 或 DPC Zoned Decimal 數據類型時,您應該轉換成 Visual Basic Decimal 數據類型。
下表顯示您可以在 TI 項目中設定的其他支援資料類型對應,以覆寫上表中顯示的預設值。
支援於交易整合器中
從自動化數據類型 | 轉換為 z/OS COBOL 資料類型 | 可能的轉換錯誤 | 必要的屬性設定 |
---|---|---|---|
1 位元組無符號整數 | PIC S9(4) COMP (整數 16 位) | 沒有 | 沒有 |
1 位元組無符號整數 | COMP-3 打包十进制 | 沒有 | C |
2 位元組帶正負號的整數 | COMP-3 打包十进制 | 沒有 | C |
2 位元組帶正負號的整數 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | 沒有 | C |
4 位元組帶正負號的整數 | COMP-3 打包十进制 | 沒有 | C |
4 位元組帶正負號的整數 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | 沒有 | C |
4 位元組實數 (單一) | PIC S9(4) COMP (整數 16 位) | p,r | 沒有 |
4 位元組實數 (單一) | PIC S9(9) COMP (整數 32 位) | p,r | 沒有 |
4 位元組實數 (單一) | COMP-3 打包十进制 | p,r | C |
4 位元組實數 (單一) | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | p,r | C |
8 位元組實數(雙精度) | PIC S9(4) COMP (整數 16 位) | p,r | 沒有 |
8 位元組實數(雙精度) | PIC S9(9) COMP (整數 32 位) | p,r | |
8 位元組實數(雙精度) | COMP-3 打包十进制 | p,r | C |
8 位元組實數(雙精度) | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | p,r | C |
布爾邏輯 | PIC S9(9) COMP (整數 32 位) | 沒有 | 沒有 |
布爾邏輯 | COMP-3 打包十进制 | 沒有 | C |
可變長度字串 | PIC G | m | DEGJ |
貨幣 | PIC S9(?)V9(?)COMP (16 位) | 公關 | 沒有 |
貨幣 | PIC S9(?)V9(?)COMP (32 位) | 公關 | 沒有 |
貨幣 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | PR | C |
十進制 | PIC S9(?)V9(?)COMP (16 位) | 公關 | 沒有 |
十進制 | PIC S9(?)V9(?)COMP (32 位) | 公關 | 沒有 |
十進制 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | 公關 | C |
陣列 (任何資料類型) | 發生視情況而定 | 沒有 | FH |
備註
當您將整數或小數從 Visual Basic Single 或 Visual Basic Double 資料型別轉換成 Packed Decimal 或 DPC Zoned Decimal 資料型別時,TI 的精度限制為小數點左邊 1 到 18 位數字(例如 1.2345678901234567E+17)。
下表顯示 TI 執行時間環境支援的額外資料類型映射。
只有 TI 執行時間環境才支援
從自動化數據類型 | 轉換為 z/OS COBOL 資料類型 | 可能的轉換錯誤 | 必要的屬性設定 |
---|---|---|---|
1 位元組無符號整數 | PIC S9(9) COMP (整數 32 位) | 沒有 | 沒有 |
1 位元組無符號整數 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | 沒有 | C |
布爾邏輯 | 顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) | 沒有 | C |
TI 目前不支援從自動化轉換成 COBOL 的其他資料類型轉換。
備註
當 COBOL 的 DISPLAY 語句不含符號且您將自動化類型變更為字串時,COBOL 圖形會變更為具有相同內部數據表示的 PIC X。 長度維持不變,因此不會影響您的大型主機程式。