Parte ii - IIS Marconi Latina - Area didattica

Manuale COBOL 929
Compilando il programma con TinyCOBOL, l’avvio dell’eseguibile che si ottiene genera il
risultato seguente:
|SOURCE VALUE IS: +123456.789
|PICTURE: S9(10)V9(5) VALUE: 0000123456,78900 DATA: 00001234567890{
|PICTURE: +Z(9)9.9(5) VALUE: + 1.23456 DATA: + 1.23456
|PICTURE: CR+Z(7)9.9(5) VALUE: CR+ 1.23456 DATA: CR+ 1.23456
|PICTURE: +Z(7)9.9(5)DB VALUE: + 1.23456DB DATA: + 1.23456DB
|PICTURE: *(9)9.9(5)+ VALUE: *********1.23456+ DATA: *********1.23456+
|PICTURE: +*(9)9.9(4)E VALUE: +********12.3456E DATA: +********12.3456E
|PICTURE: +*(9)9,9(4)E VALUE: +****123456,7890E DATA: +****123456,7890E
|PICTURE: -(10)9,9(4)E VALUE: 123456,7890E DATA: 123456,7890E
|PICTURE: +(10)9,9(4)E VALUE: +123456,7890E DATA: +123456,7890E
Questa volta si può osservare che nel modello è il punto che perde il suo significato, apparendo
nel risultato soltanto nella posizione prevista, allineando le cifre numeriche originali alla
destra.
82.10 Note sull’utilizzo dell’insieme di caratteri universale
con il COBOL
Lo standard COBOL del 1985 prevede sostanzialmente che si possano gestire informazioni
alfanumeriche composte di simboli rappresentabili in byte, appartenenti pertanto al codice
ASCII o EBCDIC. Con l’introduzione dell’insieme di caratteri universale, si pone il problema
di gestire codifiche di tipo diverso, ben più grandi del solito byte. Purtroppo, però, le soluzioni
adottate non sono semplici e lineari come nel passato.
«
82.10.1 Stringhe letterali
Le stringhe letterali che devono contenere simboli al di fuori del codice ASCII o EBCDIC,
devono essere delimitate in modo differente. Generalmente sono disponibili due forme:
«
|
|N"stringa_letterale"
|
|
|NX"stringa_esadecimale"
|
La prima forma riguarda una stringa letterale composta secondo la forma codificata del carattere
prevista dal compilatore (UTF-8, UTF-16 o altro); la seconda, ammesso che sia disponibile,
viene espressa attraverso cifre esadecimali. Si osservi, però, che per poter esprimere una stringa
del genere in forma esadecimale, occorre sapere in che modo il compilatore la interpreta,
dato che dipende dalla forma codificata del carattere adottata.