Routine: IBDF6

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Automated Information Collection System	5	UNCMPL^IBDF19 PRNTPRMS^IBDFU1C (CLINICS,LIST)^IBDFU4 ($$LOCKFRM2,FREEFRM2,LOCKMSG2)^IBDFU7 DEVICE^IBDFUA
Registration	4	EN^VALM FULL^VALM1 FLDCTRL^VALM10 EN^VALM2
Kernel	1	KILL^%ZISS
VA Fileman	1	^DIR

Package

Total

Call Graph

Automated Information Collection System

UNCMPL^IBDF19 PRNTPRMS^IBDFU1C (CLINICS,LIST)^IBDFU4 ($$LOCKFRM2,FREEFRM2,LOCKMSG2)^IBDFU7 DEVICE^IBDFUA

Registration

EN^VALM FULL^VALM1 FLDCTRL^VALM10 EN^VALM2

Kernel

KILL^%ZISS

VA Fileman

^DIR

Package	Total	Caller Graph
Automated Information Collection System	1	IBDF CLINIC SETUP/EDIT FORMS
Integrated Billing	1	IBDF CLINIC SETUP/EDIT FORMS

Package

Total

Caller Graph

Automated Information Collection System

IBDF CLINIC SETUP/EDIT FORMS

Integrated Billing

IBDF CLINIC SETUP/EDIT FORMS

Entry Points

Name	Comments	DBIA/ICR reference
PR(STR,LEN)	; pad right
CLNCNAME()	;
DISPLAY1(FORM,USE,ID)	;
ONEXIT	;
CHNGCLNC	;allows the user to change the clinic
SELECT
IDXFORMS	;build an array of forms used by IBCLINIC for the list processor
CLINIC	;
FORMLIST	;
ENTRY	;adds an entry to the array
ONENTRY	;
DISPLAY2(FORM)	;
SP(LEN)	;
EDITFORM	;allows user to select a form, then displays it for edit
HDR	;

External References

