| Author |
Message |
rohit_raajin
New User
Joined: 10 May 2005 Posts: 9 Location: india
|
|
|
|
I have a requiremnt as to change the sign of a packed decimal S9(7)V99 where it can have values like -100.23. I need to change the sign of this value to '+100.23'
I have these in a dataset and there are more than 1000 records in it.
Can anyone suggest me how to do this? It would be preferable if we can do this through JCL. |
|
| Back to top |
|
 |
References
|
Posted: Tue May 06, 2008 12:35 pm Post subject: Re: How a change a sign of a packed decimal value in a dataset |
 |
|
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 6033 Location: 221 B Baker St
|
|
|
|
Hello,
| Quote: |
| I have a requiremnt as to change the sign of a packed decimal S9(7)V99 where it can have values like -100.23 |
If the data actually contains "-100.23", it is not packed decimal. . . |
|
| Back to top |
|
 |
Frank Yaeger
DFSORT Moderator
Joined: 15 Feb 2005 Posts: 3804 Location: San Jose, CA
|
|
|
|
rohit_raajin,
S9(7)V99 is a 4-byte PD value (it does NOT contain the decimal point internally). If you want to change all minus values to plus values, you can use these DFSORT control statements where p is the starting position of the 4-byte PD field:
| Code: |
OPTION COPY
INREC IFTHEN=(WHEN=(p,4,PD,LT,0),
OVERLAY=(p:p,4,PD,MUL,-1,TO=PD,LENGTH=4))
|
|
|
| Back to top |
|
 |
|
|