Routine: IBDF4A

Information

IBDF4A ;ALB/CJM - ENCOUNTER FORM - BUILD FORM(editing group's selections - continued from IBDF4) ;NOV 16,1992

Source Information

Source file <IBDF4A.m>

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Automated Information Collection System	5	IDXGRP^IBDF3 (IDXSLCTN,NARR,TERM)^IBDF4 ADD^IBDF4C $$DORTN^IBDFU1B $$RUSURE^IBDFU5
VA Fileman	4	FILE^DICN ^DIE (,IX)^DIK ^DIR
Registration	3	(FULL,PAUSE)^VALM1 KILL^VALM10 EN^VALM2

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Automated Information Collection System	2	IBDF4 IBDFQEA

Entry Points

Name	Comments	DBIA/ICR reference
CODES	; -- allow editing of 2nd & 3rd codes that are associated w/ original
ASKMORE()	;ask if the user wants to add another, returns 1 or 0
NEXT(IBLIST,IBGRP)	;returns the next print order to assign=last + 1
EDIT	;allows editing of an existing selection
RESEQ
ADDBLANK	;allows the user to add a dummy selection to the selection group
ADD	;allows the user to add a dummy selection to the selection group
EN	; -- Resequence selection lists not taking into account the ; the place holders. Will put the selection list into alphabetic ; or numeric order..... the place holders will be used as exta ; lines of description and not as separators or headers within ; the group.
EDITEXIT	;
BLANK	; -- Check to see if there is any place holders.
ORDER
DELETE	;allows the user to select selections to delete

External References

Name	Field # of Occurrence
FILE^DICN	EDIT+20, ADD+11
^DIE	EDIT+12, EDIT+13, EDIT+32, CODES+9, CODES+15, ADD+16, ORDER+6, BLANK+4
^DIK	DELETE+7
IX^DIK	EDIT+8, ADD+15, ADD+17
^DIR	CODES+8, ASKMORE+3
IDXGRP^IBDF3	ORDER+9
IDXSLCTN^IBDF4	EDIT+35, DELETE+10, ADDBLANK+5
NARR^IBDF4	EDIT+33
TERM^IBDF4	EDIT+34
ADD^IBDF4C	EDIT+15
$$DORTN^IBDFU1B	CODES+11
$$RUSURE^IBDFU5	DELETE+6
FULL^VALM1	EDIT+10, ADDBLANK+3
PAUSE^VALM1	ADD+13
KILL^VALM10	DELETE+8
EN^VALM2	EDIT+2, DELETE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Editing Subcolumn "_SC_": Header="_IBLIST("SCHDR",SC) Line Location: EDIT+25
Function Call: WRITE	Prompt: ! Line Location: EDIT+33
Function Call: WRITE	Prompt: ! Line Location: EDIT+34
Function Call: WRITE	Prompt: !,"Unable to create the place holder!" Line Location: ADD+13
Routine Call	DIE Line Location: EDIT+12 EDIT+13 EDIT+32 CODES+9 CODES+15 ADD+16 ORDER+6 BLANK+4
Routine Call	DIR Line Location: CODES+8 ASKMORE+3

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357.2 - [#357.2]	CODES+1
^IBE(357.3 - [#357.3]	EDIT+6, EDIT+17, EDIT+22, EDIT+23, EDIT+24, EDIT+26, EDIT+29, CODES+5, NEXT+1, ADD+14 , EN+12, RESEQ, RESEQ+1, RESEQ+7, RESEQ+8
^IBE(357.4 - [#357.4]	RESEQ+4
^IBE(357.6 - [#357.6]	CODES+2
^TMP("BLANK"	EN+7!, RESEQ+6, RESEQ+12, ORDER+4, BLANK+2
^TMP("IBDF"	EN+7!, RESEQ+11*, ORDER+1, ORDER+3, ORDER+4, ORDER+8!

Name	Line Occurrences
$$ASKMORE	ADD+4
$$NEXT	ADD+5
ADD	ADDBLANK+4
BLANK	ORDER+4
CODES	EDIT+14
ORDER	EN+10, EN+13
RESEQ	EN+9, EN+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	ORDER+2, ORDER+5, ORDER+6, BLANK+3*, BLANK+4
CNTR	EN+5~, EN+6, RESEQ+6, RESEQ+10, RESEQ+11, RESEQ+12, ORDER, ORDER+4, BLANK+2
>> CONT	EDIT+13, EDIT+22, EDIT+25, EDIT+32
COUNT	EN+5~, EN+6, RESEQ+5, RESEQ+6, RESEQ+12, BLANK+1~, BLANK+2*
DA	EDIT+8!, EDIT+12!, EDIT+13!, EDIT+18!, EDIT+25, EDIT+32!, CODES+9!, CODES+14, CODES+15!, DELETE+3! , DELETE+5, DELETE+9!, ADD+11!, ADD+15!, ADD+16!, ADD+17!, ORDER+6!, BLANK+4!
DA(1	EDIT+20, EDIT+25
DD	ADD+8!
DIC	EDIT+18!, EDIT+20, ADD+8!, ADD+10, ADD+11!
DIC("A"	CODES+10*
DIC("B"	CODES+10*
DIC(0	EDIT+20, ADD+10
DIE	EDIT+12!, EDIT+13!, EDIT+25, EDIT+32!, CODES+9!, CODES+14, CODES+15!, ADD+11!, ADD+16!, ORDER+6!* , BLANK+4!*
DIK	EDIT+8!, DELETE+5, DELETE+9!, ADD+15!, ADD+17!
DINUM	EDIT+18!, ADD+8!
DIR	CODES+8!, ASKMORE+1!, ASKMORE+4!, ORDER+8!
DIR("A"	CODES+8, ASKMORE+2
DIR("B"	CODES+8, ASKMORE+2
DIR(0	CODES+8, ASKMORE+2
>> DIRUT	ASKMORE+5
DLAYGO	EDIT+19~, EDIT+20, ADD+9~, ADD+10
DO	EDIT+18!, ADD+8!
DR	EDIT+12!, EDIT+13!, EDIT+25, EDIT+27, EDIT+31, EDIT+32!, CODES+9!, CODES+14, CODES+15!, ADD+16! , ORDER+6!, BLANK+4!
FLD	CODES+3~, CODES+4*, CODES+9, CODES+14
>> GROUP	RESEQ+3, RESEQ+4, RESEQ+6, RESEQ+11, RESEQ+12, ORDER, ORDER+1*, ORDER+3, ORDER+4, BLANK+2
IBDITEM	BLANK+1~, BLANK+2*, BLANK+4
IBEXT	CODES+3~, CODES+5, CODES+6, CODES+7, CODES+9, CODES+10, CODES+12*, CODES+13
IBGROUP	EN+5~, EN+6, EN+9, EN+12*, RESEQ
IBGRP	NEXT~, NEXT+1, ADD+5, ADD+7
>> IBGRUP	EN+9, EN+10, EN+12, EN+13
>> IBGRUP(	EN+9
IBI	CODES+3~, CODES+4*, CODES+5, CODES+7, CODES+10
IBLIST	CODES+1, NEXT~, NEXT+1, ADD+5, ADD+7, EN+12, RESEQ, RESEQ+2, RESEQ+4
IBLIST("SCEDITABLE"	EDIT+23
IBLIST("SCHDR"	EDIT+25
IBLIST("SCPIECE"	EDIT+23
IBLIST("SCTYPE"	EDIT+17, EDIT+23
IBORDER	EN+5~, RESEQ*
IBPI	CODES+1~*, CODES+2
>> IBRTN	CODES+11
IBVAL	EDIT+26, EDIT+27, EDIT+30*, EDIT+32!
>> IEN	RESEQ+7*, RESEQ+8
>> ITEM	RESEQ, RESEQ+1, RESEQ+6, RESEQ+7, RESEQ+8, RESEQ+11, RESEQ+12, ORDER+4, ORDER+6
NODE	EDIT+1~, EDIT+6, EDIT+11, ADD+3~, ADD+7, ADD+14, RESEQ+1*, RESEQ+2, RESEQ+3, RESEQ+6 , RESEQ+9
NQTY	EDIT+1~, EDIT+27
OQTY	EDIT+1~, EDIT+27
ORDER	ADD+3~, ADD+5*, ADD+7, ADD+10
QUIT	ADD+3~, ADD+4, ADD+13
SC	EDIT+1~, EDIT+17, EDIT+20, EDIT+23, EDIT+25
SEL	EDIT+1~, EDIT+3, EDIT+4, EDIT+5, DELETE+1~, DELETE+4, DELETE+5, DELETE+6, DELETE+8
SLCTN	EDIT+1~, EDIT+5, EDIT+6, EDIT+8, EDIT+12, EDIT+13, EDIT+17, EDIT+20, EDIT+22, EDIT+23 , EDIT+24, EDIT+25, EDIT+26, EDIT+29, CODES+5, CODES+9, CODES+14, ADD+3~, ADD+12, ADD+13 , ADD+14, ADD+15, ADD+16, ADD+17
>> SORT	RESEQ+9
SUB	EDIT+1~, EDIT+22*, EDIT+23, EDIT+25, EDIT+26
>> SUBCOL	RESEQ+7
U	CODES+1, CODES+2
>> VALMAR	EDIT+5, DELETE+5
>> VALMBCK	EDIT+36, DELETE+11, ADDBLANK+6*
>> VALMY(	EDIT+3, DELETE+4
>> VALUE	RESEQ+8, RESEQ+9, RESEQ+11, ORDER+2, ORDER+3, ORDER+4
X	EDIT+20, ADD+10, ORDER+8!
>> XQORNOD(0	EDIT+2, DELETE+2
Y	CODES+9, CODES+12, ASKMORE+5, ADD+12, ORDER+8!
Y(0	CODES+12

Customize PDF page

Package: Automated Information Collection System

Routine: IBDF4A

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: