| Type alphabétique COBOL |
DISPLAY |
A |
PIC A(20). |
Chaîne |
| Type alphanumérique COBOL |
DISPLAY |
X et combinaison de A, X et 9 |
PIC X(12). |
Chaîne |
| Type numérique COBOL |
COMP-5 ou BINARY, COMP, COMP-4 avec TRUNC(BIN)
Si l'option de compilation trunc(bin) est utilisée, la plage pour un nombre binaire (binary, comp, comp-4) est restreinte par les limites de stockage et non pas par la chaîne picture. Comp-5 est toujours restreint par les limites de stockage. La limite de stockage est déterminée par la taille de la chaîne picture. |
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 |
| |
|
Comme plus haut avec décimale (V ou P) |
PIC S999V9 BINARY. |
BigDecimal |
| |
DISPLAY, COMP-3, PACKED-DECIMAL ou BINARY, COMP,
COMP-4 mais pas 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 |
| |
|
Comme plus haut avec décimale (V ou P) |
|
BigDecimal |
| |
DISPLAY, COMP-3, PACKED-DECIMAL et ARITH(extend) |
S9(19) à S9(31) 9(19) à 9(31) |
|
BigInteger |
| |
DISPLAY, COMP-3, PACKED-DECIMAL et ARITH(extend) |
S9(19) à S9(31) 9(19) à 9(31) et décimale (V ou P). |
|
BigDecimal |
| Type AlphaNumericEdited COBOL |
DISPLAY |
A X 9 B 0 / |
|
Chaîne |
| Type NumericEdited COBOL |
DISPLAY |
B P V Z 9 0 / , . + - CR DB * cs |
|
Chaîne |
| Type DBCS COBOL |
DBCS |
G, B ou N avec DISPLAY-1. |
PIC G(10). |
Chaîne |
| Type InternalFloat COBOL |
COMP-1 |
|
|
float |
| |
COMP-2 |
|
|
double |
| Type ExternalFloat COBOL |
|
+- 9 . V E 9 |
PIC +99V9E99. |
Chaîne |
| Niveau 88 |
|
|
- 05 TXN_Resp_Code PIC X(3)
- 88 Business_Code valeur "AAA" à "XXX"
- 88 Business_Error valeur "XYX" à "ZYX"
- 88 Completed_Code valeur "COM"
|
L'accesseur pour l'élément principal est la méthode get pour chaque niveau 88. |
| National COBOL |
NATIONAL |
PIC N(8) |
|
Chaîne |
| |
|
PIC NBN |
|
Chaîne |
| |
|
PIC $9.9 |
|
Chaîne |
| |
|
PIC +9.9E+99 |
|
Chaîne |
| |
|
PIC 999V9 |
|
BigDecimal |
| |
|
PIC S999V9 SIGN LEADING SEPARATE |
|
BigDecimal |
| |
|
PIC S999V9 SIGN TRAILING SEPARATE |
|
BigDecimal |