Answer / ravi

In JCL , we can concatenate different files by giving their
name one after another. All data sets concated must be of
the same type. For example,
1)partitioned data sets can be concatenated only with
partitioned data sets.
2)Record format should be same
3) All the files should on same device (like DASD, Tape)
4) File having largest BLKSIZE should be mentioned first

Maximum of 255 sequential data sets can be concatenated
Maximum of 16 partitioned data sets can be concatenated


Example JCL --> //MYJOB JOB (W345),'XXX'
//STEP1 EXEC PGM=COBPROG
//INFILE DD DSN=TEST.GLOB.FILE1
// DSN=TEST.GLOB.FILE2
// DSN=TEST.GLOB.FILE3

In program , we will read it as an single file.
concatination of three files done by operating system.

When a dataset is UNCATALOGED in a JOBSTEP, how to get its UNIT and VOL in JCL to refer in subsequent steps ?

1 Answers   IBM,

---

I've one sequential file, that file size is LREC=100 (File contain Records like 1 to 100). Now I was increase the file size is LREC=102. My question is I want insert 00 (Two Zeros) in to the new file (That output file looks like : 00123 up to 100). How will write the SORT card in JCL. Please let me know.

2 Answers   Syntel,

---

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.

3 Answers   Cognizant,

---

Max. No of DD statements in a job ?

4 Answers   CSI,

---

How to read and write a single record into a file. I would like to use it to enter a single 8-character piece of information and use it to put it into a variable for processing in JCL. Thank you

0 Answers  

---

how can the same proc be re-used and called by many jobs?

0 Answers   IBM,

---

Mention the types of job control statements?

0 Answers  

---

hi in one of the interview one asked me how to submit a job from cobol?as well as how to submit a jcl from CICS? can u pls any one tell me..

1 Answers   CTS,

---

what is the difference between the JCLLIB and JOBLIB ,and where do we use it ?

3 Answers   Convergys,

---

which utility is used to run a cobol-db2 program?

0 Answers   IBM,

---

i want to avoid the positional parameter how to code it ?

3 Answers   TCS,

---

What is job control language?

0 Answers  

---