here is the JCL i used with my version : //S1 EXEC PGM=LISTLIB,PARM='your library' //STEPLIB DD DSN=your loadlib,DISP=SHR //SYSOUT DD SYSOUT=H //LIB DD DSN=same as parm=,DISP=SHR, // DCB=(RECFM=U,BLKSIZE=256,LRECL=256) //FJCL DD SYSOUT=(A,INTRDR) LISTLIB reads the directory and create a DD with le name of the library(member) that goes in the FJCL which returns in jes and there the IEBGENER builds the SYSUT2 with the data of each member and this file has to retrun to jes with TYPRUN=SCAN for each member so you can build SYSUT2 with : //JOBN JOB ...., // TYPRUN=SCAN //IEBG EXEC PGM=IEBGENER //SYSUT1 DD DATA,DLM=ZZ // DD DSN=your library(member),DISP=SHR ===> that is created by the LISTIB ZZ //SYSUT2 DD SYSOUT=(A,INTRDR) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY and all these lines for each member HTH 搁别苍é Le vendredi 25 octobre 2024 à 23:32:44 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : Thanks 搁别苍é Yes, I know cobol and used it since 1975 ? ? De: [email protected] <[email protected]> Em nome de Rene BRANDT via groups.io ? Here it is. Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : ? ? Yes I am interested Tks ? ? De: [email protected] <[email protected]> Em nome de Rene BRANDT via groups.io ? Hi Joao, Le jeudi 24 octobre 2024 à 02:32:27 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : ? ? I want to check all members in a JCL library ? Em qua., 23 de out. de 2024, 21:28, malcolm.harris via <malcolm.harris=[email protected]> escreveu:
--
att. Jo?o |