Adición de caracteres SO iniciales y SI finales
En el caso de las cadenas con formato PIC G, puede indicar al entorno en tiempo de ejecución del Integrador de transacciones (TI) que agregue un carácter de desplazamiento inicial (SO) y un carácter de desplazamiento final (SI) activando la casilla Agregar SO inicial y SI final en la pestaña Definición de COBOL (página de propiedades) de la cadena en el proyecto de TI.
Si está activada la casilla Agregar SO inicial y SI final , el entorno en tiempo de ejecución de TI controla dos bytes adicionales en la estructura de datos del sistema central que se usa para describir la cadena de juego de caracteres de doble byte (DBCS). Cuando da formato a un mensaje enviado al sistema central, el entorno en tiempo de ejecución de TI agrega los bytes de SO iniciales y SI finales. Cuando interpreta un mensaje recibido del sistema central, el entorno en tiempo de ejecución de TI descarta el SO inicial y los bytes de SI finales.
El valor de dimensión de la cadena PIC G siempre especifica el número de caracteres DBCS de doble byte en las cadenas, independientemente de la presencia o ausencia de los caracteres SO y SI circundantes.
El uso de este control automático de SO e SI está oculto de la aplicación cliente. Sin embargo, la aplicación del sistema central debe asegurarse de que las declaraciones PIC X adecuadas rodean la declaración de la cadena PIC G.
El proyecto de TI genera las declaraciones adecuadas para los bytes SO e SI circundantes, como se muestra en el código de ejemplo siguiente:
01 A-SOSI-WRAPPED-DBCS.
05 LEADING-SO-1 PIC X.
05 MY-DBCS-STRING PIC G(80).
05 LEADING-SI-1 PIC X.
El Asistente para importación de COBOL en el proyecto de TI no establece la opción para agregar bytes de SO iniciales y SI finales. En otras palabras, el Asistente para importación de COBOL no supone ningún significado en la presencia de declaraciones PIC X que rodean una cadena PIC G. Si un programa de transacciones de sistema central (TP) existente usa declaraciones COBOL que contienen declaraciones explícitas para caracteres SO y SI que encapsulan cadenas PIC G, debe modificar manualmente la interfaz creada por el Asistente para importar COBOL.