Routine: ADEGRL

Package	Total	Call Graph
IHS Dental System	5	INIT^ADEGRL0 (PTLOOK,RESET)^ADEGRL1 ^ADEGRL2 ^ADEGRL3 ^ADEGRL6

Package	Total	Caller Graph
IHS Dental System	2	ADEATT ADELETE

Entry Points

Name	Comments	DBIA/ICR reference
MOD0
MOD1
SEVEN	;------->GET ANOTHER PATIENT
Z
END	;EP
A
SIX	;------->WRITE DATA TO DISK
CHKQ
THREE	;------->GET A VISIT DATE
TWO	;------->LOOK UP A PATIENT
FOUR	;------->LOAD LOCAL VARIABLES WITH CURRENT VISIT DATA
LOAD(ADEDFN)	;Given ADEDFN, loads local arrays with visit data
FIVE	;------->COLLECT VISIT INFO
MOD4	;------->Get Location, Provider, etc.
MOD2
ONE	;------->RESET CONSTANT VALUES
MOD	;EP

External References

Name	Field # of Occurrence
INIT^ADEGRL0	ADEGRL+4
PTLOOK^ADEGRL1	TWO+3
RESET^ADEGRL1	ONE+1
^ADEGRL2	THREE+1
^ADEGRL3	FIVE+1
^ADEGRL6	SIX+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Press RETURN to change LOCATION of ENCOUNTER" Line Location: TWO+1
Function Call: WRITE	Prompt: !,?15,"-OR-" Line Location: TWO+2
Function Call: WRITE	Prompt: !,*7,"ERROR DETECTED -- DENTAL RECORDS ARE IN THE QUEUE WHICH ARE NOT BEING",!,"POSTED. CONTACT SITE MANAGER OR DENTAL HEADQUARTERS FOR ASSISTANCE BEFORE",!,"ENTERING MORE DATA" Line Location: CHKQ+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ADEOPS - [#9002010.03]	Z+1
^ADEPCD - [#9002007]	MOD1, MOD2, MOD2+3, MOD4+2, MOD4+4, MOD4+6, MOD4+8, MOD4+10
^ADEPOST	CHKQ
^ADEPOST(0	CHKQ+1
^ADEUTL("ADEDQUE"	CHKQ+1
^ADEUTL("ADELOCK"	THREE+1!
^ADEUTL($J	END+2, END+3!
^AUTTADA - [#9999999.31]	MOD1+1, MOD2+1
^DIC(16 - [#16]	MOD4+4, MOD4+6
^DIC(4 - [#4]	MOD4+2

Label References

Name	Line Occurrences
END	ADEGRL+4, ONE+1
LOAD	MOD+2
MOD	FOUR+1
MOD1	MOD1+1, MOD2+1
MOD2	A+3, Z+1, Z+4
MOD4	MOD1
ONE	TWO+3
TWO	THREE+1, SEVEN+1

Naked Globals

Name	Field # of Occurrence
^(0	MOD4+2, MOD4+4, MOD4+6, MOD4+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADE	END+4!
ADECNT	END+4!, MOD1!, MOD1+2, MOD2+1, MOD2+2, A+3, Z+2, Z+3
ADECOD	END+4!
ADECON	END+4!, MOD2+1, A
ADED0	END+4!
ADEDEF	END+4!
ADEDEL	END+4!
ADEDENT	END+4!
ADEDES	END+4!
ADEDES(	MOD2+1*
ADEDFN	END+4!, MOD+2, LOAD~, MOD1, MOD2, MOD2+3, MOD4+2, MOD4+4, MOD4+6, MOD4+8 , MOD4+10
ADEDIC	END+4!
ADEDICS	END+4!
ADEDIR	END+4!
ADEDUP	END+4!
ADEDUZ	END+7!
ADEDUZ(2	END+1
ADEFAC	END+4!, MOD+1
ADEFACD	END+4!, MOD+1
ADEFAST	END+4!
ADEFEE	END+4!
ADEFLG	END+4!
ADEHOLD	END+4!
ADEHRN	END+5!
ADEI	END+5!
ADEJ	END+5!, LOAD+1~, MOD0, MOD1, MOD1+1, MOD2, MOD2+1
ADEK	END+5!, LOAD+1~, MOD1!, MOD1+2, MOD2, MOD2+1*, MOD2+3
ADELIN	END+5!
ADELN	END+5!
ADELOCFC	END+7!
ADELOCSI	END+7!
ADELOE	END+5!, MOD+1, MOD4+1!, MOD4+2, MOD4+3*
ADELOED	END+5!, MOD+1, MOD4+1!, MOD4+2, MOD4+3*
ADEMOD	END+5!
ADENEW	END+5!
ADENEWPT	END+5!
ADENEWVS	END+5!, MOD+1
ADENOD	LOAD+1~, MOD2+3*, A, A+1, A+2, Z
ADENONR	LOAD+1~, MOD1+2, MOD2+1, A+3
ADENOOP	END+5!
ADENOTE	END+5!, MOD+1, MOD4+8, MOD4+9*
ADENOUPD	END+5!
ADEODFN	END+5!
ADEOP	END+5!, LOAD+1~, MOD0, MOD1!, MOD1+2, MOD2+1, Z+2*
ADEPAT	THREE+1, END+5!
ADEPC	END+5!
ADEPNM	END+5!
ADEPRO	END+5!, MOD+1
ADEPROD	END+6!, MOD+1
ADEPVNM	END+6!, MOD+1, MOD4+1!, MOD4+4, MOD4+5*
ADEPVNMD	END+6!, MOD+1, MOD4+1!, MOD4+4, MOD4+5*
ADEQTY	END+6!
ADEQUIT	END+7!
ADERDNM	END+6!, MOD+1, MOD4+1!, MOD4+6, MOD4+7*
ADERDNMD	END+6!, MOD+1, MOD4+1!, MOD4+6, MOD4+7*
ADEREB	END+6!
ADEREP	END+6!, MOD+1
ADEREPD	END+6!, MOD+1
ADES	END+6!
ADESFC	LOAD+1~, MOD1+2, MOD2+1, Z+3
ADESTR	END+6!
ADESVC	END+6!
ADETCH	SEVEN+1!, END+6!, MOD+1, MOD4+10
ADETCHF	SEVEN+1!, END+6!, MOD+1, MOD4+10
ADETFE	END+6!, LOAD+1~, MOD1+2, MOD2+1, A
ADETITL	END+6!
ADETMP	END+6!
ADEV	END+6!
ADEV(	MOD2+1*
ADEVCNT	END+6!
ADEVDATE	END+6!
ADEVDFN	END+7!
ADEVFM	END+7!
ADEVIS	END+7!
ADEX	END+7!, LOAD+1~, A+1*, A+3, Z+1, Z+2
ADEY	END+7!, LOAD+1~, Z*, Z+3
ADEZ	LOAD+1~, A+2*, A+3
>> AUPNLK("ALL"	END+7!
DUZ(2	END+1, END+2
U	MOD2+1, A, A+1, A+2, Z, MOD4+2, MOD4+4, MOD4+6, MOD4+8, MOD4+10
>> Y	ADEGRL+4, ONE+1, TWO+3, THREE+1, CHKQ, CHKQ+1, CHKQ+2*

Customize PDF page

Package: IHS Dental System

Routine: ADEGRL

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: