bbharathiraj Warnings : 1 New User
Joined: 26 Oct 2006 Posts: 50 Location: Chennai
|
|
|
|
Dear Friends
I am trying to display the -ve sign using below SORT card.
The PD to ZD is working fine only for +ve values if I change my copybook 9(13)V99.
But if the value is -ve then it display HEX value. How can I fix this?
In below sort card, LENGTH=15 is causing problem
Code: |
SORT FIELDS=(1,19,CH,A)
OUTREC FIELDS=(1,19,20,02,BI,ZD,LENGTH=04,22,02,BI,ZD,LENGTH=04,
24,08,PD,ZD,LENGTH=15,32,08,PD,ZD,LENGTH=15,
40,19,59,02,BI,ZD,LENGTH=04,
61,02,BI,ZD,LENGTH=04,63,04,BI,ZD,LENGTH=08,
67,08,PD,ZD,LENGTH=15,75,08,PD,ZD,LENGTH=15) |
I am expecting the output with the below copybook.
Code: |
01 HST-ACCOUNT.
10 HST-NUMBER PIC X(19).
10 HST-SYL PIC 9(04).
10 HST-PGID PIC 9(04).
10 HST-AVAIL PIC -9(13).99.
10 HST-RED PIC -9(13).99.
10 HST-NUMBER PIC X(19).
10 HST-SYL PIC 9(04).
10 HST-PGID PIC 9(04).
10 HST-PLID PIC 9(08).
10 HST-AVAILABLE PIC -9(13).99.
10 HST-RED PIC -9(13).99. |
But not sure how to get this using EDIT. can some one help on this? |
|