Routine: ADEPDDS

Package	Total	Call Graph
IHS Dental System	5	$$HAT^ADEPQA ($$ADEU,ASKDEV,MDATE,PRINT)^ADEPSUB ($$DDS,$$HYG,CALC4,DSERIES)^ADEPSUB1 DSCREEN^ADEPSUB3 END^ADEPSUB4

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There is no one classed as a DENTIST in the PROVIDER file!" Line Location: ADEPDDS+9

Name	Line Occurrences (* Changed, ! Killed)
^ADEPCD("AC"	ROLL+3, ROLL+4
^TMP("ADEP"	ADEPDDS+16!, ADEPDDS+17*, ADEPDDS+20!, ZTM+1, ZTM+7

Name	Line Occurrences
END	ADEPDDS+8, ADEPDDS+11, ADEPDDS+20, ADEPDDS+21, ZTM+1, ZTM+7, ZTM+9
PRINT	ZTM+12, ZTM+13
ROLL	ZTM+5

Name	Field # of Occurrence
ADEBEG	ROLL+1~, ROLL+2, ROLL+3, ROLL+4
ADEDATE	ADEPDDS+3~, ROLL+2
ADEDDS	ADEPDDS+3~, ADEPDDS+6*, ADEPDDS+8
ADEDFN	ROLL+1~, ROLL+3, ROLL+4
ADEDNAM	ADEPDDS+3~
ADEHNAM	ADEPDDS+3~
ADEHYG	ADEPDDS+3~, ADEPDDS+7*
ADEIOP	ADEPDDS+3~, ZTM+11
ADEND	ROLL+1~, ROLL+2*, ROLL+3
ADEREP	ADEPDDS+3~
ADESER	ADEPDDS+3~
ADEU	ADEPDDS+3~, ADEPDDS+14*, ADEPDDS+16, ADEPDDS+17, ADEPDDS+20, ZTM+1, ZTM+7
ADEWK1	ADEPDDS+3~
ADEWK2	ADEPDDS+3~
ADEWK3	ADEPDDS+3~
DIR	ADEPDDS+3~
DIROUT	ADEPDDS+4!, END!
DIRUT	ADEPDDS+4!, END!
DTOUT	ADEPDDS+4!, END!
DUOUT	ADEPDDS+4!, END!
>> IOT	ZTM+10
>> POP	ADEPDDS+20
U	ZTM+11, ROLL+2
>> ZTQUEUED	ZTM+1, ZTM+9, ZTM+13
>> ZTREQ	ZTM+1, ZTM+11
>> ZTSK	ADEPDDS+21

Information