[[lbpf:dsi:moe:distribution:equipes:mainframe:bibliothequejcl|Retour à la Bibliothèque JCL]] =====TABLDECH===== ===Définition=== Ce JCL sert à décharger des tables DB2 ===Code=== //LUA1937K JOB (EXP),'DSNTIAUL DR53',CLASS=A,MSGCLASS=X, // REGION=2000K,NOTIFY=&SYSUID //* //DQUIKJ EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSIN DD * DELETE LDE0000.LT1.LUA1937.TABLE DELETE LDE0000.LT1.LUA1937.TABLE.PUNCH SET MAXCC=00 //* //H4006060 EXEC PGM=IKJEFT1B,DYNAMNBR=20 //*YSPUNCH DD DUMMY //SYSPUNCH DD DSN=LDE0000.LT1.LUA1937.TABLE.PUNCH, // DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(1,1),RLSE), // DCB=(RECFM=FB,LRECL=80) //*YSREC00 DD DUMMY //SYSREC00 DD DSN=LDE0000.LT1.LUA1937.TABLE, // DISP=(NEW,CATLG,DELETE), // DCB=(RECFM=FB,LRECL=136), // DATACLAS=DCPR, // SPACE=(TRK,(2,1),RLSE) //SYSOUT DD SYSOUT=* //SYSTSPRT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=D //CEEDUMP DD SYSOUT=D //SYSTSIN DD * //*ENVIRONNEMENT DSN S(LSNT) **Changer LSNT suivant l'environnement d'utilisation //*UTILITAIRE UTILISé RUN PROGRAM(DSNTIAUL) PLAN(DSNTIAUL) PARM('SQL') END //SYSIN DD * //*REQUETE SQL SELECT * FROM LDE0000.TABLE ; ===Légende=== ==Environnement d'utilisation== Environnement1 Code environnement : LSNT Code Fichier : LDE0000 libellé : Environnement de Tests Environnement2 Code environnement : LREC Code Fichier : LDE5555 libellé : Environnement de Recettes Environnement3 Code environnement : LINT Code Fichier : LDE2222 libellé : Environnement d'Intégration Environnement 4 Code environnement : LHOM Code Fichier : LDE3333 libellé : Environnement d'Homologation [[lbpf:dsi:moe:distribution:equipes:mainframe:bibliothequejcl|Retour à la Bibliothèque JCL]]