Your 123.45- has been defined as PIC 999.99- (or zz9.99- maybe)

You need to change your PIC clause to PIC --9.99

That will give you the required floating leading negative sign.


BD


On Wed, 11 Feb 2004 12:57:03 -0800, Newton, Ernie <[log in to unmask]> wrote:

>Greetings,
>
>I have a value that reads 123.45- and I want
>the minus sign to float at the beginning
>of the number.
>
>For the life of me, I can't remember how to do
>that and I have my college COBOL text book, but
>it's not in there.
>
>In WORKING-STORAGE, I have the variable with
>the following picture clause; S9(5)V99 COMP-3.
>
>Is there a "LEADING" option that I could put before
>or after COMP?  And, can I make the minus sign
>float?  By float, I mean that I want the sign
>to be at the first byte to the left of the number,
>no matter the size of the number.
>
>Thanks,
>
>Ernie
>
>* To join/leave the list, search archives, change list settings, *
>* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *