MVSFORUMS.com A Community of and for MVS Professionals
View previous topic :: View next topic
Author
Message
Senthil Prabhu Beginner Joined: 09 Aug 2006 Posts: 4 Topics: 4 Location: India
Posted: Wed Aug 09, 2006 9:11 am Post subject: Subtraction Using Sort or Icetool Utility.
Hi everyone,
Shall anyone let me know how to subtract two values using Sort/Icetool.
For example,
Consider the record below.
3043 CHPOCH41 39
In the above record I need to subtract 43 and 41 and get the result in another PS.
Please do the needful.
Thanks,
P.Senthil Prabhu. _________________ Senthil Prabhu
Back to top
kolusu Site Admin Joined: 26 Nov 2002 Posts: 12375 Topics: 75 Location: San Jose
Posted: Wed Aug 09, 2006 9:46 am Post subject:
Senthil Prabhu ,
try this
Code:
//STEP0100 EXEC PGM=SORT
//SORTIN DD *
3043CHPOCH4139
//SORTOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(01,15,
03,02,ZD,SUB,11,2,ZD,EDIT=(TT))
/*
The result is
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu
Back to top
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum