Job Control Language (JCL)

Résumé du document

Il se programme à l'aide d'un certain nombre d'ordres de contrôle qui ont pour but de :

- soumettre au système un travail c'est-à-dire un ensemble de programmes à exécuter. L'ordre utilisé pour cela est :
JOB
- désigner le programme à exécuter ou la procédure à appeler. L'ordre utilisé pour cela est :
EXEC
- définir les ensembles de données associées aux programmes de traitement dont on demande l'exécution. L'ordre utilisé pour cela est :
DD
Ces ordres de contrôle sont soumis à une même syntaxe qu'il faut respecter sous peine de voir le travail refusé avec un message
JOB NOT RUN - JCL ERROR (...)

Extraits

[...] PERFORM permet d'attribuer au job un groupe de performance particulier. Par défaut, le système utilise un groupe de performance défini dans SRM en fonction de la nature du job. COND permet de donner une ou plusieurs conditions d'arrêt d'un job. Le code est un nombre de 0 à 4095 que le système compare avec les codes retour issus des différents pas (steps). On pourra donner jusqu'à 8 conditions reliées antre elles par une liaison OU. L'opérateur permet de fournir le type de comparaison. [...]

[...] INTRDR Le sysout doit être renvoyé dans une file d'attente d'entrée au travers d'un lecteur interne (internal reader). format Format de papier à utiliser pour l'impression à 4 caractères). code Code identifiant une carte /*OUTPUT de JES2 dans laquelle on aura défini les caractéristiques du fichier SYSOUT. Exemples //DD1 DD SYSOUT=(F,,FACT) //DD2 DD SYSOUT=V COPIES Permet de spécifier le nombre de copies désirées pour une édition. Optionnellement, si l'impression doit se faire sur une imprimante 3800, on peut spécifier la façon dont doivent être groupées les copies. [...]

[...] Il est obligatoire pour un fichier en création si le programme ne contient pas l'information taille de bloc Taille maximum autorisée : 32760 octets Format F ou FB : doit être un multiple de LRECL Format V ou VB : doit être au minimumégal à LRECL + 4. Format U : est libre dans les limites 16 - 32760. DSORG= Permet de donner l'organisation du fichier. On trouvera : PS Organisation séquentielle DA Organisation à accès direct IS Organisation séquentielle indexée (ISAM) PO Organisation partitionnée. DEN= Permet de donner la densité d'enregistrement pour la bande magnétique. On trouvera : BPI (Bytes Per Inch) BPI BPI dsname Permet de faire référence aux caractéristiques physiques d'un fichier catalogué. [...]

[...] DEFER Permet de demander un montage différé du volume. La demande de montage ne sera faite qu'au moment de l'OPEN du fichier si OPEN il y a. Exemples //DD1 DD DSN=EFOTS.F1,DISP=(NEW,CATLG), UNIT=SYSDA Fichier à créer sur n'importe quelle unité du groupe SYSDA //DD2 DD DSN=EFOTS.F2,DISP=(NEW,KEEP), UNIT= Fichier à créer sur n'importe quelle unité 3380. //DD3 DD DSN=EFOTS.F3,DISP=(OLD,KEEP), UNIT=(TAPE,P), VOL=SER=(VOL001,VOL002) Fichier multivolume. Les volumes VOL001 et VOL002 doivent être montés en parallèle pour le traitement. //DD4 DD DSN=EFOTS.F4,DISP=(NEW,CATLG), UNIT=(TAPE,,DEFER) Le volume ne sera monté qu'à l'OPEN du fichier. [...]

[...] Le contrôle de syntaxe est effectué sur les procédures appelées par le job. RESTART permet de commander une reprise différée de job. On fournit dans ce paramètre le nom d'un STEP à reprendre (ou le nom d'un STEP dans une procédure) suivi éventuellement du numéro du CHECK-POINT où doit se faire la reprise. ATTENTION : il faut supprimer toutes les références arrière codifiées dans les cartes de contrôle du step à reprendre et qui concernent les paramètres VOL= et PGM=. [...]