Name	Field # of Occurrence
KILL^%ZISS	ONEXIT+1
^DIR	EDITFORM+7, CLINIC+3
UNCMPL^IBDF19	EDITFORM+10
PRNTPRMS^IBDFU1C	EDITFORM+10
CLINICS^IBDFU4	EDITFORM+7
LIST^IBDFU4	EDITFORM+7
$$LOCKFRM2^IBDFU7	EDITFORM+9
FREEFRM2^IBDFU7	EDITFORM+10
LOCKMSG2^IBDFU7	EDITFORM+9
DEVICE^IBDFUA	FORMLIST+3
EN^VALM	FORMLIST+12, EDITFORM+10
FULL^VALM1	CHNGCLNC+2
FLDCTRL^VALM10	ENTRY+3
EN^VALM2	SELECT+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The form is in use by other clinics!" Line Location: EDITFORM+7
Routine Call	VALM Line Location: FORMLIST+12 EDITFORM+10
Routine Call	DIR Line Location: EDITFORM+7 CLINIC+3

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357 - [#357]	IDXFORMS+7, DISPLAY1+3, DISPLAY2+3
^SC - [#44]	CLNCNAME+1
^SD(409.95 - [#409.95]	IDXFORMS+4, IDXFORMS+5
^TMP("IB"	ONEXIT+2!
^TMP("IBDF"	ONEXIT+2!

Name	Line Occurrences
$$CLNCNAME	HDR+1
$$DISPLAY1	ENTRY+3
$$DISPLAY2	ENTRY+4
$$PR	DISPLAY1+5
$$SP	DISPLAY1+2, DISPLAY1+5, DISPLAY2+2
CLINIC	FORMLIST+11, CHNGCLNC+4
ENTRY	IDXFORMS+9
HDR	CHNGCLNC+5
IDXFORMS	ONENTRY+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARY	EDITFORM+1~, EDITFORM+2*, EDITFORM+4, EDITFORM+7, EDITFORM+8!
B	PR+2~, PR+3*, PR+4
D0	ONEXIT+2!
DA	ONEXIT+2!, CLINIC+1~
DESCR	DISPLAY2+1~, DISPLAY2+4*, DISPLAY2+5
DFN	EDITFORM+1~
DIC	CLINIC+1~
DIE	CLINIC+1~
DIR	FORMLIST+9!, EDITFORM+7!, CLINIC+1~, CLINIC+4!
DIR("A"	EDITFORM+7, CLINIC+2
DIR("B"	EDITFORM+7*
DIR(0	EDITFORM+7, CLINIC+2
>> DIRUT	EDITFORM+7, CLINIC+5
DR	CLINIC+1~
FORM	IDXFORMS+1~, IDXFORMS+6*, IDXFORMS+7, ENTRY+3, ENTRY+4, DISPLAY1~, DISPLAY1+3, DISPLAY2~, DISPLAY2+3
I	ONEXIT+2!
IBAPI	FORMLIST+1~
IBAPI("INDEX"	FORMLIST+5*, CHNGCLNC+6
IBAPI("SELECT"	FORMLIST+6*, EDITFORM+6
IBAPPT	EDITFORM+1~
IBCLINIC	FORMLIST+10, FORMLIST+12, ONEXIT+2!, CLINIC+6, IDXFORMS+4, CLNCNAME+1, CHNGCLNC+1, CHNGCLNC+4*
IBDEVICE	FORMLIST+1~, FORMLIST+3
IBFASTXT	FORMLIST+7~, FORMLIST+8*
IBFORM	FORMLIST+1~, EDITFORM+1~, EDITFORM+7, EDITFORM+9, EDITFORM+10, SELECT+4*
IBPRINT	EDITFORM+1~, EDITFORM+10
IBQUIT	ONEXIT+2!
IBTKFORM	FORMLIST+1~, FORMLIST+4*
ID	IDXFORMS+1~, IDXFORMS+3, ENTRY+3, ENTRY+4, DISPLAY1~, DISPLAY1+2
IOBLC	FORMLIST+1~
IOBRC	FORMLIST+1~
IOHL	FORMLIST+1~
IOTLC	FORMLIST+1~
IOTRC	FORMLIST+1~
IOVL	FORMLIST+1~
LEN	PR~, PR+1, PR+2, PR+3, SP~, SP+1, SP+2
NAME	DISPLAY1+1~, DISPLAY1+4*, DISPLAY1+5
NODE	IDXFORMS+1~, IDXFORMS+5, IDXFORMS+6, DISPLAY1+1~, DISPLAY1+3, DISPLAY1+4, DISPLAY2+1~, DISPLAY2+3*, DISPLAY2+4
RET	DISPLAY1+1~, DISPLAY1+2, DISPLAY1+5, DISPLAY1+6, DISPLAY2+1~, DISPLAY2+2, DISPLAY2+5, DISPLAY2+6
RTNLIST	EDITFORM+1~
S	SP+2~*, SP+3
SAVECLNC	CHNGCLNC+1~*, CHNGCLNC+4
SEL	SELECT+1~, SELECT+3*, SELECT+4
SETUP	IDXFORMS+1~, IDXFORMS+3, IDXFORMS+4, IDXFORMS+5
STR	PR~, PR+2*, PR+3, PR+4
SUB	IDXFORMS+1~, IDXFORMS+6*, ENTRY+1, ENTRY+2, ENTRY+4
SUBREC	IDXFORMS+1~
USE	IDXFORMS+1~, IDXFORMS+8, ENTRY+1, ENTRY+2*, ENTRY+3, DISPLAY1~, DISPLAY1+5
>> VALMAR	IDXFORMS+2, ENTRY+3, ENTRY+4, SELECT+4
VALMBCK	ONEXIT+2!, EDITFORM+5, EDITFORM+11, CHNGCLNC+3*
>> VALMCNT	IDXFORMS+3, ENTRY+3, ENTRY+4*
VALMEVL	FORMLIST+9!
>> VALMHDR(1	HDR+1*
VALMY	ONEXIT+2!
VALMY(""	SELECT+3
X	ONEXIT+2!
>> XQORNOD(0	SELECT+2
XQORS	FORMLIST+9!
Y	ONEXIT+2!, EDITFORM+7, CLINIC+5, CLINIC+6

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF6

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: