Routine: PXRMMH

Package	Total	Call Graph
Clinical Reminders	6	$$EDATE^PXRMDATE $$INSCHR^PXRMEXLC EVALPL^PXRMINDL (EVALFI,EVALTERM)^PXRMINDX SCHELP^PXRMMH FORMATS^PXRMTEXT
Uncategorized	4	OCCUR^YTQPXRM1 PTTEST^YTQPXRM2 SCALES^YTQPXRM5 ENDAS71^YTQPXRM6
VA Fileman	1	EN^DDIOL

Package	Total	Caller Graph
Clinical Reminders	12	PXRMDATA PXRMEVFI PXRMINDL PXRMINDX PXRMMH PXRMOUTC PXRMOUTM PXRMPTDF PXRMREDF PXRMTERL PXRMTERM PXRMTMED

Entry Points

Name	Comments	DBIA/ICR reference
MHVOUT(INDENT,IFIEVAL,NLINES,TEXT)	;Produce the MHV output.
SCHELPF	;Xecutable help for MH SCALE in 811.9 findings.
WARN	;Warn the user that they must select a scale if they intend to use
EVALFI(DFN,DEFARR,ENODE,FIEVAL)	;Evaluate mental health findings.
EVALPL(FINDPA,ENODE,TERMARR,PLIST)	;Evaluate mental health term findings
VSCALED(X,DA)	;Make sure that the mental health scale is valid for a result
SCHELPT	;Xecutable help for MH SCALE in 811.5 findings.
SCHELP(MHIEN)	;Xecutable help for MH SCALE
GETDATA(DASP,FIEVT)	;Return the data for a MH Administrations entry.
EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL)	;Evaluate mental
SEVALPL(ITEM,NOCC,BDT,EDT,PLIST)	;Use MH API to get patient list. Called
SCHELPD(DA)	;Xecutable help for MH SCALE in Result Group file 801.41
SEVALFI(DFN,ITEM,NGET,SDIR,BDT,EDT,NFOUND,FLIST)	;
VSCALET(X)	;Make sure that the mental health scale is valid for a
VSCALEF(X)	;Make sure that the mental health scale is valid for a finding.
SCNAME(TEST,SCNUM)	;Given the test ien and scale number return the
VSCALE(X,FIND0)	;Make sure that the mental health scale is valid.
OUTPUT(INDENT,IFIEVAL,NLINES,TEXT)	;Produce the clinical

Name	Field # of Occurrence
EN^DDIOL	SCHELP+5, SCHELP+10, SCHELP+19, VSCALE+11
$$EDATE^PXRMDATE	MHVOUT+5, OUTPUT+8
$$INSCHR^PXRMEXLC	OUTPUT+5, SCHELP+18
EVALPL^PXRMINDL	EVALPL+2
EVALFI^PXRMINDX	EVALFI+1
EVALTERM^PXRMINDX	EVALTERM+2
SCHELP^PXRMMH	SCHELPD+3
FORMATS^PXRMTEXT	MHVOUT+11, OUTPUT+13
OCCUR^YTQPXRM1	SEVALPL+8
PTTEST^YTQPXRM2	SEVALFI+8
SCALES^YTQPXRM5	SCHELP+7, SCNAME+3, VSCALE+5
ENDAS71^YTQPXRM6	GETDATA+6

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Remember that the score is returned as raw score^transformed score," Line Location: WARN+2
Function Call: WRITE	Prompt: !,"so if your Condition uses the raw score use +V or $P(V,U,1) and if" Line Location: WARN+3
Function Call: WRITE	Prompt: !,"it uses the transformed score use $P(V,U,2)." Line Location: WARN+4

