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

LRKILL.m

Go to the documentation of this file.

LRKILL ;SLC/CJS - CLEAN-UP AFTER LR ROUTINES ;8/11/97

 ;;5.2;LAB SERVICE;**71,121**;Sep 27, 1994

 K LRBLOOD,LRPARAM,LRPLASMA,LRSERUM,LRUNKNOW,LRURINE

 K LRPANEL,LRTM60,LRDT0,LRLABKY,VA("BID"),VA("PID")

 K LRVIDO,LRVIDOF,LRPCEVSO D KVAR^VADPT

 K LR,LRABV,LRAX,LRBLOOD,LRCAPA,LRDPAF,LRDT0,LRH,LRSF,LRT,LRU,LRWHO

 D ^LRORDK

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HLRKILL   332     printed  Dec 13, 2024@02:15:50                                                                                                                                                                                                       Page 2

LRKILL    ;SLC/CJS - CLEAN-UP AFTER LR ROUTINES ;8/11/97

 +1       ;;5.2;LAB SERVICE;**71,121**;Sep 27, 1994

 +2        KILL LRBLOOD,LRPARAM,LRPLASMA,LRSERUM,LRUNKNOW,LRURINE

 +3        KILL LRPANEL,LRTM60,LRDT0,LRLABKY,VA("BID"),VA("PID")

 +4        KILL LRVIDO,LRVIDOF,LRPCEVSO

           DO KVAR^VADPT

 +5        KILL LR,LRABV,LRAX,LRBLOOD,LRCAPA,LRDPAF,LRDT0,LRH,LRSF,LRT,LRU,LRWHO

 +6        DO ^LRORDK

 +7        QUIT