Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

One SYSPRINT for multiple file copy using IEBGENER?

 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> Mainframe Interview Questions
View previous topic :: :: View next topic  
Author Message
sherlinpraveenkumar

New User


Joined: 14 Jul 2010
Posts: 6
Location: chennai

PostPosted: Wed May 25, 2011 12:01 pm    Post subject: One SYSPRINT for multiple file copy using IEBGENER?
Reply with quote

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
View user's profile Send private message

nigelosberry

New User


Joined: 06 Jan 2009
Posts: 88
Location: Ggn, IN

PostPosted: Wed May 25, 2011 12:11 pm    Post subject: Re: One SYSPRINT for multiple file copy using IEBGENER?
Reply with quote

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? icon_confused.gif
haven't you tried using below in the step executing iebgener:

Code:
//SYSPRINT     DD SYSOUT=*
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed May 25, 2011 12:12 pm    Post subject:
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Wed May 25, 2011 12:14 pm    Post subject: Reply to: One SYSPRINT for multiple file copy using IEBGENER
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Wed May 25, 2011 12:17 pm    Post subject: Reply to: One SYSPRINT for multiple file copy using IEBGENER
Reply with quote

Quote:
haven't you tried using below in the step executing iebgener:
//SYSPRINT DD SYSOUT=*


what happened when You tested it ? icon_cool.gif
Back to top
View user's profile Send private message
sherlinpraveenkumar

New User


Joined: 14 Jul 2010
Posts: 6
Location: chennai

PostPosted: Thu May 26, 2011 9:55 am    Post subject: Run successful
Reply with quote

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
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu May 26, 2011 10:22 am    Post subject:
Reply with quote

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
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu May 26, 2011 10:46 am    Post subject:
Reply with quote

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
View user's profile Send private message
sherlinpraveenkumar

New User


Joined: 14 Jul 2010
Posts: 6
Location: chennai

PostPosted: Thu May 26, 2011 1:59 pm    Post subject:
Reply with quote

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 icon_smile.gif to find a solution.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Thu May 26, 2011 2:53 pm    Post subject:
Reply with quote

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
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 961
Location: Richmond, Virginia

PostPosted: Thu May 26, 2011 6:18 pm    Post subject:
Reply with quote

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
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu May 26, 2011 7:48 pm    Post subject:
Reply with quote

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
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1713
Location: UK

PostPosted: Thu May 26, 2011 10:04 pm    Post subject:
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu May 26, 2011 10:30 pm    Post subject: Reply to: One SYSPRINT for multiple file copy using IEBGENER
Reply with quote

almost time to lock the topic icon_cool.gif
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu May 26, 2011 10:41 pm    Post subject: Reply to: One SYSPRINT for multiple file copy using IEBGENER
Reply with quote

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
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Thu May 26, 2011 10:48 pm    Post subject: Reply to: One SYSPRINT for multiple file copy using IEBGENER
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> Mainframe Interview Questions All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts syncsort: copy lines after the keyword shreya19 SYNCSORT 5 Fri Dec 02, 2016 9:47 am
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us