>set classlib to "rdsapp.vcx"
>myApp = createobject("_WriteLog")

Note above NO PARAMETER IS PASSED

>.
>.
>myApp._WriteLog()
>
>
>----------------------------
>Method Code for _WriteLog()
>----------------------------
>lparameters cUser
>
>if pcount() = 1

PCOUNT() = 0 So the following code is not executed


> ** If I create an error here it does not call the error method of
> ** of this object.
>endif
>
>
>---------
>Thanks
>Randy