.R PEPB *INITIALIZE MPE-10-V704 *EXIT .R PEPB *SIGNAL-SUCCESS MPE-10-V704 *EXIT .GOTO END %ERR:: .GOTO ERROR %CERR:: .GOTO ERROR %TERR:: ERROR:: .R PEPB *SIGNAL-FAILURE MPE-10-V704 *EXIT . END:: %FIN::