Routine: BHSPLST

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	2	RECON^BHSPL (GETPLICD,GETSITE,PRTICD,PRTICDE,PRTTXT)^BHSUTL
IHS Patient	2	$$CAT^AUPNVPLC $$ICDDX^AUPNVUTL
DRG Grouper	1	$$ICDDX^ICDEX
IHS VA Utilities	1	$$VAL^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component Reports	1	($$LASTNAP,$$LASTPLR,$$LASTPLU)^APCLAPI6
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

Health Summary

REGDT4^GMTSU CKP^GMTSUP

Health Summary Components

RECON^BHSPL (GETPLICD,GETSITE,PRTICD,PRTICDE,PRTTXT)^BHSUTL

IHS Patient

$$CAT^AUPNVPLC $$ICDDX^AUPNVUTL

DRG Grouper

$$ICDDX^ICDEX

IHS VA Utilities

$$VAL^XBDIQ1

Kernel

$$FMTE^XLFDT

Patient Care Component Reports

($$LASTNAP,$$LASTPLR,$$LASTPLU)^APCLAPI6

VA Fileman

$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EPROB
PROBDSP	; ; <SETUP PROBLEM>
IPROB
NOTEDSP	; DISPLAY NOTES UNDER APCHSPRBLEM
OPROB
CPROB
APROB
PROBSCH	;
COMMON1	;additional stuff for CHHIT bjpc 2.0 patch 5
DSPFACN	; DISPLAY NOTES FOR SELECTED APSHCFACILITY
COMMON	;
PROBX
ECODEDSP	;
DSPN	; DISPLAY SINGLE NOTE
PROBST	;EP - problems by status
SPROB
PROB	; ******************** PROBLEM / NOTES * 9000011 *********

