|
Hi ? Does anyone know a utility to just check JCL syntax, like JCL Expert does? TIA Jo?o ? ? -- att. Jo?o
|
|
|
|
|
Try TYPRUN=SCAN on the JOB card (not TEST)
Tim
On Thursday, 24 October 2024 at 09:35:03 am AEDT, malcolm.harris via groups.io <malcolm.harris@...> wrote:
|
|
|
|
|
Anyone know if the CBT tape mods have anything for this?
Malcolm
toggle quoted message
Show quoted text
On 2024-10-23 17:32, Jo?o Reginato wrote: I want to check all members in a JCL library
Em qua., 23 de out. de 2024, 21:28, malcolm.harris via groups.io [1]
<malcolm.harris@...> escreveu:
Oh right, sorry :)
On 2024-10-23 16:19, Tim via groups.io [1] wrote:
Try TYPRUN=SCAN on the JOB card (not TEST)
Tim
On Thursday, 24 October 2024 at 09:35:03 am AEDT, malcolm.harris via
groups.io [1] <malcolm.harris@...> wrote:
TYPRUN=TEST ?
On 2024-10-23 14:51, Jo?o Reginato wrote:
Hi
Does anyone know a utility to just check JCL syntax, like JCL Expert
does?
TIA
Jo?o
--
att.
Jo?o
Links:
------
[1] /g/H390-MVS/message/4753
[2] /mt/109180192/8699929
[3] /g/H390-MVS/post
[4] /g/H390-MVS/editsub/8699929
[5]
/g/H390-MVS/leave/13444331/8699929/833062941/xyzzy
Links:
------
[1] /g/H390-MVS/message/4758
[2] /mt/109180192/8699929
[3] /g/H390-MVS/post
[4] /g/H390-MVS/editsub/8699929
[5] /g/H390-MVS/leave/13444331/8699929/833062941/xyzzy --
att.
Jo?o
Links:
------
[1]
[2] /g/H390-MVS/message/4760
[3] /mt/109180192/8699929
[4] /g/H390-MVS/post
[5] /g/H390-MVS/editsub/8699929
[6] /g/H390-MVS/leave/13444331/8699929/833062941/xyzzy
|
//jobnamx JOB 'account', // 'programmer20',CLASS=A,MSGCLASS=X,TYPRUN=JCL On Wed, Oct 23, 2024 at 6:18?PM Tim via groups.io <aardvarkguard-hercules@...> wrote:
On Thursday, 24 October 2024 at 09:35:03 am AEDT, malcolm.harris via groups.io <malcolm.harris@...> wrote:
TYPRUN=TEST ?
On 2024-10-23 14:51, Jo?o Reginato wrote:
Hi
Does anyone know a utility to just check JCL syntax, like JCL Expert
does?
TIA
Jo?o
--
att.
Jo?o
Links:
------
[1] /g/H390-MVS/message/4753
[2] /mt/109180192/8699929
[3] /g/H390-MVS/post
[4] /g/H390-MVS/editsub/8699929
[5] /g/H390-MVS/leave/13444331/8699929/833062941/xyzzy
-- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all?
|
TYPRUN=SCAN does not help me. I need to scan all members in a PDS and show the possible syntax errors found -----Mensagem original----- De: [email protected] < [email protected]> Em nome de Mike Schwab via groups.io Enviada em: quarta-feira, 23 de outubro de 2024 23:07 Para: [email protected]Assunto: Re: [H390-MVS] JCL Expert //jobnamx JOB 'account', // 'programmer20',CLASS=A,MSGCLASS=X,TYPRUN=JCL On Wed, Oct 23, 2024 at 6:18?PM Tim via groups.io <aardvarkguard-hercules@...> wrote:
On Thursday, 24 October 2024 at 09:35:03 am AEDT, malcolm.harris via groups.io <malcolm.harris@...> wrote:
TYPRUN=TEST ?
On 2024-10-23 14:51, Jo?o Reginato wrote:
Hi
Does anyone know a utility to just check JCL syntax, like JCL Expert
does?
TIA
Jo?o
--
att.
Jo?o
Links:
------
[1] /g/H390-MVS/message/4753
[2] /mt/109180192/8699929
[3] /g/H390-MVS/post
[4] /g/H390-MVS/editsub/8699929
[5] /g/H390-MVS/leave/13444331/8699929/833062941/xyzzy
-- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- att. Jo?o
|
I would write a REXX script that would submit (IEBGENER) in the Internal Reader each member of your PDS.? Just ensure that your REXX scripts generates the JCL with TYPRUN=SCAN.
?
Just a thought!
?
|
|
|
Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é
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
|
Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é
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:
toggle quoted message
Show quoted text
--
att.
Jo?o
|
Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é
Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit :
Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é
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:
|
Thanks 搁别苍é Yes, I know cobol and used it since 1975 ? ? ? Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é
Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é 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:
toggle quoted message
Show quoted text
--
att.
Jo?o
|
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 ? ? ? Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é
Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é 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
|
Joao,
The COBOL program that Rene provided is one method, you can also use IBM utilities – to UNLOAD your various members and process them if you want to have them
in a flat file or series of files to process –
?
?
Are you wanting to SUBMIT all the members?? You stated you are wanting to SYNTAX check –
There are several commercial products that will do this – I am not aware of any that are free.?
?
As Rene pointed out, you can certainly GENER each member with a TYPE RUN=SCAN HOWEVER, it is not clear that this will accomplish what you are looking for.?
?
I found a quick and dirty small REXX that has some rudimentary checks - ?
HERE
?
-J-
?
Jeff Bassett
Bassettj@...
(301) 424-3362 (office)
(240) 388-7148 Cell
?
Time spent flying? - is
NOT deducted from one’s lifespan
?
toggle quoted message
Show quoted text
From: [email protected] <[email protected]>
On Behalf Of Jo?o Reginato via groups.io
Sent: Friday, October 25, 2024 5:33 PM
To: [email protected]
Subject: Re: [H390-MVS] JCL Expert
Importance: Low
?
Thanks 搁别苍é
Yes, I know cobol and used it since 1975
?
?
?
Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é
Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit :
Yes I am interested
Tks
?
?
?
Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é
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
?
--
att.
Jo?o
--
att.
Jo?o
|
Ok, thansk ? ? 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 ? ? ? Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é 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:
toggle quoted message
Show quoted text
--
att.
Jo?o
|
Ok, very good, thanks ? ? Joao, The COBOL program that Rene provided is one method, you can also use IBM utilities – to UNLOAD your various members and process them if you want to have them in a flat file or series of files to process – ? ? Are you wanting to SUBMIT all the members?? You stated you are wanting to SYNTAX check – There are several commercial products that will do this – I am not aware of any that are free.? ? As Rene pointed out, you can certainly GENER each member with a TYPE RUN=SCAN HOWEVER, it is not clear that this will accomplish what you are looking for.? ? I found a quick and dirty small REXX that has some rudimentary checks - ? HERE ? -J- ? Jeff Bassett Bassettj@... (301) 424-3362 (office) (240) 388-7148 Cell ? Time spent flying? - is NOT deducted from one’s lifespan ?
toggle quoted message
Show quoted text
From: [email protected] <[email protected]> On Behalf Of Jo?o Reginato via groups.io
Sent: Friday, October 25, 2024 5:33 PM
To: [email protected]
Subject: Re: [H390-MVS] JCL Expert
Importance: Low? Thanks 搁别苍é Yes, I know cobol and used it since 1975 ? ? ? Here it is.
You didn't tell me if you know cobol.
The program create a JCL with all members in a IEBGENER yoy can change it to put JCL1 to JCL6 for all members...
telle me if you need help
搁别苍é Le vendredi 25 octobre 2024 à 12:30:18 UTC+2, Jo?o Reginato <jb.reginato@...> a écrit : Yes I am interested Tks ? ? ? Hi Joao,
I have a cobol program which reads the library a generate an IEBGENER with SYSUT2 on the INTRDR.
You have to modify it to add (or not ) a JCL card and the TYPRUN=SCAN
Tell me if you are interested
搁别苍é 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 ?
--
att.
Jo?o
--
att.
Jo?o
-- att. Jo?o
|
Jo?o Reginato
Jeff Bassett