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

Report Help required using DFSORT.


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

New User


Joined: 27 Nov 2005
Posts: 15
Location: Phoenix

PostPosted: Sun May 03, 2009 9:53 pm
Reply with quote

I have file as below, Class Code is X(03), Cust Code is X(06), Amt fields are S9(07)V99 COMP-3, Please see the content of file as.

Code:

Class  Cust     AMT1         AMT2    AMT3       AMT4      AMT5        AMT6
Code   Code
005    516503  7,500.00    2,500.00  0.00      5,000.00    0.00        0.00
005    505261  5,000.00    461.57    0.00      4,000.00    538.43      403.82
005    320376  2,500.00    500.00    0.00      0.00        2,000.00    1,500.00
006    516510  100,000.00  0.00      0.00      75,000.00   25,000.00   18,750.00
006    505271  50,000.00   6,000.00  2,000.00  15,000.00   27,000.00   20,250.00
006    320386  75,000.00   18,308.98 0.00      0.00        56,691.02   42,518.27
026    513110  7,500.00    5,000.00  2,499.00  0.00        1.00        0.00
026    216532  73,090.32   18,308.98 12,000.00 0.00        42,781.34   0.00
030    123456  600.00      0.00      0.00      0.00        600.00      0.00
030    214876  1,600.00    1,500.00  0.00      0.00        100.00      0.00


I need a report like below report.

Code:

[size=7]

                                         Heading 1
                                          Heading 2
                                          Heading 3
                                          Heading 4
                             

Class  Customer      Current     Less      Current         Current   Current   Available
Code    Code         Gross Total  Return    Pending Return     Cash      NET        Cash
005   516503         7,500.00    2,500.00   0.00            5,000.00    0.00       0.00
005   505261         5,000.00    461.57     0.00            4,000.00    538.43     403.82
005   320376         2,500.00    500.00     0.00            0.00       2,000.00    1,500.00
      Sub-Total      15,000.00   3,461.57   0.00            9,000.00   2,538.43    1,903.82

006   516510         100,000.00  0.00       0.00            75,000.00  25,000.00    18,750.00
006   505271         50,000.00   6,000.00   2,000.00        15,000.00  27,000.00    20,250.00
006   320386         75,000.00   18,308.98  0.00            0.00       56,691.02    42,518.27
      Sub-Total      225,000.00  24,308.98  2,000.00        90,000.00  108,691.02   81,518.27

026   513110         7,500.00    5,000.00   2,499.00        0.00       1.00         0.00
026   216532         73,090.32   18,308.98  12,000.00       0.00       42,781.34    0.00
       Sub-Total     80,590.32   23,308.98  14,499.00       0.00       42,782.34    0.00

030   123456         600.00      0.00       0.00            0.00       600.00       0.00
030   214876         1,600.00    1,500.00   0.00            0.00       100.00       0.00
      Sub-Total      2,200.00    1,500.00   0.00            0.00       700.00       0.00

005   Sub-Total      15,000.00   3,461.57   0.00            9,000.00   2,538.43     1,903.82
006   Sub-Total      225,000.00  24,308.98  2,000.00        90,000.00  108,691.02   81,518.27
026   Sub-Total      80,590.32   23,308.98  14,499.00       0.00       42,782.34    0.00
030   Sub-Total      2,200.00    1,500.00   0.00            0.00       700.00       0.00
      Total All      322,790.32  52,579.53  16,499.00       99,000.00  154,711.79   83,422.09[/size]


Can any one help me in writing DFSORT for this.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


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

PostPosted: Mon May 04, 2009 10:47 pm
Reply with quote

atulxp,

Is this the layout of the input records?

Code:

Name     Start Pos   Length   Format
Class            1        3       CH
Cust             4        6       CH
AMT1            10        5       PD
AMT2            15        5       PD
AMT3            20        5       PD
AMT4            25        5       PD
AMT5            30        5       PD
AMT6            35        5       PD


If that's not the layout, then give the layout in that form.

What is the RECFM and LRECL of the input file?

Do you want the numeric values properly right-aligned under the headings? Something like this:

Code:

Class Customer        Current      Less           Current    Current   Current   Available
Code  Code        Gross Total    Return    Pending Return       Cash       NET        Cash
005   516503         7,500.00  2,500.00              0.00   5,000.00      0.00        0.00
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 Modifying Date Format Using DFSORT DFSORT/ICETOOL 9
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts DFsort help with SUM() DFSORT/ICETOOL 12
No new posts Need help on formatting a report DFSORT/ICETOOL 14
Search our Forums:

Back to Top