ocr: FIG 04.FSLE#FormizupdatecontactDate method updateContactDate(const coName String) Logical var myTC TCursor endvar if - myTC.open("Company.db") then NJTC.lock("Write") Prevent changes to table if mylC.qLocate(CoName) then - Locate a given company myic.edito) - Change Last Contact field to today's date myTC."Last Contact" = date() myTC.endEdit0) iC.un.ockwrite" myTC.close0) return True else return Faise endif else errorClear0 Clear the error stack return False endif endmethod Edit Line: 11 Col: 1
