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
 

 

Insert FB records in a file with VB

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

New User


Joined: 10 Jul 2007
Posts: 24
Location: Blore

PostPosted: Wed Mar 26, 2008 12:30 am    Post subject: Insert FB records in a file with VB
Reply with quote

I want to combine the data of file1 which is a FB and data of file2 which is VB into a file FILE3 which is VB similar to FILE2.

Code:

//STEP1 EXEC PGM=SYNCSORT
//SORTIN    DD DSN=FILE1,DISP=SHR
//               DD DSN=FILE2,DISP=SHR
//SORTOUT DD DSN=FILE3,DISP=OLD         
//SYSOUT   DD SYSOUT=*                             
//SYSIN      DD *                                   
  SORT FIELDS=COPY                                 
//*                                               


i tried the above code, but i am getting abend.can you please guide.

Regards
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: Wed Mar 26, 2008 12:45 am    Post subject:
Reply with quote

Hello,

You need to post the entire diagnostic output.

You will probably need to copy the fb data to vb and then combine the vb files.
Back to top
View user's profile Send private message
Richa Jain

New User


Joined: 18 Mar 2008
Posts: 35
Location: Gurgaon

PostPosted: Thu Mar 27, 2008 12:23 pm    Post subject:
Reply with quote

I donno if it is possible with syncsort..

You need to add a step to copy FB file(file1) into a temporary VB file using IEBGENER.

Code:

//STEP1     EXEC PGM=IEBGENER                       
//SYSIN     DD DUMMY                               
//SYSUT1   DD DSN=TEST.INPUT.FB.FILE1,         
//              DISP=SHR                               
//SYSUT2   DD DSN=TEST.OUTPUT.VB.TEMP,         
//              DISP=(NEW,CATLG,DELETE),               
//              SPACE=(CYL,(1,1),RLSE),               
//              DCB=(RECFM=VB,LRECL=84,BLKSIZE=6720)   
//SYSPRINT  DD SYSOUT=*


In second step you can use sort to combine the two files (tempfile and FILE2) into FILE3 [/code]
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 Mar 27, 2008 12:38 pm    Post subject:
Reply with quote

Both files need to be of the same format, either FB or VB.

Use SORT to convert the FB into VB, and then merge the files.
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
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


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