cobol
Comment fonctionne le calcul dans le cobol?
Recherche…
Introduction
La clause computationnelle est utilisée pour décrire le type de stockage utilisé dans COBOL. Il est utilisé de 3 manières: COMP-1, COMP-2 et COMP-3. La forme la plus courante de calcul est le COMP-3. Il est souvent appelé "COMP" par les programmeurs.
COMP-3
L'élément de données est stocké au format décimal compacté dans COMP-3. Le format décimal emballé signifie que chaque octet de stockage (à l'exception de l'octet de poids faible) peut contenir deux nombres décimaux. L'octet de poids faible contient un chiffre dans la partie la plus à gauche et le signe (positif ou négatif) dans la partie la plus à droite.
"Format décimal zoné" dans l'image ci-dessous est le stockage par défaut pour un nombre dans COBOL.
01 WS-NUM PIC 9(5) USAGE IS COMP-3 VALUE 21544.
Le stockage informatique est fréquemment utilisé pour réduire la taille d'un fichier.
Implémentations communes
Comment comp, comp-1 ... comp-5 sont implémentés dépend de l'implémentation.
Format Normal Implementation
Comp Big endian binary integer
Comp-1 4 byte floating point
Comp-2 8 byte floating point
Comp-3 Packed decimal 123 is stored as x'123c'
Comp-5 Binary Integer optermised for performance.
Big Endian on the Mainframe, Little Endian on Intel Hardware
Les compilateurs Ibm supportent normalement Comp, Comp-4, Comp-5 dans des tailles de 2,4,8 octets. GNU Cobolo supporte les tailles de 1,2,4,8.
Les champs Comp-1 et Comp-2 sont définis sans clause picture:
03 Floating-Field Comp-1.
03 Double-Field Comp-2
Pour les autres Comp sont la photo est entrée:
03 Big-Endian Pic S9(4) Comp.
03 Packed-Decimal Pic S9(5) Comp.