Freigeben über


Unterstützte COBOL-Datentypen

COMP-1
Ein 4-Byte-, Single-Precision-, Gleitkomma-Real-Datentyp, der interne Gleitkommaelemente angibt. Das Zeichen ist im ersten Bit des am weitesten links befindlichen Byte enthalten, und der Exponent ist in den verbleibenden sieben Bits dieses Byte enthalten. Die verbleibenden drei Bytes enthalten die Mantissa.

COMP-2
Ein 8-Byte-, Doppelpräzisions-, Gleitkomma-Real-Datentyp, der interne Gleitkommaelemente angibt. Das Zeichen ist im ersten Bit des am weitesten links befindlichen Byte enthalten, und der Exponent ist in den verbleibenden sieben Bits des ersten Byte enthalten. Die verbleibenden sieben Bytes halten die Mantissa.

COMP-3 Gepacktes Dezimalzeichen
Ein gepackter Dezimaldatentyp, der interne Dezimalelemente angibt, die im gepackten Dezimalformat gespeichert sind. Im gepackten Dezimalformat stellt jedes Byte in einem Feld zwei ziffern mit Ausnahme des am weitesten rechts gepackten Byte dar. Das am weitesten rechts stehende Byte enthält eine Ziffer und das Zeichen. Mit anderen Worten, es gibt zwei Ziffern in jeder Zeichenposition, mit Ausnahme der nachgestellten Zeichenposition, die von der Ziffer mit niedriger Reihenfolge und dem Vorzeichen belegt wird. Das Element kann eine beliebige Ziffer von 0 bis 9 sowie ein Zeichen enthalten, um einen Wert darzustellen, der 18 Dezimalstellen nicht überschreitet. Beispielsweise wird der Dezimalwert +123 in zwei Bytes als 0001 0010 0011 1100 im gepackten Dezimalformat dargestellt. Weitere Informationen finden Sie unter " Zoned Decimal" oder "Gepackte Dezimaldatentypen".

DISPLAY Zoned Decimal
Ein entpackter Dezimaldatentyp, der interne Dezimalelemente angibt, die im zonenierten Dezimalformat gespeichert sind. Zonendezimalformat ist synonym für entpacktes Dezimalformat, das ein Format für die Darstellung von Zahlen ist, bei denen jede Ziffer in Bits 4 bis 7 enthalten ist und das Zeichen in Bits 0 bis 3 des am wenigsten signifikanten Byte enthalten ist. Bits 0 bis 3 aller Bytes außer dem am wenigsten signifikanten Byte enthalten 1s (Hex F). Beispielsweise wird der Dezimalwert +123 in drei Bytes als 1111 0001 1111 00010 1100 0011 im zonenierten Dezimalformat dargestellt. Weitere Informationen finden Sie unter " Zoned Decimal" oder "Gepackte Dezimaldatentypen".

DATUM und UHRZEIT
Gibt ein Datum und eine Uhrzeit mithilfe des Gruppenelements zweier PIC 9(7) COMP-3 Gepackter Dezimalwert an.

Nur ZEIT
Gibt eine Uhrzeit mithilfe eines PIC 9(7) COMP-3 Gepackten Dezimalwerts an.

Nur DATUM
Gibt ein Datum mithilfe eines PIC 9(7) COMP-3 Gepackten Dezimalwerts an.

PIC X
Gibt ein einzelnes Zeichen in einer EBCDIC-Zeichenfolge (Extended Binary Coded Decimal Interchange Code) an. EBCDIC ist die native Darstellung von Charakterdaten auf Großrechnern und IBM i-Computern. Unicode ist die native Darstellung von Zeichendaten auf Windows-basierten Plattformen.

PIC X keine Übersetzung
Gibt ein einzelnes COBOL-Zeichen in einer EBCDIC-Zeichenfolge an, die so behandelt wird, als wäre es binäre Daten. Mit anderen Worten, es gibt keine Übersetzung von EBCDIC in Unicode oder von Unicode zu EBCDIC.

PIC G
Gibt eine EBCDIC-Zeichenfolge mit Doppelbyte an.

PIC S9(4) COMP (Ganzzahl 16-Bit)
Gibt eine ganze Zahl mit einer Länge von 16 Bit oder 2 Bytes an.

PIC S9(9) COMP (Ganzzahl 32-Bit)
Gibt eine ganze Zahl an, die 32 Bit oder 4 Bytes lang ist.

Siehe auch

Unterstützte TI-Datentypen