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

DISPLAY and BREAK operand


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

New User


Joined: 10 Dec 2010
Posts: 96
Location: Massachusetts

PostPosted: Fri Sep 30, 2011 2:00 am
Reply with quote

hi,
when i try to use a BREAK command with 2 ON options to break i get this:
Code:

           HEADER('COMPANY')       ON(238,07,CH) -                             
           HEADER('DOC TYPE     ') ON(66,02,CH)  -                             
           HEADER('COST ELEMT')    ON(301,10,CH) -                             
           HEADER('DB / CR   ')    ON(347,01,CH) -                             
           HEADER('MONEY 1   ')    ON(327,20,SFF,C1,F'$') -                     
           HEADER('MONEY 2   ')    ON(389,20,SFF,C1,F'$') -                     
          *BTOTAL('BLABB TOT')  ON(327,20,SFF,C1,F'$') ON(389,20,SFF,C1,F'$') -
           BTITLE('BLABBB ') -                                                 
           BREAK(347,01,CH,301,10,CH) -                                         
                           $                                                   
ICE640A 0 INVALID FORMATTING ITEM                                               
          *BREAK(238,07,CH,66,02,CH,301,10,CH,347,01,CH)  -                     
           TOTAL('TOTALS') -                                                   
           COUNT('TOTAL COUNT OF XXXXXXX IN FILE')                             
ICE602I 0 OPERATION RETURN CODE:  12                                           


I am guessing I cannot use 2 operators with the BREAK command ?
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Fri Sep 30, 2011 2:43 am
Reply with quote

madmartinsonxx,

You have 2 options.

1. You must have already have SORT operator before the DISPLAY operator which sorts the data in the break fields. In that put all your BREAK Fields as one string at the end or at the beginning and then use BREAK on 1 large field.

2. You can use the traditional Reporting features like SECTIONS and Trailer3
Back to top
View user's profile Send private message
madmartinsonxx

New User


Joined: 10 Dec 2010
Posts: 96
Location: Massachusetts

PostPosted: Fri Sep 30, 2011 2:48 am
Reply with quote

skolusu -
since i couldnt get BREAK figured out I went to Trailer3 which I used in the past for a post here. From what I am seeing we can only get 1 total field in the trailer3 as well.
Code:

ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R10 - 17:08 ON THU SE
           SORT FIELDS=(238,3,A,66,2,A,301,10,A,347,1,A),FORMAT=BI             
           OUTFIL REMOVECC,NODETAIL,                                           
           SECTIONS=(238,3,66,2,301,10,347,1,                                   
            TRAILER3=(238,3,66,2,301,10,347,1,' ',                             
                     COUNT=(EDIT=(IIII)),' ',                                   
                  TOTAL=(327,20,SFF,EDIT=(SIII,III,III,IIT.TT),SIGNS=(,-),     
                         389,20,SFF,EDIT=(SIII,III,III,IIT.TT),SIGNS=(,-))))   
                         $                                                     
ICE007A F SYNTAX ERROR                                                         


So I will build that BREAK key and stick it on the end of my file in the first step then I should be good to go. Nice thinking by the way on making a BIG key to break on.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Fri Sep 30, 2011 3:57 am
Reply with quote

madmartinsonxx,

You are missing a closing parenthesis on the first total and you need to code TOTAL for each individual field

try these control cards

Code:

//SYSIN    DD *                                                         
  SORT FIELDS=(238,3,A,66,2,A,301,10,A,347,1,A),FORMAT=BI               
                                                                       
  OUTFIL REMOVECC,NODETAIL,                                             
  SECTIONS=(238,3,66,2,301,10,347,1,                                   
  TRAILER3=(238,3,66,2,301,10,347,1,' ',                               
           COUNT=(EDIT=(IIII)),' ',                                     
           TOTAL=(327,20,SFF,EDIT=(SIII,III,III,IIT.TT),SIGNS=(,-)),   
           TOTAL=(389,20,SFF,EDIT=(SIII,III,III,IIT.TT),SIGNS=(,-))))   
//*
Back to top
View user's profile Send private message
madmartinsonxx

New User


Joined: 10 Dec 2010
Posts: 96
Location: Massachusetts

PostPosted: Fri Sep 30, 2011 4:06 am
Reply with quote

yup, worked perfecto ! ty sir.
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 How to display the leading zeros of a... DB2 7
No new posts SDSF display Max-RC in different colors TSO/ISPF 4
No new posts Converting a file from PD to display ... SYNCSORT 4
No new posts Break a record into fields, each fiel... SYNCSORT 2
No new posts Unable to display comp variable COBOL Programming 4
Search our Forums:

Back to Top