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
 
SUM FIELDS is working in ZD but BI is not working

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
sureshmurali
Warnings : 1

New User


Joined: 25 Nov 2010
Posts: 70
Location: Sivakasi, India

PostPosted: Thu Jan 26, 2012 4:08 pm    Post subject: SUM FIELDS is working in ZD but BI is not working
Reply with quote

Hi this is my code -

Code:

//STEP020  EXEC PGM=SORT                               
//SORTIN   DD DSN=AA31.G9330.OTHR2011.SAMPLE1,DISP=SHR
//SORTOUT  DD DSN=SAA31.AE5UIJ.SAM1,DISP=SHR         
//SYSOUT   DD SYSOUT=*                                 
//SYSIN    DD *                                         
 SORT FIELDS=(1,3,CH,A)                                 
 SUM FIELDS=(12,2,BI,15,3,BI)                           
/*     


Input file - AA31.G9330.OTHR2011.SAMPLE1
Logical record length - 80

Code:
100SURESH101001230                                                     
200RAJESH202002460                                                     
100SURESH101001000                                                     
200RAJESH202001460                                                     
300RANGSH300500615                                                     
400RAMESH         


My job ended with abend.

Code:
ICE805I 1 JOBNAME: AAAAAAJ1 , STEPNAME: STEP020                       
ICE802I 0 BLOCKSET     TECHNIQUE IN CONTROL                           
ICE000I J - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 04:53
           SORT FIELDS=(1,3,CH,A)                                     
           SUM FIELDS=(12,2,BI,15,3,BI)                               
ICE201I J RECORD TYPE IS F - DATA STARTS IN POSITION 1               
ICE112I J EQUALS NOT USED WITH SUM                                   
ICE109A J INVALID POSITION OR LENGTH IN SUM FIELD - REASON CODE IS 01
ICE052I J END OF DFSORT       


Can some one help me to identify this issue ? This job is working fine for
Code:
SUM FIELDS=(12,2,ZD,15,3,ZD)   


I am aware that BI cannot be displayed. But can't we do SUM them also ?
Back to top
View user's profile Send private message

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7314

PostPosted: Thu Jan 26, 2012 4:28 pm    Post subject: Reply to: SUM FIELDS is working in ZD but BI is not working
Reply with quote

Did you try looking up the ICE109A message, even if not able to get it from the text of the message?

If your SUM works with PD fields, why on earth would it suddenly "work" with BI any way?
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


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

PostPosted: Thu Jan 26, 2012 11:20 pm    Post subject:
Reply with quote

Suresh K,

As documented here:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA60/3.20?DT=20110608113434

the length for a BI SUM field must be 2, 4 or 8. You are using 3 for the length which is invalid.

The values in your record appear to be ZD values, not BI values, so I don't know why you're trying to use BI to sum them.

If you describe what you're actually trying to do, I could help you.

Please show an example of the records in each input file (relevant fields only) and what you expect for output (in hex, if appropriate). Explain the "rules" for getting from input to output. Give the starting position, length and format of each relevant field. Give the RECFM and LRECL of the input file.
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Merging 2 records at multiple rows wi... Bijesh DFSORT/ICETOOL 1 Wed Dec 06, 2017 1:50 am
No new posts REXX LISTDSI () SMSINFO is not working upendrasri CLIST & REXX 4 Fri Nov 17, 2017 11:33 am
No new posts Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm
No new posts Addition of two records on 2 fields amar143 SYNCSORT 8 Tue Oct 03, 2017 11:14 am
No new posts LIBDEF not working in called proc packerm CLIST & REXX 0 Fri Sep 15, 2017 7:22 pm

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