Condividi tramite


Aggiunta di caratteri SO iniziali e SI finali

Per le stringhe formattate PIC G, è possibile indicare all'ambiente di esecuzione dell'integratore delle transazioni (TI) di aggiungere un carattere di spostamento iniziale (SO) e un carattere di spostamento finale (SI) selezionando la casella di controllo Add Leading SO and Trailing SI nella scheda COBOL Definition (pagina delle proprietà) della stringa in TI Project.

Se è selezionata la casella di controllo Aggiungi so iniziale e SI finale , l'ambiente di runtime TI gestisce due byte aggiuntivi nella struttura dei dati mainframe usata per descrivere la stringa di caratteri a byte doppia (DBCS). Quando formatta un messaggio inviato al mainframe, l'ambiente di runtime TI aggiunge i byte SI iniziali e finali. Quando interpreta un messaggio ricevuto dal mainframe, l'ambiente di run-time TI elimina il so principale e i byte SI finali.

Il valore della dimensione della stringa PIC G specifica sempre il numero di caratteri DBCS double-byte nelle stringhe, indipendentemente dalla presenza o dall'assenza dei caratteri SO e SI circostanti.

L'uso di questa gestione automatica di SO e SI è nascosto dall'applicazione client. Tuttavia, l'applicazione mainframe deve assicurarsi che le dichiarazioni PIC X appropriate circondano la dichiarazione della stringa PIC G.

Il progetto TI genera le dichiarazioni appropriate per i byte SO e SI circostanti, come illustrato nel codice di esempio seguente:

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

La procedura guidata Import COBOL in TI Project non imposta l'opzione per aggiungere byte SO iniziali e byte FINALI. In altre parole, la Procedura guidata Import COBOL non pone alcun significato sulla presenza di dichiarazioni PIC X che circondano una stringa PIC G. Se un programma di transazione mainframe esistente (TP) usa dichiarazioni COBOL che contengono dichiarazioni esplicite per i caratteri SO e SI che includono stringhe PIC G, è necessario modificare manualmente l'interfaccia creata dalla Procedura guidata Importa COBOL.