IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

getting spaces in output file while using join keys


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pkmurali
Warnings : 1

Active User


Joined: 15 Dec 2005
Posts: 264

PostPosted: Thu Oct 30, 2014 8:45 pm
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

Global Moderator


Joined: 21 Sep 2010
Posts: 2573
Location: NYC,USA

PostPosted: Thu Oct 30, 2014 8:58 pm
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

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7311
Location: Inside the Matrix

PostPosted: Thu Oct 30, 2014 9:18 pm
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

Global Moderator


Joined: 21 Sep 2010
Posts: 2573
Location: NYC,USA

PostPosted: Fri Oct 31, 2014 8:34 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts Compare the file record count percent... DFSORT/ICETOOL 3
No new posts compare two file to find position/dat... SYNCSORT 2
No new posts Converting a file from PD to display ... SYNCSORT 4
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
This topic is locked: you cannot edit posts or make replies. Write Character to Hexadecimal file w... COBOL Programming 8
Search our Forums:

Back to Top