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
 

 

Report Help required using DFSORT.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
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    Post subject: Report Help required using DFSORT.
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 Moderator


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

PostPosted: Mon May 04, 2009 10:47 pm    Post subject:
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    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 DFSORT MUL FIELDS tspr52 DFSORT/ICETOOL 16 Fri Mar 03, 2017 11:53 pm
No new posts Easytrieve report shalem CA Products 4 Sun Feb 26, 2017 9:08 am
No new posts How to get the remainder and quotient... vnktrrd DFSORT/ICETOOL 2 Mon Oct 31, 2016 10:59 am
No new posts Detailed Transaction History report f... Kyle Carroll CICS 5 Tue Oct 18, 2016 12:42 am
No new posts Easytrieve - Report writing - Only 1 ... Abhi Nature CA Products 2 Wed Sep 14, 2016 11:40 am


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