Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: BGUDSTR

BGUDSTR.m

Go to the documentation of this file.
  1. BGUDSTR ; IHS/OIT/MJL - DESTRUCTOR FOR MDAO ;
  1. ;;1.5;BGU;;MAY 26, 2005
  1. EN(BGUARRAY,BGUID) ;PEP FROM REMOTE PROCEDURE BGU DESTRUCTOR
  1. CTL ;
  1. K BGUARRAY
  1. S BGUARRAY(1)=1,BGUARRAY(2)="OK"
  1. K ^TMP("BGUSAVE",BGUID),^TMP("BGULVLST",BGUID)
  1. Q