Esempio di programma wrapper

È possibile utilizzare questo esempio di programma wrapper come prototipo di codice di programma wrapper.

È necessario fornire un programma wrapper se il membro di copia contiene uno dei seguenti elementi:

un riferimento a un carattere simbolico
una sezione pictures numerica modificata contenente un simbolo di valuta che richiede una clausola CURRENCY SIGN
una virgola utilizzata come virgola decimale in una clausola PICTURE

Nota: In questi casi nel programma wrapper deve essere specificato un paragrafo SPECIAL-NAMES che fornisce le definizioni.

Esempio di programma wrapper

ex.cbl

       IDENTIFICATION DIVISION.
       PROGRAM-ID. MINI.
       ENVIRONMENT DIVISION.
       CONFIGURATION SECTION.
       SPECIAL-NAMES.
           SYMBOLIC CHARACTERS EXMARK IS 134
           DECIMAL-POINT IS COMMA
           CURRENCY SIGN  'EUR' PICTURE SYMBOL 'Q'.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
            COPY member.
       END PROGRAM MINI.