MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

How to copy FB 80 DSN to FB 133 DSN using IEBGENER

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
amit4u79
Beginner


Joined: 24 Oct 2005
Posts: 109
Topics: 36
Location: India

PostPosted: Thu Jul 20, 2006 8:21 pm    Post subject: How to copy FB 80 DSN to FB 133 DSN using IEBGENER Reply with quote

Hi All,

I have to use IEBGENER to copy a FB 80 DSN to a FB 133 DSN. Basically my SYSUT1 is the JES SYSIN i.e. something like :

//SYSUT1 DD *
dadsadasdasd
sdasdadasda
asasdasd
/*

And SYSUT2 is a DSN which I have to create of FB 133 and copy the SYSUT1 into it using IEBGENER. I am aware that we can use some SYSIN control cards for IEBGENER like "RECORDS FIELD=(80,1,,1)," but this is somehow not working for me. I searched the forum but could not get help on IEBGENER.

Pls advise.

Regards,
-Amit.
_________________
I did not fail; I have found 10,000 ways that would not work - Albert Einstein.
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Thu Jul 20, 2006 9:18 pm    Post subject: Reply with quote

amit4u79,

Any particular reason to use IEBGENER only ? Why can't you use sort or fileaid ? If you don't have a choice to use other products then try these control cards
Code:

//SYSIN    DD *                           
  GENERATE MAXFLDS=7,MAXLITS=53           
    RECORD FIELD=(80,1,,1),               
           FIELD=(10,'          ',,081),   
           FIELD=(10,'          ',,091),   
           FIELD=(10,'          ',,101),   
           FIELD=(10,'          ',,111),   
           FIELD=(10,'          ',,121),   
           FIELD=(03,'   ',,131)           


Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
amit4u79
Beginner


Joined: 24 Oct 2005
Posts: 109
Topics: 36
Location: India

PostPosted: Fri Jul 21, 2006 1:20 am    Post subject: Reply with quote

Hi Thanks Kolusu,

The JCL worked perfectly fine for me. Just one query, what is the need to use GENERATE MAXFLDS and MAXLITS and why are the values so specific(7 and 53) ??

Thanks for your help Sir.

Regards,
- Amit.
_________________
I did not fail; I have found 10,000 ways that would not work - Albert Einstein.
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
shekar123
Advanced


Joined: 22 Jul 2005
Posts: 528
Topics: 90
Location: Bangalore India

PostPosted: Fri Jul 21, 2006 2:03 am    Post subject: Reply with quote

amit4u79,

Some info on MAXFLDS and MAXLITS.Hope this helps.
Code:

MAXFLDS= n

specifies a number, from 1 to 4095, that is greater than or equal to the total
number of FIELD parameters appearing in subsequent RECORD statements.
MAXFLDS is required if there are any FIELD parameters in subsequent
RECORD statements.

MAXLITS= n

specifies a number, from 1 to 2730, that is greater than or equal to the total
number of characters contained in the FIELD literals of subsequent RECORD
statements. Any DBCS characters used as literals on FIELD parameters count
as two characters each.

MAXLITS is required if the FIELD parameters of subsequent RECORD statements
contain literals. MAXLITS does not apply to literals used in IDENT or
IDENTG parameters.

_________________
Shekar
Grow Technically
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Fri Jul 21, 2006 7:48 am    Post subject: Reply with quote

amit4u79,

Check this documentation of IEBGENER. The section you are interested is 6.8 and then the utility control statements

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt1u104/6.0?DT=19990113105507

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
amit4u79
Beginner


Joined: 24 Oct 2005
Posts: 109
Topics: 36
Location: India

PostPosted: Fri Jul 21, 2006 9:01 pm    Post subject: Reply with quote

Hi Kolusu,

Thanks a lot. That info was indeed really helpful. And yes I also went thru the link provided. It is really informative.

Thanks again Sir(out of respect and not age Smile ) for your help.

Regards,
- Amit.
_________________
I did not fail; I have found 10,000 ways that would not work - Albert Einstein.
Back to top
View user's profile Send private message Send e-mail Yahoo Messenger
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group