Routine: BDGAD1

Package	Total	Call Graph
IHS Changes To ADT	6	^BDGAD2 ^BDGAD3 ^BDGAD4 ^BDGAD5 ($$ADMPRV,$$ADMSRV,$$ADMSRVN)^BDGF1 $$ADULT^BDGPAR
VA Fileman	2	^%DTC $$GET1^DIQ
IHS Patient	1	$$AGE^AUPNPAT
Patient Care Component Reports	1	$$DEMO^APCLUTL

Package

Total

Call Graph

^BDGAD2 ^BDGAD3 ^BDGAD4 ^BDGAD5 ($$ADMPRV,$$ADMSRV,$$ADMSRVN)^BDGF1 $$ADULT^BDGPAR

^%DTC $$GET1^DIQ

$$AGE^AUPNPAT

$$DEMO^APCLUTL

Package	Total	Caller Graph
Registration	2	DGPMBSR DGPMGL1

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
A	; -- main driver
QUIT	;--cleanup all
GATHER	; gather info on admission and put counts into arrays
INIT	;--initialize variables
AGE()	;--age at admit
LOOP	;--loop admissions

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DIC(45.7 - [#45.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BDGCTX - [#9009016.6]	INIT+22, INIT+23, INIT+26, INIT+27, INIT+28, GATHER+38, GATHER+42
^BDGCTX("B"	INIT+23*
^BDGCTX(0	INIT+24*
^BDGCWD - [#9009016.2]	QUIT+1, INIT+10, INIT+11, INIT+14, INIT+15, INIT+16, INIT+17, GATHER+29, GATHER+32, GATHER+33* , GATHER+34, GATHER+37, GATHER+41*
^BDGCWD("B"	INIT+11*
^BDGCWD(0	INIT+12*
^BDGWD - [#9009016.5]	INIT+8
^DGPM - [#405]	GATHER+3, GATHER+15
^DGPM("AMV1"	LOOP+3, LOOP+4, LOOP+5
^DIC(42 - [#42]	INIT+7
^DIC(45.7 - [#45.7]	INIT+19
^DPT - [#2]	AGE+2
^TMP("BDGAD"	INIT+3!, GATHER+22, GATHER+24

Name	Field # of Occurrence
ADULT	GATHER+1~, GATHER+4*, GATHER+36, GATHER+40
>> BDGFRM	INIT+1*, GATHER+15
>> BDGREP	A+5, INIT+5, GATHER+26
BDGT	BDGAD1+15~, INIT+1*, INIT+15, INIT+16, INIT+17, INIT+27, INIT+28, GATHER+29, GATHER+32, GATHER+33 , GATHER+34, GATHER+37, GATHER+38, GATHER+41, GATHER+42
DATA	GATHER+1~, GATHER+12, GATHER+15, GATHER+22, GATHER+24
DFN	LOOP+1~, LOOP+4*, LOOP+5, GATHER+5, GATHER+6, GATHER+9, GATHER+10, GATHER+15, GATHER+22, GATHER+24 , AGE+2
DGBEG	BDGAD1+15~, INIT+2*, LOOP+2
DGDT	LOOP+1~, LOOP+2, LOOP+3, LOOP+4, LOOP+5, AGE+2
DGEND	BDGAD1+15~, INIT+2*, LOOP+3
IFN	LOOP+1~, LOOP+5*, GATHER+3, GATHER+5, GATHER+6, GATHER+15, GATHER+22, GATHER+24
NAME	GATHER+1~, GATHER+9*, GATHER+22, GATHER+24
>> RD	INIT+1, INIT+2
SERV	GATHER+1~, GATHER+5*, GATHER+12, GATHER+31, GATHER+32, GATHER+33, GATHER+34, GATHER+37, GATHER+38, GATHER+41 , GATHER+42
SERVN	GATHER+1~, GATHER+6*, GATHER+8, GATHER+20
>> TS	INIT+19*, INIT+20, INIT+22, INIT+23, INIT+24, INIT+26, INIT+27, INIT+28
TYPE	GATHER+1~, GATHER+8*, GATHER+24
U	INIT+12, INIT+15, INIT+24, INIT+27, GATHER+3, GATHER+12, GATHER+15, GATHER+29, GATHER+34, GATHER+37 , GATHER+38, GATHER+41, GATHER+42, AGE+2
WARD	GATHER+1~, GATHER+3*, GATHER+12, GATHER+29, GATHER+32, GATHER+33, GATHER+34, GATHER+37, GATHER+41
>> WD	INIT+7*, INIT+8, INIT+10, INIT+11, INIT+12, INIT+14, INIT+15, INIT+16, INIT+17
X	AGE+1~, AGE+3
X1	AGE+1~, AGE+2*
X2	AGE+1~, AGE+2*

Information