home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / mar95 / mcin104.gif < prev    next >
Graphics Interchange Format  |  1995-11-15  |  9.9 KB  |  462x354  |  4-bit (5 colors)
   ocr: AIGURE45SLEschpt-ron method run(var eventinfo Event) var tc icursor lowval, highval, numrecs Number endvar lowval = 1000 tc.open("ORDERS.DB","Total Invoice") tC.sethange(lowwal) numrecs - tc.nRecords() msginto(" "There are : - + String(numrecs) + - invoices equal to: - - + String(lowval)) endmethod No syntax errors. Edit Line: 7 Col: 7