define class myForm as Form *--Myprocedure description procedure myProcedure lparameters .. endproc enddefine