Últimamente hemos actualizado algunos artículos del blog, así que aprovecho para comentar los artículos actualizados y lo que se ha añadido.
WORKING-STORAGE: definiendo variables.
Añadido campos editados: campos tipo Z.ZZZ.ZZ9,99
Utilizados principalmente en listados para eliminar los ceros a la izquierda en las variables numéricas.
En lugar de 000999,99 se verá 999,99.
Añadido cláusala FILLER: utilizado para campos constantes o para rellenar una variable superior hasta una determinada longitud.
01 WX-CAMPO-PRINCIPAL.
05 WX-CAMPO1 PIC X(50).
05 FILLER PIC X(30).
Esto hace que WX-CAMPO-PRINCIPAL mida 80.
Añadido clásula REDEFINES: utilizada para dar dos formatos distintos a una misma variable, o para "juntar" en un solo nivel una variable con subniveles.
Añadido cláusula COPY: tanto para código de WORKING (copy de working) como de PROCEDURE (copy de procedure).
PROCEDURE DIVISION: proceso del programa.
Añadido cláusula STRING: como concatenar campos en COBOL. Uso de distintos tipos de la cláusula DELIMITED BY.
Mi primer programa de cruce. Cruce 1-1.
Hemos detallado más este ejemplo. Se ha añadido el JOB para ejecutarlo y se ha explicado más en detalle todo el código.
OFFSET y S0C7, ¿Cómo localizar el error?
Añadido el código REXX del OFFSET para que lo podáis ejecutar en vuestros entornos. Te indica la línea exacta del OFFSET.
Utilidades REXX II: editar fichero desde JCL.
Hemos añadido una versión nueva del código REXX de edición de ficheros desde JCL para descargar.
