×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
This method has the problem that if invoiceNbr contains a non-numeric
(123-456), dspInvoiceNbr will not reflect the right value.
It is a nice approach if you can guarantee that though.
If you cannot, then you could do something like:
dspInvoiceNbr = %Trim(invoiceNbr) ;
DoW %Len(dspInvoiceNbr) > 1 and %Subst(dspInvoiceNbr:1:1)='0' ;
dspInvoiceNbr = %Subst(dspInvoiceNbr: 2) ;
EndDO ;
Above requires that dspInvoiceNbr be a VARYING field.
You will have the problem of right-adjustment in either case. So:
EvalR finalInvoiceNbr = dspInvoiceNbr ;
(finalInvoiceNbr is NOT VARYING)
Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"If you become a star, you don't change, everyone else does."
-- Kirk Douglas
This should be quick. I have a character field
d invoiceNbr s 9a
which may hold '001234567'. The user wants to see the invoice number
with
leading zeroes suppressed so '1234567'.
My first thought is
/free
dspInvoiceNbr = %Char(%Dec(invoiceNbr: 9: 0));
/end-free
Is there a better method or is this about as good as any other method?
This mailing list archive is Copyright 1997-2025 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.
midrange.com
