Routine: BHSPHN

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	1	(GETICDDX,GETNARR,GETSITEV,PRTICD)^BHSUTL
IHS VA Utilities	1	($$VAL,$$VALI)^XBDIQ1
Patient Care Component Reports	1	$$PRIMPROV^APCLV

Entry Points

Name	Comments	DBIA/ICR reference
PRTTXT2
NOPOV	;
PHN(V)	;if one provider is phn quit on 1 otherwise quit on ""
PRTTXT	;Print text
GETCLN	;
CLEAN	; <CLEANUP>
DETAIL	; ********** PHN OUTPATIENT ENCOUNTERS * 9000010/9000010.07 ********** ; <SETUP>
ONEDATE	;
ONEVST	;
GOALS(BHSVDF)	;display phn fields
GETFRAG
COMMON	;
OUTPTX	; <CLEANUP>
DSPVIS	;
PRTTXT1	;
OUTPT	; ********** OUTPATIENT ENCOUNTERS * 9000010/9000010.07 ********** ; <SETUP>
HASPOV	;

External References

Name	Field # of Occurrence
$$PRIMPROV^APCLV	PHN+4
GETICDDX^BHSUTL	HASPOV+1
GETNARR^BHSUTL	HASPOV+2
GETSITEV^BHSUTL	ONEDATE+11, ONEVST+12
PRTICD^BHSUTL	COMMON+12
REGDT4^GMTSU	ONEDATE+2, ONEVST+2
CKP^GMTSUP	OUTPT+5, COMMON+1, GOALS+4, GOALS+5, DETAIL+5, PRTTXT2
$$VAL^XBDIQ1	GOALS+4, GOALS+5
$$VALI^XBDIQ1	PHN+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,BHSDAT Line Location: COMMON+2
Function Call: WRITE	Prompt: ?12,BHSFAC Line Location: COMMON+10
Function Call: WRITE	Prompt: ?23,BHSCLI Condition for execution: BHSCLI]"" Line Location: COMMON+10
Function Call: WRITE	Prompt: ?BHSICL,"Intervention: ",$$VAL^XBDIQ1(9000010.32,BHSPHN,.05) Line Location: GOALS+4
Function Call: WRITE	Prompt: !?BHSICL,"Complexity: ",$$VAL^XBDIQ1(9000010.32,BHSPHN,.06) Line Location: GOALS+5
Function Call: WRITE	Prompt: ! Line Location: GOALS+6
Function Call: WRITE	Prompt: ?BHSICL Line Location: PRTTXT2+0
Function Call: WRITE	Prompt: BHSF,! Line Location: PRTTXT2+0

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVCHS("AD"	COMMON+9
^AUPNVPHN - [#9000010.32]	GOALS+4, GOALS+5, GOALS+6, GOALS+7, GOALS+8, GOALS+9, GOALS+10
^AUPNVPHN("AD"	GOALS+1, GOALS+2, ONEVST+9
^AUPNVPOV - [#9000010.07]	DSPVIS+3
^AUPNVPOV("AD"	DSPVIS+2, DSPVIS+3
^AUPNVPRV - [#9000010.06]	PHN+7
^AUPNVPRV("AD"	PHN+3, PHN+7
^AUPNVSIT - [#9000010]	ONEDATE+6, PHN+2, ONEVST+6
^AUPNVSIT("AA"	OUTPT+4, OUTPT+9, ONEDATE+4, DETAIL+4, DETAIL+9, ONEVST+4
^DD(9000010.06	PHN+8, PHN+9, PHN+10
^DD(9000010.07	COMMON+8
^DIC(40.7 - [#40.7]	GETCLN+6, GETCLN+7, GETCLN+8
^DIC(6 - [#6]	PHN+9
^DIC(7 - [#7]	PHN+10
^GMT(142.1 - [#142.1]	GETCLN+2
^VA(200 - [#200]	PHN+8

Label References

Name	Line Occurrences
$$PHN	ONEDATE+9
COMMON	NOPOV+2
DSPVIS	ONEDATE+11, ONEVST+12
GETCLN	ONEDATE+10, ONEVST+11
GETFRAG	PRTTXT2
GOALS	ONEVST+13
HASPOV	DSPVIS+3
NOPOV	DSPVIS+2
ONEDATE	OUTPT+10
ONEVST	DETAIL+10
PRTTXT	GOALS+7, GOALS+8, GOALS+9, GOALS+10
PRTTXT1	PRTTXT+4
PRTTXT2	PRTTXT+4

Naked Globals

Name	Field # of Occurrence
^(0	GETCLN+2
^(9999999	GETCLN+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	PHN+7~, PHN+10*, PHN+11
%1	PHN+7~, PHN+11, PHN+12
BHSC	PRTTXT+6!, GETFRAG+1, GETFRAG+2, GETFRAG+3
BHSCCL	OUTPTX+2!, ONEDATE+1, GETCLN+4, GETCLN+7, GETCLN+9, COMMON+5, COMMON+6, CLEAN+2!, ONEVST+1*
BHSCLI	OUTPTX+1!, GETCLN+4, GETCLN+5, GETCLN+6, GETCLN+7, GETCLN+8, GETCLN+9, GETCLN+10, COMMON+5, COMMON+6* , COMMON+7*, COMMON+10, CLEAN+1!
BHSDAT	OUTPT+12, OUTPTX+1!, ONEDATE+2, ONEDATE+3, COMMON+2, DETAIL+12, CLEAN+1!, ONEVST+2, ONEVST+3
BHSDCL	OUTPTX+2!, GETCLN+3, GETCLN+10, COMMON+11, GOALS+7, GOALS+8, GOALS+9, GOALS+10, CLEAN+2!
BHSDLT	PRTTXT+3, PRTTXT+6!, PRTTXT2
BHSDTU	OUTPT+12, OUTPTX+1!, ONEDATE+3, DSPVIS+1, DETAIL+12, CLEAN+1!, ONEVST+3*
BHSF	PRTTXT+6!, PRTTXT2, GETFRAG, GETFRAG+3
BHSFAC	OUTPTX+1!, COMMON+3, COMMON+4, COMMON+10, CLEAN+1!
BHSICD	OUTPTX+1!, NOPOV+1, HASPOV+1, COMMON+7, COMMON+8, COMMON+12, CLEAN+1!
BHSICL	OUTPTX+1!, COMMON+11, GOALS+4, GOALS+5, GOALS+7, GOALS+8, GOALS+9, GOALS+10, CLEAN+1!, PRTTXT+3 , PRTTXT2
BHSILN	PRTTXT+3, PRTTXT+6!, PRTTXT2, GETFRAG, GETFRAG+1, GETFRAG+2
BHSITE	OUTPTX+2!, CLEAN+2!
BHSIVD	OUTPT+9, OUTPTX+1!, ONEDATE+2, ONEDATE+4, DETAIL+9, CLEAN+1!, ONEVST+2, ONEVST+4
BHSMOD	OUTPTX+1!, NOPOV+1, HASPOV+3, COMMON+8, CLEAN+1!
BHSMTX	OUTPTX+1!, COMMON+8*, CLEAN+1!
BHSN	OUTPT+2~, ONEDATE+6, ONEDATE+7, ONEDATE+8, GETCLN+4, GETCLN+5, DSPVIS+3, HASPOV+1, HASPOV+2, HASPOV+3 , DETAIL+2~, ONEVST+6*, ONEVST+7, ONEVST+8
BHSNAB	OUTPTX+2!, CLEAN+2!
BHSNDT	OUTPTX+1!, ONEDATE+3, COMMON+1, COMMON+2, GOALS+4, GOALS+5, CLEAN+1!, ONEVST+3
BHSNFL	OUTPTX+2!, CLEAN+2!
BHSNRQ	OUTPTX+1!, NOPOV+1, HASPOV+2, CLEAN+1!, PRTTXT1+1*
BHSNSH	OUTPTX+2!, COMMON+3, COMMON+4, CLEAN+2!
BHSNTE	OUTPT+2~, COMMON+9, DETAIL+2~, PRTTXT+2, PRTTXT+5!, PRTTXT1+2*
BHSOVT	OUTPTX+1!, CLEAN+1!
BHSPAT	OUTPT+2~, OUTPT+3, OUTPT+4, OUTPT+9, ONEDATE+4, DETAIL+2~, DETAIL+3, DETAIL+4, DETAIL+9, ONEVST+4
BHSPDN	OUTPTX+1!, DSPVIS+3*, CLEAN+1!
BHSPFN	OUTPT+8, OUTPTX+1!, COMMON+2, COMMON+3, COMMON+4, DETAIL+8, CLEAN+1!
BHSPHN	OUTPTX+1!, GOALS+2*, GOALS+3, GOALS+4, GOALS+5, GOALS+6, GOALS+7, GOALS+8, GOALS+9, GOALS+10 , CLEAN+1!
BHSPVD	OUTPT+7, OUTPT+12, OUTPTX+1!, ONEDATE+3, DETAIL+7, DETAIL+12, CLEAN+1!, ONEVST+3
BHSQ	OUTPT+2~, ONEDATE+4, DSPVIS+3, DETAIL+2~, ONEVST+4, PRTTXT+1~, PRTTXT+4
BHSQIT	OUTPTX+2!, CLEAN+2!
BHSSCL	OUTPTX+1!, ONEDATE+5, COMMON+2, COMMON+4, COMMON+5, COMMON+6, COMMON+7, CLEAN+1!, ONEVST+5*
BHSTXT	OUTPT+2~, GOALS+7, GOALS+8, GOALS+9, GOALS+10, DETAIL+2~, PRTTXT+4, PRTTXT+6!, PRTTXT1+1, PRTTXT1+2 , GETFRAG, GETFRAG+1, GETFRAG+3
BHSVDF	OUTPTX+1!, ONEDATE+4, ONEDATE+6, ONEDATE+9, DSPVIS+2, DSPVIS+3, COMMON+9, GOALS~, GOALS+1, GOALS+2 , CLEAN+1!, ONEVST+4, ONEVST+6, ONEVST+9, ONEVST+13
BHSVSC	OUTPTX+2!, COMMON+12, CLEAN+2!
>> DFN	OUTPT+3, DETAIL+3
>> GMTSDLM	OUTPT+9, DETAIL+9
>> GMTSE	GETCLN+2
>> GMTSNDM	OUTPT+9, OUTPT+12, DETAIL+9, DETAIL+12, ONEVST+10*
>> GMTSNPG	COMMON+1, GOALS+4, GOALS+5
>> GMTSQIT	OUTPT+5, OUTPT+9, OUTPT+11, ONEDATE+4, ONEDATE+12, COMMON+1, GOALS+4, GOALS+5, DETAIL+5, DETAIL+9 , DETAIL+11, ONEVST+4, ONEVST+14, PRTTXT2
IOM	PRTTXT+3
P	PHN+7~*, PHN+8, PHN+9, PHN+10
U	ONEDATE+7, ONEDATE+8, GETCLN+2, GETCLN+4, GETCLN+5, GETCLN+7, GETCLN+8, PHN+7, PHN+8, PHN+9 , PHN+10, HASPOV+1, HASPOV+2, HASPOV+3, COMMON+8, GOALS+4, GOALS+5, GOALS+6, ONEVST+7, ONEVST+8
V	PHN~, PHN+1, PHN+2, PHN+3, PHN+4, PHN+7
X	OUTPT+2~, ONEDATE+2, DETAIL+2~, ONEVST+2
Y	OUTPTX+2!, PHN+7~*, CLEAN+2!

Customize PDF page

Package: Health Summary Components

Routine: BHSPHN

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: