Routine: BHSSUR

Package	Total	Call Graph
DRG Grouper	3	$$ICDOP^ICDCODE $$ICDOP^ICDEX $$CPT^ICPTCOD
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	2	DISPREF^BHSRAD ($$AICD,GETCPT,GETICDOP,GETNARR,PRTICD)^BHSUTL
Taxonomy	2	$$ICD^ATXAPI $$ICD^ATXCHK
IHS VA Utilities	1	$$VAL^XBDIQ1

Entry Points

Name	Comments	DBIA/ICR reference
MINOROX
HOSCHK	;
MINORX
HOSX
HOSDSP	;Get diagnosis
MINORO	; ******** MINOR HISTORY OF SURGERY * 9000010.08 (V PROCEDURE) ******* ; <SETUP>
GETOPRV	;get Operating Provider
MINOR	; ************* HISTORY OF SURGERY * 9000010.08 (V PROCEDURE) & V CPT * ; <SETUP>

External References

Name	Field # of Occurrence
$$ICD^ATXAPI	HOSCHK+6, MINOR+72
$$ICD^ATXCHK	MINOR+34
DISPREF^BHSRAD	MINORO+15, MINOR+98, MINOR+102
$$AICD^BHSUTL	HOSDSP+11, HOSCHK+3, MINOR+21
GETCPT^BHSUTL	MINOR+40, MINOR+76
GETICDOP^BHSUTL	HOSDSP+5, MINOR+15
GETNARR^BHSUTL	HOSDSP+9, MINOR+18, MINOR+42
PRTICD^BHSUTL	HOSDSP+19, MINOR+86, MINOR+92
REGDT4^GMTSU	HOSDSP+6, HOSDSP+16, MINOR+16, MINOR+27, MINOR+37, MINOR+67
CKP^GMTSUP	MINORO+6, HOSDSP+18, MINOR+5, MINOR+80, MINOR+93
$$ICDOP^ICDCODE	HOSDSP+14, HOSCHK+4, MINOR+26
$$ICDOP^ICDEX	HOSDSP+12, HOSCHK+3, MINOR+22, MINOR+24
$$CPT^ICPTCOD	MINOR+46, MINOR+47
$$VAL^XBDIQ1	MINOR+58, MINOR+69, MINOR+77

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: BHSDS Line Location: HOSDSP+19
Function Call: WRITE	Prompt: ?10,BHSOP Line Location: HOSDSP+19
Function Call: WRITE	Prompt: BHSDS,?12,$E(BHSOP,1,15) Line Location: MINOR+86
Function Call: WRITE	Prompt: BHSDS,?12,$E(BHSOP,1,15) Line Location: MINOR+92
Function Call: WRITE	Prompt: "Minor procedures are on file but have not been displayed.",! Line Location: MINOR+93

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX("B"	MINORO+8, HOSCHK+6, MINOR+7, MINOR+31
^AUPNVCPT - [#9000010.18]	MINOR+38, MINOR+58
^AUPNVCPT("AA"	MINOR+32, MINOR+35, MINOR+36
^AUPNVCPT("AC"	MINOR+4
^AUPNVPRC - [#9000010.08]	HOSDSP+2, MINOR+11, MINOR+12
^AUPNVPRC("AA"	MINORO+9, MINORO+10, MINOR+9, MINOR+10
^AUPNVPRC("AC"	MINORO+5, MINOR+4
^AUPNVSIT - [#9000010]	HOSDSP+6, MINOR+16, MINOR+44, MINOR+65, MINOR+66
^AUPNVTC - [#9000010.33]	MINOR+62, MINOR+63, MINOR+70, MINOR+77
^AUPNVTC("AC"	MINOR+61
^ICD0 - [#80.1]	MINOR+55
^ICPT - [#81]	MINOR+33, MINOR+53, MINOR+54, MINOR+59, MINOR+74
^VA(200 - [#200]	GETOPRV+5

Label References

Name	Line Occurrences
GETOPRV	HOSDSP+17, MINOR+28
HOSCHK	HOSDSP+4, MINOR+13
HOSDSP	MINORO+11
MINORX	MINOR+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ARRAY	MINORO+4*
BHCPT	MINOR+69*, MINOR+73, MINORX!
BHCPTI	MINOR+32, MINOR+33, MINOR+34, MINOR+35, MINOR+36, MINOR+70, MINOR+71, MINOR+72, MINOR+74, MINOR+75 , MINORX!
BHHOSA	MINOR+2!, HOSX+1!
BHHOSA(	MINOR+29, MINOR+50, MINOR+51, MINOR+58, MINOR+77*, MINOR+79, MINOR+81, MINOR+82, MINOR+83, MINOR+84 , MINOR+85, MINOR+87, MINOR+88, MINOR+89, MINOR+90, MINOR+91
BHHOSC	MINOR+2!, HOSX+1!
BHHOSC(	MINOR+59*, MINOR+73
BHIEN	MINOR+81, MINOR+82, MINOR+83, MINOR+84, MINOR+85, MINOR+87, MINOR+88, MINOR+89, MINOR+90, MINOR+91 , MINORX!
BHSCNT	MINOR+6, MINOR+14, MINOR+57*, MINOR+93, HOSX!, MINORX!
BHSCOD	MINOROX!, HOSCHK+3, HOSCHK+4, HOSCHK+6, HOSX!, MINORX!
BHSCPT2	MINOR+52*, MINOR+53, MINOR+54, HOSX+1!, MINORX!
BHSDAT	MINOROX!, HOSDSP+6, HOSDSP+12, HOSDSP+14, MINOR+16, MINOR+22, MINOR+24, MINOR+26, HOSX!, MINORX!
BHSDFN	MINORO+10, MINOROX!, HOSDSP+2, MINOR+10, MINOR+11, MINOR+12, MINOR+29, HOSX!, MINORX!
BHSDN	MINORO+16!
BHSDS	MINOROX!, HOSDSP+16, HOSDSP+19, MINOR+27, MINOR+29, MINOR+37, MINOR+58, MINOR+67, MINOR+77, MINOR+84* , MINOR+86, MINOR+90*, MINOR+92, HOSX!, MINORX!
BHSFN	MINORO+13, MINOR+96, MINOR+99*, HOSX!, MINORX!
BHSICD	MINOROX!, HOSDSP+3, HOSDSP+4, HOSCHK+3, HOSCHK+4, HOSCHK+11, MINOR+11, MINOR+13, MINOR+39, MINOR+52 , MINOR+75, MINOR+77, MINOR+85, MINOR+91*, HOSX!, MINORX!
BHSICL	MINOROX!, HOSDSP+19, MINOR+86, MINOR+92*, HOSX!, MINORX!
BHSIEN	MINOR+36, MINOR+38, MINOR+58, MINOR+61, MINOR+62, MINOR+63, MINOR+69, MINOR+70, MINOR+77, MINORX!
BHSIVD	MINORO+9, MINORO+10, MINOROX!, MINOR+9, MINOR+10, MINOR+29, MINOR+35, MINOR+36, MINOR+37, MINOR+50 , MINOR+51, MINOR+58, MINOR+59, MINOR+68, MINOR+73, MINOR+77, MINOR+79*, MINOR+81, MINOR+82, MINOR+83 , MINOR+84, MINOR+85, MINOR+87, MINOR+88, MINOR+89, MINOR+90, MINOR+91, HOSX!, MINORX!
BHSN	MINORO+2~, HOSDSP+2, HOSDSP+3, HOSDSP+6, HOSDSP+7, HOSDSP+12, HOSDSP+14, HOSDSP+16, GETOPRV+3, MINOR+12 , MINOR+16, MINOR+17, MINOR+22, MINOR+24, MINOR+26, MINOR+27, MINOR+38*, MINOR+39, MINOR+41, MINOR+44 , MINOR+46, MINOR+47, MINOR+59
BHSNRQ	MINOROX!, HOSDSP+7, HOSDSP+9, HOSDSP+12, HOSDSP+14, MINOR+17, MINOR+18, MINOR+22, MINOR+23, MINOR+24* , MINOR+26, MINOR+29, MINOR+41, MINOR+42, MINOR+46, MINOR+58, MINOR+74, MINOR+77, MINOR+83, MINOR+89 , HOSX!, MINORX!
BHSNRQ1	MINOR+2!, MINOR+22, MINOR+23, MINOR+24
BHSNTE	MINORO+2~, HOSDSP+19, MINOR+86, MINOR+92*
BHSOP	MINOROX!, HOSDSP+19, HOSDSP+20!, GETOPRV+2, GETOPRV+5, MINOR+29, MINOR+82, MINOR+86, MINOR+88, MINOR+92 , HOSX!, MINORX!
BHSOPN	MINOROX!, GETOPRV+1~, GETOPRV+3*, GETOPRV+4, GETOPRV+5, HOSX!, MINORX!
BHSPAT	MINORO+2~, MINORO+3, MINORO+5, MINORO+9, MINORO+10, MINOR+3, MINOR+4, MINOR+9, MINOR+10, MINOR+32 , MINOR+35, MINOR+36, MINOR+61
BHSQ	MINORO+2~, MINORO+9, MINORO+10
BHSS	MINORO+14, MINORO+16!, MINOR+97, MINOR+101*, HOSX!, MINORX!
BHST	MINORO+13, MINORO+16!, MINOR+96, MINOR+99*, HOSX!, MINORX!
BHSVDT	MINOR+43~, MINOR+44*, MINOR+46, MINOR+47
BHT	MINOR+31*, MINOR+34, MINOR+72, MINORX!
BIEN	MINORX!
CODE	MINOR+2!, MINOR+33, MINOR+47, MINOR+58
>> DFN	MINORO+3, MINOR+3
>> GMTSQIT	MINORO+6, MINORO+11, HOSDSP+18, MINOR+5, MINOR+79, MINOR+80, MINOR+81, MINOR+87, MINOR+93
I	MINOR+50*, MINOR+51, HOSX+1!, MINORX!
MATCH	MINOR+49, MINOR+54, MINOR+55, MINOR+56, HOSX+1!, MINORX!
SCODE	MINOR+54*, MINOR+55, HOSX+1!, MINORX!
>> TAXARR	MINORO+4*
TAXIEN	MINORO+2~, MINORO+8, MINOR+2!, MINOR+7
U	HOSDSP+3, HOSDSP+6, HOSDSP+7, HOSDSP+12, HOSDSP+14, HOSDSP+16, HOSCHK+3, HOSCHK+4, GETOPRV+3, GETOPRV+5 , MINOR+11, MINOR+16, MINOR+17, MINOR+22, MINOR+24, MINOR+26, MINOR+27, MINOR+29, MINOR+33, MINOR+39 , MINOR+41, MINOR+44, MINOR+46, MINOR+47, MINOR+55, MINOR+58, MINOR+59, MINOR+63, MINOR+66, MINOR+70 , MINOR+74, MINOR+77, MINOR+82, MINOR+83, MINOR+84, MINOR+85, MINOR+88, MINOR+89, MINOR+90, MINOR+91
V	MINOR+63, MINOR+64, MINOR+65, MINOR+66, MINOR+67, MINOR+68, HOSX!, MINORX!
X	HOSDSP+1~, HOSDSP+6, HOSDSP+16, MINOR+16, MINOR+27, MINOR+37, MINOR+67, HOSX!, MINORX!
Y	MINOROX!, HOSDSP+1~, HOSDSP+6, HOSDSP+16, MINOR+16, HOSX!, MINORX!
Z	MINOR+51*, MINOR+55, HOSX+1!, MINORX!

Customize PDF page

Package: Health Summary Components

Routine: BHSSUR

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: