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
 

 

getting spaces in output file while using join keys

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 237

PostPosted: Thu Oct 30, 2014 8:45 pm    Post subject: getting spaces in output file while using join keys
Reply with quote

Hi all,

I am trying to copy the matching record from two files ( VB files) as shown below

Code:

//STEP01 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*               
//SYSOUT   DD SYSOUT=*               
//SORTJNF1 DD DSN=VARIABLE.FILE1,DISP=SHR
//SORTJNF2 DD DSN=VARIABLE.FILE2,DISP=SHR
//SORTOUT DD DSN=VARIABLE.FILE3,DISP=SHR
//SYSIN DD *                     
  JOINKEYS FILE=F1,FIELDS(20,7,A)
  JOINKEYS FILE=F2,FIELDS(5,7,A) 
  REFORMAT FIELDS=(F2:1,4,1504)   
  OPTION COPY                 
/*     
                         


But i am getting matching records but the output file is having spaces, instead of having data. Please let me know if i am missing any syntax.
Back to top
View user's profile Send private message

Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1720
Location: NY,USA

PostPosted: Thu Oct 30, 2014 8:58 pm    Post subject:
Reply with quote

That is incomplete.
You need to show us what do you have at this offsets.. F2:1,4,1504)

Also you need to show us sample data. and I hope the files are sorted before you do a join.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Thu Oct 30, 2014 9:18 pm    Post subject: Reply to: getting spaces in output file while using join key
Reply with quote

Rohit, It's not incomplete, it's rare example of a variable-length REFORMAT record definition.

Whether intended is a different question :-)

pkmurali, what do you have from position 1504 to the end of the record on File 2? Because that's what you've asked to be placed on the REFORMAT record, nothing else except the RDW.
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 1720
Location: NY,USA

PostPosted: Fri Oct 31, 2014 8:34 pm    Post subject:
Reply with quote

Bill, I meant that when TS say about getting spaces without showing the sample record then it is difficult to judge what was wrong as at that offset there could already be a spaces in the input file who knows....

Otherwise, I agree with you that this is a rare example of VB REFORMAT.
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts FTP xls file from Mainfrmae kumarsatheeshc1 TSO/ISPF 5 Tue Jun 20, 2017 6:56 pm
No new posts Validate if a Value from the file is ... balacsv2 COBOL Programming 8 Mon Jun 19, 2017 11:52 pm
No new posts Dynamic output file creation in cobol... smileheal COBOL Programming 7 Thu Jun 15, 2017 10:53 pm
No new posts compare 2 rows within the same file ram_vizag SYNCSORT 7 Wed Jun 14, 2017 12:34 am
No new posts XML Parse for large file muralikrishnan_new COBOL Programming 3 Mon Jun 12, 2017 12:50 pm


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