Sorry about that :-)
DEFINE CLASS myObj as session OLEPUBLIC
lcName = ""
FUNCTION INIT()
this.lcName = "Nelson"
ENDFUNC
FUNCTION setName(tcName as string) as integer
&& Should change the value of the property
this.lcName = tcName
return 1
endfunc
FUNCTION getName() as string
&& Should print the new value
return this.lcName
endfunc
ENDFUNC
Thanks in advance
"If glory comes after death, I have no hurry"
Marcial