Routine: BHSLABA

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	1	DISPREF^BHSRAD
IHS VA Utilities	1	$$VALI^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component	1	$$DATE^APCHSMU
Patient Care Component Reports	1	$$START1^APCLDF

Package

Total

Call Graph

Health Summary

REGDT4^GMTSU CKP^GMTSUP

Health Summary Components

DISPREF^BHSRAD

IHS VA Utilities

$$VALI^XBDIQ1

Kernel

$$FMTE^XLFDT

Patient Care Component

$$DATE^APCHSMU

Patient Care Component Reports

$$START1^APCLDF

Entry Points

Name	Comments	DBIA/ICR reference
LSET	;
MRLX
LPRT2	;
EKGLABX	;
MRL	; ******************** MOST RECENT LAB * 9000010.09 *******
EKGPRT	;computers/prints ekg info
EKGLAB	;ENTRY POINT - EKG display in most recent lab panel
LBLD
LPRT	;
REORDER	;reorder by accession, parent and child
LDATE

Name	Field # of Occurrence
$$DATE^APCHSMU	LPRT2+2
$$START1^APCLDF	EKGLAB+3
DISPREF^BHSRAD	MRL+3, MRL+10
REGDT4^GMTSU	LPRT+7, EKGPRT+1
CKP^GMTSUP	MRL+4, LPRT2+3, LPRT2+10, LPRT2+13
$$VALI^XBDIQ1	LSET+2
$$FMTE^XLFDT	LPRT2+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?2,"TEST",?23,"RESULT DT/TIME",?39,"VISIT",?50,"RESULT",?60,"UNITS",?70,"REF RANGE",! Line Location: LPRT+1
Function Call: WRITE	Prompt: ?2,"TEST",?23,"RESULT DT/TIME",?39,"VISIT",?47,"RESULT",?60,"UNITS",?70,"REF RANGE",! Line Location: LPRT2+3
Function Call: WRITE	Prompt: " " Condition for execution: APCHCHIL Line Location: LPRT2+4
Function Call: WRITE	Prompt: $E(BHSLTX,1,20),?23,BHSRDT,?38,BHSLTD,?50,BHSLR Line Location: LPRT2+4
Function Call: WRITE	Prompt: ?60,$P($G(^AUPNVLAB(BHSDFN,11)),U) Line Location: LPRT2+5
Function Call: WRITE	Prompt: ?70,$P(^AUPNVLAB(BHSDFN,11),U,4)_"-"_$P(^AUPNVLAB(BHSDFN,11),U,5) Line Location: LPRT2+6
Function Call: WRITE	Prompt: ! Line Location: LPRT2+7
Function Call: WRITE	Prompt: ! Line Location: LPRT2+16
Function Call: WRITE	Prompt: !,BHSLTX,?BHSLW,BHSLTD," ",BHSLR,! Line Location: EKGPRT+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVDXP("AC"	EKGLAB+1
^AUPNVLAB - [#9000010.09]	REORDER+4, REORDER+5, REORDER+6, LSET+1, LSET+2, LPRT2+2, LPRT2+5, LPRT2+6, LPRT2+9, LPRT2+11 , LPRT2+12, LPRT2+14
^AUPNVLAB("AA"	MRL+3, LBLD+1, LDATE, LDATE+1
^LAB(60 - [#60]	LSET+5, LPRT2+1
^TMP($J	MRLX+1!, LBLD!, REORDER+2, REORDER+3, REORDER+7, REORDER+9!, LSET+4, LSET+5, LPRT+2, LPRT+3 , LPRT+4, LPRT+5, LPRT+6, LPRT+7

Name	Line Occurrences
EKGLAB	MRL+3, MRL+8
EKGLABX	EKGLAB+4
EKGPRT	EKGLAB+11
LBLD	MRL+7
LDATE	LBLD+1
LPRT	MRL+7
LPRT2	LPRT+8
LSET	LDATE+1
MRLX	MRL+3
REORDER	LBLD+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	REORDER+1~, REORDER+4*, REORDER+7
%1	REORDER+1~, REORDER+5*, REORDER+7
%2	REORDER+1~, REORDER+6*, REORDER+7
APCHCHIL	LPRT+4*, LPRT+5, LPRT+6, LPRT+7, LPRT+9!, LPRT2+4
BHS	EKGLAB+2!
BHS(1	EKGLAB+7, EKGLAB+10, EKGLABX+1!
BHSACC	LPRT+2*, LPRT+3, LPRT+4, LPRT+5, LPRT+6, LPRT+7, LPRT+9!
BHSDFN	MRLX!, LDATE+1, LSET+1, LSET+2, LSET+5, LPRT+6, LPRT2+2, LPRT2+5, LPRT2+6, LPRT2+9 , LPRT2+11, LPRT2+12, LPRT2+14
BHSERR	EKGLAB+3*, EKGLAB+4, EKGLAB+6!, EKGLABX+1!
BHSFN	MRL+3, MRL+10, MRL+11!
BHSIVD	MRLX!, LDATE, LDATE+1, LSET+5, EKGLAB+7, EKGLAB+8
BHSLL	MRLX!
BHSLR	MRLX!, LSET+1, LSET+2, LSET+3, LSET+4, LSET+5, LPRT+7, LPRT2+4, EKGPRT+2, EKGPRT+3* , EKGPRT+5
BHSLRT	MRLX!, LBLD+1*, LDATE, LDATE+1, LSET+4, LSET+5
BHSLRT(	EKGPRT+1, EKGPRT+2
BHSLRT("EKG"	EKGLAB+10*
BHSLT	MRLX!, LPRT+5, LPRT+6, LPRT+7, LPRT+9!, LPRT2+1, EKGLAB+9, EKGPRT+1, EKGPRT+2
BHSLTD	MRLX!, LPRT+7, LPRT2+4, EKGPRT+1, EKGPRT+5
BHSLTX	MRLX!, LSET+5, LPRT2+1, LPRT2+4, EKGLAB+9*, EKGPRT+5
BHSLW	MRLX!, EKGPRT+4*, EKGPRT+5
BHSN	MRLX!, LSET+1*, LSET+2, LSET+3
BHSNMX	MRLX!
BHSPAR	LPRT+3*, LPRT+4, LPRT+5, LPRT+6, LPRT+7, LPRT+9!
BHSPAT	MRL+1~, MRL+2*, MRL+3, LBLD+1, LDATE, LDATE+1, EKGLAB+1, EKGLAB+3
BHSQ	MRL+1~, LBLD+1*
BHSRDT	MRLX!, LPRT2+2*, LPRT2+4
BHST	MRL+3, MRL+10, MRL+11!
BHSX	MRLX!, LPRT2+9, LPRT2+11, LPRT2+12, LPRT2+14
>> DFN	MRL+2
>> GMTSDLM	LDATE+1, EKGLAB+8
>> GMTSNPG	LPRT2+3
>> GMTSQIT	MRL+4, LPRT+2, LPRT+3, LPRT2+3, LPRT2+9, LPRT2+10, LPRT2+12, LPRT2+13
U	REORDER+3, REORDER+4, REORDER+5, REORDER+6, LSET+1, LSET+2, LSET+3, LSET+4, LSET+5, LPRT+6 , LPRT+7, LPRT2+1, LPRT2+2, LPRT2+5, LPRT2+6, LPRT2+12, LPRT2+14, EKGLAB+7, EKGLAB+10, EKGPRT+1 , EKGPRT+2
X	REORDER+1~, REORDER+2, REORDER+3, REORDER+7, LPRT+7, EKGPRT+1*
Y	MRLX!, REORDER+3*, REORDER+4, REORDER+5, REORDER+6

Customize PDF page

Package: Health Summary Components

Routine: BHSLABA

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: