On 2017-02-23 2:29 PM, John Yeung wrote:
...
I think I would do something more like
if number < 0;
edited = %editc(number: 'n');
else;
edited = '+' + %trim(%editc(number: 'n'));
endif;
Tweak as necessary if zero should have no sign.
It might also need tweaking if "edited" isn't always trimmed before
being used. The result for negative numbers would have leading blanks
that would not be there for positive values. So trimming in both cases
would give a consistent result.
if number < 0;
edited = %trim(%editc(number: 'N'));
else;
edited = '+' + %trim(%editc(number: 'N'));
endif;
It would get quite icky if they wanted the untrimmed result. The
positive case would have to add the right amount of leading blanks.
if number < 0;
edited = %editc(number: 'N');
else;
edited = %subst(blanks : 1 : how_many?)
+ '+' + %trim(%editc(number: 'N'));
endif;
This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.