How can I override a dsn that is contained in a proc called
by another proc? I need to do the override in the calling
JCL.
Answers were Sorted based on User's Feedback
Answer / muttiah
Let me frame the question in this way..
Say .. I have the job(Job1) which has a proc(proc1) and
this Proc1 is calling another Proc say Proc2..
So, you want to override the Dataset in a step of proc2 in
Proc1..This is possible..But overriding the dataset in
proc2 from the job1 is not possible.say proc A calls ProcB
and ProcB calls ProcC.. Then we can override details in
ProcC by ProbB only, but not with ProcA i guess you got the
point made.
//Job1 Job ....
//step1 exec proc1
//proc1 proc
//step1 exec proc2
//proc2 proc
//stepn exec pgm=iefbr14
//delstep dd dsn=Allinterivew.PS,disp=(mod,del,del),
// space=(trk,0)
Now change the code in proc1 as
//Proc1 proc
//step1 exec proc2
//stepn.delstep dd dsn=Deletefile.ps
In this way we can change the DS in proc2 from proc1. Hope
this makes much sense.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / piyush mani
//PROC1 PROC
//STEP1 EXEC PGM=IEFBR14
//DD1 DD DSN=XYZ, DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
// PEND
//JJJ JCLLIB ORDER=PROCLIB PATH
//PROC2 PROC
//STEP2 EXEC PROC1
//JOBNAME JOB PARAMETERS
//JJJ JCLLIB ORDER=PROCLIB PATH
//PROC3 PROC
//STEP2.DD1 DSN=NEW NAME,DISP=SHR
THIS IS D WAY....
THIS PROG. WILL DO NOTHING IT'S JUST AN EXAMPLE..
GIV UR FEEDBACK
| Is This Answer Correct ? | 2 Yes | 3 No |
Answer / mani
CATALOG PROC
//CATPROC PROC
//STEP1 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//DD1 DD DSN=FILEA,
// DISP=(,CATLG,DELETE),
// SPACE=(TRK,(100,50),RLSE),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
//SYSOUT DD SYSOUT=*
//
INVOKING JCL
//Z000960P JOB CLASS=E,MSGCLASS=E,NOTIFY=&SYSUID
// JCLLIB ORDER=Z000960.SOURCE.JCL
//MYPROC EXEC CATPROC
//STEP1.DD1 DD DSN=FILEB,DISP=(NEW,CATLG)
AFTER EXECUTE THE JCL FILEB WILL BE GETTING OVERRIDE
| Is This Answer Correct ? | 1 Yes | 3 No |
what are the statements that are not valid to be included in an include statement?
I am getting the file from Unix to Mainframes for every 15 minutes. The mainframe job get abended with bad records coming from unix. I recovered that by deleting the bad data. I need permenant solution how to fix the issue? The record is getting characters in in first 9 positions which it should not. Please provide me the solution how to skip the records if it finds the charcters in the first 9 positions. K
how to have variable length record in outrec..i have the requmt as follows.. i/p file variable lenght record output file : i need to alter the input and write into outrec(another file) sort fields: copy from(dd1) using ctl1 ctl1cntl dd * outfil fnames=xxx, outrec=(1,131) here i outrec is bombing with error..how to overcome this defect...???
how you can access an uncataloged dataset in a JCL?
In jcl i have 255 steps. In 255 step i declared proc. In proc i have 20 steps this job is executable or not? why?
i have a base gdg consisting of 12 versions like jan to dec. i need to concatante this gdg to another gdg which have version 1 or to the base gdg itself can anyone give me the code pls ?
I want to join to input files and write the matching fields on to an output file but i dont want the output file a sorted one
What does IEBGENER do?
I want to JCL sort for Non-COMP and COMP-3 fields SORT FIELDS=(1,5,A,6,11,A,12,11,A,19,1,A,20,1,A),FORMAT=BI,EQUALS Length of comp bytes is 11 bytes which start at 6byte and 12 byte considering 11 bytes in comp-3 is 6 bytes. Can anyone tell if the above sort work SORT FIELDS=(1,5,A,6,6,A,12,6,A,19,1,A,20,1,A),FORMAT=BI,EQUALS does not works OK
How to rename a VSAM file as well as it's index file?
i have 10,000 records in one input file.i want to sort 1 to 5000 records in one outputfile and remaining records sort in another output file write the syntax for this?
How can a stopped job be started again?