Removing Spaces

[Ted Johnson]

I am trying to remove all the spaces from a field.  I found the following code 
from some previous postings.

DEFINE T-AA CHAR*20 = "12 456  789  A  B C"
DEFINE T-CC CHAR*6 = "Y"  IF SETSYSTEMVAL("VAR_AA",(T-AA))
DEFINE T-DD CHAR*6 = "Y" IF SETSYSTEMVAL("VAR_BB","![REPL(VAR_AA,' ','')]")
DEFINE T-BB CHAR*20 = GETSYSTEMVAL("VAR_BB")
REPORT T-AA T-BB
go

Which I changed to:

ACCESS PRIMARY-MST

SELECT IF BOX-CREATE-WHO = 'SCTSYNCH'

DEFINE T-AA CHAR*30 = BOX-SORT-NAME
DEFINE T-CC CHAR*6  = "Y" IF SETSYSTEMVAL("VAR_AA",(T-AA))
DEFINE T-DD CHAR*6  = "Y" IF SETSYSTEMVAL("VAR_BB","![REPL(VAR_AA,' ','')]")
DEFINE T-BB CHAR*30 = GETSYSTEMVAL("VAR_BB")
REPORT T-AA T-BB
GO
EXIT

However the output field T-BB is always blank.

When I do

ACCESS PRIMARY-MST

DEFINE T-AA CHAR*30 = "Johnson, Theodore H."
DEFINE T-CC CHAR*6  = "Y" IF SETSYSTEMVAL("VAR_AA",(T-AA))
DEFINE T-DD CHAR*6  = "Y" IF SETSYSTEMVAL("VAR_BB","![REPL(VAR_AA,' ','')]")
DEFINE T-BB CHAR*30 = GETSYSTEMVAL("VAR_BB")
REPORT T-AA T-BB
GO
EXIT

I get the following output

T-AA                            T-BB

Johnson, Theodore Harold        Johnson,TheodoreHarold

Why can't I get the output to work correctly when reading from a field?

Thanks,

Ted Johnson



-- 
****************************************************
Ted Johnson			johnsont@wfu.edu
Information Systems	
Wake Forest University		336-758-4374
Winston-Salem, NC 27109		336-758-7127 FAX

"Good judgment comes from experience and a lot of
that comes from bad judgment".
			 -- Richard Karn