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

APCDEKL.m

Go to the documentation of this file.
  1. APCDEKL ; IHS/CMI/LAB - CLEANUP ;
  1. ;;2.0;IHS PCC SUITE;;MAY 14, 2009
  1. ;
  1. EN ;PEP - KILL VARIABLES AND RESET VARS
  1. I $E(DUZ("AG"))="I" S:$D(APCDDUZ) DUZ(0)=APCDDUZ
  1. I $E(DUZ("AG"))="I" S:$D(APCDDUZ2) DUZ(2)=APCDDUZ2
  1. K D0,DA,DIC,DIE,DIK,DLAYGO,DR
  1. K APCDAFLG
  1. K ^TMP("APCD",$J)
  1. ;
  1. EN1 ;PEP;FOR NON-APCD ROUTINES
  1. ;
  1. K Y
  1. K AICDHLIM,XTLKHLIM
  1. K APCDCAT,APCDCLN,APCDDATE,APCDLOC,APCDTIME,APCDTYPE,APCDVSIT,APCDLOOK,APCDTPCC,APCDTACC,APCDFV,APCDAX,APCDAL,APCDNOK,APCDEQX,APCDMOD,APCDMPQ,APCDTVST,APCDTLOC,APCDTTYP,APCDTCAT,APCDTCLN,APCDEXIT,APCDOLOC
  1. K APCDTBP,APCDPVL,APCDAPPT,APCDEVM,APCDCODT,APCDLS,APCDVELG,APCDHL,APCDOPT,APCDPROT,APCDAPDT
  1. K APCDPAT,APCDDOB,APCDSEX,APCDDOD,APCDRV
  1. K AUPNDOB,AUPNDOD,AUPNPAT,AUPNSEX,AUPNDAYS,AUPNVSIT,AUPNLK("INAC")
  1. K APCDLPAT,APCDLDAT,APCDLVST,APCDMNE,APCDNOCL,APCDNOXV,APCDAMN
  1. K APCDAPP,APCDBEEP,APCDDUZ,APCDDUZ2,APCDFLG,APCDL,APCDMODE,APCDOCAT,APCDODAT,APCDOTYP,APCDOVRR,APCDPVC,APCDTPLT,APCDVLK,APCDX,APCDENV,APCDEMF,APCDEIN,APCD,APCDNOXV
  1. Q
  1. EN2 ;PEP- CALLED TO KILL APCD ENVIRONMENTAL VARS
  1. I '$D(APMFMENU) K AUPNLK("ALL")
  1. K APCDPARM,APCDNRV,APCDRVON,APCDRVOF,APCDSITE,APCDTRM,APCDDEFL,APCDDEFS,APCDDEFC,APCDDEFT
  1. Q