cABIEMRR ;Import - ROUTINE RESTORE ;%ABIE; [ 07/04/00  4:37 PM ]
 ;
 S $ZT="ERR^%RR" K %QUIET
 D IN^%ABIEMSD Q:$D(QUIT)
 G INT^%RR
 ;
YZ Q
 ;
ZZ ; 07.02.01 - 10 u 46 * V7.84