YSDXUT01 ;DALISC/LJA -Diagnosis Options Clean-up Utility ; [ 04/04/94 12:06 PM ]
;;5.01;MENTAL HEALTH;;Dec 30, 1994
;
KILLALL ; Kill all local and global variables created by Diagnosis related
; options.
K %,%DT,%ZIS
K A,A1,A2,A3,A4,A5,A6,A7,A7UCT,A7UOPT,A8,A9,B,C,C2,CHOICE,CK,CK1,CT
K D,D2,DA,DFN,DIC,DIE,DIFQ,DIK,DIR,DIRUT,DIWF,DIWL,DIWR,DLAYGO
K DR,DTOUT,DUOUT,DX,DX1,DX2,DX3,F1,F2,F3
K G,G1,G10,G11,G2,G3,G4,G5,G6,G7,G8,G9
K I,I0,IEN,IORVOFF,IORVON,J,J1,J2,J3,J4,J5,J50,J6,J7,J8,K,K1,K2,K3,K4
K K5,K6,L,L10,L11,L2,L3,L4,L5,L6,L60,L7,L9
K M,M1,M2,M3,M4,M5,N,N1,N2,N3,N4,P1,P2,P3,P4,P5,P50,POP,PROFILE,Q,RDT
K S1,S2,ST,ST1,STDT,SUBSET,T,T1,TOTSET,TXT
K V,V1,V2,V3,V4,V5,V50,VADM,W,W1,W2,W3,W4,W5,W6,X,X1,X2,X6,X7,XRT0,XRTL
K XQH,XQY0,Y,Y1,Y2,YSADDT,YSAGE,YSALZ,YSAUTH,YSAX,YSAX4,YSAY,YSCD
K YSCENN,YSCON,YSCOND,YSD3FLG,YSDA,YSDFN,YSDIFLG
K YSDIR0,YSDIRT,YSDOB,YSDR,YSDT,YSDTM,YSDTY
K YSDUPDA,YSDUZ,YSDXD,YSDXDA,YSDXDA1,YSDXDT,YSDXI,YSDXLS,YSDXLSD,YSDXLSN
K YSDXLX,YSDXN,YSDXNN,YSDXS,YSDXST,YSDXSTAT
K YSF1,YSFHDR,YSFTR,YSGAF,YSI,YSLC,YSLFT,YSML,YSMOD,YSMODI
K YSNM,YSNO,YSNOFORM,YSOK,YSOLD,YSPDX,YSPE,YSPEC,YSPLDX,YSPLIC
K YSPP,YSPPF,YSPS,YSQDIR0,YSQDIRT,YSQNCH,YSQNO,YSQT,YSQXIEN,YSQXRS
K YSSL,YSSSN,YST,YSTATDT,YSTEST,YSTM,YSTOP1,YSTOP2
K YSTOUT,YSTY,YSUOUT,YSW,YSWN,YSY
K ZTDESC,ZTREQ,ZTRTN,ZTSAVE
QUIT
;
EOR ;YSDXUT01 - Diagnosis Options Clean-up Utility ; 3/24/94 16:12
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HYSDXUT01 1437 printed Oct 16, 2024@18:15:09 Page 2
YSDXUT01 ;DALISC/LJA -Diagnosis Options Clean-up Utility ; [ 04/04/94 12:06 PM ]
+1 ;;5.01;MENTAL HEALTH;;Dec 30, 1994
+2 ;
KILLALL ; Kill all local and global variables created by Diagnosis related
+1 ; options.
+2 KILL %,%DT,%ZIS
+3 KILL A,A1,A2,A3,A4,A5,A6,A7,A7UCT,A7UOPT,A8,A9,B,C,C2,CHOICE,CK,CK1,CT
+4 KILL D,D2,DA,DFN,DIC,DIE,DIFQ,DIK,DIR,DIRUT,DIWF,DIWL,DIWR,DLAYGO
+5 KILL DR,DTOUT,DUOUT,DX,DX1,DX2,DX3,F1,F2,F3
+6 KILL G,G1,G10,G11,G2,G3,G4,G5,G6,G7,G8,G9
+7 KILL I,I0,IEN,IORVOFF,IORVON,J,J1,J2,J3,J4,J5,J50,J6,J7,J8,K,K1,K2,K3,K4
+8 KILL K5,K6,L,L10,L11,L2,L3,L4,L5,L6,L60,L7,L9
+9 KILL M,M1,M2,M3,M4,M5,N,N1,N2,N3,N4,P1,P2,P3,P4,P5,P50,POP,PROFILE,Q,RDT
+10 KILL S1,S2,ST,ST1,STDT,SUBSET,T,T1,TOTSET,TXT
+11 KILL V,V1,V2,V3,V4,V5,V50,VADM,W,W1,W2,W3,W4,W5,W6,X,X1,X2,X6,X7,XRT0,XRTL
+12 KILL XQH,XQY0,Y,Y1,Y2,YSADDT,YSAGE,YSALZ,YSAUTH,YSAX,YSAX4,YSAY,YSCD
+13 KILL YSCENN,YSCON,YSCOND,YSD3FLG,YSDA,YSDFN,YSDIFLG
+14 KILL YSDIR0,YSDIRT,YSDOB,YSDR,YSDT,YSDTM,YSDTY
+15 KILL YSDUPDA,YSDUZ,YSDXD,YSDXDA,YSDXDA1,YSDXDT,YSDXI,YSDXLS,YSDXLSD,YSDXLSN
+16 KILL YSDXLX,YSDXN,YSDXNN,YSDXS,YSDXST,YSDXSTAT
+17 KILL YSF1,YSFHDR,YSFTR,YSGAF,YSI,YSLC,YSLFT,YSML,YSMOD,YSMODI
+18 KILL YSNM,YSNO,YSNOFORM,YSOK,YSOLD,YSPDX,YSPE,YSPEC,YSPLDX,YSPLIC
+19 KILL YSPP,YSPPF,YSPS,YSQDIR0,YSQDIRT,YSQNCH,YSQNO,YSQT,YSQXIEN,YSQXRS
+20 KILL YSSL,YSSSN,YST,YSTATDT,YSTEST,YSTM,YSTOP1,YSTOP2
+21 KILL YSTOUT,YSTY,YSUOUT,YSW,YSWN,YSY
+22 KILL ZTDESC,ZTREQ,ZTRTN,ZTSAVE
+23 QUIT
+24 ;
EOR ;YSDXUT01 - Diagnosis Options Clean-up Utility ; 3/24/94 16:12