Routine: IBDF12

Information

IBDF12 ;ALB/CJM - ENCOUNTER FORM - ENTRY FOR EDITING TOOLKIT FORMS ;JUN 16,1992

Source file <IBDF12.m>

Package	Total	Call Graph
Automated Information Collection System	3	$$PADRIGHT^IBDFU DELETE^IBDFU2C DEVICE^IBDFUA
Registration	3	EN^VALM FLDCTRL^VALM10 EN^VALM2
Kernel	1	KILL^%ZISS

Package	Total	Caller Graph
Automated Information Collection System	1	IBDF EDIT TOOL KIT FORMS
Integrated Billing	1	IBDF EDIT TOOL KIT FORMS

Name	Comments	DBIA/ICR reference
HDR	;
DELFORM	;allows user to select a form, then deletes it
IDXFORMS	;build an array of toolkit forms
SELECT	;
ENTRY	;adds an entry to the array
ONENTRY	;
FORMLIST	;
ONEXIT	;

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357 - [#357]	IDXFORMS+4
^TMP("IB"	ONEXIT+2!
^TMP("IBDF"	ONEXIT+2!

Name	Line Occurrences
ENTRY	IDXFORMS+4
IDXFORMS	ONENTRY+1, DELFORM+7

Name	Field # of Occurrence
D0	ONEXIT+2!
DA	ONEXIT+2!
FORM	IDXFORMS+1~, IDXFORMS+4, ENTRY+2, ENTRY+3, DELFORM+1~, DELFORM+3, DELFORM+4*, DELFORM+5
I	ONEXIT+2!
IBAPI	FORMLIST+1~
IBAPI("INDEX"	FORMLIST+5*
IBAPI("SELECT"	FORMLIST+6*
IBCLINIC	FORMLIST+9*, ONEXIT+2!
IBDEVICE	FORMLIST+1~, FORMLIST+7
IBFASTXT	FORMLIST+3~, FORMLIST+4*
>> IBFORM	SELECT+2, SELECT+5
IBQUIT	ONEXIT+2!
IBTKBLK	FORMLIST+1~, FORMLIST+2*
IBTKFORM	FORMLIST+1~, FORMLIST+2*
NODE	IDXFORMS+1~, IDXFORMS+4*, ENTRY+1
SEL	DELFORM+1~, DELFORM+3, DELFORM+4, SELECT+1~, SELECT+4, SELECT+5
>> VALMAR	IDXFORMS+2, ENTRY+1, ENTRY+2, ENTRY+3, DELFORM+4, SELECT+5
VALMBCK	ONEXIT+2!, DELFORM+6*
>> VALMCNT	IDXFORMS+3, ENTRY+1, ENTRY+2, ENTRY+3
VALMEVL	FORMLIST+8!
>> VALMHDR(1	HDR+1*
VALMY	ONEXIT+2!
VALMY(""	DELFORM+3, SELECT+4
X	ONEXIT+2!
>> XQORNOD(0	DELFORM+2, SELECT+3
XQORS	FORMLIST+8!
Y	ONEXIT+2!