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

ABEND with DFSORT- ABEND=S000 U0109


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
kevin isaiyarasan

New User


Joined: 30 Jul 2008
Posts: 2
Location: india

PostPosted: Tue Sep 02, 2008 1:08 pm
Reply with quote

I'm getting S000 U0109 while SUMming fields in DFSORT
Code:

//STP00001 EXEC PGM=SORT                                   
//SYSOUT   DD SYSOUT=(,)                                   
//SORTIN DD DSN=********.INPUT.DSN,DISP=(OLD,KEEP)             
//SORTOUT  DD DSN=*******.PA1.DSN,   
//            DISP=(,CATLG),UNIT=SYSDA,
//            SPACE=(TRK,(2,1),RLSE)
//SYSIN    DD  *                                             
  SORT FIELDS=(20,3,A),FORMAT=CH                             
  SUM FIELDS=(30,5,BI)                                       
/*


The input file is
Code:

                   20-23     30-35
KANDY              PAT       07500
ISAI               PAT       07500
VEMULA             PAT       07500
MANI               PA        00500
NAIR               PA        01500
BHUVANA            PAT       07500
SARAVAN            PA        02500




SYSOUT is

Code:

ICE201I J RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE112I J EQUALS NOT USED WITH SUM                     
ICE109A J SUM FIELD DISPLACEMENT OR LENGTH VALUE ERROR
Back to top
View user's profile Send private message
kevin isaiyarasan

New User


Joined: 30 Jul 2008
Posts: 2
Location: india

PostPosted: Tue Sep 02, 2008 1:16 pm
Reply with quote

The input file has records like
Code:

KANDY            PAT          07500
ISAI             PAT          07500
VEMULA           PAT          07500
MANI             PA           00500
NAIR             PA           01500
BHUVANA          PAT          07500
SARAVAN          PA           02500


need to sum according to 20-23 fields
Back to top
View user's profile Send private message
senthils

Active User


Joined: 15 Nov 2005
Posts: 117
Location: Chennai, India

PostPosted: Tue Sep 02, 2008 2:20 pm
Reply with quote

I think the its giving error beacuse you are using BI. Try using ZD. Also according to your data the numbers start at position 31 and not 30

SUM FIELDS=(31,5,ZD)
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Tue Sep 02, 2008 9:09 pm
Reply with quote

Kevin,

Did you look up message ICE109A in "z/OS DFSORT Messages, Codes and Diagnosis"? If so, you would have seen this as the first thing in the Programmer Response:

Quote:
Make sure that the length and position values in the FIELDS operand of the SUM control statement were specified correctly. For BI and FI, length must be 2, 4, or 8 bytes; for PD, length must be 1 through 16 bytes; for ZD, length must be 1 through 31 bytes; ...


You have a BI SUM field with length 5, which is invalid. If your sum field is really BI, then you must use a length of 2, 4 or 8 bytes. If your sum field is some other format, such as ZD (as it appears to be from your example), then you need to use that format instead of BI.

The DFSORT books are available at:

Use [URL] BBCode for External Links
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 Modifying Date Format Using DFSORT DFSORT/ICETOOL 9
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts DFsort help with SUM() DFSORT/ICETOOL 12
Search our Forums:

Back to Top