cobol
Wie funktioniert die Berechnung in Cobol?
Suche…
Einführung
Computational Klausel wird verwendet, um den in COBOL verwendeten Speichertyp zu beschreiben. Es wird für 3 Wege verwendet: COMP-1, COMP-2 und COMP-3. Die gebräuchlichste Form der Berechnung ist COMP-3. Sie wird von Programmierern häufig nur als "COMP" bezeichnet.
COMP-3
Das Datenelement wird in COMP-3 im gepackten Dezimalformat gespeichert. Packed-Decimal-Format bedeutet, dass jedes Byte des Speichers (außer dem Byte niedrigerer Ordnung) zwei Dezimalzahlen enthalten kann. Das niederwertige Byte enthält eine Ziffer im äußersten linken Teil und das Vorzeichen (positiv oder negativ) im ganz rechten Teil.
"Zoned decimal format" im Bild unten ist der Standardspeicher für eine Zahl in COBOL.
01 WS-NUM PIC 9(5) USAGE IS COMP-3 VALUE 21544.
Computational Storage wird häufig verwendet, um die Größe einer Datei zu reduzieren.
Gemeinsame Implementierungen
Wie comp, comp-1 ... comp-5 implementiert wird, hängt von der Implementierung ab.
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
Ibm-Compiler unterstützen normalerweise Comp, Comp-4, Comp-5 in Größen von 2,4,8 Byte. GNU Cobolo unterstützt Größen von 1,2,4,8.
Comp-1, Comp-2-Felder werden ohne Bildklausel definiert:
03 Floating-Field Comp-1.
03 Double-Field Comp-2
Für andere Comp's sind Bilder eingetragen:
03 Big-Endian Pic S9(4) Comp.
03 Packed-Decimal Pic S9(5) Comp.