Conversion de types de données de z/OS COBOL vers Automation
Utilisez les tableaux de cette rubrique comme guide lorsque vous configurez la façon dont vous souhaitez que Transaction Integrator (TI) gère les conversions des types de données COBOL en types de données Automation. Pour plus d’informations sur les types de données spécifiques, consultez Types de données TI pris en charge.
Utilisez la clé de code suivante pour interpréter les codes dans les colonnes Erreurs de conversion possibles et Paramètres de propriété obligatoires dans chaque table.
| Code | Description |
|---|---|
| r | Erreurs de plage possibles. |
| b | Perte de précision possible en raison de la conversion de base 2 en base 16. |
| p | Perte de précision possible en raison de la spécification de mise à l’échelle du format d’image. |
| m | Erreurs de mappage possibles. |
| f | yyyddd et hhmmss. |
| A | Vous devez spécifier Tronquer, arrondir ou erreur sous Gestion des erreurs sous l’onglet Définition COBOL de la page de propriétés. |
| C | Vous devez spécifier la précision et la mise à l’échelle en remplissant les zones Chiffres à gauche et Chiffres à droite sous l’onglet Définition COBOL de la page de propriétés. |
| D | Vous devez spécifier la largeur de chaîne en remplissant la zone Taille sous l’onglet Définition COBOL de la page de propriétés. |
| E | Des informations de mappage Unicode ou EBCDIC sont requises, telles qu’une page de code. |
| F | Pour les tableaux dont la longueur est inférieure à la longueur maximale spécifiée, vous devez spécifier Taille du remplissage sous Remplissage de fin sous l’onglet Définition COBOL de la page de propriétés. |
| G | Vous devez spécifier la façon dont les chaînes doivent être traitées. Cliquez sur Espace rembourré ou Null terminé sous Limitation de chaîne sous l’onglet Définition COBOL de la page de propriétés. Cliquez ensuite sur Tronquer ou Erreur sous Gestion des erreurs sous l’onglet Définition COBOL de la page de propriétés pour spécifier ce que TI doit faire si la chaîne est trop longue. |
| H | La taille maximale est requise. |
| I | La localisation est requise. |
| J | L’insertion et la suppression de SO et SI facultatives sont prises en charge. |
Le tableau suivant montre les valeurs par défaut que TI utilise lorsque vous importez du code source COBOL.
Default
| À partir du type de données COBOL z/OS | Vers le type de données Automation | Erreurs de conversion possibles | Paramètres de propriété requis |
|---|---|---|---|
| COMP-1 | Real de 4 octets (unique) | b,r | None |
| COMP-2 | Real de 8 octets (Double) | b,r | None |
| COMP-3 Packed Decimal | Devise | p | Secteur |
| COMP-3 Packed Decimal | Decimal | p | Secteur |
| DATE et HEURE | Date | None | I |
| TIME uniquement | Date | None | I |
| DATE uniquement | Date | None | I |
| PIC X | Chaîne de longueur variable | m | DEG |
| PIC X Aucune traduction | Entier non signé de 1 octet | None | None |
| PIC S9(4) COMP (Entier 16 bits) | Entier signé sur 2 octets | None | None |
| PIC S9(4) COMP (Entier 16 bits) | Boolean | None | None |
| PIC S9(9) COMP (Entier 32 bits) | Entier signé sur 4 octets | None | None |
| OCCURRENCES HORAIRES FIXES | Array | None | None |
Notes
Lorsque vous convertissez des nombres fractionnaires à partir de types de données décimales d’appel décimal packed ou d’appel de programme distribué (DPC), vous devez convertir en type de données Decimal Visual Basic.
Pour les types de données COBOL numériques COMP, COMP-3 et DISPLAY, la valeur par défaut est basée sur la précision et l’échelle indiquées dans le tableau suivant. Lorsque COBOL utilise DISPLAY sans signe et que vous remplacez le type Automation par String, l’image COBOL est remplacée par PIC X, qui a la même représentation de données interne. La longueur reste la même et n’affecte donc pas votre programme mainframe.
| Précision et mise à l’échelle pour z/OS COBOL | To Automation, type de données |
|---|---|
| Précision 1-4, échelle 0 | Entier signé sur 2 octets |
| Précision 5-9, échelle 0 | Entier signé sur 4 octets |
| Précision 5-7, échelle 3-7 | Real sur 4 octets |
| Précision 8-18, échelle 3-18 | Real de 8 octets |
| Précision 1-18, échelle 1-2 | Devise |
| Précision 10-18, échelle 0 | Decimal |
Le tableau suivant présente les autres mappages de types de données pris en charge que vous pouvez définir dans TI Project pour remplacer les valeurs par défaut présentées précédemment dans cette rubrique.
Pris en charge dans l’intégrateur de transactions
| À partir du type de données COBOL z/OS | To Automation, type de données | Erreurs de conversion possibles | Paramètres de propriété requis |
|---|---|---|---|
| COMP-1 | Array | None | None |
| COMP-2 | Array | None | None |
| COMP-3 Packed Decimal | Entier signé sur 2 octets | p,r | Secteur |
| COMP-3 Packed Decimal | Entier signé sur 4 octets | p,r | Secteur |
| COMP-3 Packed Decimal | Real de 4 octets (simple) | p,r | Secteur |
| COMP-3 Packed Decimal | Real de 8 octets (double) | p | C |
| COMP-3 Packed Decimal | Boolean | None | None |
| COMP-3 Packed Decimal | Entier non signé de 1 octet | r | None |
| COMP-3 Packed Decimal | Array | None | None |
| DISPLAY Zoned Decimal | Entier signé sur 2 octets | p,r | Secteur |
| DISPLAY Zoned Decimal | Real de 4 octets (simple) | p,r | Secteur |
| DISPLAY Zoned Decimal | Real de 8 octets (double) | p,r | Secteur |
| DISPLAY Zoned Decimal | Devise | p,r | Secteur |
| DISPLAY Zoned Decimal | Decimal | p,r | Secteur |
| DATE et HEURE | Array | None | None |
| TIME uniquement | Array | None | None |
| DATE uniquement | Array | None | None |
| PIC X | Array | None | None |
| PIC X Aucune traduction | Array | None | None |
| PIC G | Chaîne de longueur variable | m | DEGJ |
| PIC G | Array | None | None |
| PIC S9(4) COMP (Entier 16 bits) | Entier non signé de 1 octet | r | None |
| PIC S9(4) COMP (Entier 16 bits) | Array | None | None |
| PIC S9(9) COMP (Entier 32 bits) | Boolean | None | None |
| PIC S9(9) COMP (Entier 32 bits) | Entier non signé de 1 octet | r | None |
| PIC S9(9) COMP (Entier 32 bits) | Array | None | None |
| PIC S9( ?) V9( ?) COMP (16 bits) | Real de 4 octets (simple) | p,r | None |
| PIC S9( ?) V9( ?) COMP (16 bits) | Real de 8 octets (double) | p,r | None |
| PIC S9( ?) V9( ?) COMP (16 bits) | Devise | p,r | None |
| PIC S9( ?) V9( ?) COMP (16 bits) | Decimal | p,r | None |
| PIC S9( ?) V9( ?) COMP (32 bits) | Real de 4 octets (simple) | p,r | None |
| PIC S9( ?) V9( ?) COMP (32 bits) | Real de 8 octets (double) | p,r | None |
| PIC S9( ?) V9( ?) COMP (32 bits) | Devise | p,r | None |
| PIC S9( ?) V9( ?) COMP (32 bits) | Decimal | p,r | None |
| SE PRODUIT EN FONCTION DE | Array | None | None |
Notes
Lorsque vous convertissez des nombres fractionnaires à partir de types de données Décimal packed ou Décimal interzone DPC, vous devez les convertir en type de données Visual Basic Decimal.
Le tableau suivant montre d’autres mappages de types de données pris en charge que l’environnement d’exécution TI prend en charge.
Pris en charge uniquement par l’environnement d’exécution TI
| À partir du type de données COBOL z/OS | To Automation, type de données | Erreurs de conversion possibles | Paramètres de propriété requis |
|---|---|---|---|
| DISPLAY Zoned Decimal | Entier non signé de 1 octet | None | Secteur |
| DISPLAY Zoned Decimal | Entier signé sur 4 octets | None | Secteur |
| DISPLAY Zoned Decimal | Boolean | Aucun | Secteur |
Aucune autre conversion de type de données de COBOL vers Automation n’est prise en charge par TI pour l’instant.
Voir aussi
Types de données d’intégrateur de transactions pris en charge
Conversion de types de données d’Automation en z/OS COBOL]
Conversion de type de données