Routine: ADEKRP

Package	Total	Call Graph
IHS Dental System	6	PRINT^ADEKRP1 (ASKDEV,END)^ADEKRP2 ($$ASKYQ,$$ROPT)^ADEKRP3 CF^ADEKRP5 SINGLE^ADEKRP6 $$ADEU^ADEPSUB

Package

Total

Call Graph

IHS Dental System

PRINT^ADEKRP1 (ASKDEV,END)^ADEKRP2 ($$ASKYQ,$$ROPT)^ADEKRP3 CF^ADEKRP5 SINGLE^ADEKRP6 $$ADEU^ADEPSUB

Package	Total	Caller Graph
IHS Dental System	6	ADEKNS ADEKNT ADEKNT6 ADEKRP5 ADEKRP51 ADEKRP6

Package

Total

Caller Graph

IHS Dental System

ADEKNS ADEKNT ADEKNT6 ADEKRP5 ADEKRP51 ADEKRP6

Name	Field # of Occurrence
PRINT^ADEKRP1	ZTM+34, ZTM+35
ASKDEV^ADEKRP2	ASKYQ+18
END^ADEKRP2	END+1
$$ASKYQ^ADEKRP3	ASKYQ
$$ROPT^ADEKRP3	ASKYQ+10
CF^ADEKRP5	ZTM+19, ZTM+21, ZTM+22, ZTM+25
SINGLE^ADEKRP6	ZTM+10, ZTM+13, ZTM+16, ZTM+17, ZTM+18
$$ADEU^ADEPSUB	ASKYQ+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There are no compiled dental statistics stored on this machine." Line Location: ASKYQ+3
Function Call: WRITE	Prompt: !,"If the compiled statistics routines were installed within the" Line Location: ASKYQ+4
Function Call: WRITE	Prompt: !,"past few hours, then the compiler routines are probably running" Line Location: ASKYQ+5
Function Call: WRITE	Prompt: !,"now and haven't finished compiling yet." Line Location: ASKYQ+6
Function Call: WRITE	Prompt: !,"Otherwise, you can start the compiling process manually by" Line Location: ASKYQ+7
Function Call: WRITE	Prompt: !,"Executing the ECMP option (Compile Dental Quarterly Statistics)" Line Location: ASKYQ+8
Function Call: WRITE	Prompt: !,"in the DEO submenu of the DENTAL SUPERVISOR's menu." Line Location: ASKYQ+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ADEKNT - [#9002009.7]	GETCNT+6, GETCNT+12, GETCNT+13, GETCNTEX+20, GETCNTEX+27, GETCNTEX+28
^ADEKNT("AD"	ZTM+16, ZTM+21, ZTM+25, GETCNT+9, GETCNT+12
^ADEKNT("AF"	GETCNTEX+24, GETCNTEX+27
^ADEKNT("B"	GETCNT+4, GETCNT+5, GETCNTEX+18, GETCNTEX+19
^ADEPCD("ALOE"	LOADFAC+5
^TMP("ADEP"	ASKYQ+15!, ASKYQ+16*, ASKYQ+19!, ZTM+1, ZTM+29

Name	Line Occurrences
$$BACK	ZTM+16, ZTM+25
ASKYQ	ASKYQ+11
END	ASKYQ+1, ASKYQ+19, ASKYQ+21, ZTM+1, ZTM+29, ZTM+31

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADE01	GETCNT+2~, GETCNT+3, GETCNT+4, GETCNT+5, GETCNT+6, GETCNT+7, GETCNT+8, GETCNT+9, GETCNT+12, GETCNTEX+16~ , GETCNTEX+17, GETCNTEX+18, GETCNTEX+19, GETCNTEX+20, GETCNTEX+21, GETCNTEX+23, GETCNTEX+24, GETCNTEX+27
ADEAGEG	GETCNT~, GETCNT+3, GETCNT+11, GETCNT+12, GETCNTEX~, GETCNTEX+14, GETCNTEX+17, GETCNTEX+26, GETCNTEX+27
ADEASD	ZTM+2~, ZTM+5*
ADECNT	LOADFAC+2~, LOADFAC+3, LOADFAC+6, LOADFAC+7, GETCNT+2~, GETCNT+10, GETCNT+14, GETCNT+15, GETCNTEX+16~, GETCNTEX+25* , GETCNTEX+29*, GETCNTEX+30
ADEDATE	ZTM+2~
ADEDDS	ZTM+2~
ADEDEN	ZTM+2~, ZTM+5*
ADEDNAM	ZTM+2~
ADEFAC	LOADFAC+2~, LOADFAC+3, LOADFAC+5, LOADFAC+7, GETCNTEX~, GETCNTEX+14, GETCNTEX+17, GETCNTEX+23
ADEH	ZTM+2~, ZTM+15, ZTM+16, ZTM+24, ZTM+25
ADEIEN	GETCNT~, GETCNT+3, GETCNTEX~, GETCNTEX+14, GETCNTEX+17
ADEIOP	ADEKRP+3~, ZTM+33
ADELAG	GETCNT+2~, GETCNT+11, GETCNT+12, GETCNTEX+16~, GETCNTEX+26, GETCNTEX+27
ADEMED	ZTM+2~, ZTM+5*
ADENOD	GETCNT+2~, GETCNT+12, GETCNT+13, GETCNT+14, GETCNTEX+16~, GETCNTEX+27, GETCNTEX+28, GETCNTEX+29
ADEQ	BACK+3~, BACK+8, BACK+9, BACK+10, BACK+11*, BACK+13
ADEREP	ZTM+2~
ADEROPT	ADEKRP+3~, ASKYQ+10*, ASKYQ+11, ZTM+10, ZTM+13, ZTM+17, ZTM+18, ZTM+19, ZTM+22
ADERTN	LOADFAC+2~, LOADFAC+4, LOADFAC+7, LOADFAC+8
ADESER	ZTM+2~
ADEU	ADEKRP+3~, ASKYQ+14*, ASKYQ+15, ASKYQ+16, ASKYQ+19, ZTM+1, ZTM+29
ADEUAG	GETCNT+2~, GETCNT+12, GETCNTEX+16~, GETCNTEX+27
ADEWK1	ZTM+2~
ADEWK2	ZTM+2~
ADEWK3	ZTM+2~
ADEY	BACK+3~, BACK+4, BACK+6, BACK+11, BACK+13
ADEYQ	ADEKRP+3~, ASKYQ*, ASKYQ+1, ASKYQ+2, ZTM+10, ZTM+13, ZTM+14, ZTM+17, ZTM+18, ZTM+19 , ZTM+20, ZTM+22, ZTM+23, GETCNT~, GETCNT+3, GETCNTEX~, GETCNTEX+14, GETCNTEX+17, BACK~, BACK+4 , BACK+8
ADEYQT	ZTM+2~, ZTM+14, ZTM+16, ZTM+20, ZTM+21, ZTM+23, ZTM+25
DIR	ZTM+2~
DIROUT	ADEKRP+4!, END!
DIRUT	ADEKRP+4!, END!
DTOUT	ADEKRP+4!, END!
DUOUT	ADEKRP+4!, END!
>> GETCNT(	GETCNTEX+14
>> IOT	ZTM+32
J	GETCNT+2~, GETCNT+14, GETCNTEX+16~, GETCNTEX+29
>> POP	ASKYQ+19
U	ZTM+33, LOADFAC+7, GETCNT+7, GETCNT+12, GETCNT+13, GETCNT+14, GETCNTEX+21, GETCNTEX+27, GETCNTEX+28, GETCNTEX+29
>> ZTQUEUED	ASKYQ+21, ZTM+1, ZTM+31, ZTM+35
>> ZTREQ	ZTM+1, ZTM+33

Name	Comments	DBIA/ICR reference
ZTM	;EP - TASKMAN PROCESSING PHASE
END
GETCNT(ADEYQ,ADEIEN,ADEAGEG)	;EP
ASKYQ
GETCNTEX(ADEYQ,ADEIEN,ADEAGEG,ADEFAC)
LOADFAC()
BACK(ADEYQ)

Customize PDF page

Package: IHS Dental System

Routine: ADEKRP

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: