COBOL 至 Java 映射

此表总结了 Java™ 与某些 COBOL 字段之间的映射。

使用 Occurs

表 1. COBOL 映射
COBOL 模型类型 COBOL 用法和编译选项 图片字符串 示例 Java 类型
COBOL 字母类型 DISPLAY A PIC A(20)。 String
COBOL 字母数字类型 DISPLAY X 以及 A、X 和 9 的组合 PIC X(12)。 String
COBOL 数字类型 COMP-5 或者带有 TRUNC(BIN) 的 BINARY、COMP 和 COMP-4。当使用了编译选项 trunc(bin) 时,二进制数(BINARY、COMP 和 COMP-4)的范围将受到存储器限制而不是图片字符串的约束。而 Comp-5 始终会受到存储器限制的约束。存储器限制是由图片字符串大小来确定的。 S9(1) 到 S9(4) PIC S9 BINARY short
    S9(5) 到 S9(9) PIC S999999 BINARY。 int
    S9(10) 到 S9(18) PIC S9999999999 BINARY。 long
    9(1) 到 9(4) PIC 9 BINARY。 int
    9(5) 到 9(9) PIC 999999 BINARY。 long
    9(10) 到 9(18) PIC 9999999999 BINARY。 BigInteger
    同上,并且带有小数(V 或 P) PIC S999V9 BINARY。 BigDecimal
  DISPLAY、COMP-3、PACKED-DECIMAL 或者 BINARY、COMP、COMP-4 而不是 TRUNC(BIN) S9(1) 到 S9(4) 以及 9(1) 到 9(4)   short
    S9(5) 到 S9(9) 以及 9(5) 到 9(9)   int
    S9(10) 到 S9(18) 以及 9(10) 到 9(18)   long
    同上,并且带有小数(V 或 P)   BigDecimal
  DISPLAY、COMP-3、PACKED-DECIMAL 以及 ARITH(extend) S9(19) 到 S9(31) 以及 9(19) 到 9(31)   BigInteger
  DISPLAY、COMP-3、PACKED-DECIMAL 以及 ARITH(extend) S9(19) 到 S9(31)、9(19) 到 9(31) 以及小数(V 或 P)。   BigDecimal
COBOL AlphaNumericEdited 类型 DISPLAY A X 9 B 0 /   String
COBOL NumericEdited 类型 DISPLAY B P V Z 9 0 / , . + - CR DB * cs + - CR DB * cs   String
COBOL DBCS 类型 DBCS 带有 DISPLAY-1 的 G、B 或 N。 PIC G(10)。 String
COBOL InternalFloat 类型 COMP-1     float
  COMP-2     double
COBOL ExternalFloat 类型   +- 9 . V E 9 PIC +99V9E99。 String
级别 88    
  • 05 TXN_Resp_Code PIC X(3)
  • 88 Business_Code 值 "AAA" THRU "XXX"
  • 88 Business_Error 值 "XYX" THRU "ZYX"
  • 88 Completed_Code 值 "COM"
main 元素的访问器是每个 level88 的 get 方法。
COBOL National NATIONAL PIC N(8)   String
    PIC NBN   String
    PIC $9.9   String
    PIC +9.9E+99   String
    PIC 999V9   BigDecimal
    PIC S999V9 SIGN LEADING SEPARATE   BigDecimal
    PIC S999V9 SIGN TRAILING SEPARATE   BigDecimal

反馈