View previous topic :: View next topic
|
Author |
Message |
ssprabhu
New User
Joined: 25 Apr 2005 Posts: 67 Location: pune
|
|
|
|
Hi,
How to convert comp variable to readable format using SORT.
i have a o/p file first 2 fields are in comp format.
in PGM its defined as follows...
PIC S9(9) USAGE COMP.
PIC S9(4) USAGE COMP.
Output as follows...
.°.a..TISSOTXXXXX.......
output in hex as follows:-
.°.a..TISSOTXXXXX
093800DDCDC4CECD
B041017994509354
Need to check the values of comp ...plz help how to convert that. |
|
Back to top |
|
|
Escapa
Senior Member
Joined: 16 Feb 2007 Posts: 1399 Location: IL, USA
|
|
Back to top |
|
|
ssprabhu
New User
Joined: 25 Apr 2005 Posts: 67 Location: pune
|
|
|
|
Sambhaji,
Not getting exactly...i tried this sort card but field values are comin incorrect ..plz help
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(1,6,FI,TO=ZD,LENGTH=12) |
|
Back to top |
|
|
Lijo
New User
Joined: 24 Aug 2008 Posts: 41 Location: Cochin
|
|
|
|
Use something like this:
Code: |
OUTREC FIELDS=(1,4,BI,TO=ZDF,5,2,BI,TO=ZDF,<copy remaining data here>) |
|
|
Back to top |
|
|
ssprabhu
New User
Joined: 25 Apr 2005 Posts: 67 Location: pune
|
|
|
|
Thanks its working |
|
Back to top |
|
|
|