PXRMEDIT	; SLC/PKR - Clinical Reminder edit driver. ;06/04/2007
	;;2.0;CLINICAL REMINDERS;**6**;Feb 04, 2005;Build 123
	;
EDIT(ROOT,IENN)	;Call the appropriate edit routine.
	;Reminder location list
	I ROOT="^PXRMD(810.9," D EDIT^PXRMLLED(ROOT,IENN) Q
	;
	;Taxonomy
	I ROOT="^PXD(811.2," D EDIT^PXRMTEDT(ROOT,IENN) Q
	;
	;Reminder term
	I ROOT="^PXRMD(811.5," D EDIT^PXRMTMED(ROOT,IENN) Q
	;
	;Reminder definition
	I ROOT="^PXD(811.9," D
	.;Build list of finding types for finding edit
	. N DEF,DEF1,DEF2 D DEF^PXRMRUTL("811.902",.DEF,.DEF1,.DEF2)
	.;Edit reminder
	. D ALL^PXRMREDT(ROOT,IENN) Q
	Q
	;
