How to merge two FB files with different LRECL using Joinkey



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

How to merge two FB files with different LRECL using Joinkey

Postby Surabhi » Mon May 09, 2016 11:44 am

Hi,

I have two input files F1 with lrecl 80 and F2 with lrecl 390, I want to merge these two files on the basis of a key field.
I have used the below sortcard, but getting abend S013:-

JOINKEYS F1=SORTIN1,      
          FIELDS=(25,6,A)  
 JOINKEYS F2=SORTIN2,      
          FIELDS=(115,6,A)
 REFORMAT FIELDS=(F1:1,390)
 SORT FIELDS=COPY          

SYSOUS-  AN S013  ABEND WAS ISSUED BY DFSORT, ANOTHER PROGRAM OR AN EXIT
SYSOUT-
---+----2----+----3----+----4----+----5----+----6----+----7----+---->
RECORD TYPE IS F - DATA STARTS IN POSITION 1                        
C5-I21470 C6-BASE   C7-K96411 C8-I25275 E4-BASE   C9-BASE   E5-I25610
BLOCKSET     SORT  TECHNIQUE SELECTED                                
- CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R1  - 15:32 ON SUN M
**  SORT ON CONTRACT ID, EFFECTIVE DATE AND        **                
**          GROUP ID                               **                
**                                                 **                
    SORT FIELDS=(1,25,CH,A,30,10,CH,A,118,12,CH,A,130,12,CH,A)      
SYSOUS   NOT FOUND - SYSOUT USED                                    
ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED
PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS        
SXP0213A.STEP01  .SORTB   , INPUT LRECL = 331, BLKSIZE = 27804, TYPE
MAIN STORAGE = (MAX,10485760,10485760)                              
MAIN STORAGE ABOVE 16MB = (10383344,10383344)                        
OPTIONS: OVFLO=RC4 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC4 ,VLSCMP=N,SZERO=Y
OPTIONS: SIZE=10485760,MAXLIM=2097152,MINLIM=450560,EQUALS=Y,LIST=Y,E
OPTIONS: VIO=N,RESDNT=NONE,SMF=FULL ,WRKSEC=Y,OUTSEC=Y,VERIFY=Y,CHALT
OPTIONS: RESALL=12288,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKP
OPTIONS: TMAXLIM=10485760,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=Y,CF
OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE    ,EXIT
OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAM
OPTIONS: NULLOUT=RC0                                                
OPTIONS: DYNAPCT=10 ,MOWRK=Y,TUNE=STOR,EXPMAX=MAX    ,EXPOLD=35     ,
EXCP ACCESS METHOD USED FOR SORTOUT                                  
EXCP ACCESS METHOD USED FOR SORTIN                                  
DC 166128900 TC 0 CS DSVVV KSZ 63 VSZ 63                            
FSZ=501900 RC  IGN=0 E  AVG=336 0  WSP=219032 C  DYN=0 0            
DE-BASE   D5-I29410 D3-BASE   ED-BASE   E8-I29717                    
OUTPUT LRECL = 390, BLKSIZE = 27690, TYPE = FB                      
SORTOUT LRECL OF 390 IS DIFFERENT FROM SORTIN(NN) LRECL OF 331 - RC=0

INSERT 0, DELETE 0


code' d for readability

Please tell me, how do i get through this abend?

recased the text,
all caps is equivalent to shouting
and on any forum it is considered bad manners,
a moderator
Surabhi
 
Posts: 47
Joined: Thu Sep 10, 2015 7:51 pm
Has thanked: 4 times
Been thanked: 0 time

Re: How to merge two FB files with different LRECL using Joinkey

 

Re: How to merge two FB files with different LRECL using Joi

Postby Aki88 » Mon May 09, 2016 1:39 pm

Hello,

What did you make of the message:

Surabhi wrote:SYSOUS NOT FOUND - SYSOUT USED


And did you revisit your JCL (and not SORT card) to correct the typo in a DD statement?
Aki88
 
Posts: 369
Joined: Tue Jan 28, 2014 1:52 pm
Has thanked: 33 times
Been thanked: 35 times

Re: How to merge two FB files with different LRECL using Joi

Postby enrico-sorichetti » Mon May 09, 2016 1:48 pm

duplicate of

post53778.html#p53778

where the TS did not care to follow up the questions asked

AN S013 ABEND WAS ISSUED BY DFSORT


just follow the standard procedure for an S013 abend
as described in the messages and code manual
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 2603
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 127 times

Re: How to merge two FB files with different LRECL using Joi

Postby Aki88 » Mon May 09, 2016 1:53 pm

Unable to edit the previous post anymore:

On giving the post a second look, are you sure you posted the SYSOUT of JOINKEYS and not some other SORT step? I ask this because the SYSOUT you show, gives a SORT FIELDS as below:
 SORT FIELDS=(1,25,CH,A,30,10,CH,A,118,12,CH,A,130,12,CH,A)  


Which is not present in your actual JOINKEYS statements; also, the SYSOUT doesn't show a message pertaining to JOIN being performed, unless I've missed a line of code in the SYSOUT.
Aki88
 
Posts: 369
Joined: Tue Jan 28, 2014 1:52 pm
Has thanked: 33 times
Been thanked: 35 times

Re: How to merge two FB files with different LRECL using Joi

Postby BillyBoyo » Mon May 09, 2016 5:34 pm

You have a typo. You have posted the wrong output. In that wrong output you have an LRECL difference between input and output which, even if it is what you want, is an untidy way to do it.

In your JOINKEYS you are only using F1-data, so it is unclear in what sense you are expecting to "merge" data. Note that when talking about SORT, use some other expression than "merge" as MERGE is a SORT statement with a specific meaning (to produce an ordered output from multiple ordered inputs).
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post