source:
FOIAVistA/trunk/r/MENTAL_HEALTH-YS-RUCL-YI-YT/YSCEN37.m@
711
Last change on this file since 711 was 628, checked in by , 15 years ago | |
---|---|
File size: 612 bytes |
Line | |
---|---|
1 | YSCEN37 ;SLC/TGA-MH CENSUS LOOKUPS BY WARD ;4/3/90 10:28 ; |
2 | ;;5.01;MENTAL HEALTH;;Dec 30, 1994 |
3 | ; |
4 | ; Called by routine YSCEN3 |
5 | ; |
6 | 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 |
7 | K YSV,YSLDTY,YSSL,TYPE,YSCENN,YSTLE,YSOR,YSBID,ZZ,PTI,VA D KVAR^VADPT |
8 | 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 |
Note:
See TracBrowser
for help on using the repository browser.