Routine: BHSRAD

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	2	DISPREF^BHSRAD PRTTXT^BHSUTL
IHS VA Utilities	2	$$VAL^XBDIQ1 $$EXTSET^XBFUNC
IHS Standard Terminology	1	$$DESC^BSTSAPI
Kernel	1	$$FMTE^XLFDT
Patient Care Component	1	$$DATE^APCHSMU
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

Health Summary

REGDT4^GMTSU CKP^GMTSUP

Health Summary Components

DISPREF^BHSRAD PRTTXT^BHSUTL

IHS VA Utilities

$$VAL^XBDIQ1 $$EXTSET^XBFUNC

IHS Standard Terminology

$$DESC^BSTSAPI

Kernel

$$FMTE^XLFDT

Patient Care Component

$$DATE^APCHSMU

VA Fileman

$$GET1^DIQ

Package	Total	Caller Graph
Health Summary Components	17	BHSCPT BHSHS1 BHSLAB BHSLAB1 BHSLABA BHSLABB BHSMBN BHSMEA BHSMED BHSMEDAL BHSMEDG BHSMEDH BHSMEDI BHSMEDSF BHSPED BHSRAD BHSSUR

Package

Total

Caller Graph

Health Summary Components

BHSCPT  BHSHS1  BHSLAB  BHSLAB1  BHSLABA  BHSLABB  BHSMBN  BHSMEA
BHSMED  BHSMEDAL  BHSMEDG  BHSMEDH  BHSMEDI  BHSMEDSF  BHSPED  BHSRAD
BHSSUR

Entry Points

External References

Name	Field # of Occurrence
$$DATE^APCHSMU	DISPREF+14
DISPREF^BHSRAD	MRR+3, MRR+10, RAD+3, RAD+8
PRTTXT^BHSUTL	RPRT2+8, RADDSP+6
$$DESC^BSTSAPI	DISPREF+12
$$GET1^DIQ	DISPREF+11
REGDT4^GMTSU	RPRT2+1, RPRT2+2, RADBLD1+1
CKP^GMTSUP	MRR+4, RPRT2+4, DISPREF+1, DISPREF+10, RAD+6, RADBLD1+1
$$VAL^XBDIQ1	RSET+4, DISPREF+13, DISPREF+14, RADDSP+5
$$EXTSET^XBFUNC	RSET+2
$$FMTE^XLFDT	RADDSP+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: BHSRTX,?BHSRW,"(",BHSRTD,") ",BHSRR,! Line Location: RPRT2+3
Function Call: WRITE	Prompt: !,BHSRTX,?BHSRW,"(",$S(BHSEDT]"":BHSEDT,1:BHSRTD),") " Line Location: RPRT2+4
Function Call: WRITE	Prompt: "RESULT: " Line Location: RPRT2+6
Function Call: WRITE	Prompt: $S(BHSDCD]"":BHSDCD,1:"<none recorded>"),! Line Location: RPRT2+6
Function Call: WRITE	Prompt: ?3,"Diagnostic Code: ",$P(BHSRRT(BHSRT),U,5),! Line Location: RPRT2+7
Function Call: WRITE	Prompt: ?3,"IMPRESSION: " Line Location: RPRT2+8
Function Call: WRITE	Prompt: !,BHST," Refusals " Line Location: DISPREF+9
Function Call: WRITE	Prompt: ! Line Location: DISPREF+18
Function Call: WRITE	Prompt: !,BHSDAT Line Location: RADBLD1+1
Function Call: WRITE	Prompt: " ("_$$FMTE^XLFDT(BHSEDT,5)_")" Line Location: RADDSP+2
Function Call: WRITE	Prompt: !?11,"RESULT: " Line Location: RADDSP+4
Function Call: WRITE	Prompt: $S(BHSDCD]"":BHSDCD,1:"<none recorded>"),! Line Location: RADDSP+4
Function Call: WRITE	Prompt: ?3,"Diagnostic Code: ",$$VAL^XBDIQ1(9000010.22,BHSDFN,.05),! Line Location: RADDSP+5
Function Call: WRITE	Prompt: ?11,"IMPRESSION: " Line Location: RADDSP+6
Function Call: WRITE	Prompt: ! Line Location: RADDSP+7

