I am following the "Classes and Objects" on the Learning center and got this error at run time. The sample compiles without any errors.
Use DfAllEnt.pkg
Class cPerson is a cObject
Procedure Consruct_Object
Forward Send Consruct_Object
Property String psFirstName ""
Property String psLastName ""
End_Procedure
Function HelloMessage Returns String
String sFirst sLast
Get psFirstName to sFirst
Get psLastName to sLast
Function_Return (SFormat("%1 %2 says hi!", sFirst, sLast))
End_Function
Procedure SayHello
String sMsg
Get HelloMessage to sMsg
Showln sMsg
End_Procedure
End_Class
Object oJohn is a cPerson
Set psFirstName to "John"
Set psLastName to "Quard"
End_Object
Send SayHello of oJohn
Send Info_Box "done "
------------------
Please see attached output dialog.
Thanks,
Charles