>Now I need to figure out how to create a PROPERTY in the PRG class and check the box Access method.
>But I see now that I was missing a couple of points. Thank you.

Believe it or not, it's as simple as listing a property value among other properties, and then creating an access method:

loExample=createobject("JustExample")
?loExample.customProperty

define class JustExample as custom
   customProperty="some text"

   procedure customProperty_access()
      return "some other text"
enddefine