El editor LPEX de System z acepta sentencias -INC e ++INCLUDE como sinónimos de las sentencias COBOL COPY y las sentencias PL/I %INCLUDE.
-INC nombrelibrocopias
++INCLUDE nombrelibrocopias
En estos ejemplos, nombrelibrocopias es el
nombre del miembro del conjunto de datos particionados que hay que considerar como parte del origen. En el caso de los archivos
locales, es el nombre del archivo sin su extensión.
La sentencia
-INC suele empezar en la columna 1 de la línea fuente, pero en el
caso de COBOL, también puede empezar en la columna 7, 8, 9 o 10, y la
sentencia ++INCLUDE siempre empieza en la columna 8 de la línea
fuente. Identification Division.
Program-ID. StartApp.
Data Division.
Working-Storage Section.
01 Program-pass-fields.
05 Temp-name Pic x(30).
01 Program-other-fields.
05 Input-name Pic x(30).
05 Char-count Pic 99 Value ZEROS.
-INC COPY3.
++INCLUDE COPY4.
Procedure Division.