Function definition: Difference between revisions

Content deleted Content added
Line 701:
ENDCLASS
 
DEF AssEmp:Associate
 
m_UnitsSold=10
Line 709:
OPENCONSOLE
 
PRINT"Sales total: ",:PRINT"$"+LTRIM$(STR$(AssEmp.m_SalesTotal))
 
PRINT
Line 717:
END
 
'm_price is set in constructor
SUB Associate::Multiply(UnitsSold:UINT),UINT
m_SalesTotal=m_Price*UnitsSold