Routine: BADEHL4

Package	Total	Call Graph
Health Level Seven	2	$$FMDATE^HLFNC $$GET^HLOPRS
Patient Care Component	2	($$DEL,EN)^APCDALVR EN^APCDVDLT
VA Fileman	2	DD^%DT $$GET1^DIQ
Electronic Dental Record	1	($$IMP,ACK,NEW,PRV)^BADEHL3
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Electronic Dental Record	1	BADEHL3

Entry Points

Name	Comments	DBIA/ICR reference
CHECKPRV(PROV)	;See if the provider in the message is new
VDEL(FILE,IEN,VSIT)	;Delete a V-file entry
PROVDEL(VSIT,PROV)
UPD	;EP Update a V Dental entry
POVDEL(FILE,IEN,VSIT)
ADD
DEL	;EP Delete V file entry
DELV
CHECK(VSIT,PROV)	;Remove the POV and PRV if those are the 2 remaining dependent entries
VSTDEL(VSIT)	;Delete the visit with zero dependents
GETTOS(CODE,DESC)	;EP
SETUP	;Setup the variables needed to modifiy or add
MOD

External References

Name	Field # of Occurrence
DD^%DT	SETUP+21
$$DEL^APCDALVR	VDEL+3
EN^APCDALVR	MOD+1, ADD+1
EN^APCDVDLT	VSTDEL+4
$$IMP^BADEHL3	CHECK+4, POVDEL+4
ACK^BADEHL3	UPD+8, UPD+16, UPD+22, UPD+35, SETUP+14, SETUP+32, SETUP+48, SETUP+49, DEL+7, DEL+10 , VDEL+4
NEW^BADEHL3	UPD+32
PRV^BADEHL3	CHECKPRV+17
$$GET1^DIQ	UPD+13
$$FMDATE^HLFNC	UPD+27, SETUP+19
$$GET^HLOPRS	UPD+15, UPD+19, UPD+21, UPD+34, SETUP+7, SETUP+10, SETUP+13, SETUP+29, SETUP+30, SETUP+36 , SETUP+37, DEL+9
$$GET^XPAR	UPD+24, SETUP+16, SETUP+46

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUTTADA - [#9999999.31]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ADEOPS - [#9002010.03]	GETTOS+5, GETTOS+6
^ADEOPS("B"	GETTOS+8
^AUPNVDEN - [#9000010.05]	UPD+6, UPD+11, UPD+29, DEL+7, DEL+8, CHECKPRV+4, CHECKPRV+22
^AUPNVDEN("AD"	CHECKPRV+21
^AUPNVPOV - [#9000010.07]	CHECK+16, POVDEL+8, POVDEL+11, POVDEL+13, POVDEL+24, POVDEL+36
^AUPNVPOV("AD"	CHECK+15, POVDEL+6, POVDEL+10, POVDEL+23, POVDEL+35
^AUPNVPRV - [#9000010.06]	CHECK+26, CHECKPRV+11, CHECKPRV+12, CHECKPRV+30, CHECKPRV+32, CHECKPRV+39, PROVDEL+4
^AUPNVPRV("AD"	CHECK+25, CHECKPRV+9, CHECKPRV+29, CHECKPRV+38, PROVDEL+3
^AUPNVSIT - [#9000010]	UPD+8, DEL+12, CHECK+33, POVDEL+42, PROVDEL+10
^AUTTADA - [#9999999.31]	UPD+12
^AUTTADA("B"	UPD+38
^AUTTLOC("C"	SETUP+45
^ICD9("AB"	CHECK+7, CHECK+8, CHECK+10, CHECK+11, POVDEL+19, POVDEL+20, POVDEL+31, POVDEL+32
^SC - [#44]	SETUP+43, SETUP+47
^SC("B"	SETUP+42
^VA(200 - [#200]	SETUP+26

Label References

Name	Line Occurrences
$$GETTOS	SETUP+31
ADD	UPD+42, UPD+43
CHECKPRV	UPD+17
DEL	UPD+32
DELV	UPD+42, UPD+43
POVDEL	DEL+18
PROVDEL	DEL+19
SETUP	UPD+42, UPD+43
VDEL	DELV+1, DEL+16, CHECK+22, CHECK+31, CHECKPRV+35, POVDEL+17, POVDEL+29, POVDEL+41, PROVDEL+9
VSTDEL	DEL+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADACODE	UPD+2~, UPD+12*, UPD+43
APCDALVR	DEL+3~
APCDALVR("APCDACS"	UPD+18*
APCDALVR("APCDANE"	SETUP+3*
APCDALVR("APCDATMP"	MOD, ADD
APCDALVR("APCDLOC"	SETUP+65*
APCDALVR("APCDPAT"	UPD+4*
APCDALVR("APCDTCDT"	SETUP+22*
APCDALVR("APCDTCLN"	SETUP+23*
APCDALVR("APCDTEPR"	SETUP+27*
APCDALVR("APCDTEXK"	SETUP+24, SETUP+67
APCDALVR("APCDTFEE"	SETUP+11*
APCDALVR("APCDTNOU"	SETUP+5*
APCDALVR("APCDTOS"	SETUP+33*
APCDALVR("APCDTPRV"	SETUP+28*
APCDALVR("APCDTSC"	UPD+39*
APCDALVR("APCDTSUR"	SETUP+8*
APCDALVR("APCDVSIT"	UPD+9*
APCDALVR("AUPNTALK"	SETUP+2*
APCDSUR	UPD+1~
>> APCDTCDT	SETUP+21*, SETUP+22
APCDTEE	UPD+1~
>> APCDTEXK	SETUP+24, SETUP+67, DEL+5
>> APCDTFEE	SETUP+10*, SETUP+11
>> APCDTOS	SETUP+31*, SETUP+32, SETUP+33
>> APCDTSC	UPD+11*, UPD+12, UPD+13, UPD+42
>> APCDTSUR	SETUP+7*, SETUP+8
APCDVDFN	VSTDEL+1~
APCDVDG	VSTDEL+1~
APCDVDLT	VSTDEL+1~, VSTDEL+3*
APCDVFLE	VSTDEL+1~
APCDVI	VSTDEL+2~
APCDVIGR	VSTDEL+1~
APCDVNM	VSTDEL+1~
APCDVSIT	UPD+1~, UPD+6*, UPD+8, UPD+9, DELV+1, CHECKPRV+9, CHECKPRV+21, CHECKPRV+29, CHECKPRV+35, CHECKPRV+38
>> ASUFAC	SETUP+38*, SETUP+45
>> ASUFAC2	SETUP+36*, SETUP+38
AUPNVSIT	VSTDEL+1~
>> BADERR	SETUP+45, SETUP+46, SETUP+47*, SETUP+48
>> BADEWARN	SETUP+40, SETUP+42, SETUP+43*, SETUP+49
CODE	GETTOS~
CODEIEN	UPD+1~, UPD+38*, UPD+39, UPD+42
DA	UPD+1~, DEL+2~, VDEL+1~, VDEL+2*, VDEL+3, VSTDEL+2~
DCNT	DEL+2~, DEL+12, DEL+19, DEL+26, CHECK+33, POVDEL+42, PROVDEL+10
DCNT2	DEL+2~
DESC	GETTOS~, GETTOS+1, GETTOS+4, GETTOS+6, GETTOS+8
>> DFN	UPD+4, UPD+8, UPD+16, UPD+22, UPD+35, SETUP+14, SETUP+32, SETUP+48, SETUP+49, DEL+7 , DEL+10, VDEL+4
DIEN	UPD+1~, DEL+2~, DEL+4*, DEL+7, DEL+8, DEL+16
DIK	DEL+2~, VDEL+1~, VDEL+2*, VDEL+3, VSTDEL+2~
DPRV	CHECKPRV+1~, CHECKPRV+4*, CHECKPRV+6, CHECKPRV+23, CHECKPRV+33
EKEY	POVDEL+1~, POVDEL+3*, POVDEL+12
>> EXKEY	UPD+6, UPD+11, UPD+29, DELV+1, DEL+4, CHECKPRV+4, CHECKPRV+23
FDA	CHECKPRV+27~, CHECKPRV+41, CHECKPRV+42, CHECKPRV+43, CHECKPRV+44!
FDA(	CHECKPRV+42
FILE	DELV, DELV+1, DEL+15, DEL+16, DEL+17, DEL+18, VDEL~, VDEL+2, CHECK+21, CHECK+22 , CHECK+30, CHECK+31, CHECKPRV+34, CHECKPRV+35, POVDEL~, POVDEL+15, POVDEL+17, POVDEL+28, POVDEL+29, POVDEL+40* , POVDEL+41, PROVDEL+8*, PROVDEL+9
>> FNUM	CHECKPRV+42
>> HLMSGIEN	UPD+8, UPD+16, UPD+22, UPD+35, SETUP+14, SETUP+32, SETUP+48, SETUP+49, DEL+7, DEL+10 , VDEL+4
>> HOSLOC	SETUP+37, SETUP+38, SETUP+41, SETUP+42, SETUP+43*, SETUP+44
>> I	CHECK+4, CHECK+6, CHECK+9, POVDEL+4, POVDEL+5, POVDEL+30
ICD	CHECK+1~, CHECK+3, CHECK+7, CHECK+8, CHECK+10, CHECK+11, CHECK+12, CHECK+17, POVDEL+2, POVDEL+19* , POVDEL+20, POVDEL+21, POVDEL+25, POVDEL+31, POVDEL+32*, POVDEL+33, POVDEL+37
ICDIEN	CHECK+1~, CHECK+17, CHECK+22, POVDEL+2, POVDEL+13, POVDEL+14, POVDEL+16, POVDEL+17, POVDEL+25, POVDEL+29 , POVDEL+37, POVDEL+41
IEN	VDEL~, VDEL+2, CHECKPRV+1~, CHECKPRV+21, CHECKPRV+22, CHECKPRV+23, CHECKPRV+38, POVDEL~, POVDEL+3
>> KEY	POVDEL+2, POVDEL+8, POVDEL+9, POVDEL+11*, POVDEL+12
>> LOC	SETUP+43, SETUP+45, SETUP+46, SETUP+47, SETUP+65
>> LOCA	SETUP+47*
LP	GETTOS+2~, GETTOS+5*, GETTOS+6
MATCH	UPD+1~, DEL+2~, CHECK+1~, CHECK+14, CHECK+15, CHECK+17, CHECK+18, CHECK+20, CHECK+24, CHECK+25 , CHECK+27, CHECK+28, CHECK+29, CHECKPRV+1~, CHECKPRV+2, CHECKPRV+13, CHECKPRV+15, CHECKPRV+17, CHECKPRV+20, CHECKPRV+21 , CHECKPRV+23, CHECKPRV+25, CHECKPRV+26, POVDEL+1~, POVDEL+22, POVDEL+23, POVDEL+25, POVDEL+26, POVDEL+27, POVDEL+34* , POVDEL+35, POVDEL+37, POVDEL+38, POVDEL+39, PROVDEL+1~, PROVDEL+2, PROVDEL+3, PROVDEL+5*, PROVDEL+6, PROVDEL+7
>> MOD	SETUP+29*, SETUP+31
NOOPSITE	UPD+3~, UPD+13*, SETUP+31, SETUP+32
>> PARLOC	SETUP+42, SETUP+43, SETUP+46, SETUP+47
PIEN	UPD+2~, CHECKPRV+29, CHECKPRV+30, CHECKPRV+32, CHECKPRV+35, CHECKPRV+38, CHECKPRV+39, CHECKPRV+42
>> PNAME	SETUP+26*, SETUP+27, SETUP+28
POV	DEL+2~
POVIEN	CHECK+1~, CHECK+15, CHECK+16, CHECK+17, POVDEL+2, POVDEL+6, POVDEL+7, POVDEL+8, POVDEL+10, POVDEL+11 , POVDEL+13, POVDEL+16, POVDEL+23, POVDEL+24, POVDEL+25, POVDEL+35, POVDEL+36, POVDEL+37
POVIEN2	UPD+2~, CHECK+16, CHECK+17, POVDEL+2, POVDEL+24, POVDEL+25, POVDEL+36, POVDEL+37
PP	CHECKPRV+27~, CHECKPRV+28, CHECKPRV+32, CHECKPRV+37
PPRV	CHECKPRV+1~, CHECKPRV+22*, CHECKPRV+23
PRIM	CHECKPRV+1~, CHECKPRV+2, CHECKPRV+11, CHECKPRV+17
PROV	UPD+2~, UPD+15, UPD+16, UPD+17, SETUP+26, DEL+9, DEL+10, DEL+19, CHECK~, CHECK+27 , CHECKPRV~, CHECKPRV+6, CHECKPRV+13, CHECKPRV+40, PROVDEL~, PROVDEL+5
PROV2	CHECK+1~, CHECK+26, CHECK+27, POVDEL+1~, PROVDEL+1~, PROVDEL+4, PROVDEL+5
PROVIEN	CHECK+1~, CHECK+25, CHECK+26, CHECK+27, CHECKPRV+30, CHECKPRV+33, CHECKPRV+39, CHECKPRV+40, POVDEL+1~, PROVDEL+1~ , PROVDEL+3, PROVDEL+4, PROVDEL+5
PROVIEN2	CHECK+1~, CHECK+27, CHECK+31, POVDEL+1~, PROVDEL+1~, PROVDEL+5, PROVDEL+9
PRV	DEL+2~
PRVIEN	CHECKPRV+1~, CHECKPRV+12*, CHECKPRV+13
RET	GETTOS+2~, GETTOS+3, GETTOS+5, GETTOS+6, GETTOS+8*, GETTOS+9
SCODE	UPD+2~, UPD+36, UPD+37, UPD+38, UPD+43
>> SEGFT1	UPD+15, UPD+19, UPD+21, UPD+34, SETUP+7, SETUP+10, SETUP+13, SETUP+29, SETUP+30, SETUP+36 , SETUP+37, DEL+9
SURGDES	SETUP+1~, SETUP+30*, SETUP+31
TCODE	UPD+2~, UPD+34*, UPD+35, UPD+36, UPD+37
TEXK	DEL+2~, DEL+5*, DEL+18
TYPE	UPD+2~, UPD+19*
U	UPD+6, UPD+11, UPD+12, UPD+29, SETUP+26, SETUP+43, SETUP+47, DEL+8, DEL+12, VSTDEL+1~ , CHECK+16, CHECK+26, CHECK+33, CHECKPRV+4, CHECKPRV+11, CHECKPRV+12, CHECKPRV+22, CHECKPRV+30, CHECKPRV+32, CHECKPRV+39 , GETTOS+6, POVDEL+8, POVDEL+11, POVDEL+13, POVDEL+24, POVDEL+36, POVDEL+42, PROVDEL+4, PROVDEL+10
>> VISDT	UPD+28, SETUP+20, CHECK+4, POVDEL+4
VPRV	CHECK+1~, CHECK+24, CHECKPRV+1~, CHECKPRV+9, CHECKPRV+11, CHECKPRV+12, POVDEL+1~, PROVDEL+1~, PROVDEL+2*
VSIT	DEL+2~, DEL+8*, DEL+12, DEL+16, DEL+18, DEL+19, DEL+26, VDEL~, VSTDEL~, VSTDEL+3 , CHECK~, CHECK+15, CHECK+22, CHECK+25, CHECK+31, CHECK+33, POVDEL~, POVDEL+6, POVDEL+10, POVDEL+17 , POVDEL+23, POVDEL+29, POVDEL+35, POVDEL+41, POVDEL+42, PROVDEL~, PROVDEL+3, PROVDEL+9, PROVDEL+10
VTIME	UPD+2~, UPD+24, UPD+25, UPD+26, SETUP+16, SETUP+17, SETUP+18
X	UPD+2~, UPD+21, UPD+22, UPD+23, UPD+26, UPD+27, SETUP+13, SETUP+14, SETUP+15, SETUP+18 , SETUP+19, VDEL+1~, VDEL+3*, VDEL+4
Y	UPD+2~, UPD+27, UPD+28, UPD+32, SETUP+19, SETUP+20, SETUP+21
Y2	UPD+2~, UPD+29*, UPD+32

Customize PDF page

Package: Electronic Dental Record

Routine: BADEHL4

Information

Source Information

Call Graph

Call Graph Total: 8

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: