Routine: IBDF3

Information

IBDF3 ;ALB/CJM - ENCOUNTER FORM - EDIT SELECTION LIST ;NOV 16,1992

Source Information

Source file <IBDF3.m>

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Automated Information Collection System	6	UNCMPBLK^IBDF19 SLCTNS^IBDF4 $$PADRIGHT^IBDFU $$LSTDSCR2^IBDFU1 IDXBLOCK^IBDFU4 ($$RUSURE,PAUSE)^IBDFU5
VA Fileman	5	IX^DIC FILE^DICN ^DIE (,IX)^DIK ^DIR
Registration	4	EN^VALM PAUSE^VALM1 FLDCTRL^VALM10 EN^VALM2

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Automated Information Collection System	4	IBDF4 IBDF4A IBDFGRP IBDFQEA

Entry Points

Name	Comments	DBIA/ICR reference
SLCTNCNT(GRP)	;
ONEXIT	;
EDITGRP	;
IDXGRP	;build an index of groups in print order for list processor
ADDGRP	;
DELGRP	;delete a group and all of its selections
DELSLCTN	;deletes a group's selections
LMGRPHDR	;sets the screen hdr
ADDEMPTY	;adds a blank group - a place holder that takes up space on the form
ADDBLANK()	;
EDTSLCTN	;
DISPLAY(GRP,ROW)	;
ONENTRY	;
EDITLIST	;expects IBBLK to be defined
LISTNAME()	;
SELECT	; ; -- dic("s") passed in from ibdfgrp

External References

Name	Field # of Occurrence
IX^DIC	SELECT+5
FILE^DICN	ADDBLANK+5, ADDGRP+7, ADDEMPTY+8
^DIE	ADDBLANK+7, ADDGRP+9, ADDEMPTY+10, EDITGRP+7
^DIK	DELSLCTN+3, DELGRP+7
IX^DIK	IDXGRP+8
^DIR	ADDGRP+4, ADDEMPTY+5
UNCMPBLK^IBDF19	EDITLIST+9
SLCTNS^IBDF4	EDTSLCTN+8
$$PADRIGHT^IBDFU	DISPLAY+6
$$LSTDSCR2^IBDFU1	EDITLIST+5
IDXBLOCK^IBDFU4	EDITLIST+11
$$RUSURE^IBDFU5	DELGRP+6
PAUSE^IBDFU5	EDITLIST+6
EN^VALM	EDITLIST+7
PAUSE^VALM1	ADDGRP+8, ADDEMPTY+9
FLDCTRL^VALM10	IDXGRP+12
EN^VALM2	EDTSLCTN+3, EDITGRP+3, DELGRP+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You can not edit the contents of this list - it is determined at print time!" Line Location: EDITLIST+6
Function Call: WRITE	Prompt: !,"Unable to create a new record!" Line Location: ADDGRP+8
Function Call: WRITE	Prompt: !,"Unable to create a new group record!" Line Location: ADDEMPTY+9
Routine Call	VALM Line Location: EDITLIST+7
Routine Call	DIE Line Location: ADDBLANK+7 ADDGRP+9 ADDEMPTY+10 EDITGRP+7
Routine Call	DIR Line Location: ADDGRP+4 ADDEMPTY+5
Routine Call	DIC Line Location: SELECT+5

