Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Syncsort Issue with a sort card in placing a new field

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Raghunadhareddy.J

New User


Joined: 26 Apr 2011
Posts: 6
Location: INDIA

PostPosted: Wed Apr 27, 2011 12:37 pm    Post subject: Syncsort Issue with a sort card in placing a new field
Reply with quote

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
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Wed Apr 27, 2011 12:53 pm    Post subject:
Reply with quote

What on earth is it about the description of the problem given by the product that you do not understand
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Wed Apr 27, 2011 3:21 pm    Post subject:
Reply with quote

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... icon_sad.gif..

I think thats the simplest one can tell about issue..
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1894
Location: UK

PostPosted: Wed Apr 27, 2011 3:52 pm    Post subject:
Reply with quote

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
View user's profile Send private message
Raghunadhareddy.J

New User


Joined: 26 Apr 2011
Posts: 6
Location: INDIA

PostPosted: Thu Apr 28, 2011 4:24 pm    Post subject: Reply to: Syncsort Issue with a sort card in placing a new f
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm
No new posts Partial color change of a field in CI... waseem0424 CICS 5 Fri Sep 29, 2017 7:56 pm
No new posts JOINKEYS Paired and Unpaired Sort MFwhiz DFSORT/ICETOOL 4 Fri Sep 29, 2017 1:48 am
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts Split 1 file into 10 output Files - S... Prasanth Kumar SYNCSORT 5 Sat Sep 16, 2017 12:02 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us