Re: One function to Trim and Edit a number.

Since sending a message, why not stop using dynamic\impromptu message [text], and just let the message handler feature replace the string variable TRIMmed into a message string defined with a specific message identifier? ADDMSGD MSGID(XYZABCD) MSGFILE(MyMsgFile) MSG('Customer &1 not found.') VAR((*CHAR 14)) [cmd syntax is suspect\un-verified] and then send the edited\character result as the replacement variable for send message and retrieve message.

Regards, Chuck

John Rusling wrote:

I find I'm constantly using %trim(%editc(Cust#:'3')) for
messages, logs, etc.

I got sick of having to use 2 bifs to do this.

So I made tred() and it works great for numbers with
zero decimal places.

Without tred -

msg_Send('Customer ' + %trim(%editc(sfCust#:'3'))
+ ' not found.');

With tred (optional editcode not passed) -

msg_Send('Customer ' + tred(sfCust#)
+ ' not found.');

I find I'm using this in a ton of places, but, it doesn't
handle decimal places, so --

I made another one, tred2() to do the same thing
but for 2 decimal places.

Anyone got a better and/or cleaner scheme to do this,
as far as handling 1,2,3 or 4 decimal places?
(1 function to handle all decimal place variations)

Improvement suggestions?

<<SNIP>>