Routine: BDGPCCE1

Package	Total	Call Graph
DRG Grouper	1	$$ICDDX^ICDCODE
Kernel	1	$$REPEAT^XLFSTR
VA Fileman	1	$$GET1^DIQ

Package	Total	Caller Graph
IHS Changes To ADT	1	BDGPCCEL

Entry Points

Name	Comments	DBIA/ICR reference
SET(DATA,NUM)	; puts display data into array
POV	; build diagnosis display
PROV	; build display of providers
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
ADMIT	; build display of admit data
OTHER	; build display of all other PCC data for patient's visit
SP(N)	; -- SUBRTN to pad N number of spaces
OP	; build list of procedures

External References

Name	Field # of Occurrence
$$GET1^DIQ	ADMIT+9, ADMIT+10, ADMIT+13, ADMIT+14, ADMIT+17, ADMIT+18, ADMIT+19, ADMIT+20, ADMIT+21, ADMIT+22 , ADMIT+25, ADMIT+26, ADMIT+27, ADMIT+30, ADMIT+31, ADMIT+32, ADMIT+33, ADMIT+37, ADMIT+40, ADMIT+43 , ADMIT+46, ADMIT+48, ADMIT+51, POV+7, POV+8, POV+9, POV+12, POV+14, POV+18, POV+19 , POV+21, OP+7, OP+8, OP+10, OP+13, OP+15, OP+16, OP+18, OP+21, OP+22 , OP+24, OP+29, OP+30, OP+34, OP+36, OP+37, PROV+7, PROV+8, PROV+9, PROV+10 , OTHER+13, OTHER+17, OTHER+18, OTHER+20, OTHER+23
$$ICDDX^ICDCODE	ADMIT+43, OP+26
$$REPEAT^XLFSTR	PAD+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGPM - [#405]	GET1^DIQ
^DG(405.1 - [#405.1]	GET1^DIQ
^AUPNVSIT - [#9000010]	GET1^DIQ
^AUPNVINP - [#9000010.02]	GET1^DIQ
^AUPNVPRV - [#9000010.06]	GET1^DIQ
^AUPNVPOV - [#9000010.07]	GET1^DIQ
^AUPNVPRC - [#9000010.08]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVINP("AD"	ADMIT+2
^AUPNVPOV("AD"	POV+2, POV+6
^AUPNVPRC("AD"	OP+2, OP+6
^AUPNVPRV("AD"	PROV+2, PROV+6
^DGPM("AVISIT"	ADMIT+36
^DIC - [#1]	OTHER+3, OTHER+6, OTHER+8
^ICD - [#80.2]	ADMIT+48
^TMP("BDGPCCE"	SET+2*

Label References

Name	Line Occurrences
$$PAD	ADMIT+6, ADMIT+9, ADMIT+13, ADMIT+19, ADMIT+27, ADMIT+32, POV+8, POV+16, POV+19, OP+7 , OP+9, OP+17, OP+27, OP+31, OP+37, PROV+7, PROV+11, SP+1
$$SP	ADMIT+40, ADMIT+46, ADMIT+51, POV+12, POV+16, POV+19, POV+21, OP+13, OP+16, OP+26 , OTHER+17, OTHER+23
ADMIT	BDGPCCE1+7
OP	BDGPCCE1+7
OTHER	BDGPCCE1+7
POV	BDGPCCE1+7
PROV	BDGPCCE1+7
SET	ADMIT+3, ADMIT+5, ADMIT+7, ADMIT+11, ADMIT+15, ADMIT+23, ADMIT+28, ADMIT+34, ADMIT+38, ADMIT+44 , ADMIT+49, ADMIT+52, ADMIT+53, POV+3, POV+5, POV+10, POV+12, POV+16, POV+20, POV+21 , POV+23, OP+4, OP+11, OP+13, OP+19, OP+27, OP+32, OP+38, OP+40, PROV+3 , PROV+5, PROV+12, OTHER+10, OTHER+21, OTHER+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BDGV	ADMIT+2, ADMIT+9, ADMIT+36, ADMIT+46, ADMIT+48, POV+2, POV+6, OP+2, OP+6, PROV+2 , PROV+6, OTHER+10, OTHER+12
D	PAD~, PAD+2
DATA	SET~, SET+2
FILE	OTHER+1~, OTHER+2, OTHER+3, OTHER+4, OTHER+5, OTHER+6, OTHER+8, OTHER+13, OTHER+17, OTHER+18 , OTHER+20, OTHER+23
GLOBAL	OTHER+1~, OTHER+6, OTHER+7, OTHER+10, OTHER+12
IEN	POV+1~, POV+6, POV+7, POV+8, POV+9, POV+12, POV+14, POV+18, POV+19, POV+21 , OP+1~, OP+6, OP+7, OP+8, OP+10, OP+13, OP+15, OP+16, OP+18, OP+21 , OP+22, OP+24, OP+29, OP+30, OP+34, OP+36, OP+37, PROV+1~, PROV+6, PROV+7 , PROV+8, PROV+9, PROV+10, OTHER+1~, OTHER+12, OTHER+13, OTHER+17, OTHER+18, OTHER+20, OTHER+23
>> IORVOFF	BDGPCCE1+6*, ADMIT+5, POV+5, OP+4, PROV+5, OTHER+10
>> IORVON	BDGPCCE1+6*, ADMIT+5, POV+5, OP+4, PROV+5, OTHER+10
>> IOUOFF	BDGPCCE1+6*, ADMIT+6
>> IOUON	BDGPCCE1+6*, ADMIT+6
L	PAD~, PAD+2
LINE	ADMIT+1~, ADMIT+6, ADMIT+7, ADMIT+9, ADMIT+10, ADMIT+11, ADMIT+13, ADMIT+14, ADMIT+15, ADMIT+17 , ADMIT+19, ADMIT+20, ADMIT+22, ADMIT+23, ADMIT+25, ADMIT+26, ADMIT+27, ADMIT+28, ADMIT+30, ADMIT+31 , ADMIT+32, ADMIT+33, ADMIT+34, ADMIT+36, ADMIT+37, ADMIT+38, ADMIT+40, ADMIT+41, ADMIT+43, ADMIT+44 , ADMIT+46, ADMIT+47, ADMIT+48, ADMIT+49, ADMIT+51, ADMIT+52, POV+1~, POV+7, POV+8, POV+9 , POV+10, POV+19, POV+20, OP+1~, OP+7, OP+9, OP+10, OP+11, OP+15, OP+16 , OP+17, OP+18, OP+19, OP+21, OP+27, OP+29, OP+31, OP+32, OP+36, OP+37* , OP+38, PROV+1~, PROV+7, PROV+8, PROV+11, PROV+12, OTHER+1~, OTHER+13, OTHER+17, OTHER+19 , OTHER+20, OTHER+21, OTHER+23, OTHER+24
N	SP~, SP+1
NAME	OTHER+1~, OTHER+8*, OTHER+10, OTHER+16
NUM	SET~, SET+1*, SET+2
U	ADMIT+43, OP+26, OTHER+8
>> VALMCNT	ADMIT+3, ADMIT+5, ADMIT+7, ADMIT+11, ADMIT+15, ADMIT+23, ADMIT+28, ADMIT+34, ADMIT+38, ADMIT+44 , ADMIT+49, ADMIT+52, ADMIT+53, POV+3, POV+5, POV+10, POV+12, POV+16, POV+20, POV+21 , POV+23, OP+4, OP+11, OP+13, OP+19, OP+27, OP+32, OP+38, OP+40, PROV+3 , PROV+5, PROV+12, OTHER+10, OTHER+21, OTHER+24
VH	ADMIT+1~, ADMIT+2*, ADMIT+10, ADMIT+13, ADMIT+14, ADMIT+17, ADMIT+18, ADMIT+20, ADMIT+21, ADMIT+25 , ADMIT+26, ADMIT+27, ADMIT+30, ADMIT+31, ADMIT+32, ADMIT+33, ADMIT+40, ADMIT+43, ADMIT+51
X	ADMIT+18, ADMIT+19, ADMIT+21, ADMIT+22, ADMIT+36, ADMIT+37, POV+1~, POV+14, POV+15, POV+16 , POV+18, POV+19, OP+1~, OP+8, OP+9, OP+22, OP+23, OP+26, OP+27, OP+30* , OP+31, OP+34, OP+35, PROV+1~, PROV+9, PROV+11, OTHER+1~, OTHER+18*, OTHER+19
Y	POV+1~, POV+14, POV+15, POV+16, OP+1~, OP+24, OP+26, PROV+1~, PROV+10*, PROV+11 , OTHER+1~

Customize PDF page

Package: IHS Changes To ADT

Routine: BDGPCCE1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: