共用方式為


將數據類型從 z/OS COBOL 轉換為自動化

當您設定交易整合器 (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" 的插入和刪除。

下表顯示當您匯入 COBOL 原始程式碼時 TI 所使用的預設值。

預設

從 z/OS COBOL 數據類型 自動化資料類型 可能的轉換錯誤 必要的屬性設定
COMP-1 4 位元組實數 (單一) 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 位元組帶正負號的整數 沒有 沒有
發生固定次數 陣列 沒有 沒有

備註

當您將小數從 Packed Decimal 或分散式程式呼叫(DPC)Zoned Decimal 資料類型轉換時,應該轉換成 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 位元組實數
精確度 8-18,刻度 3-18 8 位元組實數
精確度 1-18,小數位數 1-2 貨幣
準確度 10-18,刻度 0 十進制

下表顯示您可以在 TI 項目中設定的其他支援資料類型對應,以覆寫本主題先前呈現的預設值。

支援於交易整合器中

從 z/OS COBOL 數據類型 自動化資料類型 可能的轉換錯誤 必要的屬性設定
COMP-1 陣列 沒有 沒有
COMP-2 陣列 沒有 沒有
COMP-3 壓縮十進位數 2 位元組帶正負號的整數 p,r 交流
COMP-3 壓縮十進位數 4 位元組帶正負號的整數 p,r 交流
COMP-3 壓縮十進位數 4 位元組實數 (單一) p,r 交流
COMP-3 壓縮十進位數 8 位元組實 (雙) p C
COMP-3 壓縮十進位 布爾邏輯 沒有 沒有
COMP-3 打包十進數 (Packed Decimal) 1 位元組無符號整數 r 沒有
COMP-3 壓縮十進制 陣列 沒有 沒有
顯示區域編碼十進位顯示 (DISPLAY Zoned Decimal) 有符號的2位元組整數 p,r 交流
顯示區段十進制 4 位元組實數 (單一) p,r 交流
顯示區域十進位數字 8 位元組實 (雙) p,r 交流
顯示區位十進制 貨幣 p,r 交流
顯示區段十進制 十進制 p,r 交流
日期和時間 陣列 沒有 沒有
僅限 TIME 陣列 沒有 沒有
僅限 DATE 陣列 沒有 沒有
PIC X 陣列 沒有 沒有
PIC X 無翻譯 陣列 沒有 沒有
PIC G 可變長度字串 m DEGJ
PIC G 陣列 沒有 沒有
PIC S9(4) COMP (整數 16 位) 1-byte 無符號整數 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 位元組實數 (單一) 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 位元組實數 (單一) p,r 沒有
PIC S9(?)V9(?)COMP (32 位) 8 位元組實數(雙精度) p,r 沒有
PIC S9(?)V9(?)COMP (32 位) 貨幣 p,r 沒有
PIC S9(?)V9(?)COMP (32 位) 十進制 p,r 沒有
發生視情況而定 陣列 沒有 沒有

備註

當您從 Packed Decimal 或 DPC Zoned Decimal 數據類型轉換小數點數時,您應該轉換成 Visual Basic Decimal 數據類型。

下表顯示 TI 執行時間環境支援的額外資料類型映射。

只有 TI 執行時間環境才支援

從 z/OS COBOL 數據類型 自動化資料類型 可能的轉換錯誤 必要的屬性設定
顯示分區十進制 1 位元組無符號整數 沒有 交流
顯示區域十進位 4 位元組帶正負號的整數 沒有 交流
顯示區域十進制 布爾邏輯 沒有 交流

TI 目前不支援從 COBOL 轉換成自動化的其他資料類型轉換。

另請參閱

支援的 TI 資料類型
將數據類型從自動化轉換成 z/OS COBOL]
數據類型轉換