Name	Line Occurrences (* Changed, ! Killed)
^PXD(811.9 - [#811.9]	SCHELPF+2, VSCALEF+7
^PXRMD(801.41 - [#801.41]	SCHELPD+2, VSCALED+8
^PXRMD(811.5 - [#811.5]	SCHELPT+2, VSCALET+8

Name	Line Occurrences
$$VSCALE	VSCALED+9, VSCALEF+8, VSCALET+9
SCHELP	SCHELPF+5, SCHELPT+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BDT	SEVALFI~, SEVALFI+3, SEVALPL~, SEVALPL+6
DA	SCHELPD~, SCHELPD+2, SCHELPF+2, SCHELPT+2, VSCALED~, VSCALED+8, VSCALEF+7, VSCALET+8
DA(1	SCHELPF+2, SCHELPT+2, VSCALEF+7, VSCALET+8
DAS	GETDATA+2~, GETDATA+3*, GETDATA+6
DASP	GETDATA~, GETDATA+3, GETDATA+4
DATA	GETDATA+2~, GETDATA+6, SCHELP+1~, SCHELP+7, SCNAME+2~, SCNAME+3, SEVALFI+1~, SEVALFI+8, VSCALE+2~, VSCALE+5
DATA(	SEVALFI+11
DATA(""	VSCALE+12
DATA("R"	GETDATA+13
DATA("S"	SCHELP+15, SCHELP+18, SCNAME+4, VSCALE+6, VSCALE+9, VSCALE+10
DATA("SI"	GETDATA+8, GETDATA+11, GETDATA+14
DATA(1	GETDATA+7, SCHELP+8, SEVALFI+9
DATA(2	GETDATA+9
DATE	MHVOUT+1~, MHVOUT+5*, MHVOUT+6
DEFARR	EVALFI~, EVALFI+1
DFN	EVALFI~, EVALFI+1, EVALTERM~, EVALTERM+2, SEVALFI~, SEVALFI+2
>> DIUTIL	VSCALED+4, VSCALEF+3, VSCALET+4
EDT	SEVALFI~, SEVALFI+3, SEVALPL~, SEVALPL+6
ENODE	EVALFI~, EVALFI+1, EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+2
FIEV	SEVALFI+1~
FIEVAL	EVALFI~, EVALFI+1
FIEVT	GETDATA~
FIEVT("MH TES	T" , GETDATA+9*
FIEVT("R"	GETDATA+13*
FIEVT("S"	GETDATA+11*, GETDATA+14
FIEVT("SCALE	NAME" , GETDATA+14*
FIEVT("VALUE"	GETDATA+14*
FIND0	SCHELPF+1~, SCHELPF+2, SCHELPF+3, VSCALE~, VSCALE+3, VSCALEF+6~, VSCALEF+7, VSCALEF+8
FINDING	SEVALFI+1~
FINDPA	EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+2
FLIST	SEVALFI~
FLIST(	SEVALFI+11*
IFIEVAL	MHVOUT~, OUTPUT~
IFIEVAL(	MHVOUT+4, MHVOUT+5, MHVOUT+7, MHVOUT+9, OUTPUT+7, OUTPUT+8, OUTPUT+9, OUTPUT+11
IFIEVAL("MH T	EST" , MHVOUT+2, OUTPUT+3
IND	GETDATA+2~, GETDATA+10, GETDATA+11, GETDATA+12, GETDATA+13, MHVOUT+1~, MHVOUT+3, MHVOUT+4, MHVOUT+5, MHVOUT+7 , MHVOUT+9, OUTPUT+2~, OUTPUT+6, OUTPUT+7, OUTPUT+8, OUTPUT+9, OUTPUT+11, SCHELP+1~, SCHELP+14, SCHELP+15 , SCHELP+17, SCHELP+18, SEVALFI+1~, SEVALFI+11, VSCALE+2~, VSCALE+8, VSCALE+9*, VSCALE+10
INDENT	MHVOUT~, MHVOUT+11, OUTPUT~, OUTPUT+5, OUTPUT+13
ITEM	SEVALFI~, SEVALFI+2, SEVALPL~, SEVALPL+6
JND	MHVOUT+1~, MHVOUT+12, OUTPUT+2~, OUTPUT+14, SCHELP+1~, SCHELP+14, SCHELP+16, SCHELP+18
MHIEN	SCHELP~, SCHELP+2, SCHELP+7, SCHELPD+1~, SCHELPD+2, SCHELPD+3, SCHELPF+1~, SCHELPF+3, SCHELPF+4, SCHELPF+5 , SCHELPT+1~, SCHELPT+3, SCHELPT+4, SCHELPT+5, VSCALE+2~, VSCALE+4, VSCALE+5
MHTEST	MHVOUT+1~, MHVOUT+2, MHVOUT+6, OUTPUT+2~, OUTPUT+3, OUTPUT+5, VSCALE+2~, VSCALE+3, VSCALE+4, VSCALED+7~ , VSCALED+8, VSCALED+9
NFOUND	SEVALFI~, SEVALFI+9*, SEVALFI+10, SEVALFI+11
NGET	SEVALFI~, SEVALFI+5*, SEVALFI+6
NLINES	MHVOUT~, MHVOUT+12, MHVOUT+13, OUTPUT~, OUTPUT+4, OUTPUT+5, OUTPUT+14, OUTPUT+15*
NOCC	SEVALPL~, SEVALPL+5*, SEVALPL+6
NOUT	MHVOUT+1~, MHVOUT+11, MHVOUT+12, OUTPUT+2~, OUTPUT+13, OUTPUT+14
NUM	SCHELP+1~, SCHELP+17*, SCHELP+18
PLIST	EVALPL~, EVALPL+2, SEVALPL~, SEVALPL+8
>> PXRMEXCH	VSCALED+6, VSCALEF+5, VSCALET+6
>> PXRMRM	MHVOUT+11, OUTPUT+13
SCALE	GETDATA+2~, GETDATA+4, GETDATA+8, GETDATA+14, MHVOUT+1~, OUTPUT+2~, SCHELP+1~, SCHELP+5, SCHELP+10, SCHELP+19 , VSCALE+2~
SCALE(	SCHELP+18*
SCALE(1	SCHELP+3, SCHELP+9, SCHELP+11*
SCALE(2	SCHELP+4, SCHELP+12
SCALE(3	SCHELP+13*
SCNAME	SCNAME+2~
SCNUM	SCNAME~, SCNAME+4
SCORE	MHVOUT+1~, MHVOUT+9, MHVOUT+10, OUTPUT+2~, OUTPUT+11, OUTPUT+12
SDIR	SEVALFI~, SEVALFI+6
SNAME	MHVOUT+1~, MHVOUT+7, MHVOUT+8, OUTPUT+2~, OUTPUT+9, OUTPUT+10
SNUM	SCHELP+1~
>> TEMP	MHVOUT+6, MHVOUT+8, MHVOUT+10, MHVOUT+11, OUTPUT+8, OUTPUT+10, OUTPUT+12, OUTPUT+13
TERMARR	EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+2
TEST	SCNAME~, SCNAME+3
TEXT	MHVOUT~, OUTPUT~
TEXT(	MHVOUT+12, MHVOUT+13, OUTPUT+5, OUTPUT+14, OUTPUT+15*
TEXTOUT	MHVOUT+1~, MHVOUT+11, OUTPUT+2~, OUTPUT+13
TEXTOUT(	MHVOUT+12, OUTPUT+14
TFIEVAL	EVALTERM~, EVALTERM+2
TFIND0	SCHELPT+1~, SCHELPT+2, SCHELPT+3, VSCALET+7~, VSCALET+8, VSCALET+9
U	GETDATA+9, GETDATA+11, GETDATA+13, GETDATA+14, MHVOUT+10, OUTPUT+12, SCHELP+18, SCHELPD+2, SEVALFI+9, VSCALE+3 , VSCALE+10, VSCALED+8
VALID	VSCALE+2~, VSCALE+6, VSCALE+8, VSCALE+9, VSCALE+10*, VSCALE+11, VSCALE+13
X	VSCALE~, VSCALE+6, VSCALE+10, VSCALE+11, VSCALED~, VSCALED+2, VSCALED+9, VSCALEF~, VSCALEF+1, VSCALEF+8 , VSCALET~, VSCALET+2, VSCALET+9
YS	SEVALFI+1~, SEVALFI+8, SEVALPL+2~, SEVALPL+8
YS("BEGIN"	SEVALFI+3, SEVALPL+6
YS("CODE"	SEVALFI+2, SEVALPL+6
YS("DFN"	SEVALFI+2*
YS("END"	SEVALFI+3, SEVALPL+6
YS("LIMIT"	SEVALFI+6, SEVALPL+6

Customize PDF page

Package: Clinical Reminders

Routine: PXRMMH

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: