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
 
report generation problem with control

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
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    Post subject: report generation problem with control
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

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue Jan 03, 2012 1:00 pm    Post subject: Reply to: report generation problem with control
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    IBMMAINFRAMES.com Support Forums -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts LMINIT problem - not finding DDNAME Danielle.Filteau CLIST & REXX 7 Tue Sep 19, 2017 9:57 pm
No new posts Problem commiting to DB2 from IMS MPP Ole Soerensen IMS DB/DC 2 Wed Jul 26, 2017 5:19 pm
No new posts Report cost in CA-dispatch Nileshkul CA Products 3 Wed Jun 07, 2017 10:32 pm
No new posts SMTP the current generation number of... Jyothi Kulunde JCL & VSAM 4 Thu May 04, 2017 4:08 pm
No new posts PA02 - Programmtically control attent... dodithegreat IMS DB/DC 1 Thu Apr 06, 2017 8:33 pm

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