BCHUEKL.m

BCHUEKL ; IHS/CMI/LAB - KILL ALL VARS AND CLEANUP ; 

 ;;2.0;IHS RPMS CHR SYSTEM;;OCT 23, 2012;Build 27

 ;

 ;

EN ;EP

 K G,X,Y,V1,V2,V3,V4,V5,V6,V7,V8,V9,V10

 K APCDOVRR

 K DA,D0,DO,D,DIC,DIE,DIU,DIV,DIY,DIW,DR,DIK,DIQ,D2,C,DITC,DD,DIR,DTOUT,DUOUT

 K X,Y,A,ZTSK,I,J,DDH,DI,DIH,DQ

 D KILL^AUPNPAT

 ; -- clean up BCH

 K BCHDATE,BCHPROG,BCHPROV,BCHDASH,BCHPROGN,BCHVRECS,BCHRCNT,BCHBEEP,BCHUIN,BCHLPCC,BCHPKG,BCHQUIT,BCHVRECS,BCHRCNT,BCHPG,BCHV,BCHX,BCHHRN,BCHREC,BCHP,BCHPREC,BCHDR,BCHACTL,BCHLOOK

 K BCHF,DFN,BCHR,BCHRDEL,BCHV,BCHVDLT,BCHODFN,BCHSTOP

 ; -- clean up LIST MANAGER

 ; -- clean up protocol

 Q

BCHUEKL   ; IHS/CMI/LAB - KILL ALL VARS AND CLEANUP ; 

 +1       ;;2.0;IHS RPMS CHR SYSTEM;;OCT 23, 2012;Build 27

 +2       ;

 +3       ;

EN        ;EP

 +1        KILL G,X,Y,V1,V2,V3,V4,V5,V6,V7,V8,V9,V10

 +2        KILL APCDOVRR

 +3        KILL DA,D0,DO,D,DIC,DIE,DIU,DIV,DIY,DIW,DR,DIK,DIQ,D2,C,DITC,DD,DIR,DTOUT,DUOUT

 +4        KILL X,Y,A,ZTSK,I,J,DDH,DI,DIH,DQ

 +5        DO KILL^AUPNPAT

 +6       ; -- clean up BCH

 +7        KILL BCHDATE,BCHPROG,BCHPROV,BCHDASH,BCHPROGN,BCHVRECS,BCHRCNT,BCHBEEP,BCHUIN,BCHLPCC,BCHPKG,BCHQUIT,BCHVRECS,BCHRCNT,BCHPG,BCHV,BCHX,BCHHRN,BCHREC,BCHP,BCHPREC,BCHDR,BCHACTL,BCHLOOK

 +8        KILL BCHF,DFN,BCHR,BCHRDEL,BCHV,BCHVDLT,BCHODFN,BCHSTOP

 +9       ; -- clean up LIST MANAGER

 +10      ; -- clean up protocol

 +11       QUIT