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

report generation problem with control


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pavaniramini

New User


Joined: 10 Feb 2010
Posts: 4
Location: pune

PostPosted: Tue Jan 03, 2012 12:25 pm
Reply with quote

This is how the input file looks likes
Code:
DLR   ST        CITY                     GL-NO             GL-Amount   
75000    AB   EDMONTON            1611005        0000000039155
75000    AB   EDMONTON            3501060       0000000039155
75024    AB   CALGARY                 1611005       0000000062308
75024    AB   CALGARY                3501060        0000000062308
75025    AB   LETHBRIDGE          1611005        0000000004555
75025    AB   LETHBRIDGE          3501060        0000000004555
75026    AB   RED DEER               1611005        0000000035413
75026    AB   RED DEER               3501060        0000000035413

In above input file GL-Amount is PIC 13 N 2
As the output should look like
Code:
State   CITY                DLR   GL 1611005   GL 3501060   TOTAL GL AMOUNT
AB      EDMONTON    75000       391.55           391.55         783.1
           EDMONTON    75001       391.55           391.55         783.1
           CALGARY         75024       623.08          623.08       1246.16 
           LETHBRIDGE    75026       354.13          354.13          708.26
City total EDMONTON:                                                        1566.2
City total CALGARY:                   1246.16                                                   
City total LETHBRIDGE:                                                        708.26
State total AB                                                                       3520.62

Currently we have coded the output looks like below
Code:
                  QUARTERLY/YEAR  END  TAX  REPORT                             
                                                                               
DLR-STATE        DLR-CITY        DEALER         GL-1171520          GL-1611005 
---------     ------------       -------     ----------------    ---------------
   AB         EDMONTON            75000                 67.80              391.5
              CALGARY             75024                 67.80              623.0
              LETHBRIDGE          75025                 67.80               45.5
              RED DEER            75026                 67.80              354.1
              EDMONTON            75066                 67.80              369.5
              LLOYDMINSTER        75120                 67.80              216.4
              CALGARY             75134                 67.80              375.4
              EDMONTON            75198                 67.80               67.4
              RED DEER            75226                 67.80                9.4
RPT-GL-STATE TOTAL                                     610.20            2,452.6

1) Currently we have given control state so it is printing the totals for state .when we give control on city whenever there is break in city it is printing total over there.
2) In above output file we have state total ,in state total it is printing totals of all GL’s which is not required only Total of GL-amount is required .for reference please see the below screen

Code:
-1611005          GL-3501014                    GL-3501060        GL-AMOUNT     
-----------    ----------------              ---------------   ----------------
     391.55               67.80                        391.55            783.10
     623.08               67.80                        623.08          1,246.16
      45.55               67.80                         45.55             91.10
     354.13               67.80                        354.13            708.26
     369.56               67.80                        369.56            739.12
     216.47               67.80                        216.47            432.94
     375.48               67.80                        375.48            750.96
      67.41               67.80                         67.41            134.82
       9.45               67.80                          9.45             18.90
   2,452.68              610.20                      2,452.            4,905.36
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Jan 03, 2012 1:00 pm
Reply with quote

Why didn't you use the Code tags everywhere needed on your post?

You haven't shown a line of program code. I'm assuming Easytrieve, but don't know where you got the word PIC from in that context.

You have a manual?

You'll need to look at SEQUENCE, SUM, SUMCTL, CONTROL, SUMFILE. Your requirement to print the cities in a block at the end is best-satisfied by doing them as a seperate REPORT from a SUMFILE from this REPORT.
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 -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Using Dynamic file handler in the Fil... COBOL Programming 2
No new posts DFHPI1008 JSON generation failed COBOL Programming 0
No new posts Need help on formatting a report DFSORT/ICETOOL 14
No new posts Creating Report using SORT DFSORT/ICETOOL 7
Search our Forums:

Back to Top