External References

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

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PROBST+12
Function Call: WRITE	Prompt: ?12,"ENT. MODIFIED",! Line Location: PROBST+14
Function Call: WRITE	Prompt: ! Line Location: COMMON+4
Function Call: WRITE	Prompt: ?13,"ENT. MODIFIED",! Line Location: COMMON+8
Function Call: WRITE	Prompt: !,"Problem List Reviewed On: ",?36,$$FMTE^XLFDT($P(BHSX,U,1)) Line Location: COMMON1+4
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(BHSX,U,3):$P($G(^VA(200,$P(BHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+4
Function Call: WRITE	Prompt: "Problem List Updated On: ",?36,$$FMTE^XLFDT($P(BHSX,U,1)) Line Location: COMMON1+7
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(BHSX,U,3):$P($G(^VA(200,$P(BHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+7
Function Call: WRITE	Prompt: !,"No Active Problems: ",?24,$$FMTE^XLFDT($P(BHSX,U,1)) Line Location: COMMON1+11
Function Call: WRITE	Prompt: ?39,"Documented By: ",?54,$E($P($G(^VA(200,$P(BHSX,U,3),0)),U),1,25),! Line Location: COMMON1+11
Function Call: WRITE	Prompt: ?51,"By: ",$E($S($P(BHSX,U,3):$P($G(^VA(200,$P(BHSX,U,3),0)),U),1:""),1,25),! Line Location: COMMON1+12
Function Call: WRITE	Prompt: BHSPLN Line Location: PROBDSP+21
Function Call: WRITE	Prompt: ?33,"CAUSE: ",! Line Location: ECODEDSP+2
Function Call: WRITE	Prompt: BHSFCN_" "_$P(BHSN,U) Line Location: DSPN+8

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]	PROBST+8, PROBSCH+1, 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"	PROBST+5, PROBST+6, PROBST+7, COMMON+3, PROBSCH+1
^VA(200 - [#200]	COMMON1+4, COMMON1+7, COMMON1+12

Name	Line Occurrences
COMMON	APROB, CPROB, SPROB, OPROB, EPROB
COMMON1	PROBST+13, PROBST+17, COMMON+5
DSPFACN	NOTEDSP+1
DSPN	DSPFACN+3
ECODEDSP	PROBDSP+22
PROBDSP	PROBST+16, COMMON+9
PROBSCH	COMMON+3
PROBX	PROBST+12, COMMON+4

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BHPBST	PROBST+1~
BHSAX	PROBX+1!, PROBDSP+26, PROBDSP+27, PROBDSP+32, PROBDSP+33, PROBDSP+38*, PROBDSP+39
BHSCL	PROBX+1!, PROBDSP+14*, PROBDSP+15
BHSDFN	PROBST+7, PROBST+8, PROBST+11, PROBST+16, COMMON+9, PROBX!, PROBSCH+1, 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, PROBDSP+42, NOTEDSP+1, DSPFACN+1, DSPFACN+2, DSPFACN+3
BHSDFT	COMMON+1!, PROBX!
BHSDFT(	PROBST+11, PROBST+16, COMMON+9, PROBSCH+1
BHSDOO	PROBX!, PROBDSP+2, PROBDSP+16, PROBDSP+17
BHSDTM	PROBX!, PROBDSP+12*, PROBDSP+19
BHSDTN	PROBX!, PROBDSP+13*, PROBDSP+19
BHSFAC	PROBST+5, PROBST+6, PROBST+7, PROBST+11, COMMON+3, PROBX!, PROBSCH+1
BHSFCN	PROBX!, DSPFACN+2, DSPN+7, DSPN+8
BHSFPP	PROBST+16, 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+9*
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+1, DSPN+2, DSPN+3, DSPN+8
BHSNAB	PROBX+2!, PROBDSP+11, DSPFACN+2
BHSNAR	PROBX+1!, DSPN+3, DSPN+6, DSPN+9
BHSNDF	PROBST+4, PROBST+11, PROBST+13, COMMON+1, COMMON+5, PROBX!, PROBSCH+1, 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+2!, ECODEDSP+3*, ECODEDSP+7, ECODEDSP+9, ECODEDSP+12
BHSPAT	PROBST+3, PROBST+5, PROBST+6, PROBST+7, COMMON+2, COMMON+3, COMMON1+2, COMMON1+5, COMMON1+9, PROBX+2! , PROBSCH+1
BHSPBN	PROBX!
BHSPLN	PROBX!, PROBDSP+19*, PROBDSP+21
BHSPNM	PROBX!, PROBDSP+10, PROBDSP+11, PROBDSP+19
BHSPRB	PROBST+6, PROBST+7, PROBST+11, PROBX!, PROBSCH+1
BHSQ	PROBST+5, PROBST+6, PROBST+16, COMMON+3, COMMON+9, PROBX+1!, PROBSCH+1, NOTEDSP+1, DSPFACN+3, DSPN+7*
BHST	PROBST+1~, PROBST+8, PROBST+9, PROBST+10, PROBST+11, PROBST+15, PROBST+16
BHSTAT	PROBST+2, APROB, CPROB, SPROB, OPROB, EPROB, IPROB*, COMMON1+8, PROBX!, PROBSCH+1
BHSTXT	PROBX+1!, ECODEDSP+6, DSPN+9
BHSVD	PROBX+2!, PROBDSP+4*
BHSVSC	PROBX+2!
BHSX	COMMON1+2, COMMON1+4, COMMON1+5, COMMON1+7, COMMON1+9*, COMMON1+12, PROBX+2!
>> DFN	PROBST+3, COMMON+2
DT	COMMON1+2, COMMON1+5, COMMON1+9
>> GMTSNPG	PROBST+12, COMMON+4, PROBDSP+20, ECODEDSP+5
>> GMTSQIT	PROBST+12, COMMON+4, COMMON+7, COMMON+9, COMMON1+3, COMMON1+6, COMMON1+10, PROBDSP+20, ECODEDSP+1, ECODEDSP+3 , ECODEDSP+4, DSPN+8
I	PROBX+2!, PROBDSP+27, PROBDSP+28, PROBDSP+33, PROBDSP+34, PROBDSP+39*, PROBDSP+40
U	PROBST+8, COMMON1+4, COMMON1+7, COMMON1+12, PROBSCH+1, 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+1, DSPN+2, DSPN+3 , DSPN+8
X	PROBDSP+8, PROBDSP+12, PROBDSP+13, PROBDSP+16, DSPN+4~, DSPN+5*, DSPN+6
Y	PROBX+2!, DSPN+3*

Customize PDF page

Package: Health Summary Components

Routine: BHSPLST

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: