Ken,
Are you saying that you wanna replace all zeros? If that’s the case, I don’t think you can do this without any tcl.
A simple CALL with 3 line of code will do this task thou.
set var [lindex $xlateInVals 0]
set var [format “%f” $var] ;# if suppressing leading zeros
set var [string map “0 “”” $var] ;# if suppressing all zeros
xpmstore $xlateId [lindex $xlateOutList 0] c $var
Hope this helps,
Sam 🙂
