COBOL AlphabeticType |
DISPLAY |
A |
PIC A(20). |
Karaktersorozat |
COBOL AlphaNumericType |
DISPLAY |
X , valamint A, X és 9 kombinációja |
PIC X(12). |
Karaktersorozat |
COBOL NumericType |
COMP-5 vagy BINARY, COMP, COMP-4 TRUNC(BIN)
fordítási beállítással A trunc(bin) fordítási beállítás használata esetén a
bináris szám (bináris, comp, comp-4) tartományát a tárkorlát korlátozza, nem
a kép karaktersorozat. A Comp-5 tartományát mindig a tárkorlát korlátozza. A
tárkorlát a kép karaktersorozat mérete alapján kerül megállapításra. |
S9(1)-től S9(4)-ig |
PIC S9 BINARY |
short |
|
|
S9(5)-től S9(9)-ig |
PIC S999999 BINARY. |
int |
|
|
S9(10)-től S9(18)-ig |
PIC S9999999999 BINARY. |
long |
|
|
9(1)-től 9(4)-ig |
PIC 9 BINARY. |
int |
|
|
9(5)-től 9(9)-ig |
PIC 999999 BINARY. |
long |
|
|
9(10)-től 9(18)-ig |
PIC 9999999999 BINARY. |
BigInteger |
|
|
Mint fent tizedessel (V vagy P) |
PIC S999V9 BINARY. |
BigDecimal |
|
DISPLAY, COMP-3, PACKED-DECIMAL or BINARY, COMP, COMP-4
és nem TRUNC(BIN) |
S9(1)-től S9(4)-ig 9(1)-től 9(4)-ig |
|
short |
|
|
S9(5)-től S9(9)-ig 9(5)-től 9(9)-ig |
|
int |
|
|
S9(10)-től S9(18)-ig 9(10)-től 9(18)-ig |
|
long |
|
|
Mint fent tizedessel (V vagy P) |
|
BigDecimal |
|
DISPLAY, COMP-3, PACKED-DECIMAL és ARITH(extend) |
S9(19)-től S9(31)-ig 9(19)-től 9(31)-ig |
|
BigInteger |
|
DISPLAY, COMP-3, PACKED-DECIMAL és ARITH(extend) |
S9(19)-től S9(31)-ig 9(19)-től 9(31)-ig és tizedes
(V vagy P). |
|
BigDecimal |
COBOL AlphaNumericEdited típus |
DISPLAY |
A X 9 B 0 / |
|
Karaktersorozat |
COBOL NumericEdited típus |
DISPLAY |
B P V Z 9 0 / , . + - CR DB * cs |
|
Karaktersorozat |
COBOL DBCS típus |
DBCS |
G, B vagy N DISPLAY-1-el. |
PIC G(10). |
Karaktersorozat |
COBOL InternalFloat típus |
COMP-1 |
|
|
float |
|
COMP-2 |
|
|
double |
COBOL ExternalFloat típus |
|
+- 9 . V E 9 |
PIC +99V9E99. |
Karaktersorozat |
Level 88 |
|
|
- 05 TXN_Resp_Code PIC X(3)
- 88 Business_Code value "AAA" THRU "XXX"
- 88 Business_Error value "XYX" THRU "ZYX"
- 88 Completed_Code value "COM"
|
A fő elem hozzáférője az egyes level88 típusok get
metódusa. |
COBOL National |
NATIONAL |
PIC N(8) |
|
Karaktersorozat |
|
|
PIC NBN |
|
Karaktersorozat |
|
|
PIC $9.9 |
|
Karaktersorozat |
|
|
PIC +9.9E+99 |
|
Karaktersorozat |
|
|
PIC 999V9 |
|
BigDecimal |
|
|
PIC S999V9 SIGN LEADING SEPARATE |
|
BigDecimal |
|
|
PIC S999V9 SIGN TRAILING SEPARATE |
|
BigDecimal |