Konvertieren von Datentypen von Automation zu z/OS COBOL
Verwenden Sie die Tabellen in diesem Thema als Leitfaden, um anzugeben, wie TI Konvertierungen von Automation-Datentypen in COBOL-Datentypen verarbeiten soll. Weitere Informationen zu den spezifischen Datentypen finden Sie unter Unterstützte TI-Datentypen.
Verwenden Sie den folgenden Codeschlüssel, um die Codes in den Spalten Mögliche Konvertierungsfehler und Erforderliche Eigenschafteneinstellungen in jeder Tabelle zu interpretieren.
| Code | BESCHREIBUNG |
|---|---|
| r | Bereichsfehler sind möglich. |
| b | Möglicher Genauigkeitsverlust durch die Konvertierung von Basis 2 auf Basis 16. |
| p | Möglicher Genauigkeitsverlust aufgrund der Skalierungsspezifikation des Bildformats. |
| m | Zuordnungsfehler sind möglich. |
| f | yyyyddd und hhmmss. |
| Ein | Sie müssen abschneiden, runden oder Fehler unter Fehlerbehandlung auf der Registerkarte COBOL-Definition der Eigenschaftenseite angeben. |
| C | Sie müssen die Genauigkeit und Skalierung angeben, indem Sie auf der Registerkarte COBOL-Definition der Eigenschaftenseite die Felder Ziffern links und Ziffern rechts ausfüllen. |
| D | Sie müssen die Zeichenfolgenbreite angeben, indem Sie auf der Eigenschaftenseite auf der Registerkarte COBOL-Definition das Feld Größe ausfüllen. |
| E | Unicode- oder EBCDIC-Zuordnungsinformationen sind erforderlich, z. B. eine Codepage. |
| F | Für Arrays, deren Länge kleiner als der angegebene Maximalwert ist, müssen Sie auf der Eigenschaftenseite unter Nachgestellter Füllstoff auf der Registerkarte COBOL-Definition die Größe des Füllstoffs angeben. |
| G | Sie müssen angeben, wie mit Zeichenfolgen umgegangen werden soll. Klicken Sie unter Zeichenfolgentrennzeichen auf der Registerkarte COBOL-Definition der Eigenschaftenseite auf Leerzeichen oder null beendet. Klicken Sie dann auf der Eigenschaftenseite unter Fehlerbehandlung auf der Registerkarte COBOL-Definition auf Abschneiden oder Fehler, um anzugeben, was TI tun soll, wenn die Zeichenfolge zu lang ist. |
| H | Die maximale Größe ist erforderlich. |
| I | Lokalisierung ist erforderlich. |
| J | Optionale SO- und SI-Einfüge- und -löschungen werden unterstützt. |
Die folgende Tabelle zeigt die Standardwerte, die TI zum Konvertieren von Automation-Datentypen in COBOL-Datentypen verwendet.
Standard
| Vom Automation-Datentyp | An z/OS COBOL-Datentyp | Mögliche Konvertierungsfehler | Erforderliche Eigenschafteneinstellungen |
|---|---|---|---|
| Ganzzahl ohne Vorzeichen mit 1 Byte | PIC X Keine Übersetzung | Keine | Keine |
| Ganzzahl mit 2 Byte-Vorzeichen | PIC S9(4) COMP (Integer 16-Bit) | Keine | Keine |
| Ganze Zahl mit 4 Byte mit Vorzeichen | PIC S9(9) COMP (Integer 32-Bit) | Keine | Keine |
| 4-Byte Real (Single) | COMP-1 | br | Keine |
| 8-Byte Real (Double) | COMP-2 | br | Keine |
| Boolean | PIC S9(4) COMP (Integer 16-Bit) | Keine | Keine |
| Zeichenfolge mit variabler Länge | PIC X | m | DEG |
| Währung | COMP-3 gepackte Dezimalzahl | pr | C |
| Datum (Datum und Uhrzeit) | COMP-3 gepackte Dezimalzahl | pf | CI |
| Datum (nur Datum) | COMP-3 gepackte Dezimalzahl | pf | CI |
| Datum (nur Uhrzeit) | COMP-3 gepackte Dezimalzahl | pf | CI |
| Decimal | COMP-3 gepackte Dezimalzahl | pr | C |
| Array (beliebiger Datentyp) | TRITT FESTE ZEITEN AUF | Keine | FH |
Hinweis
Wenn Sie ganze oder fraktionierte Zahlen von Visual Basic Single- oder Visual Basic Double-Datentypen in DPC-Datentypen (Packed Decimal or Distributed Program Call) Zoned Decimal (DPC) konvertieren, ist TI auf eine Genauigkeit von 1 bis 18 Ziffern beschränkt, die vom Dezimalpunkt übrig bleibt (z. B. 1.2345678901234567E+17). Wenn Sie Die Datentypen "Decimal" oder "DPC Zoned Decimal" konvertieren, sollten Sie in den Visual Basic-Datentyp Decimal konvertieren.
Die folgende Tabelle zeigt die anderen unterstützten Datentypzuordnungen, die Sie in TI Project festlegen können, um die in der vorherigen Tabelle dargestellten Standardwerte außer Kraft zu setzen.
Unterstützt in Transaction Integrator
| Vom Automation-Datentyp | An z/OS COBOL-Datentyp | Mögliche Konvertierungsfehler | Erforderliche Eigenschafteneinstellungen |
|---|---|---|---|
| Ganzzahl ohne Vorzeichen mit 1 Byte | PIC S9(4) COMP (Integer 16-Bit) | Keine | Keine |
| Ganzzahl ohne Vorzeichen mit 1 Byte | COMP-3 gepackte Dezimalzahl | Keine | C |
| Ganzzahl mit 2 Byte-Vorzeichen | COMP-3 gepackte Dezimalzahl | Keine | C |
| Ganzzahl mit 2 Byte-Vorzeichen | DISPLAY Zoned Decimal | Keine | C |
| Ganze Zahl mit 4 Byte mit Vorzeichen | COMP-3 gepackte Dezimalzahl | Keine | C |
| Ganze Zahl mit 4 Byte mit Vorzeichen | DISPLAY Zoned Decimal | Keine | C |
| 4-Byte Real (Single) | PIC S9(4) COMP (Integer 16-Bit) | p,r | Keine |
| 4-Byte Real (Single) | PIC S9(9) COMP (Integer 32-Bit) | p,r | Keine |
| 4-Byte Real (Single) | COMP-3 gepackte Dezimalzahl | p,r | C |
| 4-Byte Real (Single) | DISPLAY Zoned Decimal | p,r | C |
| 8-Byte Real (Double) | PIC S9(4) COMP (Integer 16-Bit) | p,r | Keine |
| 8-Byte Real (Double) | PIC S9(9) COMP (Integer 32-Bit) | p,r | |
| 8-Byte Real (Double) | COMP-3 gepackte Dezimalzahl | p,r | C |
| 8-Byte Real (Double) | DISPLAY Zoned Decimal | p,r | C |
| Boolean | PIC S9(9) COMP (Integer 32-Bit) | Keine | Keine |
| Boolean | COMP-3 gepackte Dezimalzahl | Keine | C |
| Zeichenfolge mit variabler Länge | PIC G | m | DEGJ |
| Währung | PIC S9(?) V9(?) COMP (16-Bit) | pr | Keine |
| Währung | PIC S9(?) V9(?) COMP (32-Bit) | pr | Keine |
| Währung | DISPLAY Zoned Decimal | pr | C |
| Decimal | PIC S9(?) V9(?) COMP (16-Bit) | pr | Keine |
| Decimal | PIC S9(?) V9(?) COMP (32-Bit) | pr | Keine |
| Decimal | DISPLAY Zoned Decimal | pr | C |
| Array (beliebiger Datentyp) | TRITT JE NACH | Keine | FH |
Hinweis
Wenn Sie ganze oder Bruchzahlen von Visual Basic-Datentypen Single oder Visual Basic Double in die Datentypen "Gepackt Decimal" oder "DPC Zoned Decimal" konvertieren, ist TI auf eine Genauigkeit von 1 bis 18 Ziffern links vom Dezimaltrennzeichen beschränkt (z. B. 1,2345678901234567E+17).
Die folgende Tabelle enthält zusätzliche unterstützte Datentypzuordnungen, die von der TI-Laufzeitumgebung unterstützt werden.
Nur von der TI-Laufzeitumgebung unterstützt
| Vom Automation-Datentyp | In z/OS COBOL-Datentyp | Mögliche Konvertierungsfehler | Erforderliche Eigenschafteneinstellungen |
|---|---|---|---|
| Ganze Zahl mit 1 Byte ohne Vorzeichen | PIC S9(9) COMP (Integer 32-Bit) | Keine | Keine |
| Ganze Zahl mit 1 Byte ohne Vorzeichen | DISPLAY Zoned Decimal | Keine | C |
| Boolean | DISPLAY Zoned Decimal | Keine | C |
Derzeit werden keine anderen Datentypkonvertierungen von Automation in COBOL von TI unterstützt.
Hinweis
Wenn die COBOL-Verwendung DISPLAY ohne Vorzeichen lautet und Sie den Automation-Typ in String ändern, wird das COBOL-Bild in PIC X geändert, das die gleiche interne Datendarstellung aufweist. Die Länge bleibt gleich und wirkt sich daher nicht auf Ihr Mainframeprogramm aus.
Weitere Informationen
Unterstützte TI-Datentypen
Konvertieren von Datentypen von z/OS COBOL in Automation
Datentypkonvertierung