Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

DISPLAY and BREAK operand

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
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    Post subject: DISPLAY and BREAK operand
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    Post subject: Reply to: DISPLAY and BREAK operand
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    Post subject:
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    Post subject: Reply to: DISPLAY and BREAK operand
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    Post subject:
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    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 Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts Display FTP Session Count within TSO Yolanda Harvey TSO/ISPF 3 Fri Mar 10, 2017 10:31 pm
No new posts To display values of multiple rows in... vinu78 DB2 2 Thu Mar 09, 2017 1:20 pm
No new posts Display ZEDLMSG without Pressing F1 &... anandgbe CLIST & REXX 8 Thu Dec 15, 2016 4:20 pm
No new posts How to display value of an exit param... lind sh CICS 2 Sun Oct 09, 2016 12:28 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us