FileNo	Call Tags
^AUPNPREF - [#9000022]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPREF("AA"	DISPREF+4, DISPREF+5, DISPREF+6
^AUPNVRAD - [#9000010.22]	RSET, RSET+1, RADBLD1+3, RADBLD1+4, RADDSP+1, RADDSP+6, RADDSP+7
^AUPNVRAD("AA"	MRR+3, RBLD+1, RDATE, RAD+3, RAD+6, RADBLD, RADBLD1+2
^RAMIS(71 - [#71]	RSET+5, RPRT2+4, RAD+6, RADDSP+2

Name	Line Occurrences
RADBLD	RAD+6
RADBLD1	RADBLD
RADDSP	RADBLD1+5
RBLD	MRR+7
RDATE	RBLD+1
RPRT	MRR+7
RPRT2	RPRT+1
RSET	RDATE

Name	Field # of Occurrence
^(	RDATE

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DISPREF+2~, DISPREF+7
BHS0	RADX+1!, RADDSP+1*, RADDSP+2, RADDSP+4, RADDSP+5
BHSD	DISPREF+5*, DISPREF+6, DISPREF+14, DISPREF+19!
BHSDAT	RADX!, RADBLD1+1*
BHSDCD	MRRX!, RSET+2, RSET+4, RPRT2+6, RADDSP+4*
BHSDFN	MRRX!, RDATE, RSET, RSET+1, RSET+4, RADX!, RADBLD1+2, RADBLD1+3, RADBLD1+4, RADDSP+1 , RADDSP+5, RADDSP+6, RADDSP+7
BHSEDT	MRRX!, RSET+1, RSET+4, RPRT2+2, RPRT2+4, RADBLD1+4*, RADDSP+2
BHSFN	MRR+3, MRR+10, MRR+11!, DISPREF+4, DISPREF+5, DISPREF+6, DISPREF+19!, RAD+3, RAD+8, RAD+9!
BHSI	DISPREF+6*, DISPREF+11, DISPREF+13, DISPREF+14, DISPREF+19!
BHSICD	MRR+1~, RPRT2+8, RADDSP+6
BHSICL	MRR+1~, RPRT2+8, RADDSP+6
BHSITE	RADX+1!
BHSIVD	MRRX!, RDATE, RSET+4, RADX!, RADBLD, RADBLD1+1, RADBLD1+2, RADDSP+2
BHSMXL	MRRX!, RBLD, RSET+5, RPRT
BHSN	MRRX!, RSET*, RSET+2
BHSNAB	RADX+1!
BHSNFL	RADX+1!
BHSNMX	MRRX!, RPRT*
BHSNRQ	RPRT2+8, RPRT2+9!, RADDSP+6, RADDSP+8!
BHSNSH	RADX+1!
BHSPAT	MRR+1~, MRR+2, MRR+3, RBLD+1, RDATE, DISPREF+4, DISPREF+5, DISPREF+6, RAD+2, RAD+3 , RAD+6, RADBLD, RADBLD1+2
BHSQ	MRR+1~, RBLD+1, RPRT+1, RAD+6, RADBLD, RADBLD1+2*
BHSRC	DISPREF+3, DISPREF+8, DISPREF+9, DISPREF+19!
BHSRDG	RADX!
BHSRL	MRRX!, RPRT*
BHSRR	MRRX!, RSET, RSET+4, RPRT2+1, RPRT2+8
BHSRRT	MRRX!, RBLD!, RBLD+1*, RDATE, RSET+4, RSET+5, RAD+4!
BHSRRT(	RSET+4*, RPRT+1, RPRT2+1, RPRT2+2, RPRT2+6, RPRT2+7
BHSRT	MRRX!, RPRT+1*, RPRT2+1, RPRT2+2, RPRT2+4, RPRT2+6, RPRT2+7
BHSRTD	MRRX!, RPRT2+1*, RPRT2+4
BHSRTX	MRRX!, RSET+5, RPRT2+4, RADDSP+2*
BHSRW	MRRX!, RPRT*, RPRT2+4
BHSS	DISPREF+7, DISPREF+19!
BHST	MRR+3, MRR+10, MRR+11!, DISPREF+9, DISPREF+19!, RAD+3, RAD+6, RAD+8*, RAD+9!, RADX! , RADBLD, RADBLD1+2
BHSTL	RAD+6*, RADX!
BHSTX	RAD+6*, RADX!
BHSTXT	RPRT2+8, RPRT2+9!, RADDSP+6, RADDSP+8!
BHSVDF	RADX!
BHSVSC	RADX+1!
BHSX	DISPREF+4*, DISPREF+5, DISPREF+6, DISPREF+19!
>> DFN	MRR+2, RAD+2
>> GMTSDLM	RDATE, DISPREF+5, RADBLD
>> GMTSQIT	MRR+4, RPRT2+4, DISPREF+1, DISPREF+4, DISPREF+5, DISPREF+6, DISPREF+10, RAD+6, RADBLD1+1
IOM	RPRT
SNO	DISPREF+2~, DISPREF+11, DISPREF+12, DISPREF+13*, DISPREF+14
U	RSET+1, RSET+2, RSET+4, RSET+5, RPRT2+1, RPRT2+2, RPRT2+4, RPRT2+6, RPRT2+7, DISPREF+12 , RAD+6, RADBLD1+4, RADDSP+1, RADDSP+2, RADDSP+4, RADDSP+5
X	MRR+1~, RSET+2, RPRT2+1, RPRT2+2, RADX!, RADBLD1+1
Y	MRRX!, RADX!

Customize PDF page

Package: Health Summary Components

Routine: BHSRAD

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
RPRT
RAD	; ******************* RAD TESTS - ALL * 9000010.12 ******* ; <SETUP>
RADDSP	;
RPRT2	;
RADBLD1	;
RSET
RADBLD
RBLD
RDATE
MRR	; ******************** MOST RECENT RADIOLOGY * 9000010.22 *******
MRRX
DISPREF	;EP added in patch 2
RADX