Memento JCL

JCL (Job Control Language) Carte JOB
Dfinition de l'environnement gnral d'un job

Nom du JOB, du programmeur, classe d'excution, classe de sortie, niveau des messages d'erreur, dure d'excution, conditions d'excution, conditions de reprise... : //jobname JOB (compte),programmeur, // CLASS=classe-d'entre, // MSGCLASS=classe-de-sortie, // MSGLEVEL=(jcl,messages), // TIME=(mn,ss)|1440|NOLIMIT // REGION=nK|nM, // NOTIFY=userid|&SYSUID, // RESTART=(*[.step][.procstep]), // COND=[(](rc,oprateur)[,EVEN| ONLY)], // TYPRUN=COPY|HOLD|JCLHOLD|SCAN, // GROUP=groupe-racf, // SECLABEL=label-racf, // USER=userid, // PASSWORD=(mdp[,nouveau-mdp]), // BYTES=(n[,CANCEL|DUMP|WARNING]), // CARDS=(n[,CANCEL|DUMP|WARNING]), // LINES=(n[,CANCEL|DUMP|WARNING]), // PAGES=(n[,CANCEL|DUMP|WARNING]), // RD=R|RNC|NR|NC, // PRTY=priorit, // PERFORM=n, // ADDRSPC=VIRT|REAL
// REGION=nnK | nnM, // TIME=(mn,ss), // ACCT=compte, // COND=[(](rc,oprateur[,step])[,EVEN |ONLY)], // ADDRSPC=VIRT|REAL // DPRTY=(nn[,nn]), // DYNAMNBR=nn, // PERFORM=n, // RD=R|RNC|NR|NC] //STEPLIB DD(1) DSN=loadlib,DISP=SHR(4)
Carte JCLLIB
Dfinition des PDS de PROC et INCLUDE
//[name] JCLLIB ORDER=(proclib[,...])
Paramtre DISP
Disposition des fichiers
NEW OLD DISP=(SHR, MOD KEEP DELETE CATLG, UNCATLG KEEP DELETE CATLG) UNCATLG PASS
Carte DD (Data definition)

Dfinition des donnes (fichiers) 1 / Donnes en ligne (80 caractres)
//ddname DD *|DATA,DLM=$$ Ligne 1 Ligne n ... /*|$$
Execution de procdure
//[name] JCLLIB ORDER=(proclib[,...])(2) //stepname EXEC [PROC]=nom-proc, // conste=valeur[,...]
Utilisation du fichier Disposition en fin normale Disposition en fin anormale NEW : Nouveau fichier cr au step OLD : Fichier existant dont on s'assure l'exclusivit SHR : Fichier existant utilisable par d'autres JOB MOD : Fichier auquel on peut ajouter des enreg. KEEP : Fichier conserv aprs le step DELETE : Fichier supprim aprs le step CATLG : Fichier catalogu aprs le step UNCATLG : Fichier dcatalogu mais pas supprim PASS : La disposition finale du fichier est dtermine par le step suivant qui utilise ce fichier.
Complment
stepname : Commence en colonne 3 par un caractre alphabtique. Longueur max: 8 digits. nom-pgm : Nom du programme excuter (8 digits max). Pgm compil, link-dit et dont le load est disponible en JOBLIB ou STEPLIB. nom-proc : Nom de la procdure appele.(3)
2 / Donnes dans un fichier physique

//ddname DD DSN=datasetname[(membre)], // DISP=SHR|MOD|OLD|...(4) // autre-paramtres autre-paramtres : SPACE, DCB, RECFM, LRECL, BLKSIZE, LIKE, MGMTCLAS, DATACLAS, STORCLAS, REF, UNIT, VOLUME, AVGREC, LABEL...
Carte PROC et PEND

Dfinition d'une procdure
//nom-proc PROC [conste=valeur[,...]] //* ... // PEND
Disposition par dfaut

