Routine: YSBWHIG2

Package	Total	Call Graph
Mental Health	2	$$CHKCLIN^YSBDD1 GETANS^YTQAPI1
VA FileMan	2	^DIC ($$GET1,GETS)^DIQ
Kernel	1	($$FMADD,$$FMTE,$$NOW)^XLFDT
Registration	1	WIN^DGPMDDCF
Scheduling	1	$$SDAPI^SDAMA301

Package	Total	Caller Graph
Mental Health	3	YSBDD1 YSBRPC YSBWHIGH

Name	Comments	DBIA/ICR reference
BLDINST(INSTDATA,DFN,INST,YSDT,INSTNM)	;
BLDRSL(INSTDATA,DFN,INST,YSDT,INSTNM,QNUM)	;
MHLSTVST(DFN,YSDT,FROM)	;Get last MH Visit Date up to one year back.
MHDCDT(DFN)	;Find last mental health discharge date or if mental health inpatient
GETLOCS(DATAOUT,ID)	; ; C=Clinics, Z=Other, screened by $$ACTLOC ; Mental Health Locations Only ; Similar to MHLOCS but returns an array for JSON
GETMHLOC(PREFS)
ACTLOC(LOC)	; Function: returns TRUE if active hospital location ; IA# 10040.
IDFLT(INSTS,SHOWALL)	;Use default instrument list ; INSTS = return array of Instruments ; SHOWALL = flag to control whether all instruments are returned or not

Name	Field # of Occurrence
WIN^DGPMDDCF	ACTLOC+6
^DIC	MHDCDT+8
$$GET1^DIQ	BLDRSL+16, MHLSTVST+19, MHDCDT+11, MHDCDT+18, MHDCDT+20, MHDCDT+21, MHDCDT+22, MHDCDT+29, MHDCDT+30, MHDCDT+31 , MHDCDT+32, MHDCDT+33, MHDCDT+37, GETMHLOC+8
GETS^DIQ	IDFLT+21
$$SDAPI^SDAMA301	MHLSTVST+10
$$FMADD^XLFDT	BLDINST+3, BLDRSL+4, MHLSTVST+5, MHLSTVST+14, MHLSTVST+23
$$FMTE^XLFDT	BLDINST+25, BLDRSL+30, MHLSTVST+35
$$NOW^XLFDT	MHLSTVST+3, ACTLOC+3
$$CHKCLIN^YSBDD1	MHLSTVST+24
GETANS^YTQAPI1	BLDRSL+13

