Routine: ADEXSU1

Package	Total	Call Graph
VA Fileman	3	FILE^DICN ^DIE ^DIK
IHS Dental System	2	(ERR10,ERR12,ERR3,ERR4,ERR5,ERR6)^ADEXSU2 FIN^ADEXSU3

Package	Total	Caller Graph
IHS Dental System	2	ADEXSU0 ADEXSU3

Entry Points

External References

Name	Field # of Occurrence
ERR10^ADEXSU2	VIS1+17
ERR12^ADEXSU2	VIS1+7
ERR3^ADEXSU2	VIS1+10, VIS1+11
ERR4^ADEXSU2	EXT1+3
ERR5^ADEXSU2	VIS1+3
ERR6^ADEXSU2	VIS1+5
FIN^ADEXSU3	START+37
FILE^DICN	START+21
^DIE	START+35
^DIK	START+13

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,?10,"D E N T A L D A T A E X T R A C T I O N B E G U N",! Line Location: START+3
Function Call: WRITE	Prompt: !,?15,"RECORD SCANNING " Line Location: CHKY1+1
Function Call: WRITE	Prompt: "." Line Location: CHKY1+3
Function Call: WRITE	Prompt: !,?15,"COMPLETED",! Line Location: CHKY1+4
Routine Call	DIE Line Location: START+35

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ADELOG - [#9002009]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TRAP"	CHKY2+1
^ADENDATA	START+5, START+7!, VIS1+21*
^ADENDATA(0	START+26*
^ADEPCD - [#9002007]	CHKY3, CHKY3+1, CHKY3+3, CHKY3B, CHKY3B+1, CHKY3B+3*, VIS1+17, VIS1+20, ADAQ1, ADAQ1+2 , ADAQ1+3, ADAQ1+5
^ADEPCD("AC"	CHKY1+3, RESTART+1
^ADEPCD("AI"	CHKY3B+3*
^AUPNPAT - [#9000001]	EXT1+9, EXT1+10, VIS1+13
^AUTTADA - [#9999999.31]	ADAQ, ADAQ2
^AUTTBEN - [#9999999.25]	EXT1+12
^AUTTLOC - [#9999999.06]	START+26, VIS1+11, VIS1+12
^AUTTSITE(1	START+26
^DIC(16 - [#16]	VIS1+6
^DIC(4 - [#4]	START+26
^DPT - [#2]	EXT1+3, EXT1+4, EXT1+8

Label References

Name	Line Occurrences
ADAQ	VIS1+20
ADAQ1	ADAQ1+2, ADAQ1+3, ADAQ1+6
ADAQ2	ADAQ1+1
CHKY1	START+24
CHKY2	CHKY1+3
CHKY3	RESTART+1
CHKY3B	CHKY3+2
EXT1	CHKY3+4, CHKY3B+2
VIS1	CHKY3+4, CHKY3B+2

Naked Globals

Name	Field # of Occurrence
^(0	VIS1+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ADEA	CHKY2, RESTART+1, CHKY3, CHKY3+1, CHKY3+3, CHKY3B, CHKY3B+1, CHKY3B+3, VIS1+17, VIS1+20 , ADAQ1, ADAQ1+2, ADAQ1+3, ADAQ1+5
>> ADEADACP	VIS1+19, VIS1+20, ADAQ, ADAQ1, ADAQ2
>> ADEADAF	ADAQ+1, ADAQ1+5, ADAQ2+3*, ADAQ2+4
>> ADEADAQ	ADAQ+1, ADAQ1+4, ADAQ2+2*, ADAQ2+4
>> ADEASF	EXT1+1, VIS1+12, VIS1+16, VIS1+21
>> ADEASITE	VIS1+16*, VIS1+21
>> ADEBDT	START+18, START+26, CHKY1+2
>> ADEC	ADAQ+1, ADAQ1, ADAQ1+1, ADAQ1+2, ADAQ1+3, ADAQ1+5
>> ADECHS	CHKY3B+1
>> ADECOD	ADAQ2*, ADAQ2+1, ADAQ2+4
>> ADEDFN	EXT1+2*, EXT1+3, EXT1+4, EXT1+8, EXT1+9, EXT1+10, VIS1+13
>> ADEDOB	EXT1+1, EXT1+6, VIS1+21
>> ADEDT	CHKY1+2, CHKY1+3, RESTART+1
>> ADEHRN	EXT1+1, VIS1+13, VIS1+21
>> ADEIDX	VIS1+20*
ADELAST	START+16~, START+19, START+23!, START+31~, START+32, START+36!
ADELETE	START+11*, START+14!
>> ADENAT	EXT1+1, EXT1+9, EXT1+10, EXT1+11, EXT1+12, EXT1+13, VIS1+21
>> ADEND	START+18, START+26, CHKY1+3
>> ADENODE	EXT1+4*, EXT1+6, EXT1+7
>> ADERC	START+1, START+26, START+33, START+34, VIS1+21
>> ADEREPD	VIS1+4*, VIS1+5, VIS1+6
>> ADERERUN	START+9
>> ADEREX	START+15, START+34, CHKY3+2
>> ADERROR	CHKY3+1*, CHKY3+4, CHKY3B+2
>> ADESEX	EXT1+1, EXT1+7, VIS1+21
>> ADESITE	EXT1+1, VIS1+9, VIS1+10, VIS1+11, VIS1+12, VIS1+13
ADESUB	START+6, START+7, START+8!
>> ADESUFAC	VIS1+16*, VIS1+21
>> ADESVCS	VIS1+18, VIS1+21, ADAQ2+4
>> ADETCOST	EXT1+1, VIS1+14, VIS1+15*, VIS1+21
>> ADETYPE	VIS1+8*, VIS1+21
>> ADEVDTE	EXT1+1, VIS1+2, VIS1+3, VIS1+21
>> ADEVDTP	EXT1+1, VIS1+6, VIS1+7, VIS1+21
>> ADEVNODE	CHKY3+1*, EXT1+2, VIS1+2, VIS1+4, VIS1+8, VIS1+9, VIS1+14
>> ADEXDA	START+10, START+12, START+22*, START+32
>> ADEXDT	START+17, START+26, CHKY3+3, CHKY3B+3
>> ADEZIP	EXT1+1, EXT1+8, VIS1+21
DA	START+12, START+31~, START+32, START+36!
DD	START+20!
DIC	START+16~, START+17*, START+23!
DIC("DR"	START+18*
DIC(0	START+17*
DIDEL	START+14!
DIE	START+14!, START+31~, START+32*, START+36!
>> DIK	START+12*
DO	START+20!
DR	START+14!, START+16~, START+23!, START+31~, START+33, START+34, START+36!
IO	START+2
U	START+26, CHKY3+3, CHKY3B, CHKY3B+1, CHKY3B+3, EXT1+2, EXT1+6, EXT1+7, EXT1+8, EXT1+10 , EXT1+12, VIS1+2, VIS1+4, VIS1+6, VIS1+8, VIS1+9, VIS1+12, VIS1+13, VIS1+14, VIS1+21 , ADAQ1+3, ADAQ1+5, ADAQ2
X	START+16~, START+17, START+23!, CHKY2+1
>> Y	START+22

Customize PDF page

Package: IHS Dental System

Routine: ADEXSU1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
VIS1	;S ADEVDTE=$E($P(ADEVNODE,U,2),2,7) ;MJL 4/26/99
EXT1	;
ADAQ
ADAQ2
START	;EP
ADAQ1
CHKY3B
CHKY3
CHKY1	;GET FIRST DATE FROM "AF" XREF
CHKY2
RESTART	;EP