Follow Our FB Page << CircleMedia.in >> for Daily Laughter. We Post Funny, Viral, Comedy Videos, Memes, Vines...


Hi,
Say I have 10 flat files and I want to copy all these 10
flat files to a GDG versions flat files (I have GDG base:
FDWS01.TEST.RESTORE) in one shot. Can we do that in one shot
using a JCL. May be by using IEBGENER. It's a bit urgent. So
anyone's fast rely would be appreciated.. Thanks in advance..

10 flat files
-----------------------------------
FDWS01.SUB.RESTORE1
FDWS01.SUB.RESTORE2
FDWS01.SUB.RESTORE3
;
;
FDWS01.SUB.RESTORE10

TO
GDG versions
-----------------------
FDWS01.TEST.RESTORE.G0001V00
FDWS01.TEST.RESTORE.G0002V00
FDWS01.TEST.RESTORE.G0003V00
;
;
FDWS01.TEST.RESTORE.G0010V00

Answers were Sorted based on User's Feedback



Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat fil..

Answer / balmukund

Using below JCL we can achieve the above task.

//jobcard JOB.......
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDD DD DSNAME=FDWS01.SUB.RESTORE1,DSIP=OLD
// DD DSNAME=FDWS01.SUB.RESTORE2,DSIP=OLD
// DD DSNAME=FDWS01.SUB.RESTORE3,DSIP=OLD
// DD DSNAME=FDWS01.SUB.RESTORE4,DSIP=OLD
......
......
......
// DD DSNAME=FDWS01.SUB.RESTORE10,DSIP=OLD
//OUTDD DD DSNAME=FDWS01.TEST.RESTORE(+1),DISP=NEW
//SYSIN DD *

REPRO INFILE (INDD) OUTFILE (OUTDD)
/*

Hope this will work with you. other wise let me known

Is This Answer Correct ?    6 Yes 1 No

Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat fil..

Answer / lu

your questions is 10 flat files copy into 1 output !!! or
10 flat file into 10 output !!!!


u create 10 steps (10 flat files into 10 output with GDG
//STEP1 EXEC PGM=IEBGENER
//sysut1 DD DSN=FDWS01.SUB.RESTORE1,DISP=old
//SYSUT2 DD DSN=FDWS01.TEST.RESTORE(+1),
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(20,10),RLSE),
// DCB=(MODEL.DCB,RECFM=FB,
// LRECL=80, BLKSIZE=800)
//*
//*
//STEP02 EXEC PGM=IEBGENER
//sysut1 DD DSN=FDWS01.SUB.RESTORE2,DISP=old
//SYSUT2 DD DSN=FDWS01.TEST.RESTORE(+2),
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(TRK,(20,10),RLSE),
// DCB=(MODEL.DCB,RECFM=FB,
// LRECL=80, BLKSIZE=800)
ok.....

Is This Answer Correct ?    4 Yes 2 No

Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat fil..

Answer / rakesh jena

Simply you will copy all the 10 flat files into GDG base.
Then thry ISPF3.4 option menu you can see all the o/p of
flat would be available in last 10 current version of GDG
file. Please let me know if i am wrong but after try once.

We are using this method always in our pjct.

Is This Answer Correct ?    3 Yes 3 No

Hi, Say I have 10 flat files and I want to copy all these 10 flat files to a GDG versions flat fil..

Answer / garry

@Balmukund : Ultimate reply:

Same can be done by following method:

Sort all the 10 files on a ASC KEY.

Merge them and copy them to any file (Or GDG).

Let me know if you ned JCL for this. I hope u can do it and post the JCL for others.


Thnx, pls let us know the result

Garry

Is This Answer Correct ?    0 Yes 0 No

Post New Answer



More JCL Interview Questions

When The Define Jcl Is Not Available, How Can You Get Information About A Vsam File's Organisation ?

0 Answers   IBM,


How to override a dsn that is contained in a proc called by another proc? I need to do the override in the calling jcl?

0 Answers  


what happens in execution stage in job processing?

0 Answers   IBM,


How many steps we can overide in the proc's?

2 Answers   CS,


how do u see jobs submitted before ur job ?

1 Answers  






i need some shortcuts and tso commands can any on ehelp me in these ?

1 Answers  


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?

4 Answers   DELL,


whats SOC7?

1 Answers   Patni,


How is a GDG base created?

5 Answers  


Write a jcl to execute a job by 7 a.m on Jan 20,1986 ?

5 Answers   Maples, Patni, TCS,


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  


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

3 Answers   Convergys,






Categories