9 lines
612 B
Mathematica
9 lines
612 B
Mathematica
YSCEN37 ;SLC/TGA-MH CENSUS LOOKUPS BY WARD ;4/3/90 10:28 ;
|
|
;;5.01;MENTAL HEALTH;;Dec 30, 1994
|
|
;
|
|
; Called by routine YSCEN3
|
|
;
|
|
K F3,P4,ZTSK,P1,G1,G2,G3,L,Y1,Y2,Y3,Y4,Y5,X,DIC,DIK,YSOPT1,YSOPT1L,C1,D,DIW,DIWF,DIWL,DIWR,DIWT,DN,DW2,DWI,I,N3,P,Q3,R,T6,V,W1,W2,W4,X1,Y,YSCEN3F,YSDFN,YSFIN,YSG,C7,G,N1,N7,N8,YSAGE,YSDOB,YSNM,YSSEX,YSSSN,YSTM,YSTMX,YSTS
|
|
K YSV,YSLDTY,YSSL,TYPE,YSCENN,YSTLE,YSOR,YSBID,ZZ,PTI,VA D KVAR^VADPT
|
|
K YSH1,YSIDT,YSLDT,YSLDT1,YSLFT,YSMOR,YSNT,YSOP,YSOPT2,YSP0,YSPF,YSTLL,YSTY,YSYDT,Z,DIWI,DIWTC,DIWX,DO,I0,A,C,DIYS,M,YSDTM,YSHR,YSMN,YSYD,F1,F2,F5,J,K,YSDOT,YSRD,%DT,YSPNH W !! D ^%ZISC Q
|