Ajout de caractères SO de début et SI de fin

  • Article

Pour les chaînes au format PIC G, vous pouvez indiquer à l’environnement d’exécution TI (Transaction Integrator) d’ajouter un caractère de décalage sortant (SO) de début et un caractère de fin de décalage (SI) en sélectionnant la zone Ajouter un case activée SO de début et si de fin dans l’onglet Définition COBOL (page de propriétés) de la chaîne dans PROJET TI.

Si la zone Ajouter un so principal et un si case activée de fin est sélectionnée, l’environnement d’exécution TI gère deux octets supplémentaires dans la structure de données mainframe utilisée pour décrire la chaîne de jeu de caractères d’octets doubles (DBCS). Lorsqu’il met en forme un message envoyé au mainframe, l’environnement d’exécution TI ajoute les octets SO de début et si de fin. Lorsqu’il interprète un message reçu à partir du mainframe, l’environnement d’exécution TI ignore le SO de début et les octets SI de fin.

La valeur de dimension de la chaîne G PIC spécifie toujours le nombre de caractères DBCS sur deux octets dans les chaînes, quelle que soit la présence ou l’absence des caractères SO et SI environnants.

L’utilisation de cette gestion automatique DES et SI est masquée dans l’application cliente. Toutefois, l’application mainframe doit s’assurer que les déclarations PIC X appropriées entourent la déclaration de la chaîne PIC G.

TI Project génère les déclarations appropriées pour les octets SO et SI environnants, comme indiqué dans l’exemple de code suivant :

01     A-SOSI-WRAPPED-DBCS.  
       05  LEADING-SO-1                            PIC X.  
       05  MY-DBCS-STRING                          PIC G(80).  
       05  LEADING-SI-1                            PIC X.

L’Assistant Importation de COBOL dans TI Project ne définit pas l’option permettant d’ajouter des octets SO de début et si de fin. En d’autres termes, l’Assistant Importation de COBOL n’accorde aucune importance à la présence de déclarations PIC X entourant une chaîne PIC G. Si un programme de transaction mainframe (TP) existant utilise des déclarations COBOL qui contiennent des déclarations explicites pour les caractères SO et SI qui encapsulent des chaînes PIC G, vous devez modifier manuellement l’interface créée par l’Assistant Importation de COBOL.