|
View previous topic :: View next topic
|
| Author |
Message |
arvind.m
Active User
Joined: 28 Aug 2008
Posts: 205
Location: Hyderabad
|
|
|
|
Hi
I need to modify a packed decimal value to 20 for all the records.
Cobol decleration:
| Code: |
QST-AMT PIC S9(07)V99 COMP-3
|
I did write a sort card with outrec
| Code: |
SORT FIELDS=(1,9,CH,A)
OUTREC FIELDS=(1,128,129:X'02000C',132,69) |
Is the hex representation value of 20 correct? |
|
| Back to top |
|
 |
Akatsukami
Global Moderator
Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL
|
|
|
|
| arvind.m wrote: |
| Is the hex representation value of 20 correct? |
Yes, it is. |
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
| Code: |
QST-AMT PIC S9(07)V99 COMP-3
|
Doesn't this occupy 5 bytes ?
Gerry |
|
| Back to top |
|
|
Werner Spreeuwenberg
New User
Joined: 24 Jul 2009
Posts: 8
Location: Netherlands
|
|
|
|
Yes it does.
PIC S9(07)V99 COMP-3 =
| Code: |
[99] [99] [99] [99] [9S]
12 34 56 7,1 2C |
The comma is imaginary and S is for the sign (C or D). |
|
| Back to top |
|
|
|
|
