Routine: ADE0608

Package	Total	Call Graph
VA Fileman	3	FIND^DIC (UPDATE,WP)^DIE ^DIK

Package	Total	Caller Graph
IHS Dental System	2	ADE60P12 ADE60P13

Entry Points

Name	Comments	DBIA/ICR reference
CTL	; ; Find all "[EXTRACTION" edits and update, changing nothing, in order to fire cross-references that ; use the updated string of ADA codes defined in the "EXTRACTIONS" DENTAL CODE EDIT GROUP. This is ; convoluted because the cross-reference logic should have been defined in the file definition of the ; DENTAL CODE EDIT GROUP, not where it currently is, in the file definition for DENTAL EDIT.
EDIT	;
KILL	;
FILE	;
EDITGRP	;

FileNo	Call Tags
^ADEDIT - [#9002007.9]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ADEDIT("GRP" - [#9002007.91]	EDITGRP+10

Name	Field # of Occurrence
ADEADA	KILL+1!
ADECNT	KILL+1!
ADECODE	KILL+1!
ADEDESC	KILL+1!
ADEDIT	KILL+1!
ADEDIT("DILIST"	CTL+11, CTL+16, EDIT+1
ADEDONE	KILL+1!
ADEEMSG	CTL+9, FILE+2!, FILE+6!, KILL+1!
>> ADEERR	FILE+3*
ADEFDA	FILE+2!, FILE+6!, KILL+1!
ADEFDA(	EDITGRP+3, EDITGRP+4, EDITGRP+6, EDITGRP+7, EDIT+1*
ADEFILE	CTL+7, CTL+8, CTL+15, EDITGRP+2*, EDITGRP+3, EDITGRP+4, EDITGRP+6, EDITGRP+7, EDIT+1, FILE+5 , KILL+1!
ADEICD9	KILL+1!
ADEID	KILL+1!
ADEIEN	FILE+6!
ADEIEN(1	CTL+16*, FILE+3, FILE+5
ADEIENST	CTL+15, EDITGRP+2, EDITGRP+3, EDITGRP+4, EDITGRP+6, EDITGRP+7, EDIT+1, KILL+1!
ADELEV	KILL+1!
ADEMIN	KILL+1!
ADEMNE	KILL+1!
ADEN	CTL+11, CTL+16, EDIT+1, KILL+1!
ADERLN	KILL+1!
ADERN	KILL+1!
ADERTN	KILL+1!
ADESYN	KILL+1!
ADETDT	KILL+1!
ADETEXT	FILE+6!, KILL+1!
ADETEXT(1	FILE+5
ADETXT	CTL+15, EDITGRP+2, FILE+5, KILL+1!
ADEUPDF	CTL+15, EDITGRP+2, FILE+1, KILL+1!
ADEUSE	KILL+1!
ADEWPFLD	CTL+15, EDITGRP+2, FILE+5, KILL+1!
DA	CTL+11, EDITGRP+10, KILL+1!
DIC	KILL+1!
DIE	KILL+1!
>> DIK	CTL+11, EDITGRP+10
DR	KILL+1!
X	KILL+1!