How do you send the output of a COBOL program to a member of
a PDS?
Answers were Sorted based on User's Feedback
Answer / guest
Code the DSN as PDS (member) with a DISP = SHR. The DISP
applies to the PDS and not to a specific member.
| Is This Answer Correct ? | 7 Yes | 0 No |
Answer / anand.r
correct answer is
//iksa01j job
//step1 exec pgm=pgm1
//sysout dd dsn=pdsname(membername),disp=shr
//
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / chandrakant
For the output data set, code the name as the pds along with
the memner name. for example if you want to create a new
member abc in pds aa.bb.cc, then code it as
DD DSN=AA.BB.CC(ABC),
DISP=(NEW,CATLG,DELETE),
UNIT=your unit,
SPACE=(TRK(1,1),RLSE), --> this is only indicative
........
| Is This Answer Correct ? | 4 Yes | 2 No |
Answer / suputhru
Hey Guest,
you are doing great job, keep it up.
- SK.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / vinay sonar
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD SYSOUT=*
//SYSUT2 DD DSN='PDS NAME TO WHICH OUTPUT IS TO BE COPIED'
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / prasad
For the output data set, code the name as the pds along with
the memner name. for example if you want to create a new
member abc in pds aa.bb.cc, then code it as
DD DSN=AA.BB.CC(ABC),
DISP=(NEW,CATLG,DELETE),
UNIT=your unit,
SPACE=(TRK(1,1),RLSE), --> this is only indicative
| Is This Answer Correct ? | 0 Yes | 0 No |
If the COND parameter is specified in both the JOB and EXEC statements, which one will take precedence? If JOB takes priority and if all the conditions evaluate to false, then will the conditions on the EXEC step be evaluated next?
Are there any set of rules for the names of the steps used in a job?
Hi, If a catolog proc has another proc in it, both have ddnames dd1 and dd2. what proc will override if gave override parameter. Here both have same step names.
There are two steps in a JCl, the first one generates a report while the second step send an email saying the report has been generated, but the second steps should only be executed when the report file is non-empty. How can it be acheived. We may include steps in between.
what is a steplib
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 u mean by include statement in JCL ?
what do you mean by include statement in jcl?
One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.
//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*
What is primary allocation for a dataset?
Explain about LMGET�read a logical record from a data set