Apprendre JCL : Les Paramètres Avancés des Instructions DD

Apprendre JCL : Les Paramètres Avancés des Instructions DD

Les Paramètres Avancés des Instructions DD

Dans cette leçon, nous allons explorer les paramètres avancés des instructions DD en JCL, qui permettent une gestion plus fine et personnalisée des fichiers et dispositifs utilisés par les programmes.

Le Paramètre SPACE

Le paramètre SPACE spécifie l'espace de stockage à allouer pour un fichier. Voici un exemple :

//FICHIER1 DD DSN=MON.FICHIER,DISP=(NEW,CATLG,DELETE),
//             SPACE=(CYL,(10,5),RLSE)
        

Dans cet exemple :

• CYL : Alloue de l'espace en cylindres.
• (10,5) : Alloue 10 cylindres initiaux et 5 cylindres supplémentaires si nécessaire.
• RLSE : Relâche l'espace non utilisé à la fin de l'étape.

Le Paramètre DCB

Le paramètre DCB (Data Control Block) spécifie les caractéristiques du fichier, telles que le format d'enregistrement, la longueur de l'enregistrement, et le type de données.

//FICHIER2 DD DSN=MON.AUTRE.FICHIER,DISP=(NEW,CATLG,DELETE),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
        

Dans cet exemple :

• RECFM=FB : Spécifie un format d'enregistrement fixe avec des blocs.
• LRECL=80 : Spécifie une longueur d'enregistrement de 80 caractères.
• BLKSIZE=800 : Spécifie une taille de bloc de 800 caractères.

Le Paramètre UNIT

Le paramètre UNIT spécifie l'unité de stockage (disque, bande, etc.) sur laquelle le fichier sera créé ou réside.

//FICHIER3 DD DSN=MON.TROISIEME.FICHIER,DISP=(NEW,CATLG,DELETE),
//             UNIT=SYSDA,SPACE=(CYL,(5,5))
        

Dans cet exemple :

• UNIT=SYSDA : Spécifie une unité de disque système.

Le Paramètre SYSOUT

Le paramètre SYSOUT dirige la sortie d'un fichier vers un périphérique de sortie système tel qu'une imprimante ou une file d'attente de sortie.

//SORTIE   DD SYSOUT=A
        

Dans cet exemple :

• SYSOUT=A : Dirige la sortie vers la classe A de la file d'attente système.

Exemple Complet avec Paramètres Avancés

//MONJOB JOB (ACCT#),'DESCRIPTION',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID
//STEP1    EXEC PGM=MYPROG
//FICHIER1 DD DSN=MON.FICHIER,DISP=(NEW,CATLG,DELETE),
//             SPACE=(CYL,(10,5),RLSE)
//FICHIER2 DD DSN=MON.AUTRE.FICHIER,DISP=(NEW,CATLG,DELETE),
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//FICHIER3 DD DSN=MON.TROISIEME.FICHIER,DISP=(NEW,CATLG,DELETE),
//             UNIT=SYSDA,SPACE=(CYL,(5,5))
//SORTIE   DD SYSOUT=A
        

Ce programme JCL soumet un job avec une étape exécutant MYPROG, en utilisant des instructions DD avec des paramètres avancés pour gérer les fichiers de manière efficace.

Dans la prochaine leçon, nous explorerons comment utiliser les instructions IF/THEN/ELSE en JCL pour conditionner l'exécution des étapes de job.

© 2024 Codez avec moi