          EJECT
*         CTEXT  CTP$MR_PROTOCOL_POSTPROCESS
*
*         THIS DECK DEFINES THE POSTPROCESSING PHASE OF
*         A MAINTENANCE CHANNEL OPERATION

 WCC1     RJM    CMI         CLEAR INTERLOCK

 WCC      SUBR
          FJM    *,MR        INSURE LAST WORD TAKEN
          ZJN    WCC1        IF OUTPUT COMPLETE
          LDN    DACI-DANE   60F - CH 17 INACTIVE
          UJN    SMI2        PROCESS FATAL MAINTENANCE ERROR

*         END    CTP$MR_PROTOCOL_POSTPROCESS
