Routine: IBDE3

Information

IBDE3 ;ALB/CJM - ENCOUNTER FORM - IMP/EXP UTILITY -DISPLAYS TOOLKIT BLOCKS ;AUG 12,1993

Source Information

Source file <IBDE3.m>

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Automated Information Collection System	9	UPDATE^IBDECLN $$TKORDER^IBDF13 $$PADRIGHT^IBDFU $$COPYBLK^IBDFU2 $$TKFORM^IBDFU2C DLTBLK^IBDFU3 $$SLCTFORM^IBDFU4 $$RUSURE^IBDFU5 $$SLCTBLK^IBDFU8
Registration	4	EN^VALM FULL^VALM1 FLDCTRL^VALM10 EN^VALM2
VA Fileman	2	^DIE ^DIR

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Automated Information Collection System	3	IBDE IBDE1 IBDE2

Entry Points

Name	Comments	DBIA/ICR reference
SELECT()	;allows the user to select a form, then a block from it
HDR	;
EDIT	;allows the export notes of a block to be edited
IDXBLKS	;build an array of forms used by IBCLINIC for the list processor
VIEW	;allows the export notes of a form to be edited
ADD	;adds a block to the work space
VIEWHDR	;
IMPORT	;allows the user to pick a block from the imp/exp files, then import it
ONENTRY	;
DELETE	;deletes a block from the work space
DISPLAY(BLOCK,ID)	;
NEWNAME(OLDNAME)	;asks the user to select uniqued toolkit block name
ONEXIT	;

External References

Name	Field # of Occurrence
^DIE	ADD+6, EDIT+5
^DIR	SELECT+5, NEWNAME+9
UPDATE^IBDECLN	IMPORT+12
$$TKORDER^IBDF13	IMPORT+8
$$PADRIGHT^IBDFU	DISPLAY+4
$$COPYBLK^IBDFU2	ADD+5, IMPORT+8
$$TKFORM^IBDFU2C	IMPORT+8, SELECT+8
DLTBLK^IBDFU3	DELETE+4, IMPORT+9
$$SLCTFORM^IBDFU4	SELECT+9
$$RUSURE^IBDFU5	DELETE+4
$$SLCTBLK^IBDFU8	SELECT+12
EN^VALM	VIEW+6
FULL^VALM1	ADD+2, EDIT+3, IMPORT+4
FLDCTRL^VALM10	ONENTRY+3, IDXBLKS+5
EN^VALM2	DELETE+3, EDIT+2, IMPORT+3, VIEW+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There is already a toolkit block with that name! The name should be unique." Line Location: NEWNAME+10
Routine Call	VALM Line Location: VIEW+6
Routine Call	DIE Line Location: ADD+6 EDIT+5
Routine Call	DIR Line Location: SELECT+5 NEWNAME+9

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBE(358.1 - [#358.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357.1 - [#357.1]	NEWNAME+10
^IBE(358 - [#358]	HDR+2
^IBE(358.1 - [#358.1]	IDXBLKS+3, IDXBLKS+4, DISPLAY+3, DELETE+4, IMPORT+6, VIEWHDR+1

Label References

Name	Line Occurrences
$$DISPLAY	IDXBLKS+5
$$NEWNAME	IMPORT+6
$$SELECT	ADD+4
IDXBLKS	ADD+7, DELETE+6, EDIT+7, IMPORT+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BLKCNT	ONENTRY+2, IDXBLKS+6*
>> BLKLIST	ONENTRY+3, IDXBLKS+2, IDXBLKS+5
BLOCK	IDXBLKS+1~, IDXBLKS+3, IDXBLKS+4, IDXBLKS+5, DISPLAY~, DISPLAY+3, DELETE+4, EDIT+1~, EDIT+4, EDIT+5 , IMPORT+1~, IMPORT+5, IMPORT+6, IMPORT+8, IMPORT+9, VIEW+1~, VIEW+3*, VIEW+5, VIEWHDR+1
DA	ADD+6!, EDIT+5!
DIE	ADD+6!, EDIT+5!
DIR	SELECT+3!, SELECT+5!, NEWNAME+5!, NEWNAME+12!
DIR("?"	NEWNAME+5*
DIR("A"	SELECT+4, NEWNAME+5
DIR("B"	NEWNAME+6*
DIR(0	SELECT+3, NEWNAME+5
>> DIRUT	SELECT+6, NEWNAME+9
DR	ADD+6!, EDIT+5!
FORM	DELETE+1~
FOUND	NEWNAME+4~, NEWNAME+7, NEWNAME+8, NEWNAME+10, NEWNAME+11
IBARY	VIEW+1~, VIEW+5*
IBBLK	SELECT+1~, SELECT+2, SELECT+12, SELECT+13
IBFORM	SELECT+1~, SELECT+2, SELECT+8, SELECT+9*, SELECT+10, SELECT+12
IBHDRRTN	VIEW+1~, VIEW+4*
IBTKBLK	DELETE+1~, DELETE+2, IMPORT+1~, IMPORT+2
ID	DISPLAY~, DISPLAY+2
LINE	ONENTRY+1~, ONENTRY+3*
NAME	IMPORT+1~, IMPORT+6, IMPORT+7, IMPORT+8, NEWNAME+4~, NEWNAME+11*, NEWNAME+13
NEWBLOCK	ADD+1~, ADD+5, ADD+6, IMPORT+1~, IMPORT+8, IMPORT+9
NODE	IDXBLKS+1~, DISPLAY+1~, DISPLAY+3*, DISPLAY+4
OLDBLOCK	ADD+1~, ADD+4*, ADD+5
OLDNAME	NEWNAME~, NEWNAME+6
ORDER	IDXBLKS+1~, IDXBLKS+3, NEWNAME+4~, NEWNAME+10
PICK	DELETE+1~, DELETE+4, EDIT+1~, EDIT+4, IMPORT+1~, IMPORT+5, VIEW+1~, VIEW+3
RET	DISPLAY+1~, DISPLAY+2, DISPLAY+4, DISPLAY+5
TKBLK	NEWNAME+4~, NEWNAME+10*
>> VALMAR	DELETE+4, EDIT+4, IMPORT+5, VIEW+3
>> VALMBCK	ADD+3, DELETE+5, EDIT+6, IMPORT+10, VIEW+7*
>> VALMCNT	ONENTRY+2, IDXBLKS+3, IDXBLKS+5*, IDXBLKS+6
>> VALMHDR(1	HDR+1, VIEWHDR+1
>> VALMHDR(3	HDR+2*
>> VALMY(	DELETE+4, EDIT+4, IMPORT+5, VIEW+3
>> XQORNOD(0	DELETE+3, EDIT+2, IMPORT+3, VIEW+2
>> Y	SELECT+6, SELECT+7, SELECT+9, NEWNAME+9*, NEWNAME+10, NEWNAME+11

Customize PDF page

Package: Automated Information Collection System

Routine: IBDE3

Call Graph Total: 15

Caller Graph Total: 3