I'm looking to improve the code included. The routine works...but needs help.
For one thing you can't divide by zero.
Refer to: (setq ELEV-BBOT%
(strcat (rtos (/ (* ELEV-BBOTsf 100) TOTELEVBOTsf) 2 (atoi ARCH#DECI))
" %"))
(ARCH:ATTUPDATE en "ELEV-BBOT%" ELEV-BBOT%)
Thanks for any help you can give.
Gary