Update A File After A Couple Other Chains

I have some code to update a file. The problem is that I need to collect
additional information before I can update the file. So here is what I do
now. The read is way up in the code.

        iActCd = w2InvstTyp;
        if w2InvstDsc = ' ';
          chain (w2InvstTyp) NCACTCR;
          iActCdDsc = aCodeDesc;
        else;
          iActCdDsc = w2InvstDsc;
        endif;

        monitor;
          update NIMASTR;
          error = *OFF;
        on-error *FILE;                  // Handle uncaught exceptions
          error = *ON;
          w2Error = 'File error code ' + %char(%status());
        endmon;

So, my question is, can you do an update after the chain has been long done?
Or what would be a better way to process this?