|
View previous topic :: View next topic
|
| Author |
Message |
sherlinpraveenkumar
New User
Joined: 14 Jul 2010
Posts: 6
Location: chennai
|
|
|
|
| I have a set of files to be copied to other files. And i am doing it in one step using IEBGENER utility. Can i get the information of copied elements in different SYSPRINT or by using a single SYSPRINT ? |
|
| Back to top |
|
 |
nigelosberry
New User
Joined: 06 Jan 2009
Posts: 88
Location: Ggn, IN
|
|
|
|
| sherlinpraveenkumar wrote: |
| I have a set of files to be copied to other files. And i am doing it in one step using IEBGENER utility. Can i get the information of copied elements in different SYSPRINT or by using a single SYSPRINT ? |
Not sure what you are after? 
haven't you tried using below in the step executing iebgener:
| Code: |
| //SYSPRINT DD SYSOUT=* |
|
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
how are doing this ? IEBGENER will only copy 1 file at at a time.
I'm not sure how you are copying a set of file to another set of files.
You can only have 1 SYSPRINT statement per step.
Maybe it would help if you show the JCL you are using.
Gerry |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
not for IEBGENER, I wonder why IBM did never care to print the record count
ICEGENER the high performance IEBGENER clone provided by Your SORT product does that
or a SORT with just a OPTION COPY
or fileaid
or filemanager
or .... |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| Quote: |
haven't you tried using below in the step executing iebgener:
//SYSPRINT DD SYSOUT=* |
what happened when You tested it ?  |
|
| Back to top |
|
|
sherlinpraveenkumar
New User
Joined: 14 Jul 2010
Posts: 6
Location: chennai
|
|
|
|
JCL:
-----
//XXX15GV3 JOB (QI44),'GDG VERS',CLASS=X,MSGCLASS=T,NOTIFY=&SYSUI
//*
//S0 EXEC PGM=IEBGENER
//*
//SYSUT1 DD DSN=PAS15.AAAAAA.BKUP,DISP=SHR
//SYSUT2 DD DSN=PAS15.BBBBBB.T01(+1),
// DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=256,BLKSIZE=27904,DSORG=PS),
// SPACE=(CYL,(15,15),RLSE),UNIT=SYSDA
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//*
//SYSUT3 DD DSN=PAS15.CCCCCC.TENREC.BKUP,DISP=SHR
//SYSUT4 DD DSN=PAS15.DDDDDD.T01(+2),
// DISP=(NEW,CATLG,DELETE),
// DCB=(RECFM=FB,LRECL=256,BLKSIZE=27904,DSORG=PS),
// SPACE=(CYL,(15,15),RLSE),UNIT=SYSDA
//*
//SYSIN1 DD DUMMY
//SYSPRIN1 DD SYSOUT=*
//*
JES MSG:
-----------
IEF236I ALLOC. FOR XXXXXGV3 S0
IGD103I SMS ALLOCATED TO DDNAME SYSUT1
IGD100I B155 ALLOCATED TO DDNAME SYSUT2 DATACLAS ( )
IEF237I DMY ALLOCATED TO SYSIN
IEF237I JES2 ALLOCATED TO SYSPRINT
IGD103I SMS ALLOCATED TO DDNAME SYSUT3
IGD100I B18D ALLOCATED TO DDNAME SYSUT4 DATACLAS ( )
IEF237I DMY ALLOCATED TO SYSIN1
IEF237I JES2 ALLOCATED TO SYSPRIN1
IEF142I PAS15GV3 S0 - STEP WAS EXECUTED - COND CODE 0000
IGD104I XXXXX.AAAAA.BKUP RETAINED, DDNAME=SYSUT1
IEF285I XXXXX.BBBBBB.T01.G0001V00 CATALOGED
IEF285I VOL SER NOS= WRK314.
IEF285I XXXXX.XXXXXGV3.JOB06570.D0000101.? SYSOUT
IGD104I XXXXX.CCCCCC.TENREC.BKUP RETAINED, DDNAME=SYSUT3
IEF285I XXXXX.DDDDDD.T01.G0002V00 CATALOGED
IEF285I VOL SER NOS= WRK310.
IEF285I XXXXX.XXXXXGV3.JOB06570.D0000102.? SYSOUT
SYSPRINT:
------------
EXCP ACCESS METHOD USED FOR SYSUT2
EXCP ACCESS METHOD USED FOR SYSUT1
F4-BASE F5-BASE E8-K61438
OUTPUT LRECL = 256, BLKSIZE = 27904, TYPE = FB
INSERT 0, DELETE 0
RECORDS - IN: 404116, OUT: 404116
END OF DFSORT
Hope this gives u a clear picture, IEBGENER can b used to copy multiple files in single step.But guess there is a limit till 19, not sure. |
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
are you sure you are actually reading from SYSUT3 and copying to SYSUT4 ?
Have you checked if there is any data in file PAS15.DDDDDD.T01(+1) ?
The ouput from SYSPRINT only shows references to SYSUT1 and SYSUT2.
Gerry |
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
why do you need to do it in a single step ?
If the job fails in the second copy, you are wasting time having to rerun the entire job when only the second copy is necessary.
Anyway as you asked for a single step this example will assist you.
| Code: |
//COPY EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//FILE1 DD *
FILE1
/*
//FILE2 DD *
FILE2
/*
//OUT1 DD SYSOUT=*
//OUT2 DD SYSOUT=*
//TOOLIN DD *
COPY FROM(FILE1) TO(OUT1)
COPY FROM(FILE2) TO(OUT2)
/*
|
By the way, your IEBGENER is actullay running DFSORT and not IEBGENER.
Gerry |
|
| Back to top |
|
|
sherlinpraveenkumar
New User
Joined: 14 Jul 2010
Posts: 6
Location: chennai
|
|
|
|
Currently i'm using seperate steps only to copy.
To answer your question. Yes, i checked the GDG version's and all were having the correct files as required, so it is working fine.
In my request, for all the dataset which im copying i was asked to send an email on failure of copy. So for example i have 200 files then i need to add 200 email steps seperately or else one email step with condition in it.
So i thought of having one IEBGENER step.
Fine thatz okay, thanks for all your prompt response. Will use different steps to copy the file.
But still my question will hang arround  to find a solution. |
|
| Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006
Posts: 6250
Location: Mumbai, India
|
|
|
|
| sherlinpraveenkumar wrote: |
| Currently i'm using seperate steps only to copy. |
It does not go with what you show us in your Job. Please post the what you mean, it helps.
| Quote: |
| In my request, for all the dataset which im copying i was asked to send an email on failure of copy. So for example i have 200 files then i need to add 200 email steps seperately or else one email step with condition in it. |
So, you've a solution, I believe - look at bold text. What is stopping you to use that? |
|
| Back to top |
|
|
Phrzby Phil
Senior Member
Joined: 31 Oct 2006
Posts: 1042
Location: Richmond, Virginia
|
|
|
|
For the nth time, where n is a very large number - you mean generations, not versions.
All together now - G-E-N-E-R-A-T-I-O-N-S. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hello,
| Quote: |
| Yes, i checked the GDG version's and all were having the correct files as required, so it is working fine. |
I suspect that all you checked was the catalog. A new generation was cataloged, but you need to open this dataset look at the content. |
|
| Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK
|
|
|
|
And what was the output on your SYSPRIN1?
I have just looked at the manual for IEBGENER and there is no mention of a SYSUT3 or 4, SYSIN1 or SYSPRIN1 and nowhere does it mention multiple input/output files. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
| almost time to lock the topic |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix
|
|
|
|
Hi Enrico,
Unless TS can show that a second copy was actually acomplished and the data is actually from the second copy, i'd be in favor of deleting this . . .
As it is, i believe this topic can only send people in the wrong direction. . .
d |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10873
Location: italy
|
|
|
|
sysut3 and sysut4 have no place in IEBGENER execution ( as per DFSMSdfp Utilities manual )
the first post has wrong conclusion
the +2 generation will be allocated, but nothing will be written there
I will lock the topic and in a few hours I will delete it to avoid useless confusion! |
|
| Back to top |
|
|
|
|
