El lenguaje JCL, se utiliza para indicar y definicir los trabajos a realizar por el OS. Así se compone de un conjunto de sentencias, donde especifican programas a ejecutar, recursos DLI, DB2, ficheros que componen al JOB.
Sentecias de control de trabajo básicas:
JOB - Identificación del conjunto de funcionalidad, programa que constituye al JCL.
EXEC - Paso de trabajo a ejecutar.
DD (Data Definition) – Identificación de los ficheros para un determinado paso.
Ejemplos Básicos:
REPRO, Llamada a la utilidad IDCAMS para copiar fichero con paso previo de borrado del fichero de salida.
//DELETE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE (EJEMPLO.REPRO.A2 ) NVSAM PURGE
SET MAXCC=0
/*
//REPRO1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//DD1 DD DISP=SHR,DSN=EJEMPLO.REPRO.A1
//DD2 DD DSN=EJEMPLO.REPRO.A2,
// DISP=(,CATLG,DELETE),
// DCB=(RECFM=FB),
// DATACLAS=D100CYLS,
// STORCLAS=AAAAA,
// MGMTCLAS=BBBBBB
//SYSIN DD *
REPRO INFILE (DD1) OUTFILE (DD2)
//*
Paso Ejecución programa con accesos DB2.
//PROGRAMA EXEC PGM=IKJEFT1A
//SYSOUT DD SYSOUT=*
//ENTRADA DD DSN=EJEMPLO.PRUEBA.A2,DISP=SHR
//SALIDA DD DSN=EJEMPLO.PRUEBA.A3,
// DISP=(,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=50,DSORG=PS),
// DATACLAS=D001TRKS,
// STORCLAS=XXXXXX,
// MGMTCLAS=CCCCCCC
//SYSTSIN DD *
DSN SYSTEM(SSID de la base de datos)
RUN PROGRAM(nombre_programa) PLAN(plan del programa)
/*