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

Syncsort: Matching two variable block files


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rupali_shah
Warnings : 1

New User


Joined: 14 Mar 2009
Posts: 6
Location: Hyderabad

PostPosted: Mon Dec 14, 2009 10:07 am
Reply with quote

Hello,

I want to match 2 variable block files based on 2 fields.
File 1 of length (572+4) and File 2 of length(200+4). My output file is also a VB file of length (200+4), which is declared in my JCL as :

Code:


//SORTOUT   DD DSN=TEBTOTS.MERGE.RS648.MASTER,               
//             DISP=(NEW,CATLG,DELETE),                             
//             UNIT=SYSDA,                                 
//             DCB=(SYS1.MODLBL,RECFM=VB,LRECL=204,BLKSIZE=0,
//             BUFNO=25),                                   
//             SPACE=(27998,(400,40),RLSE)                 



When I give a Join statement in my Control card as

Code:


JOINKEYS FILES=F1,FIELDS=(5,5,A,12,7,A)
JOINKEYS FILES=F2,FIELDS=(5,5,A,12,7,A)
REFORMAT FIELDS=(F1:1,204)   
SORT FIELDS=COPY             



I get an error as 'SORTOUT RECFM INCOMPATIBLE ' since in the control card it is taking TYPE = F

Is there any way to indicate a VB file in control card?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Mon Dec 14, 2009 3:26 pm
Reply with quote

Have you tried using REFORMAT FIELDS=(F1:5,200)

Also, Because the solution for sort related questions may vary from product to product, please ensure that you state clearly which sort product you are using.

If you are not sure, then by running a simple sort step shown below, you will be able to find out for yourself.

If the messages start with ICE then your product is DFSORT. Please also post the output of the complete line which has a message code ICE201I, as this will enable our DFSORT experts to determine which release of DFSORT that you have installed. This may also affect the solution offered.

If the messages start with WER or SYT then the product is SYNCSORT and should be posted in the JCL forum. Please also post the information telling which version of SYNCSORT is installed, as this may also affect the solution offered.

Thank you for taking your time to ensure that the valuable time of others is not wasted by offering inappropriate solutions which are not relevant due to the sort product being used and/or the release that is installed in you site.

Code:
//SORTSTEP EXEC PGM=SORT
//SYSOUT   DD SYSOUT=*
//SORTIN   DD *
ABC
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  SORT     FIELDS=COPY
Back to top
View user's profile Send private message
rexzone1

New User


Joined: 16 Dec 2006
Posts: 14
Location: Halifax, Canada

PostPosted: Tue Dec 15, 2009 8:39 pm
Reply with quote

Hi Rupali,

Please use the statement as expat mentioned as your record length is only 200 and you don't need to add the RDW of 4 bytes when giving REFORMAT.

Hope this helps.
Back to top
View user's profile Send private message
Alissa Margulies

SYNCSORT Support


Joined: 25 Jul 2007
Posts: 496
Location: USA

PostPosted: Wed Dec 23, 2009 1:26 am
Reply with quote

If you code REFORMAT=(F1:5,200) you will get a 200-byte fixed length output file. If you want a 204-byte VB output file, you will need to add an OUTFIL statement as follows:
Code:
 //SYSIN    DD *
    SORT FIELDS=COPY
    OUTFIL FTOV


You can additionally trim off any blank characters at the end of each record as follows:
Code:
OUTFIL FTOV,VLTRIM=C' '
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 3
No new posts Compare 2 files(F1 & F2) and writ... JCL & VSAM 8
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
Search our Forums:

Back to Top