DVBAPCXR ;ALB/JLU;Utility routine for the post inits;9/15/94
 ;;2.7;AMIE;;Apr 10, 1995
 ;
ORPHAN ;
 S DIK="^DVB(396.93,",DIK(1)=".01^ADVB"
 D ENALL^DIK
 Q