FileNo	Call Tags
^IBE(357.2 - [#357.2]	Classic Fileman Calls
^IBE(357.3 - [#357.3]	Classic Fileman Calls
^IBE(357.4 - [#357.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357.2 - [#357.2]	LISTNAME+1
^IBE(357.3 - [#357.3]	SLCTNCNT+3, DELSLCTN+3
^IBE(357.4 - [#357.4]	ADDBLANK+2, IDXGRP+4, IDXGRP+5, IDXGRP+8!, DISPLAY+2, DELGRP+6

Name	Line Occurrences
$$ADDBLANK	EDTSLCTN+6
$$DISPLAY	IDXGRP+11
$$LISTNAME	LMGRPHDR+1
$$SLCTNCNT	DISPLAY+6
DELSLCTN	EDITGRP+8, DELGRP+7
IDXGRP	ONENTRY+1, ADDGRP+11, ADDEMPTY+12, EDTSLCTN+8, EDITGRP+10, DELGRP+8
SELECT	EDITLIST+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	SLCTNCNT+1~, SLCTNCNT+2, SLCTNCNT+3, SLCTNCNT+4
>> D	SELECT+4*
DA	ADDBLANK+7!, IDXGRP+8!, ADDGRP+7!, ADDGRP+9!, ADDEMPTY+8!, ADDEMPTY+10!, EDITGRP+7!, EDITGRP+8, EDITGRP+9!, DELSLCTN+3! , DELSLCTN+4!, DELGRP+7!*
DD	ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7!
DIC	SELECT+4, SELECT+5!, ADDBLANK+4!, ADDBLANK+5!, ADDGRP+6!, ADDGRP+7!, ADDGRP+9!, ADDEMPTY+7!, ADDEMPTY+8!, ADDEMPTY+10! , EDITGRP+9!
DIC(0	SELECT+4, ADDBLANK+4, ADDGRP+6, ADDEMPTY+7
DIE	ADDBLANK+7!, ADDGRP+7!, ADDGRP+9!, ADDEMPTY+8!, ADDEMPTY+10!, EDITGRP+7!, EDITGRP+9!
DIE("NO^"	ADDGRP+9, ADDEMPTY+10
DIK	IDXGRP+8!, DELSLCTN+2, DELSLCTN+4!, DELGRP+7*!
DINUM	ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7!
DIR	ADDGRP+4!, ADDEMPTY+5!
DIR("B"	ADDGRP+4, ADDEMPTY+5
DIR(0	ADDGRP+4, ADDEMPTY+5
>> DIRUT	ADDGRP+4, ADDEMPTY+5
DO	ADDBLANK+4!, ADDGRP+6!, ADDEMPTY+7!
DR	ADDBLANK+7!, ADDGRP+9!, ADDEMPTY+10!, EDITGRP+7, EDITGRP+9!
GRP	ADDBLANK+2, ADDBLANK+3, ADDBLANK+6, ADDBLANK+7, ADDBLANK+8, IDXGRP+1~, IDXGRP+5, IDXGRP+8, IDXGRP+11, DISPLAY~ , DISPLAY+2, DISPLAY+6, SLCTNCNT~, SLCTNCNT+3, ADDGRP+1~, ADDEMPTY+2~, EDITGRP+1~, EDITGRP+5, EDITGRP+6, EDITGRP+7 , DELSLCTN+3, DELGRP+1~, DELGRP+5*, DELGRP+6, DELGRP+7
GRPODR	IDXGRP+1~, IDXGRP+4*, IDXGRP+5, IDXGRP+8
>> IBBLK	EDITLIST+9, SELECT+3, SELECT+4
>> IBFASTXT	EDITLIST+10
IBGRP	EDTSLCTN+1~, EDTSLCTN+6, EDTSLCTN+7, EDTSLCTN+8
IBLIST	EDITLIST+1~, EDITLIST+4, EDITLIST+5, EDITLIST+8!, SELECT+2, SELECT+6, ADDBLANK+2, ADDBLANK+7, IDXGRP+4, IDXGRP+5 , IDXGRP+8, LISTNAME+1, ADDGRP+9, ADDEMPTY+10
IBLIST("DYNAMIC"	EDITLIST+6
IBVALMBG	EDITLIST+1~, EDITLIST+2*, EDITLIST+12
IGRP	ADDBLANK+1~
INV	DISPLAY+1~, DISPLAY+2*, DISPLAY+4, DISPLAY+5
NAME	DISPLAY+1~, DISPLAY+2, DISPLAY+3, DISPLAY+4, DISPLAY+5, DISPLAY+6, ADDGRP+1~, ADDGRP+5*, ADDGRP+6
NODE0	DISPLAY+1~, DISPLAY+2*, DISPLAY+6
ORDER	ADDEMPTY+2~, ADDEMPTY+6*, ADDEMPTY+10
QUIT	ADDGRP+1~, ADDGRP+2, ADDGRP+3, ADDGRP+4, ADDGRP+8, ADDEMPTY+2~, ADDEMPTY+3, ADDEMPTY+4, ADDEMPTY+5, ADDEMPTY+9
ROW	DISPLAY~, DISPLAY+6
SEL	EDTSLCTN+1~, EDTSLCTN+4, EDTSLCTN+5, EDTSLCTN+7, EDITGRP+1~, EDITGRP+4, EDITGRP+5, DELGRP+1~, DELGRP+4, DELGRP+5
SLCTN	SLCTNCNT+1~, SLCTNCNT+2, SLCTNCNT+3, DELSLCTN+1~, DELSLCTN+2, DELSLCTN+3
>> VALMAR	ONEXIT+1, IDXGRP+2, IDXGRP+11, EDTSLCTN+7, EDITGRP+5, DELGRP+5
>> VALMBCK	EDITLIST+2, EDITLIST+12, ADDGRP+12, ADDEMPTY+13, EDTSLCTN+9, EDITGRP+2, EDITGRP+11, DELGRP+2, DELGRP+9*
>> VALMBG	EDITLIST+2, EDITLIST+12*
>> VALMCNT	IDXGRP+3, IDXGRP+10, IDXGRP+11, IDXGRP+12, EDTSLCTN+2
>> VALMHDR(1	LMGRPHDR+1*
>> VALMY(	EDITGRP+4, DELGRP+4
>> VALMY(""	EDTSLCTN+4
>> X	SELECT+4, ADDBLANK+4, ADDGRP+6, ADDEMPTY+7
>> XQORNOD(0	EDTSLCTN+3, EDITGRP+3, DELGRP+3
>> Y	SELECT+6, ADDBLANK+6, ADDGRP+5, ADDGRP+8, ADDGRP+9, ADDEMPTY+5, ADDEMPTY+6, ADDEMPTY+9, ADDEMPTY+10

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF3

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: