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