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
 

 

How to copy FBA-PS-Dataset in VBA-PO-Member

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Auryn

New User


Joined: 11 Jan 2006
Posts: 42
Location: Lower Saxony (DE)

PostPosted: Wed Oct 22, 2008 8:25 pm    Post subject: How to copy FBA-PS-Dataset in VBA-PO-Member
Reply with quote

Hi there everybody,

it's a long time ago I posted my last question.
But now, I've got a new one..

We have a tool which writes a FBA-Dataset, probably also a FBA-PO-member.
But in the following, I need this output as a VBA-PO-member.

So, does anybody of you have an idea how to realize this?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Oct 22, 2008 9:36 pm    Post subject:
Reply with quote

SORT or REXX are easily capable of converting from FB >> VB >> FB
Back to top
View user's profile Send private message
Auryn

New User


Joined: 11 Jan 2006
Posts: 42
Location: Lower Saxony (DE)

PostPosted: Thu Oct 23, 2008 12:56 pm    Post subject: Reply to: How to copy FBA-PS-Dataset in VBA-PO-Member
Reply with quote

Thanxx for the hint but:
I don't have any experience with REXX nor programming such a routine.
And I tried to 'sort' my dataset but that did not work.
I mean, the dataset does not contain any sort-columns, so there's nothing to sort...

To avoid misunderstanding: My problem is not copying a dataset to a member, my problem is converting RECFM=FBA (LRECL=133) to RECFM=VBA (LRECL=137).

It is not a problem to do this manual by the ISPF-Move/Copy-Utility (3.3) or the Copy-Command when editing the PO-Member. But I'd like to do this automatically. Is there a possibility to execute the ISPF-Move/Copy-Utility from a JCL?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Oct 23, 2008 1:30 pm    Post subject:
Reply with quote

I usually use something like this. It could probably be improved upon, but I have had this for years and years and it always seems to work OK
Code:

//ICEMERGE EXEC PGM=ICETOOL                               
//TOOLMSG  DD SYSOUT=*                                     
//DFSMSG   DD SYSOUT=*                                     
//INFILE   DD DSN=..............DISP=SHR                   
//OUFILE   DD DSN=..............VARIABLE,                 
//            DISP=(,CATLG,DELETE),                       
//            SPACE=(CYL,(10,10),RLSE),RECFM=VB,LRECL=27994
//TOOLIN   DD *                                           
  COPY FROM(INFILE)  TO(OUFILE)  USING(COPY)               
/*                                                         
//COPYCNTL DD *                                           
 OUTFIL FNAMES=OUFILE,FTOV,VLTRIM=C' '                     
/*                                                         
Back to top
View user's profile Send private message
Auryn

New User


Joined: 11 Jan 2006
Posts: 42
Location: Lower Saxony (DE)

PostPosted: Thu Oct 23, 2008 6:19 pm    Post subject: How to copy FBA-PS-Dataset in VBA-PO-Member - Great Hint
Reply with quote

Hi Expat,

thank you very much for this very helpful hint.

It Works!!! icon_biggrin.gif
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Oct 23, 2008 9:50 pm    Post subject:
Reply with quote

Code:

//            SPACE=(CYL,(10,10),RLSE),RECFM=VB,LRECL=27994


If you want the output to be VBA/137, you should use:

Code:

//            SPACE=(CYL,(10,10),RLSE),RECFM=VBA
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Unable to catalog a gdg dataset resid... Shovan JCL & VSAM 7 Fri Mar 24, 2017 2:24 pm
No new posts Want to pull the job log into a Mainf... Jishu Mukherjee Compuware & Other Tools 9 Tue Mar 21, 2017 4:48 pm
No new posts Browsing member from any PDS shiitiizz CLIST & REXX 7 Wed Mar 08, 2017 1:17 am
No new posts JCL to get submitted once dataset has... vinu78 JCL & VSAM 17 Thu Feb 16, 2017 7:32 am
No new posts Bind plan as a member to another bind... rexx77 DB2 0 Thu Feb 16, 2017 2:02 am


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