30 lines
1.4 KiB
Mathematica
30 lines
1.4 KiB
Mathematica
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
|