LRGVK1.m

LRGVK1 ;SLC/RWF - KILL OFF VARIABLES FROM LRTSTJAN  ;8/11/97

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

 K %,A,AGE,DFN,DIC,DOB,DR,I,K,LRAA,LRAD,LRAN,LRCWDT,LRDFN,LRDPF,LRDTM,LREND,LRIDT,LRNT,LROCN,LRODT,LROID,LRODN,LROWDT,LRSN,LRSS,LRWDT1,LRWL1,LRWRD,PNM,SEX,SSN,X,Y,Z

 K LRTCOM,%DT,%Y,A1,DA,DIWL,DIWR,DO,H,LRCCOM,LRCOM,LRCS,LRCSN,LRFLOG,LRM,LRORDR,LROT,LROUTINE,LRSPEC,LRSSX,LRSTIK,LRIS,LRTSTNM,LRTT,LRUNQ,LRWPC,P,R,LRF,LRJ,LRTST,ZZ,TF,LRUSNM

 Q

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---LRGVK1   449     printed  Sep 02, 2024@19:00:23                                                                                                                                                                                                       Page 2

LRGVK1    ;SLC/RWF - KILL OFF VARIABLES FROM LRTSTJAN  ;8/11/97

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

 +2        KILL %,A,AGE,DFN,DIC,DOB,DR,I,K,LRAA,LRAD,LRAN,LRCWDT,LRDFN,LRDPF,LRDTM,LREND,LRIDT,LRNT,LROCN,LRODT,LROID,LRODN,LROWDT,LRSN,LRSS,LRWDT1,LRWL1,LRWRD,PNM,SEX,SSN,X,Y,Z

 +3        KILL LRTCOM,%DT,%Y,A1,DA,DIWL,DIWR,DO,H,LRCCOM,LRCOM,LRCS,LRCSN,LRFLOG,LRM,LRORDR,LROT,LROUTINE,LRSPEC,LRSSX,LRSTIK,LRIS,LRTSTNM,LRTT,LRUNQ,LRWPC,P,R,LRF,LRJ,LRTST,ZZ,TF,LRUSNM

 +4        QUIT