Routine: ADEUPD20

Information

ADEUPD20 ;IHS/OIT/ENM - ADE6.0 PATCH 20 [ 09/25/2009 13:07 PM ]

Package	Total	Call Graph
VA Fileman	1	(,UPDATE,WP)^DIE

Package	Total	Caller Graph
IHS Dental System	1	ADE6P202

Name	Comments	DBIA/ICR reference
FILE	;EP
DELETES(ADETGRTN,ADESETX,ADEDIK)
SETFDA	;EP ; Corresponds to values in X: the first is the field that is set with the first piece, etc. If a value isn't used to set a field ; nothing should be entered for that piece; should be left empty e.g. ".01,02,,.09"
UPDATE(ADEFILE,ADEFLDS,ADEWPFLD,ADEIENST,ADETGRTN,ADESETX)	;EP

Name	Field # of Occurrence
ADECURX	UPDATE+9!
ADEDIK	DELETES~, DELETES+4
ADEDONE	UPDATE+2, UPDATE+3, UPDATE+4, UPDATE+9!
ADEEMSG	FILE+2!, FILE+5!
ADEEND	UPDATE+9!
ADEFDA	UPDATE+1~, FILE+2!
ADEFDA(	SETFDA+3*
ADEFILE	UPDATE~, SETFDA+3, FILE+4
>> ADEFLD	SETFDA+3*
ADEFLDS	UPDATE~, UPDATE+2, SETFDA+3
ADEI	UPDATE+3, UPDATE+9!, DELETES+2
ADEI1	UPDATE+9!, SETFDA+3*
ADEIEN	FILE+5!
ADEIEN(1	FILE+4
ADEIENST	UPDATE~, SETFDA+3
ADELSTN	UPDATE+6*, UPDATE+9!
ADEN	UPDATE+2, UPDATE+6, UPDATE+9!, SETFDA+4
ADENFLDS	UPDATE+2*, UPDATE+9!, SETFDA+3
ADERPEAT	UPDATE+2*, UPDATE+5, UPDATE+9!
ADESETX	UPDATE~, UPDATE+6, DELETES~, DELETES+3
ADESTART	UPDATE+9!
ADESVX	UPDATE+9!
ADETEXT	UPDATE+4!, UPDATE+9!
ADETEXT(	UPDATE+8*
ADETEXT(1	FILE+4
ADETGRTN	UPDATE~, DELETES~
ADETXT	UPDATE+2, UPDATE+4, UPDATE+8*, UPDATE+9!
ADEWPFLD	UPDATE~, UPDATE+7, FILE+4
ADEX	UPDATE+3, UPDATE+4, UPDATE+8, UPDATE+9!, SETFDA+3, SETFDA+4, DELETES+2, DELETES+4
ADEX1	UPDATE+9!, SETFDA+3*
>> DA	DELETES+4*
>> DIE	DELETES+4*
>> DR	DELETES+4*
U	UPDATE+4, SETFDA+3, SETFDA+4

Name	Field # of Occurrence
$T(@$PIECE^2;4(3)+ADEI^@$PIECE^2;4(5)	UPDATE+3, DELETES+2