Re: On-Error

[Barbara Morris <bmorris@xxxxxxxxxx>]

rob=tksaTn4SAz0AvxtiuMwx3w@public.gmane.org wrote:
>
> Is it possible to do the following:
>      D NoError         C                   0
>      D RecordNotFound  C                   12
>      D FileIsClosed    C                   1211
>       /free
>        Monitor;
>        Chain mykey myfile;
>        On-Error NoError;
>          // perform normal processing
>          ...
>        On-Error RecordNotFound;
> ...

Rob, you can't specify a status of 0 for on-error.  You can only specify
error status codes (status >= 100).  Put your "normal processing" after
your Chain.  Or you could put it after the EndMon if you want to set a
"success" flag, or if you are comfortable using %found several lines
below the Chain.

By the way, I would indent the code under "Monitor".

       Monitor;
         Chain mykey myfile;
         // perform normal processing
         ...
       On-Error RecordNotFound;
         // perform new record processing
         ...
       On-Error FileIsClosed;
         // Oops, forgot to open file
         ...
       ...
       EndMon;
       EndMon;