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