DISP absent : DISP=(NEW,DELETE,DELETE) DISP=NEW : DISP=(NEW,DELETE,DELETE) DISP=SHR : DISP=(SHR,KEEP,KEEP) DISP=OLD : DISP=(OLD,KEEP,KEEP) DISP=(NEW,PASS) : DISP=(NEW,PASS,DELETE) DISP=(SHR,PASS) : DISP=(NEW,PASS,KEEP)
4 / Donnes sur une imprimante (Queue)

//ddname DD SYSOUT=classe, // DEST=imprimante, // COPIES=number, // HOLD=YES|NO,OUTLIM=lignes, // SEGMENT=pages, // FREE=CLOSE|END,SPIN=UNALLOC|NO
Complment
jobname : Commence en colonne 3 par un caractre alphabtique pour une longueur max de 8 digits. Comporte souvent le userid. compte : Dpend du site. Programmeur : Nom du dveloppeur et/ou information sur le job. Un job comporte au maximum 255 steps.
Carte SET
Dfinition de la valeur d'une constante
//[name] SET conste=valeur[,...]
Complment
La disposition DELETE est uniquement possible si la priode de rtention du fichier supprimer est atteinte.
5 / Sans donnes
//ddname DD DUMMY
Carte INCLUDE
Insertion d'un jcl dans un job ou une procdure
//[name] INCLUDE MEMBER=membre
Concatnation
//ddname DD fic1(1) // DD fic2(1) // [...]
Lgende
JOB : Carte CLASS : Paramtre mn : Valeur variable de paramtre NOLIMIT : Valeur fixe de paramtre conste : Constante Ligne 1 : Donnes | : Ou [] : Facultatif (1) (3) voir carte DD voir carte PROC et PEND (2) voir carte JCLLIB (4) voir paramtre DISP
Carte EXEC
Excution de programme
//JOBLIB DD(1) DSN=loadlib,DISP=SHR(4) //stepname EXEC PGM=nom-pgm, // [PARM=paramtre1,
Override de fichier dans un jeu d'appel

//proc-stepname.ddname DD fic1(1)
Complment
membre : doit tre prsent dans le dataset dclar en carte JCLLIB.(2)
Utilitaires IDCAMS
Utilitaire gnral JCL d'appel
//stepname EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=classe //ddname1 DD fic1 [//ddname2 DD fic2] //SYSIN DD *
Conversion, rorg et copie de fichier

REPRO I[N]FILE(ddname1) O[UT]FILE(ddname2) REP[LACE]|N[O]REP[LACE] R[E]US[E]|N[O]R[E]US[E] + + +
//SYSOUT DD SYSOUT=classe //SORTINnn DD donnes-en-entre //SORTOUT DD donnes-en-sortie //SYSIN DD donnes-des-commandes donnes-des-commandes : SORT|MERGE FIELS= (p,l,f,s)|p,l,s),FORMAT=f|COPY ,SKIPREC=n ,STOPAFT=n INCLUDE|OMIT COND= (p,l,f,cond, p,l,f|constante[,AND|OR,...]) SUM FIELDS=(p,l,f[,...])|NONE p : Position l : Longueur f : Format CH|ZD|PD|BI|FI... s : Sens (Ascendant ou Descendant) A|D cond : Condition EQ|NE|GT|GE|LT|LE constante : n pour occurrences de nX (n blanc), nC... (n char), nX... (n hex), nZ (n x00)
Guillaume VENTRE
http://guillaumeventre.developpez.com/
V1.0
Commandes modales
SET MAXCC|LASTCC = nombre IF LASTCC|MAXCC oprateur nombre THEN commande|DO liste-de-cmd END [ELSE commande|DO liste-de-cmd END] CANCEL /* Halts processing */ oprateur : =, EQ, ^=, NE, >, GT, <, LT, >=, GE, <=, LE nombre : 0, 4, 8, 12 ou 16
Supprimer un dataset
DEL[ETE] (datasetname[(membre)][,..])+ ERAS[E]|N[O]ERAS[E] + P[U]RG[E]|N[O]P[U]RG[E] + F[O]RC[E]|N[O]F[O]RC[E] + SCR[ATCH]|N[O]SCR[ATCH]
IEBGENER
Utilitaire de copie et reformatage
//stepname EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=classe //SYSUT1 DD donnes-en-entre //SYSUT2 DD donnes-en-sortie //SYSIN DD donnes-des-commandes donnes-des-commandes : GENERATE MAXNAME=n, MAXFLDS=n, MAXLITS=n, MAXGPS=n [MEMBER NAME=(membre,[alias,...])] [RECORD[IDENT=(l,valeur,pos),] [FIELD=(l,pos1,conv,pos2),...] [FIELD=(l,valeur,conv,pos2),...]] l : Longueur pos : Position pos1 : Position en entre pos2 : Position en sortie conv : Conversion, PZ (pack tendu) ZP (tendu pack)
Lister les catalogues

