Ajout de caractères SO en tête et SI en queue

Pour les chaînes au format PIC G, vous pouvez indiquer à l'environnement d'exécution de l'intégrateur de transactions (TI) d'ajouter un caractère de décalage sortant (SO) au début et un caractère de décalage entrant (SI) à la fin en cochant la case Ajouter un SO de début et un SI de fin dans l'onglet Définition COBOL de la page de propriétés du projet TI.

Si la case à cocher Add Leading SO and Trailing SI est coché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 DBCS (Double Byte Character Set). Lorsqu’il formate 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 PIC G 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 de so et de 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 COBOL dans TI Project ne définit pas l’option permettant d’ajouter des octets de début SO et de fin SI. En d’autres termes, l’Assistant Importation 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 les chaînes PIC G, vous devez modifier manuellement l’interface créée par l’Assistant Importation COBOL.