delton@pro-carolina.UUCP (Don Elton) (09/20/87)
Has anyone come up with a working substitute for the following code in Orca/Pascal? Begin Repeat Write('Enter file name: '); ReadLn(fname); {$I-} reset(file,fname); {$I+} Until IOResult = 0; End; The docs didn't seem to be very clear on how to catch io errors (like file not found) using the SYSTEMERROR procedure in your own code. UUCP: [ ihnp4 sdcsvax nosc ] !crash!pnet01!pro-sol!pro-carolina!delton ARPA: crash!pnet01!pro-sol!pro-carolina!delton@nosc.mil INET: delton@pro-carolina.cts.com