LISTC[AT] ENTRIES(datasetname[,...]) + NAME|HISTORY|ALLOCATION|VOLUME|ALL+ [O[UT]FILE(ddname1)] + [CREATION(nombre-jours)] + [EXPIRATION(nombre-jours)]
Mmento
IEBCOPY
Utilitaire de copie, fusion et compression de PDS
//stepname EXEC PGM=IEBCOPY //SYSPRINT DD SYSOUT=classe //SYSUT2 DD fic-de-travail //SYSUT3 DD fic-de-travail //ddname1 DD fic1 //ddname2 DD fic2 //SYSIN DD *
COPY OUTDD=ddname1,INDD=((ddname2[,R]),...) [SELECT MEMBER=((nom[,newnom[,R]]),...) ] [EXCLUDE MEMBER=(nom,...)]
Dfinir un GDG
DEF[INE] GDG ( NAME(nom-gdg) LIM[IT](nombre-de-gnerations) EMP[TY]|N[O]EMP[TY] SCR[ATCH]|N[O]SCR[ATCH] [OWNER(texte) TO(SSAAJJJ)|FOR(nombre-jours)]) + + + + +
JCL
Bibliographie :
z/OS MVS JCL Reference Publication No. SA22-7597-07 z/OS DFSORT: Getting Started Publication No. SC26-7527-00 z/OS DFSORT Application Programming Guide Publication No. SC26-7523-02 DFSMS/MVS Version 1 Release 5 Utilities Publication No. SC26-4926-03
Dfinir un dataset
DEF[INE] N[ON]VSAM ( NAME(datasetname) + DEV[ICE]T[YPE](type[,...]) + VOL[UMES](volume[,...]) + [F[ILE]SEQU[E]N[CENUMBERS](n[,...])+ TO(SSAAJJJ)|FOR(nombre-jours)] + RCTLG|NRCTLG)
On utilise soit SELECT soit EXCLUDE.
Lgende
ERASE : Mot cl NOERASE : Mot cl par dfaut datasetname : Valeur variable de paramtre PZ : Valeur fixe de paramtre IEBGENER : Nom programme [] : Facultatif | : Ou
SORT
Utilitaire de copie, tri, extraction et fusion
//stepname EXEC PGM=SORT
Imprimer un fichier SAM ou VSAM

PRINT I[N]FILE(ddname1) CHAR[ACTER]|DUMP|HEX [O[UT]FILE(ddname2)]
+ +

Memento JCL

Transféré par

Droits d'auteur :

Formats disponibles

Memento JCL

Transféré par

Informations du document

Titre original

Copyright

Formats disponibles

Partager ce document

Partager ou intégrer le document

Options de partage

Avez-vous trouvé ce document utile ?

Ce contenu est-il inapproprié ?

Droits d'auteur :

Formats disponibles

Memento JCL

Transféré par

Droits d'auteur :

Formats disponibles

JCL (Job Control Language) Carte JOB

Dfinition de l'environnement gnral d'un job

Carte DD (Data definition)

2 / Donnes dans un fichier physique

Carte PROC et PEND

Disposition par dfaut

4 / Donnes sur une imprimante (Queue)

Override de fichier dans un jeu d'appel

Conversion, rorg et copie de fichier

Lister les catalogues

On utilise soit SELECT soit EXCLUDE.

Imprimer un fichier SAM ou VSAM

Vous aimerez peut-être aussi