RE: Edit word question

["Reeve Fritchman" <reeve@xxxxxxxxxx>]

'bb0.bb-' is the best you'll be able to do (for a 5.2 numeric; integers
don't present the decimal point problem) without resorting to something
like...

if numeric_value <> 0
eval  character_value = %editc(numeric_value:'O')
else
eval  character_value = *blanks
endif

-----Original Message-----
From: midrange-l-admin@midrange.com [mailto:midrange-l-admin@midrange.com]On
Behalf Of Joe Pluta
Sent: Friday, August 24, 2001 6:48 PM
To: midrange-l@midrange.com
Subject: RE: Edit word question

I don't know how to design an edit word that will print blanks for a zero
value but still print decimals as ".03-", which is what Terry's original
question was.  That's why I pointed him to the edit codes, since they're
specifically designed to print blanks for zero values.  Then we ran into the
problem with edit codes magically padding arrays.

Joe

> -----Original Message-----
> From: Reeve Fritchman
>
> You can specify the array name with an edit word and all elements
> will print
> out contiguously (without the 2 extra spaces).

_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com