Answer / madhavi

IF THEN Else is available in JCL for example
// IF STEP040A.RUNCHK01.RC = 00 THEN
//*
//STEP040B EXEC IRSL1REP,CURR=EUR,TYPE=P,CC=AU,AREA=GE,
MEMB1=REP1BUD,
// STAGE=PROD,MEMB2=REP2BUD,FILE='.M37I',CC1=
// ENDIF
//*

i have a file which contains duplicates ? my requirement is to eliminate duplicates and these elminated duplicates should be moved to another file can any code this using sort ?

3 Answers   IBM,

---

a set statement is used to define commonly used symbolic across job steps or procedures. It initializes the previous values in the symbolic names. It has to be defined before the first use of the symbolic names in the jcl. State whether true or false?

0 Answers   IBM,

---

what is use of space parameter in dd statement?

0 Answers   IBM,

---

i have a jcl calling proc which has 10 steps, i want to execute from step5 to step10, where can i code RESTART and COND parameter?

4 Answers   IBM,

---

i am trying to copy a PS file into VSAM file in step2 by using PGM=IDCAMS,COND=(0,LT) and the pS file is getting sorted in the step1. I got the return code 00 for step1 but step2 got flushed. can u please help on this. Below is My JCL. SEPP050 EXEC PGM=SORT,REGION=6144K SYSIN DD DSN=SYSCMN.PROD.CCLIB (F5910BNN), DISP=SHR SYSOUT DD SYSOUT=* SYSUDUMP DD SYSOUT=A SORTIN DD DSN=Z1225BT.F5910EPP.HISOUT, DISP=SHR SORTOUT DD DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT5, DISP= (NEW,CATLG,DELETE),UNIT=DELQ, SPACE=(CYL, (500,500),RLSE), DCB= (RECFM=FB,LRECL=1606,BLKSIZE=16060,BUFNO=15) SORTWK01 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK02 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK03 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK04 DD UNIT=SYSDA,SPACE=(CYL, (1)) SYSIN1 DD UNIT=VIO,SPACE= (80,1) * SEPP060 EXEC PGM=IDCAMS,COND= (0,LT) SYSPRINT DD SYSOUT=* SYSOUT DD SYSOUT=* SYSLIST DD SYSOUT=* *** DD01 DD DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT, // DISP=SHR //*** //DD01O DD DSN=Z1225BT.F5910PHS, // DISP=SHR, // AMP=(AMORG,'BUFND=12,BUFNI=5') //SYSIN DD DSN=SYSCMN.PROD.CCLIB(F5910BBB), // DISP=SHR Output RC for the two steps: SDCBPJ05 SEPP050 00 236 .00 .00 .0 SDCBPJ05 SEPP060 FLUSH 0 .00 .00 .0

3 Answers  

---

---

Can we browse or edit the GDG dataset if it is a tape entry?

4 Answers  

---

My JCL has 4 steps that execute PROC’s P1, P2, P3 and P4 as shown below //P1 EXEC PROC=P1 //P2 EXEC PROC=P2 //P3 EXEC PROC=P3 //P4 EXEC PROC=P4 There are four steps S1, S2, S3 and S4 in each PROC’s (i.e. P1, P2, P3 and P4) I want to execute only step S2 of PROC P2 and no other steps or PROC’s. How do you achieve this?

4 Answers   IMS,

---

//step#3 exec pgm = hkbc762 what is wrong with the syntax?

3 Answers  

---

what are the technical terms for // /* in jcl

3 Answers   Cap Gemini,

---

Is automatic restart possible in jcl?

0 Answers  

---

What is the purpose of the PARM keyword in the EXEC statement?

3 Answers  

---

What do we mean by 'Virtual storage' for a dataset and for a JOBSTEP ? What is the significance of the following statement for a programmer 'Virtual storage results in program addresses being independent of the addresses that actually exist in a computer' ?

0 Answers  

---