Routine: BCHUAR

Package	Total	Call Graph
IHS RPMS CHR System	3	GATHER^BCHUARL (,EN)^BCHUEKL ^BCHUIN
Registration	3	EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1
VA Fileman	2	(,DD)^%DT ^DIR
IHS VA Utilities	1	EN^XBVK
Kernel	1	DISP^XQORM1

Package

Total

Call Graph

IHS RPMS CHR System

GATHER^BCHUARL (,EN)^BCHUEKL ^BCHUIN

Registration

EN^VALM TERM^VALM0 ($$FTIME,CLEAR,FULL)^VALM1

VA Fileman

(,DD)^%DT ^DIR

IHS VA Utilities

EN^XBVK

Kernel

DISP^XQORM1

Package	Total	Caller Graph
IHS RPMS CHR System	8	BCH ENTER ABBREVIATED FORM BCH UPDATE RECORDS BCHEGR BCHHS BCHUADD BCHUDEL BCHUDISP BCHUEDT

Package

Total

Caller Graph

IHS RPMS CHR System

BCH ENTER ABBREVIATED FORM BCH UPDATE RECORDS BCHEGR BCHHS BCHUADD BCHUDEL BCHUDISP BCHUEDT

Entry Points

Name	Comments	DBIA/ICR reference
HELP	; -- help code
ABB	;EP
EN	; EP -- main entry point for BCH UPDATE ACTIVITY RECORDS
HDR	; EP -- header code
GETPROV	;EP - GET PROVIDER
EOJ	;EOJ CLEANUP
START1
EXPND	; -- expand code
TEXT	;
START	; Write Header
INIT	; -- init variables and list array
EXIT	; -- exit code
TEST	;EP
GETPROG	;
RNS	;EP
GETDATE	;EP GET DATE OF ENCOUNTER
UP1	;

External References

Name	Field # of Occurrence
^%DT	GETDATE+4, TEST+3
DD^%DT	GETDATE+7, TEST+6
GATHER^BCHUARL	INIT+1
^BCHUEKL	EOJ+1
EN^BCHUEKL	START+1, RNS+1, UP1+1, ABB+2
^BCHUIN	START1+4
^DIR	GETDATE+2, TEST+1, GETPROV+1, GETPROG+2
EN^VALM	EN+3
TERM^VALM0	EN+1
$$FTIME^VALM1	HDR+2
CLEAR^VALM1	EN+4
FULL^VALM1	START1+6
EN^XBVK	START+2, RNS+2, UP1+2, ABB+1
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(X)\2,X Line Location: START1+1
Function Call: WRITE	Prompt: !! Line Location: START1+3
Function Call: WRITE	Prompt: " <Future dates not allowed>",$C(7),$C(7) Line Location: GETDATE+5
Function Call: WRITE	Prompt: " <Future dates not allowed>",$C(7),$C(7) Line Location: TEST+4
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Routine Call	VALM Line Location: EN+3
Routine Call	DIR Line Location: GETDATE+2 TEST+1 GETPROV+1 GETPROG+2

Name	Line Occurrences (* Changed, ! Killed)
^VA(200 - [#200]	HDR+3

Name	Line Occurrences
EN	START1+6
EOJ	START1+7
EXIT	START1+6
GETDATE	START1+6, GETDATE+4, GETDATE+5, TEST+3, TEST+4
GETPROG	START1+6
GETPROV	START1+6
START1	RNS+4, UP1+4, ABB+4
TEST	GETDATE+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	GETDATE+4, TEST+3
>> BCHDASH	HDR+1, HDR+4
>> BCHDATE	START1+6, GETDATE+2, GETDATE+6, TEST+1, TEST+5*, HDR+2
>> BCHF2	UP1+3*
>> BCHPROG	START1+6, GETPROG+1, GETPROG+4*
>> BCHPROG(0	GETPROG+4*, HDR+2
>> BCHPROV	START1+6, GETPROV+1, GETPROV+4*, HDR+3
BCHRCNT	HDR+5*, INIT+2, EXIT+1!
BCHRNS	RNS+3*, EOJ+2!
>> BCHUABFO	ABB+3*
BCHVRECS	HDR+5!, EXIT+1!
BCHVRECS(1	HDR+5
DA	GETPROG+2!
DIR	GETDATE+2!, TEST+1!, GETPROV+1!, GETPROG+2!
DIR("A"	GETDATE+2, TEST+1, GETPROV+1, GETPROG+2
DIR(0	GETDATE+2, TEST+1, GETPROV+1, GETPROG+2
>> DIRUT	GETDATE+2, GETDATE+3, TEST+1, TEST+2, GETPROV+1, GETPROV+2, GETPROG+2, GETPROG+3
DT	GETDATE+2, GETDATE+5, TEST+4
>> DUOUT	GETDATE+2, TEST+1, GETPROV+1, GETPROG+2
IOF	START1
J	START1+1*, START1+2!
U	GETPROG+4, HDR+3
VALMBCK	EXIT+2!
VALMCC	EN+2*, EXIT+2!
VALMCNT	INIT+2*, EXIT+2!
VALMHDR	EXIT+2!
VALMHDR(1	HDR+1*
VALMHDR(2	HDR+2*
VALMHDR(3	HDR+3*
VALMHDR(4	HDR+4*
VALMHDR(5	HDR+5, HDR+6
X	START1+1, START1+2!, GETDATE+5!, TEST+4!, GETPROG+2!, HELP+1
Y	GETDATE+4, GETDATE+5, GETDATE+6, TEST+3, TEST+4, TEST+5, GETPROV+3, GETPROV+4, GETPROG+2!, GETPROG+4
Y(0	GETPROG+4

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHUAR

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items