Routine: BHSPLST1

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
IHS Patient	2	$$CAT^AUPNVPLC $$ICDDX^AUPNVUTL
DRG Grouper	1	$$ICDDX^ICDEX
Health Summary Components	1	(GETPLICD,GETSITE,PRTICD,PRTICDE,PRTTXT)^BHSUTL
IHS VA Utilities	1	$$VAL^XBDIQ1
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EPROB
IPROB
NOTEDSP	; DISPLAY NOTES UNDER APCHSPRBLEM
OPROB
CPROB
PPROB
APROB
PROBSCH	;
PROBDSP	; ; <SETUP PROBLEM>
DSPFACN	; DISPLAY NOTES FOR SELECTED APSHCFACILITY
COMMON	;
PROBX
ECODEDSP	;
DSPN	; DISPLAY SINGLE NOTE
SPROB
PROB	; ******************** PROBLEM / NOTES * 9000011 *********

External References

Name	Field # of Occurrence
$$CAT^AUPNVPLC	PROBDSP+15
$$ICDDX^AUPNVUTL	ECODEDSP+9
GETPLICD^BHSUTL	PROBDSP+5, ECODEDSP+11
GETSITE^BHSUTL	PROBDSP+9, DSPFACN+2
PRTICD^BHSUTL	PROBDSP+21
PRTICDE^BHSUTL	ECODEDSP+15
PRTTXT^BHSUTL	DSPN+8
$$GET1^DIQ	PROBSCH+3, PROBDSP+7, PROBDSP+8, PROBDSP+28, PROBDSP+34, PROBDSP+40
REGDT4^GMTSU	PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+5
CKP^GMTSUP	COMMON+5, COMMON+7, PROBDSP+20, ECODEDSP+1, ECODEDSP+4, DSPN+7
$$ICDDX^ICDEX	ECODEDSP+9, ECODEDSP+12
$$VAL^XBDIQ1	PROBDSP+14, PROBDSP+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: COMMON+5
Function Call: WRITE	Prompt: ?13,"ENT. MODIFIED",! Line Location: COMMON+8
Function Call: WRITE	Prompt: BHSPLN Line Location: PROBDSP+21
Function Call: WRITE	Prompt: ?33,"CAUSE: ",! Line Location: ECODEDSP+2
Function Call: WRITE	Prompt: "Note: "_BHSFCN_" "_$P(BHSN,U)_" on "_NTEDTE Line Location: DSPN+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNPROB - [#9000011]	GET1^DIQ
9000011.13	GET1^DIQ
9000011.17	GET1^DIQ
9000011.18	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	PROBSCH+4, PROBSCH+5, PROBDSP+3, PROBDSP+4, PROBDSP+24, PROBDSP+26, PROBDSP+30, PROBDSP+32, PROBDSP+36, PROBDSP+38 , NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
^AUPNPROB("AA"	COMMON+4, PROBSCH+1

Label References

Name	Line Occurrences
COMMON	APROB, CPROB, SPROB, OPROB, EPROB, IPROB
DSPFACN	NOTEDSP+1
DSPN	DSPFACN+3
ECODEDSP	PROBDSP+22
NOTEDSP	PROBDSP+41
PROBDSP	COMMON+9
PROBSCH	COMMON+4
PROBX	COMMON+5

Naked Globals

Name	Field # of Occurrence
^(	PROBSCH+2, DSPFACN+3
^(0	DSPFACN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BHSAX	PROBX+1!, PROBDSP+26, PROBDSP+27, PROBDSP+32, PROBDSP+33, PROBDSP+38*, PROBDSP+39
BHSCL	PROBX+1!, PROBDSP+14*, PROBDSP+15
BHSDFN	COMMON+9, PROBX!, PROBSCH+2, PROBSCH+3, PROBSCH+4, PROBSCH+5, PROBSCH+6, PROBDSP+3, PROBDSP+4, PROBDSP+7 , PROBDSP+8, PROBDSP+14, PROBDSP+18, PROBDSP+24, PROBDSP+26, PROBDSP+27, PROBDSP+30, PROBDSP+32, PROBDSP+33, PROBDSP+36 , PROBDSP+38, PROBDSP+39, NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
BHSDFT	COMMON+1!, PROBX!
BHSDFT(	COMMON+9, PROBSCH+6*
BHSDOO	PROBX!, PROBDSP+2, PROBDSP+16, PROBDSP+17
BHSDTM	PROBX!, PROBDSP+12*, PROBDSP+19
BHSDTN	PROBX!, PROBDSP+13*, PROBDSP+19
BHSFAC	COMMON+4*, PROBX!, PROBSCH+1
BHSFCN	PROBX!, DSPFACN+2, DSPN+6, DSPN+7
BHSFPP	COMMON+9*, PROBX!
BHSICD	PROBX!, PROBDSP+5, ECODEDSP+7, ECODEDSP+8, ECODEDSP+12, ECODEDSP+13
BHSICF	PROBX+1!, ECODEDSP+9, ECODEDSP+12, ECODEDSP+13
BHSICL	PROBX+1!, PROBDSP+21, ECODEDSP+14, DSPN+8*
BHSILN	PROBX+1!, PROBDSP+21, ECODEDSP+14
BHSITE	PROBX+2!, PROBDSP+9, DSPFACN+2
BHSN	PROBX+1!, PROBDSP+3, PROBDSP+5, PROBDSP+9, PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16, PROBDSP+22 , ECODEDSP+7, ECODEDSP+9, ECODEDSP+12, DSPFACN+3, DSPN+2, DSPN+3, DSPN+4, DSPN+7
BHSNAB	PROBX+2!, PROBDSP+11, DSPFACN+2
BHSNAR	PROBX+1!, PROBSCH+3, PROBSCH+6, DSPN+4, DSPN+8
BHSNDF	COMMON+1, PROBX!, PROBSCH+6, DSPFACN+3*
BHSNFL	PROBX+2!
BHSNFP	PROBX!, NOTEDSP+1*, DSPFACN+1, DSPFACN+2, DSPFACN+3
BHSNRQ	PROBX!, PROBDSP+6, PROBDSP+7, PROBDSP+8, ECODEDSP+9, ECODEDSP+12, ECODEDSP+13
BHSNSH	PROBX+2!
BHSNTE	PROBX+1!, PROBDSP+2, PROBDSP+15, PROBDSP+17, PROBDSP+18
BHSP	PROBX+1!, ECODEDSP+3*, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12
BHSPAT	COMMON+3*, COMMON+4, PROBX+2!, PROBSCH+1
BHSPBN	PROBX!
BHSPER	PPROB, COMMON+2, PROBX+2!, PROBSCH+5
BHSPLN	PROBX!, PROBDSP+19*, PROBDSP+21
BHSPNM	PROBX!, PROBDSP+10, PROBDSP+11, PROBDSP+19
BHSPRB	PROBX!, PROBSCH+1*, PROBSCH+2
BHSQ	COMMON+4, COMMON+9, PROBX+1!, PROBSCH+1, NOTEDSP+1, DSPFACN+3, DSPN+6
BHSTAT	APROB, CPROB, SPROB, OPROB, EPROB, IPROB, PPROB*, PROBX!, PROBSCH+4
BHSTXT	PROBX+1!, ECODEDSP+6, DSPN+8
BHSVD	PROBX+2!, PROBDSP+4*
BHSVSC	PROBX+2!
BHSX	PROBX+2!
>> DFN	COMMON+3
>> GMTSNPG	COMMON+5, PROBDSP+20, ECODEDSP+5
>> GMTSQIT	COMMON+5, COMMON+7, COMMON+9, PROBDSP+20, ECODEDSP+1, ECODEDSP+3, ECODEDSP+4, DSPN+7
I	PROBX+2!, PROBDSP+27, PROBDSP+28, PROBDSP+33, PROBDSP+34, PROBDSP+39*, PROBDSP+40
NTEDTE	DSPN+1~, DSPN+5*, DSPN+7
U	PROBSCH+4, PROBSCH+5, PROBDSP+4, PROBDSP+5, PROBDSP+9, PROBDSP+10, PROBDSP+12, PROBDSP+13, PROBDSP+15, PROBDSP+16 , PROBDSP+22, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12, DSPN+2, DSPN+3, DSPN+4, DSPN+7
X	PROBX+2!, PROBDSP+8, PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+4*, DSPN+5
Y	PROBX+2!

Customize PDF page

Package: Health Summary Components

Routine: BHSPLST1

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: