View previous topic :: View next topic
Author
Message
Raghunadhareddy.J New User Joined: 26 Apr 2011Posts: 6 Location: INDIA
MY Input to sort is as follows.
"04/18/11","ADJ","0008054","0000012","MDVW",000.14
"04/18/11","INV","0696135","0002872","MDVW",000.41
"04/18/11","ADJ","0008054","0000012","NPDA",000.14
"04/18/11","INV","0696135","0002872","NPDA",000.41
"04/18/11","ADJ","0008054","0000012","VRNE",000.14
"04/18/11","INV","0696135","0002872","VRNE",000.41
"04/18/11","ADJ","0008054","0000012","VRNY",000.14
"04/18/11","INV","0696135","0002872","VRNY",000.41
My job is abending with user code U0016.
The job I'm using is
Code:
//STEP010 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=V924503.VIBE.RPT.GDERPT.SORT7,
// DISP=SHR
//SORTOUT DD DSN=V924503.VIBE.RPT.GDERPT.EMAIL.C333,
// DISP=(,CATLG,DELETE),
// UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE)
//SYSIN DD *
SORT FIELDS=(13,3,A,39,4,A),FORMAT=CH
OUTFIL HEADER1=(1:' VIBE - INVOICES RECEIVED ',/,
1:' -------------------------- ',2/,
1:'DATE AREA TYPE GUIDED UNGUIDED % ',/,
1:'----- ---- ---- ------ -------- ----'),
OUTREC=(1:2,8,X,11:39,4,X,17:13,3,X,21:19,7,ZD,EDIT=(II,III,IIT),
35:29,7,ZD,EDIT=(I,III,IIT),42:45,6,31X),
SECTIONS=(13,3,SKIP=0L,
TRAILER3=(/,1:'TOTAL',21:TOT=(19,7,ZD,EDIT=(II,III,IIT)),
35:TOT=(29,7,ZD,EDIT=(I,III,IIT)),/)),
TRAILER1=(1:'TOTAL INVOICES',21:TOT=(19,7,ZD,EDIT=(II,III,IIT)),
35:TOT=(29,7,ZD,EDIT=(I,III,IIT)),/),
LINES=56
/*
42:45,6,
The above given is the new code added to outrec to place the last field in input to output.
job is abending with user return code U0016.
WER108I SORTIN : RECFM=FB ; LRECL= 50; BLKSIZE= 27950
WER136A SORTOUT OUTREC HAS OVERLAPPING FIELDS SPECIFIED
Thanks & regards
Raghu
Back to top
expat Global Moderator Joined: 14 Mar 2007Posts: 8797 Location: Welsh Wales
What on earth is it about the description of the problem given by the product that you do not understand
Back to top
Escapa Senior Member Joined: 16 Feb 2007Posts: 1399 Location: IL, USA
Revisit your outrec statement... you have mentioned overlapping fields...
Opps... I thought of explaining what the issue is but ended up very same as SYNCSORT has told... ..
I think thats the simplest one can tell about issue..
Back to top
Nic Clouston Global Moderator Joined: 10 May 2007Posts: 2455 Location: Hampshire, UK
The problem is that he is using SYNCSORT not DFSORT so posting in the DFSORT part of the forum is bound to produce an error.
Another problem is that he failed to analyse the message that came up when he started to post - post in the relevant section and delete the message.
Back to top
Raghunadhareddy.J New User Joined: 26 Apr 2011Posts: 6 Location: INDIA
Hi All,
Thanks a lot for your quick responce.
I got the issue and fixed it.
This is the outrec statement worked for me.
OUTREC=(1:2,8,X,11:39,4,X,17:13,3,X,21:19,7,ZD,EDIT=(II,III,IIT),
35:29,7,ZD,EDIT=(I,III,IIT),X,45:45,5,31X),
Thanks & regards
Raghu
Back to top
Please enable JavaScript!