<<
WHILE (SGET(.vnote,1,.vsloc)) <> (CHAR(32))  THEN

This is supposed to check if the SGET-var is a space or  not.
The problem is that the WHILE-loop continues to run even  when th SGET-var is a 
space.
>>

I just tried this and it worked fine:

SET VAR vString = 'Hello Test'

SET VAR vLoc = 1

WHILE (SGET(.vString, 1, .vLoc)) <> (CHAR(32)) THEN
  SET VAR vChar = (SGET(.vString, 1, .vLoc))
  WRITE '>', .vChar
  IF vLoc > 100 THEN
    BREAK
  ENDIF
  SET VAR vLoc = (.vLoc + 1)
ENDWHILE

and it worked fine, producing this result:

R>run test.prg
> H
> e
> l
> l
> o

Try that code and see what happens.  If it works, check your code for a 
problem. 
 If it doesn't work, we need to compare SETtings.
--
Larry

Reply via email to