Fausto,

This does not work if uMyVar equals "3", ".T." or "{^2001/01/01}" then TYPE("&uMyVar") or TYPE(uMyVar) returns N, L or D instead of U. This is the problem that I have. It appears that TYPE tries to evaluate uMyVar then returns the type of the result.

Any ideas,

Shane



>Hi Shane,
>
>Here is some code that does what you need:
>
>

>PROCEDURE cMyFunc
>PARAMETERS uMyVar
>LOCAL cReturnValue
>IF TYPE("uMyVar")="C" THEN
>   IF TYPE("&uMyVar")="U" THEN
>      *Means that the parameter came with a string
>      *which has an <b>U</b>ndefined "inner" value,
>      *so we consider it a simple string ("C")
>      cReturnValue="C"
>   ELSE
>      *Here there is inner value!
>      cReturnValue = TYPE("&uMyVar")
>   ENDIF
>ELSE
>   cReturnValue = TYPE("uMyVar")
>ENDIF
>RETURN cReturnValue
>ENDPROC
>

>
>Hope this helps to solve your problem!
>
>
>>I need a procedure that will accept one parameter. This parameter may contain the value I want or it may contain the name of a variable that contains the value that I want. Here are some examples.
>>
>>PROCEDURE cMyFunc( uMyVar )
>>... What code goes here?
>>RETURN cReturnValue
>>ENDPROC
>>
>>x = "test"
>>cMyFunc( x ) should return 'C'
>>
>>x = 5
>>cMyFunc( x ) should return 'N'
>>
>>x = "5"
>>cMyFunc( x ) should return 'C'
>>
>>x = .T.
>>y = "x"
>>cMyFunc( y ) should return 'L'
>>
>>How do I figure out if a character parameter contains the name of another variable?
>>
>>Any ideas?