Interested to Buy Any Domain ? << Click Here >> for more details...
how to concatenate datasets
- 5 Answers
- 23906 Views
- EDS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / pkb
It is possible to process more than one data set as a single data set by concatenating the DD statements.
//QSAM0080 DD DSN=SIMOTIME.DATA.FILE0001,DISP=SHR
// DD DSN=SIMOTIME.DATA.FILE0002,DISP=SHR
// DD DSN=SIMOTIME.DATA.FILE0003,DISP=SHR
The following is an example of a COBOL SELECT statement.
here the COBOL program will read QSAM0080 and the DD statements will map the three files (FILE0001, FILE0002 and FILE0003) as one file. The program's initial read will get the first record from FILE0001 and will not get an End-of-File condition until the last record of FILE0003 is processed.
| Is This Answer Correct ? | 8 Yes | 0 No |
Answer / suputhru
concatenation is possible up to 16 pds or 255 ps
We can cancatinating diffent files by giving their DSN one after other, all the datasets must be same type.
rules: there should be logical record length must be same
and type recfm is also same
//jobcard
//step1 exec pgm=concat11
//ddname DD dsn=tst.punna.cobol,
// DD dsn=tst.punna.cobol1,
// DD dsn=tst.punna.cobol11,
// DD dsn=tst.punna.cobol211,
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / chowdary
concatenation is possible up to 16 pds or 255 ps
rules: there should be logical record length must be same
and type recfm is also same
//jobcard
//joblib
//dd dsn=tst.punna.cobol,
dsn=tst.punna.cobol1,
like that we need to give up to our requirement
| Is This Answer Correct ? | 4 Yes | 4 No |
Answer / shankar
we can also concatenate through disp keyword parameter also..
use iebcopy utility and
sysut1 dd dsn=sample1.pds,disp=(old,pass)
sysut2 dd dsn=sample2.pds,disp=(shr)
sysin dd *
copy indd=sysut1 outdd=sysut2
/*
| Is This Answer Correct ? | 3 Yes | 3 No |
How to compare two files in SYNCSORT and on the mismatch record should be deleted from second file.
WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99 VALUE 123.45. PROCEDURE DIVISION. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. compiler : IGYGR1080-S A "VALUE" clause literal was not compatible with the data category o subject data item. The "VALUE" clause was discarded. WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99. PROCEDURE DIVISION. MOVE 123.45 TO W-B. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. 2375
mainframe questions like basic&depth
What is the significance of addrspc parameter in the exec statement?
I have two input files i/p1 name id-key flag date i/p 2 name id-key date if id-key matches in the both the files then it should write the output file from i/p1 with flag 'Y'. It should be done thru JCL sort card ,Please provide the info on this. ---Note : output file should have all records from i/p1 with proper Flag.
How to submit jcl through a cobol program?
Explain how can return codes be tested before execution of a job step?
I have three files for one step i need to override the third file how to do that in jcl?
I have a JCL with 10 steps, want to execute first 5 steps only, what are ways of doing it?is it possible to control through JOB card?
Explain about Internal Sort
once we submitted the job to the operating system, how can we cancel the job before execution?
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...???
COBOL 
