Re: Edit APIs

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
+---