;; | ----------------------------------------------------------------------------
;; | ST_Trim
;; | ----------------------------------------------------------------------------
;; | Function : To trim the both side of a string for spaces
;; | Argument : none
;; | Return   : None 
;; | Update   : February 19, 1993
;; | e-mail   : rakesh.rao@4d-technologies.com 
;; | Web      : www.4d-technologies.com
;; | ----------------------------------------------------------------------------


(defun ST_Trim ( str / len )
(setq
	str (ST_RTrim str)
	str (ST_LTrim str)
)
)