Routine: IBDF6A

Package	Total	Call Graph
VA Fileman	5	^DIC FILE^DICN ^DIE (,IX)^DIK ^DIR
Automated Information Collection System	4	($$COPYFORM,$$NEWNAME,DELETE)^IBDFU2C DLTBLK^IBDFU3 ($$SLCTFORM,CLINICS,LIST)^IBDFU4 PAUSE^IBDFU5
Registration	1	FULL^VALM1

Entry Points

Name	Comments	DBIA/ICR reference
SETUP	;
DELFORM	;
NEWFORM	;
ADDSETUP(FORM,IBCLINIC,NEW)	;
OVERLAY()	;asks the user if the he wants to overlay the form already used for the clinic setup
COPYFORM	;

External References

Name	Field # of Occurrence
^DIC	DELFORM+7, SETUP+5
FILE^DICN	NEWFORM+7, ADDSETUP+6
^DIE	NEWFORM+12, COPYFORM+11, ADDSETUP+21
^DIK	NEWFORM+13
IX^DIK	NEWFORM+18
^DIR	ADDSETUP+14, OVERLAY+3
$$COPYFORM^IBDFU2C	COPYFORM+6
$$NEWNAME^IBDFU2C	NEWFORM+4, COPYFORM+5
DELETE^IBDFU2C	DELFORM+12, COPYFORM+13
DLTBLK^IBDFU3	NEWFORM+19
$$SLCTFORM^IBDFU4	COPYFORM+4
CLINICS^IBDFU4	DELFORM+8
LIST^IBDFU4	DELFORM+11
PAUSE^IBDFU5	NEWFORM+10
FULL^VALM1	DELFORM+4, NEWFORM+5, COPYFORM+2, SETUP+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"How should the clinic use the form?" Line Location: ADDSETUP+10
Function Call: WRITE	Prompt: !,"But you already have a form for that use!" Line Location: OVERLAY+1
Routine Call	DIE Line Location: NEWFORM+12 COPYFORM+11 ADDSETUP+21
Routine Call	DIC Line Location: DELFORM+7 SETUP+5
Routine Call	DIR Line Location: ADDSETUP+14 OVERLAY+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBE(357 - [#357]	Classic Fileman Calls
^IBE(357.1 - [#357.1]	Classic Fileman Calls
^SD(409.95 - [#409.95]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357 - [#357]	COPYFORM+10
^IBE(357.1 - [#357.1]	NEWFORM+16, NEWFORM+17
^SD(409.95 - [#409.95]	ADDSETUP+4, ADDSETUP+9, ADDSETUP+19

Label References

Name	Line Occurrences
$$OVERLAY	ADDSETUP+19
ADDSETUP	NEWFORM+14, COPYFORM+15, SETUP+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARY	DELFORM+1~, DELFORM+2*, DELFORM+3, DELFORM+8, DELFORM+9, DELFORM+11, DELFORM+12, DELFORM+13
BLOCK	DELFORM+1~, NEWFORM+1~, NEWFORM+16*, NEWFORM+17, NEWFORM+18, NEWFORM+19
CLINIC	DELFORM+1~
DA	NEWFORM+7!, NEWFORM+12!, NEWFORM+13!, NEWFORM+18!, COPYFORM+11!, ADDSETUP+4!, ADDSETUP+7, ADDSETUP+8, ADDSETUP+9, ADDSETUP+19 , ADDSETUP+21!
DD	NEWFORM+6!, ADDSETUP+5!
DIC	DELFORM+6!, DELFORM+7!, NEWFORM+6!, NEWFORM+7!, SETUP+4!, SETUP+5!, ADDSETUP+5!, ADDSETUP+6!
DIC("A"	DELFORM+6, SETUP+4
DIC("S"	DELFORM+6, SETUP+4
DIC(0	DELFORM+6, NEWFORM+6, SETUP+4, ADDSETUP+5
DIE	NEWFORM+7!, NEWFORM+12!, COPYFORM+11!, ADDSETUP+20!*, ADDSETUP+21!
DIE("NO^"	NEWFORM+12, COPYFORM+11
DIK	NEWFORM+13!, NEWFORM+18!
DINUM	NEWFORM+6!, ADDSETUP+5!
DIR	ADDSETUP+11!, ADDSETUP+14!, OVERLAY+2!, OVERLAY+3!
DIR("A"	OVERLAY+2*
DIR(0	ADDSETUP+12, ADDSETUP+13, OVERLAY+2*
>> DIRUT	ADDSETUP+15, OVERLAY+4
DO	NEWFORM+6!, ADDSETUP+5!
DR	NEWFORM+12!, COPYFORM+11!, ADDSETUP+20!, ADDSETUP+21*!
>> DTOUT	SETUP+5
>> DUOUT	SETUP+5
FLD	NEWFORM+1~, ADDSETUP+2~, ADDSETUP+16, ADDSETUP+17, ADDSETUP+18, ADDSETUP+19, ADDSETUP+21
FORM	DELFORM+1~, DELFORM+7, DELFORM+8, DELFORM+12, NEWFORM+1~, NEWFORM+8, NEWFORM+9, NEWFORM+12, NEWFORM+13, NEWFORM+14 , NEWFORM+16, NEWFORM+17, NEWFORM+19, SETUP+1~, SETUP+5*, SETUP+6, ADDSETUP~, ADDSETUP+21
>> IBAPI("INDEX"	NEWFORM+20, COPYFORM+16, SETUP+7
IBCLINIC	NEWFORM+14, COPYFORM+15, SETUP+6, ADDSETUP~, ADDSETUP+4, ADDSETUP+5
IBDELETE	NEWFORM+1~, NEWFORM+13, COPYFORM+1~, COPYFORM+13
IBDVR	NEWFORM+1~
IBOLD	COPYFORM+1~, COPYFORM+10*
IBSCAN	NEWFORM+1~, NEWFORM+2*, COPYFORM+1~
>> IBTKFORM	NEWFORM+14, COPYFORM+15
IBTXTSZ	NEWFORM+1~, NEWFORM+2*
IOSL	DELFORM+11
NAME	NEWFORM+1~, NEWFORM+4, NEWFORM+6, COPYFORM+1~, COPYFORM+5, COPYFORM+6
NEW	ADDSETUP~, ADDSETUP+3*, ADDSETUP+13
NEWFORM	COPYFORM+1~, COPYFORM+6*, COPYFORM+7, COPYFORM+10, COPYFORM+11, COPYFORM+13, COPYFORM+15
NOCANDO	DELFORM+1~, DELFORM+2*
NODE	ADDSETUP+2~, ADDSETUP+9*, ADDSETUP+17
OLDFORM	COPYFORM+1~, COPYFORM+4*, COPYFORM+6
SETUP	DELFORM+1~, ADDSETUP+2~, ADDSETUP+9*
>> VALMBCK	DELFORM+5, NEWFORM+3, COPYFORM+3, SETUP+3
>> X	NEWFORM+6, ADDSETUP+5
>> Y	DELFORM+7, NEWFORM+8, SETUP+5, ADDSETUP+7, ADDSETUP+15, ADDSETUP+16, ADDSETUP+17, OVERLAY+5

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF6A

Information

Source Information

Call Graph

Call Graph Total: 10

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: