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
 
DFSORT : Overlay & SUM fields in same DFSORT step

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
kunal jain

New User


Joined: 19 May 2011
Posts: 59
Location: India

PostPosted: Tue May 07, 2013 6:52 pm    Post subject: DFSORT : Overlay & SUM fields in same DFSORT step
Reply with quote

HI,

Input file has below values

Code:

COUNTRY   Amounts
ASIA          25.00
EUROPE      -200.00
INDIA         -50.00
SRI LANKA   25.00


Two requirements here:
1. Need to overlay 'INDIA' & 'SRILANKA' with value as 'ASIA'.
So above file will look like as below:
Code:

     ASIA            25.00
     EUROPE       -200.00
     ASIA           -50.00
     ASIA            25.00

2. ADD amounts country wise. so final output should be:

Code:

     ASIA           0.00
    EUROPE       -200.00
Please advise on DFSORT control card which can satisfy my above 2 requirements.
Also, please let me know if we can combine both steps in same DFSORT control card.

Thank you in advance
Code:
Code:
Back to top
View user's profile Send private message

Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1544
Location: Andromeda Galaxy

PostPosted: Tue May 07, 2013 6:56 pm    Post subject:
Reply with quote

Can you please use code tags?

And this post should belong to DFSORT forum.
Back to top
View user's profile Send private message
kunal jain

New User


Joined: 19 May 2011
Posts: 59
Location: India

PostPosted: Tue May 07, 2013 7:02 pm    Post subject:
Reply with quote

Pandora-Box wrote:
Can you please use code tags?

And this post should belong to DFSORT forum.


Done as suggested. Apology for inappropriate forum, as am new to this..
Back to top
View user's profile Send private message
Pandora-Box

Moderator


Joined: 07 Sep 2006
Posts: 1544
Location: Andromeda Galaxy

PostPosted: Tue May 07, 2013 7:18 pm    Post subject:
Reply with quote

Try this

You might need to modify the code slightly for your needs

Code:
//SORTIN   DD *
ASIA          25.00
EUROPE      -200.00
INDIA         -50.00
SRI LANKA   25.00
//SORTOUT  DD SYSOUT=*
//SYSIN    DD *
  INREC IFTHEN=(WHEN=(1,9,CH,EQ,C'INDIA'),OVERLAY=(1:C'ASIA     ')),
        IFTHEN=(WHEN=(1,9,CH,EQ,C'SRI LANKA'),OVERLAY=(1:C'ASIA     '))
  SORT FIELDS=(1,9,CH,A)
  OUTFIL REMOVECC,NODETAIL,
  SECTIONS=(1,9,
  TRAILER3=(1,9,3X,
            TOT=(13,8,SFF,EDIT=(SIIIIIIIT.TT),SIGNS=(,-))))
//*
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1932
Location: UK

PostPosted: Tue May 07, 2013 10:24 pm    Post subject:
Reply with quote

Quote:
Apology for inappropriate forum, as am new to this..

For a first post this would almost be an acceptable excuse but 30+ posts over 2 years? No - it is just pain laziness in not taking due care.
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 Merging 2 records at multiple rows wi... Bijesh DFSORT/ICETOOL 1 Wed Dec 06, 2017 1:50 am
No new posts Formatting using DFsort Guru Nandu DFSORT/ICETOOL 5 Thu Nov 30, 2017 7:33 am
No new posts Compare VSAM files using DFSORT pshongal DFSORT/ICETOOL 5 Thu Nov 23, 2017 10:24 am
No new posts Compare and COPY using DFSORT pshongal DFSORT/ICETOOL 3 Fri Nov 17, 2017 9:49 am
No new posts Split files upto certain limit based ... bubbu75 DFSORT/ICETOOL 5 Tue Nov 14, 2017 11:11 pm

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