Foro de Cobol
Registrate en el Foro de Cobol y Aporta tus experiencias y conocimientos sobre este lenguaje de programacion, con tu ayuda el foro crecera y todos nos podremos beneficiar de los conocimientos de los demas.

Gracias por entrar a COBOLEROS.ES
Síguenos en Twitter

2.2.- PROCEDIMIENTOS IN-STREAM Y PROCEDIMIENTOS CATALOGADOS.

Ver el tema anterior Ver el tema siguiente Ir abajo

2.2.- PROCEDIMIENTOS IN-STREAM Y PROCEDIMIENTOS CATALOGADOS.

Mensaje por Coboler@ el Lun Mayo 02, 2011 8:37 pm

Los procedimientos in-stream son aquellos que están escritos en el propio JCL, los catalogados son los que están guardados en la librería SYS1.PROCLIB o en otra librería que tenga la instalación preparada para ello.

El máximo número de procedimientos in-stream permitidos en un JCL es de 15.

Procedimiento In-Stream.

Comienzan con PROC y terminan con PEND.

El procedimiento debe estar definido antes de la sentencia EXEC que lo ejecute.

Las sentencias de control de JES2 o JES3 no pueden aparecer en procedimientos in-stream ni catalogados.

EJEMPLO:

//JOB1 JOB CUENTA1,’CHARO’
//PTEST PROC
//PASOA EXEC PGM=PROG001
//DDA DD DSNAME=A.B.C,DISP=OLD
//DDB DD DSNAME=A.B.J,DISP=(MOD,PASS)
//DDOUT DD SYSOUT=*
//PASOB EXEC PGM=PROG002
//DDC DD DSNAME=*.PASOA.DDA,DISP=OLD
// PEND
//PASO01 EXEC PROC=PTEST
http://PASOA.IN DD *
...........
(data)
...........
/*


Explicación: el PASO01 ejecuta el procedimiento PTEST que contiene dos pasos el PASOA y el PASOB e introduce un fichero in-stream al PASOA.

Fin de SYSIN : /* o //.


Procedimiento In-Stream con parámetros.

EJEMPLO:

//DESK3 PROC A=NEWYORK,F=3350,C=(OLD,CATLG,DELETE)
......
.......
//ENDING PEND



Procedimiento catalogado.

Pueden comenzar por la sentencia PROC (es opcional), pero no pueden terminar con PEND. Lo más común es utilizar la sentencia PROC ya que en ella es donde se asignan valores a los parámetros simbólicos.

EJEMPLO:

// PROC
//PASOA EXEC PGM=PROG001
//DDA DD SYSOUT=A
//DDB DD SYSOUT=*
//PASOB EXEC PGM=PROG002
//DDC DD DSNAME=A.B.C,DISP=OLD
//DDE DD SYSOUT=*


Estará salvado como PTEST en la librería SYS1.PROCLIB.

El JOB que ejecute este procedimiento sería:

//JOB1 JOB ,’CHARO’
//PASO10 EXEC PROC=PTEST
http://PASOB.DDC DD DISP=(OLD,DELETE)


Ejecuta el procedimiento catalogado y modifica una característica de un fichero definido en el procedimiento.

Procedimiento catalogado con parámetros.

EJEMPLO:

// PROC UT=3800,FM=J287,DT=LOCAL
avatar
Coboler@
Admin

Mensajes : 215
Reputación : 19
Fecha de inscripción : 02/02/2011
Edad : 37
Localización : Madrid

Ver perfil de usuario http://www.coboleros.es

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.