Article ID: 161185
Article Last Modified on 2/11/2005
oTest = CREATEOBJECT("Test")
? oTest.cUser
? oTest.dToday()
* REPORT FORM ztest RECORD 3 TO PRINTER
REPORT FORM ztest PREVIEW
DEFINE CLASS test AS CUSTOM
cUser = "Testing"
FUNCTION dToday
RETURN DATE()
ENDFUNCTION
ENDDEFINE
Keywords: kbbug kbfix kbvfp500afix kbprogramming KB161185