|
Chanh Le, You can pass number to edit as 30S 9 VALUE. Use built in functions to pass the length and decimal positions. Use decimal positions and length passed to extract the passed number to edit and left justify in parm passed to the edit API. Return edited value. Then you don't need to hard code anything in the calling procedure. David Morris >>> "Chanh Le" <Chanh_Le@countrywide.com> 02/06 5:39 PM >>> mahadevan@fuse.net wrote: EVAL char_str = P_EditCode(number,editcode,length,decimal,special,adjust) ================================================================== Because this procedure has the first parm as number. This mean it can only edit a fix precision/decimal. For example: if size of "number" is 12,2, a field "my_field" has the size of 5,2. I have to put "my_field" to a temporary field of 12,2 and pass this temporary to this procedure. Unless it is passed by pointer. And I think "QECEDT" can not accept pointer. +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to "MIDRANGE-L@midrange.com". | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.