JCL-Drawer : Dessin généré de JOBTST04

//JOBTST04 JOB (COMPTA),'PROGRAMMEUR',CLASS=A,MSGCLASS=B, // COND=(8,GE),USER=USERTST,PASSWORD=PASSTST, // PRTY=8,REGION=2048K,TIME=1,NOTIFY=USERTST, // RESTART=* //************************************************************ //* JOBTST04 : 1 prog, plein de fichiers et de sysin * //************************************************************ //* commentaire du 1er DSN de la JOBLIB //* //JOBLIB DD DSN=TST.JOBLIB.LOAD1,DISP=SHR //* commentaire du 2eme DSN de la JOBLIB // DD DSN=TST.JOBLIB.LOAD2,DISP=SHR //* commentaire du step avec //* 2 sysins de tri longues et larges //* 12 DDnames en entrée //* 24 DDnames en sortie //* 5 lignes de commentaires 012345678901234567890123456789 //STEP01 EXEC PGM=PRGTST03 commSTEP01 //STEPLIB DD DSN=TST.STPLIB.LOAD1,DISP=SHR //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //* commentaire de la carte SYSIN //* suite du commentaire //SYSIN DD * 1ere ligne sysin 2eme ligne sysin 3eme ligne sysin 4eme ligne sysin 5eme ligne sysin 6eme ligne sysin 7eme ligne sysin 8eme ligne sysin 9eme ligne sysin 10eme ligne sysin 11eme ligne sysin 12eme ligne sysin 13eme ligne sysin 14eme ligne sysin 15eme ligne sysin 16eme ligne sysin /* //* commentaire de la carte PARAM01 //* suite du commentaire //* (suite entre paranthèses) //* suite du commentaire //PARAM01 DD * 1ere ligne parametre long------------------------------------------------------ 2eme ligne parametre long------------------------------------------------------ 3eme ligne parametre long------------------------------------------------------ 4eme ligne parametre long------------------------------------------------------ 5eme ligne parametre long------------------------------------------------------ 6eme ligne parametre long------------------------------------------------------ 7eme ligne parametre long------------------------------------------------------ 8eme ligne parametre long------------------------------------------------------ 9eme ligne parametre long------------------------------------------------------ 10eme ligne parametre long----------------------------------------------------- 11eme ligne parametre long----------------------------------------------------- 12eme ligne parametre long----------------------------------------------------- /* //ENTREE01 DD DSN=TST.JOBTST01.STEP01.ENTREE1,DISP=SHR //* commentaire de la carte SORTIE01 //* suite du commentaire //SORTIE01 DD DSN=TST.JOBTST01.STEP01.SORTIE01, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE02 //* suite du commentaire //SORTIE02 DD DSN=TST.JOBTST01.STEP01.SORTIE02, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE03 //* suite du commentaire //SORTIE03 DD DSN=TST.JOBTST01.STEP01.SORTIE03, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte ENTREE02 //* suite du commentaire //ENTREE02 DD DSN=TST.JOBTST01.STEP01.ENTREE2,DISP=SHR comm Entree02 en fin de ligne //* commentaire de la carte ENTREE03 //* suite du commentaire //ENTREE03 DD DSN=TST.JOBTST01.STEP01.ENTREE3,DISP=SHR //* commentaire de la carte ENTREE04 //* suite du commentaire //ENTREE04 DD DSN=TST.JOBTST01.STEP01.ENTREE4,DISP=SHR //* commentaire de la carte ENTREE05 //* - suite du commentaire //* - suite du commentaire //* - suite du commentaire //* - suite du commentaire //* - suite du commentaire //* = suite du commentaire //* = suite du commentaire //* = suite du commentaire //* = suite du commentaire //* = fin du commentaire //ENTREE05 DD DSN=TST.JOBTST01.STEP01.ENTREE5A,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE5B,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE5C,DISP=SHR // DD DUMMY commentaire // DD DSN=TST.JOBTST01.STEP01.ENTREE5E,DISP=SHR //* commentaire du DSN ENTREE5E //* suite du commentaire // DD DSN=TST.JOBTST01.STEP01.ENTREE5F,DISP=SHR //* commentaire du DSN ENTREE5G //* suite du commentaire // DD DSN=TST.JOBTST01.STEP01.ENTREE5G,DISP=SHR //* commentaire du DSN ENTREE5H //* suite du commentaire // DD DSN=TST.JOBTST01.STEP01.ENTREE5H,DISP=SHR //* commentaire de la carte ENTREE06 //* suite du commentaire //ENTREE06 DD DSN=TST.JOBTST01.STEP01.ENTREE6,DISP=SHR //* commentaire de la carte ENTREE7 //* suite du commentaire //ENTREE07 DD DSN=TST.JOBTST01.STEP01.ENTREE7,DISP=SHR //ENTREE08 DD DSN=TST.JOBTST01.STEP01.ENTREE8A,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE8B,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE8C,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE8D,DISP=SHR // DD DSN=TST.JOBTST01.STEP01.ENTREE8E,DISP=SHR //* commentaire de la carte SORTIE04 //* suite du commentaire //SORTIE04 DD DSN=TST.JOBTST01.STEP01.SORTIE04, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE05 //* suite du commentaire //SORTIE05 DD DSN=TST.JOBTST01.STEP01.SORTIE05, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE06 //* suite du commentaire //SORTIE06 DD DSN=TST.JOBTST01.STEP01.SORTIE06, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE07 //* suite du commentaire //SORTIE07 DD DSN=TST.JOBTST01.STEP01.SORTIE07, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE08 //* suite du commentaire //SORTIE08 DD DSN=TST.JOBTST01.STEP01.SORTIE08, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE09 //* suite du commentaire //SORTIE09 DD DSN=TST.JOBTST01.STEP01.SORTIE09, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE10 //* suite du commentaire (à DUMMY !!!) //SORTIE10 DD DUMMY,DCB=BLOCKSIZE=3280 //* commentaire de la carte SORTIE11 //* suite du commentaire //SORTIE11 DD DSN=TST.JOBTST01.STEP01.SORTIE11, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE12 //* suite du commentaire //SORTIE12 DD DSN=TST.JOBTST01.STEP01.SORTIE12, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE13 DD DSN=TST.JOBTST01.STEP01.SORTIE13, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE14 DD DSN=TST.JOBTST01.STEP01.SORTIE14, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, //* commentaire de la carte ENTREE09 //* suite du commentaire //ENTREE09 DD DSN=TST.JOBTST01.STEP01.ENTREE9,DISP=SHR //* commentaire de la carte ENTREE10 //* suite du commentaire //ENTREE10 DD DSN=TST.JOBTST01.STEP01.ENTREE10,DISP=SHR commENTREE10 //* commentaire de la carte ENTREE11 //* suite du commentaire //ENTREE11 DD DSN=TST.JOBTST01.STEP01.ENTREE11,DISP=SHR comENTREE11 //* commentaire de la carte ENTREE12 //* suite du commentaire //ENTREE12 DD DSN=TST.JOBTST01.STEP01.ENTREE12,DISP=SHR comENTREE12 // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE15 //* suite du commentaire //SORTIE15 DD DSN=TST.JOBTST01.STEP01.SORTIE15, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //* commentaire de la carte SORTIE16 //* suite du commentaire //SORTIE16 DD DSN=TST.JOBTST01.STEP01.SORTIE16, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE17 DD DSN=TST.JOBTST01.STEP01.SORTIE17, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE18 DD DSN=TST.JOBTST01.STEP01.SORTIE18, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE19 DD DSN=TST.JOBTST01.STEP01.SORTIE19, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE20 DD DSN=TST.JOBTST01.STEP01.SORTIE20, // DISP=(NEW,CATLG),RECFM=FB,LRECL=80,BLKSIZE=8000, // SPACE=(TRKS,(1,10)) commentaire //SORTIE21 DD SYSOUT=J,DEST=ABCD dernier commentaire //* commentaire de fin du job JOBTST04 //