FileNo	Call Tags
^DIC(40.7 - [#40.7]	GET1^DIQ
^DGPM - [#405]	GET1^DIQ
^DIC(42 - [#42]	Classic Fileman Calls, GET1^DIQ
^SC - [#44]	GET1^DIQ
^YTT(601.75 - [#601.75]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM("ATID1"	MHDCDT+14, MHDCDT+16
^DGPM("ATID2"	MHDCDT+25, MHDCDT+27
^DPT - [#2]	MHDCDT+4
^PXRMINDX(601.84	BLDINST+7, BLDINST+9, BLDRSL+8, BLDRSL+10
^SC - [#44]	GETLOCS+9, GETMHLOC+11, GETMHLOC+12, ACTLOC+5, ACTLOC+6, ACTLOC+7
^SC("AST"	GETMHLOC+6, GETMHLOC+10
^SCE - [#409.68]	MHLSTVST+18
^SCE("ADFN"	MHLSTVST+15, MHLSTVST+17
^TMP($J	MHLSTVST+11!
^YSD(605.1 - [#605.1]	IDFLT+10, IDFLT+11, IDFLT+12
^YTT(601.71 - [#601.71]	IDFLT+14, IDFLT+15
^YTT(601.92 - [#601.92]	BLDINST+11, BLDINST+14

Name	Line Occurrences
$$ACTLOC	GETMHLOC+11
GETMHLOC	GETLOCS+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADMDT	BLDINST+2~, BLDINST+7, BLDINST+9, BLDINST+14, BLDINST+21, BLDINST+22, BLDINST+25, BLDINST+26, BLDRSL+2~, BLDRSL+8* , BLDRSL+10, BLDRSL+19, BLDRSL+26*, BLDRSL+27, BLDRSL+30, BLDRSL+31
ADMIN	BLDINST+8~, BLDINST+9, BLDINST+11, BLDINST+14, BLDINST+22, BLDINST+26, BLDRSL+9~, BLDRSL+10, BLDRSL+11, BLDRSL+19 , BLDRSL+27, BLDRSL+31
ADMMVMT	MHDCDT+28~, MHDCDT+32*, MHDCDT+33
APPTLIST	MHLSTVST+1~, MHLSTVST+11*
APPTLIST(	MHLSTVST+16, MHLSTVST+19*, MHLSTVST+23, MHLSTVST+24!, MHLSTVST+25
CNT	GETLOCS+4~, GETLOCS+5, GETLOCS+11, GETLOCS+12, GETLOCS+13
COUNT	BLDINST+2~, BLDINST+3, BLDINST+7, BLDINST+13, BLDINST+15, BLDINST+20, BLDINST+23, BLDINST+24, BLDINST+25, BLDINST+26 , BLDRSL+2~, BLDRSL+4, BLDRSL+8, BLDRSL+18, BLDRSL+20, BLDRSL+25, BLDRSL+28, BLDRSL+29, BLDRSL+30, BLDRSL+31
CURLOCNM	MHDCDT+1~, MHDCDT+4*, MHDCDT+5, MHDCDT+7
CUTOFF	BLDINST+2~, BLDINST+3, BLDRSL+2~, BLDRSL+4
D0	ACTLOC+5~, ACTLOC+6*
DATAOUT	GETLOCS~
DATAOUT("widgets"	GETLOCS+12, GETLOCS+13
DCMVMT	MHDCDT+17~, MHDCDT+21, MHDCDT+22, MHDCDT+28~, MHDCDT+33, MHDCDT+34, MHDCDT+35
DFLST	IDFLT+5~, IDFLT+8*, IDFLT+26, IDFLT+27
DFN	BLDINST~, BLDINST+7, BLDINST+9, BLDRSL~, BLDRSL+8, BLDRSL+10, MHLSTVST~, MHLSTVST+7, MHLSTVST+11, MHLSTVST+15 , MHLSTVST+17, MHDCDT~, MHDCDT+4, MHDCDT+14, MHDCDT+16, MHDCDT+25, MHDCDT+27
DIC	MHDCDT+6~, MHDCDT+7*
DIC(0	MHDCDT+7*
DISP	IDFLT+5~, IDFLT+27*, IDFLT+32
DONE	MHDCDT+1~, MHDCDT+14, MHDCDT+16, MHDCDT+22, MHDCDT+24, MHDCDT+25, MHDCDT+27, MHDCDT+37
DSCHGDT	MHDCDT+1~, MHDCDT+2, MHDCDT+22, MHDCDT+24, MHDCDT+38, MHDCDT+39
FIDX	MHLSTVST+2~, MHLSTVST+13*
FLIM	MHLSTVST+2~, MHLSTVST+4*, MHLSTVST+5, MHLSTVST+14
FROM	MHLSTVST~, MHLSTVST+4
HL	GETMHLOC+4~, GETMHLOC+10*, GETMHLOC+11, GETMHLOC+12, GETMHLOC+14
I	GETLOCS+4~, GETLOCS+7*, GETLOCS+8
ID	GETLOCS~, GETLOCS+12, GETLOCS+13
INAM	IDFLT+5~
INST	BLDINST~, BLDINST+7, BLDINST+9, BLDRSL~, BLDRSL+8, BLDRSL+10
INSTC	IDFLT+3~, IDFLT+9, IDFLT+28, IDFLT+30, IDFLT+31, IDFLT+32, IDFLT+33
INSTDATA	BLDINST~, BLDRSL~
INSTDATA(	BLDINST+16, BLDINST+17, BLDINST+18, BLDINST+24, BLDINST+25, BLDINST+26, BLDRSL+21, BLDRSL+22, BLDRSL+23, BLDRSL+29 , BLDRSL+30, BLDRSL+31
INSTID	IDFLT+3~, IDFLT+12, IDFLT+13, IDFLT+14, IDFLT+15, IDFLT+16, IDFLT+19, IDFLT+28
INSTNAM	IDFLT+3~, IDFLT+15, IDFLT+16, IDFLT+18, IDFLT+19, IDFLT+26, IDFLT+27, IDFLT+28
INSTNM	BLDINST~, BLDINST+16, BLDINST+17, BLDINST+18, BLDINST+24, BLDINST+25, BLDINST+26, BLDRSL~, BLDRSL+17, BLDRSL+21 , BLDRSL+22, BLDRSL+23, BLDRSL+29, BLDRSL+30, BLDRSL+31
INSTS	IDFLT~
INSTS(	IDFLT+28, IDFLT+30, IDFLT+31, IDFLT+32, IDFLT+33*
INSTSEQ	IDFLT+3~, IDFLT+11, IDFLT+12, IDFLT+16, IDFLT+19, IDFLT+20
INSTYP	IDFLT+6~, IDFLT+22*, IDFLT+33
INVDT	MHDCDT+1~, MHDCDT+14, MHDCDT+16, MHDCDT+24, MHDCDT+25*, MHDCDT+27
LOC	MHDCDT+6~, MHDCDT+9, MHDCDT+10, MHDCDT+11, MHDCDT+17~, MHDCDT+18, MHDCDT+19, MHDCDT+20, MHDCDT+28~, MHDCDT+29* , MHDCDT+31, ACTLOC~, ACTLOC+5, ACTLOC+6, ACTLOC+7
LOCSTR	GETMHLOC+4~, GETMHLOC+5, GETMHLOC+14, GETMHLOC+15*, GETMHLOC+16
LOWER	IDFLT+3~, IDFLT+9*, IDFLT+15
LSTMHDT	MHLSTVST+2~, MHLSTVST+22, MHLSTVST+23, MHLSTVST+33, MHLSTVST+34, MHLSTVST+35
MBCID	IDFLT+3~, IDFLT+10*, IDFLT+11, IDFLT+12, IDFLT+20
MNGRP	IDFLT+4~, IDFLT+23*, IDFLT+30
MNSCL	IDFLT+4~, IDFLT+24*, IDFLT+31
MVMT	MHDCDT+15~, MHDCDT+16, MHDCDT+18, MHDCDT+21, MHDCDT+26~, MHDCDT+27, MHDCDT+29, MHDCDT+30, MHDCDT+32, MHDCDT+36
NODE	MHLSTVST+2~, MHLSTVST+18, MHLSTVST+19, MHLSTVST+25, MHLSTVST+26, MHLSTVST+27
NOW	MHLSTVST+2~, MHLSTVST+3, MHLSTVST+5, ACTLOC+2~, ACTLOC+3, ACTLOC+4
OUTPXENC	MHLSTVST+2~, MHLSTVST+17*, MHLSTVST+18, MHLSTVST+19
PIDX	MHLSTVST+2~, MHLSTVST+13*
PREFS	GETMHLOC~
PREFS("MHLOCS"	GETMHLOC+16*
PSTAT	MHLSTVST+2~, MHLSTVST+26*, MHLSTVST+29, MHLSTVST+30
QNUM	BLDRSL~, BLDRSL+12
RESULT	BLDINST+10~, BLDINST+11*, BLDINST+12, BLDINST+14
RESULTS	BLDINST+2~, BLDRSL+2~
RESULTS(	BLDINST+14, BLDINST+21, BLDINST+22, BLDINST+26, BLDRSL+19, BLDRSL+26, BLDRSL+27, BLDRSL+31
RETURN	MHDCDT+1~, MHDCDT+2, MHDCDT+11, MHDCDT+12, MHDCDT+39*, MHDCDT+40
SCIEN	GETLOCS+4~, GETLOCS+8*, GETLOCS+9, GETLOCS+12
SCNAM	GETLOCS+4~, GETLOCS+9, GETLOCS+10, GETLOCS+13, GETMHLOC+4~, GETMHLOC+12, GETMHLOC+13
SDCOUNT	MHLSTVST+2~, MHLSTVST+10*
SDTIME	MHLSTVST+2~, MHLSTVST+14, MHLSTVST+15, MHLSTVST+16, MHLSTVST+17, MHLSTVST+19, MHLSTVST+23*, MHLSTVST+24, MHLSTVST+25, MHLSTVST+33
SHOWALL	IDFLT~, IDFLT+7*, IDFLT+26
STATUS	MHLSTVST+2~, MHLSTVST+26, MHLSTVST+27, MHLSTVST+28, MHLSTVST+29, MHLSTVST+30, MHLSTVST+31, MHLSTVST+32
STOPCODE	GETMHLOC+4~, GETMHLOC+8*, GETMHLOC+9
STP	GETMHLOC+4~, GETMHLOC+6*, GETMHLOC+8, GETMHLOC+10
TMPI	IDFLT+5~
TMPI(	IDFLT+16*, IDFLT+18, IDFLT+19
TRNSCTN	MHDCDT+1~, MHDCDT+30*, MHDCDT+31, MHDCDT+35, MHDCDT+36
TRNSFRDT	MHDCDT+1~, MHDCDT+37*, MHDCDT+38
U	BLDINST+14, MHLSTVST+19, MHLSTVST+26, MHLSTVST+27, GETLOCS+9, GETMHLOC+11, GETMHLOC+12, ACTLOC+8, IDFLT+15, IDFLT+16 , IDFLT+19, IDFLT+28
UPPER	IDFLT+3~, IDFLT+9*, IDFLT+15
X	MHDCDT+6~, MHDCDT+7, ACTLOC+5~, ACTLOC+6, ACTLOC+7, ACTLOC+8
XMVMT	MHDCDT+1~, MHDCDT+34, MHDCDT+36, MHDCDT+37
XPREF	GETLOCS+4~, GETLOCS+6
XPREF("MHLOCS"	GETLOCS+7, GETLOCS+8
Y	MHDCDT+6~, MHDCDT+9
YFN	IDFLT+6~, IDFLT+17*, IDFLT+21, IDFLT+22, IDFLT+23, IDFLT+24
YS	BLDRSL+3~, BLDRSL+13
YS("AD"	BLDRSL+11*
YS("QN"	BLDRSL+12*
YSANS	BLDRSL+3~, BLDRSL+16, BLDRSL+17, BLDRSL+19
YSARR	IDFLT+6~, IDFLT+20!
YSARR(	IDFLT+22, IDFLT+23, IDFLT+24
YSDARRAY	MHLSTVST+1~, MHLSTVST+10
YSDARRAY("FLDS"	MHLSTVST+8*
YSDARRAY("SORT"	MHLSTVST+9*
YSDARRAY(1	MHLSTVST+5*
YSDARRAY(3	MHLSTVST+6*
YSDARRAY(4	MHLSTVST+7*
YSDATA	BLDRSL+3~, BLDRSL+13
YSDATA(1	BLDRSL+14
YSDATA(2	BLDRSL+15
YSDT	BLDINST~, BLDINST+3, BLDRSL~, BLDRSL+4, MHLSTVST~, MHLSTVST+5, MHLSTVST+14, MHLSTVST+23, ACTLOC+2~, ACTLOC+4* , ACTLOC+8
YSIEN	BLDRSL+3~, BLDRSL+15, BLDRSL+16, IDFLT+6~, IDFLT+20, IDFLT+21, IDFLT+22, IDFLT+23, IDFLT+24

Customize PDF page

Package: Mental Health

Routine: YSBWHIG2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: