Routine: BHSBCH

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
IHS VA Utilities	2	$$VAL^XBDIQ1 $$EXTSET^XBFUNC
Health Summary Components	1	PRTTXT^BHSUTL
IHS RPMS CHR System	1	$$PPINI^BCHUTIL

Package

Total

Call Graph

Health Summary

REGDT4^GMTSU CKP^GMTSUP

IHS VA Utilities

$$VAL^XBDIQ1 $$EXTSET^XBFUNC

Health Summary Components

PRTTXT^BHSUTL

IHS RPMS CHR System

$$PPINI^BCHUTIL

Package	Total	Caller Graph
Health Summary Components	1	BHSHS2

Package

Total

Caller Graph

Health Summary Components

BHSHS2

Name	Comments	DBIA/ICR reference
NOPOV	;
ONEDATE
CHR	;EP called from health summary
COMMON	;
OUTPTX
GETSITE	;
DSPVIS	;
OUTPT	; ********** CHR PROBLEM CODES AND DESIGNATED PROVIDER ; <SETUP>
HASPOV	;

Name	Field # of Occurrence
$$PPINI^BCHUTIL	COMMON+3
PRTTXT^BHSUTL	COMMON+3, COMMON+4
REGDT4^GMTSU	ONEDATE
CKP^GMTSUP	CHR+1, OUTPT+2, DSPVIS+9, COMMON+1
$$VAL^XBDIQ1	DSPVIS+8
$$EXTSET^XBFUNC	DSPVIS+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No CHR Records on File.",! Line Location: OUTPT+2
Function Call: WRITE	Prompt: ! Condition for execution: C=1 Line Location: DSPVIS+7
Function Call: WRITE	Prompt: ?J,$P(X(I),U)," ",$P(X(I),U,2) Line Location: DSPVIS+7
Function Call: WRITE	Prompt: BCHSDAT Line Location: DSPVIS+10
Function Call: WRITE	Prompt: !?25,"Evaluation: ",$$EXTSET^XBFUNC(90002,.09,$P(BCHSN,U,9)),! Line Location: DSPVIS+13
Function Call: WRITE	Prompt: ! Line Location: DSPVIS+15
Function Call: WRITE	Prompt: ?25,"Referred BY: ",$E($S($P(BCHSN,U,7)]"":$P(^BCHTREF($P(BCHSN,U,7),0),U),1:""),1,11) Line Location: DSPVIS+16
Function Call: WRITE	Prompt: ?50,"Referred TO: ",$E($S($P(BCHSN,U,8):$P(^BCHTREF($P(BCHSN,U,8),0),U),1:""),1,12),! Line Location: DSPVIS+17
Function Call: WRITE	Prompt: BCHSDAT Line Location: COMMON+2
Function Call: WRITE	Prompt: ?9,BCHSFAC,?20,$$PPINI^BCHUTIL(BCHSVDF) Line Location: COMMON+3

Name	Line Occurrences (* Changed, ! Killed)
^AUTNPOV - [#9999999.27]	HASPOV+3
^AUTTLOC - [#9999999.06]	GETSITE+2
^BCHR - [#90002]	ONEDATE+2, DSPVIS+6
^BCHR("AE"	OUTPT+2, OUTPT+5, ONEDATE+1
^BCHRPROB - [#90002.01]	DSPVIS+4
^BCHRPROB("AD"	DSPVIS+3, DSPVIS+4
^BCHTACTL - [#90002.56]	GETSITE+1
^BCHTPROB - [#90002.53]	HASPOV+1
^BCHTREF - [#90002.52]	DSPVIS+16, DSPVIS+17
^BCHTSERV - [#90002.54]	HASPOV+2
^DD(90002	DSPVIS+11

Name	Line Occurrences
COMMON	NOPOV+2, HASPOV+4
DSPVIS	ONEDATE+2
GETSITE	ONEDATE+2
HASPOV	DSPVIS+4
NOPOV	DSPVIS+3
ONEDATE	OUTPT+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BCHACTL	OUTPTX!, GETSITE+1*, GETSITE+3
BCHF	DSPVIS+8~*, DSPVIS+11
BCHS	OUTPTX!
BCHSCLI	OUTPTX!
BCHSDAT	OUTPT+6, OUTPTX!, ONEDATE*, DSPVIS+10, COMMON+2
BCHSDTU	OUTPT+6, OUTPTX!, ONEDATE, DSPVIS+2
BCHSFAC	OUTPTX!, OUTPTX+1!, GETSITE+2, GETSITE+3, COMMON+3
BCHSICD	OUTPTX!, NOPOV+1, HASPOV+1, HASPOV+2*, COMMON+3
BCHSICL	OUTPTX!
BCHSIVD	OUTPT+5*, OUTPTX!, ONEDATE, ONEDATE+1
BCHSMTX	OUTPTX!
BCHSN	OUTPTX!, ONEDATE+2*, GETSITE+1, GETSITE+2, DSPVIS+13, DSPVIS+15, DSPVIS+16, DSPVIS+17
BCHSNAB	OUTPTX+1!
BCHSNDT	OUTPTX!, ONEDATE, DSPVIS+9, DSPVIS+10, COMMON+1, COMMON+2*
BCHSNFL	OUTPTX+1!
BCHSNRQ	OUTPTX!, HASPOV+3*, COMMON+4
BCHSNSH	OUTPTX+1!
BCHSOVT	OUTPTX!
BCHSPDN	OUTPTX!, DSPVIS+4*
BCHSPFN	OUTPTX!, ONEDATE, DSPVIS+10, COMMON+2*
BCHSPVD	OUTPT+4, OUTPT+6, OUTPTX!, ONEDATE
BCHSQ	OUTPTX!, ONEDATE+1, DSPVIS+4
BCHSR	OUTPTX!, DSPVIS+4*, HASPOV+1, HASPOV+2, HASPOV+3
BCHSVDF	OUTPTX!, ONEDATE+1*, ONEDATE+2, DSPVIS+3, DSPVIS+4, DSPVIS+6, DSPVIS+8, COMMON+3
BCHSVSC	OUTPTX+1!
BCHSX	OUTPTX!
BCHX	OUTPTX!, DSPVIS+8*, DSPVIS+11
BHSICL	OUTPTX+1!, COMMON+3, COMMON+4
BHSNRQ	OUTPTX+1!, NOPOV+1, COMMON+3, COMMON+4*
>> BHSPAT	OUTPT+2, OUTPT+5, ONEDATE+1
BHSTXT	OUTPTX+1!, NOPOV+1, HASPOV+3, COMMON+4*
C	DSPVIS+1~, DSPVIS+6, DSPVIS+7
D0	OUTPTX+1!
>> GMTSDLM	OUTPT+5
>> GMTSNDM	OUTPT+6*
>> GMTSNPG	DSPVIS+9, COMMON+1
>> GMTSQIT	CHR+1, OUTPT+2, OUTPT+6, ONEDATE+2, DSPVIS+9, COMMON+1
I	OUTPTX+1!, DSPVIS+6, DSPVIS+7
J	OUTPTX+1!, DSPVIS+7*
U	GETSITE+1, GETSITE+2, DSPVIS+6, DSPVIS+7, DSPVIS+11, DSPVIS+13, DSPVIS+15, DSPVIS+16, DSPVIS+17, HASPOV+1 , HASPOV+2, HASPOV+3
X	ONEDATE*, DSPVIS+1~, DSPVIS+7
X(	DSPVIS+6*, DSPVIS+7
Y	OUTPTX+1!, DSPVIS+1~, DSPVIS+6*
Z	DSPVIS+1~, DSPVIS+6*

Customize PDF page

Package: Health Summary Components

Routine: BHSBCH

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: