Routine: IBDFQEA

Information

IBDFQEA ;ALB/CJM/MAF - ENCOUNTER FORM - BUILD FORM(editing action for group's selections list) ;JUN 16,1995

Source Information

Source file <IBDFQEA.m>

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
Automated Information Collection System	9	(DELSLCTN,IDXGRP)^IBDF3 (ADDREC,NARR,NOGOOD,SEQUENCE,TERM)^IBDF4 (ADD,CODES)^IBDF4A ADD^IBDF4C FORMAT^IBDF9A1 INIT^IBDFQSL1 $$LSTDSCR2^IBDFU1 ($$DORTN,RTNDSCR)^IBDFU1B $$RUSURE^IBDFU5
VA Fileman	5	^DIC FILE^DICN ^DIE (,IX)^DIK ^DIR
Registration	3	(FULL,PAUSE)^VALM1 KILL^VALM10 EN^VALM2

Entry Points

Name	Comments	DBIA/ICR reference
ADDSLCTN	;allows the user to add a selection to the selection group
ADDEXIT	;
FORMAT	;allows the user to format all of the selections in the group in mass
EDIT	;allows editing of an existing selection
GROUPADD	; -- Add a new group to the selection list and to file 357.4.
GRPRESEQ	; -- Resequence numerically or alphabetically a group ; within a block.
ADDBLANK	;allows the user to add a dummy selection to the selection group
GRPEDIT	;
GRPRSEQ1	; -- Resequence all groups chosen
EDITEXIT	;
EXIT
GRP1
GRPDEL	; -- Group Delete
DELETE	;allows the user to select selections to delete

External References

Name	Field # of Occurrence
^DIC	ADDSLCTN+12, ADDSLCTN+14, ADDBLANK+6, GRPDEL+3, GRPEDIT+3, GRP1
FILE^DICN	EDIT+20, GROUPADD+8
^DIE	EDIT+12, EDIT+13, EDIT+33, GROUPADD+10, GRPEDIT+5
^DIK	DELETE+10, GRPDEL+6
IX^DIK	EDIT+10
^DIR	GROUPADD+5
DELSLCTN^IBDF3	GRPDEL+6, GRPEDIT+6
IDXGRP^IBDF3	GRPDEL+7, GROUPADD+4, GRPEDIT+7
ADDREC^IBDF4	ADDSLCTN+15
NARR^IBDF4	EDIT+34
NOGOOD^IBDF4	ADDSLCTN+7, ADDSLCTN+10
SEQUENCE^IBDF4	GRP1+1, GRPRSEQ1+3
TERM^IBDF4	EDIT+35
ADD^IBDF4A	ADDBLANK+7
CODES^IBDF4A	EDIT+14
ADD^IBDF4C	EDIT+15
FORMAT^IBDF9A1	FORMAT+2
INIT^IBDFQSL1	ADDBLANK+8, EXIT
$$LSTDSCR2^IBDFU1	GRPRESEQ+4
$$DORTN^IBDFU1B	ADDSLCTN+10
RTNDSCR^IBDFU1B	ADDSLCTN+6
$$RUSURE^IBDFU5	DELETE+9, GRPDEL+5
FULL^VALM1	EDIT+1, DELETE+1, ADDSLCTN+3, ADDBLANK+5, GRPDEL+1, GROUPADD+1, GRPEDIT+1, GRPRESEQ+2
PAUSE^VALM1	GROUPADD+9
KILL^VALM10	DELETE+11
EN^VALM2	EDIT+3, DELETE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EDIT+14
Function Call: WRITE	Prompt: ! Line Location: EDIT+15
Function Call: WRITE	Prompt: !!,"Editing Subcolumn "_SC_": Header="_IBLIST("SCHDR",SC) Line Location: EDIT+25
Function Call: WRITE	Prompt: ! Line Location: EDIT+34
Function Call: WRITE	Prompt: ! Line Location: EDIT+35
Function Call: WRITE	Prompt: !,"Now for another!",! Line Location: ADDSLCTN+9
Function Call: WRITE	Prompt: !,"Unable to create a new record!" Line Location: GROUPADD+9
Routine Call	DIE Line Location: EDIT+12 EDIT+13 EDIT+33 GROUPADD+10 GRPEDIT+5
Routine Call	DIC Line Location: ADDSLCTN+12 ADDSLCTN+14 ADDBLANK+6 GRPDEL+3 GRPEDIT+3 GRP1
Routine Call	DIR Line Location: GROUPADD+5

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

Name	Line Occurrences (* Changed, ! Killed)
^IBE(357.3 - [#357.3]	EDIT+7, EDIT+17, EDIT+22, EDIT+23, EDIT+24*, EDIT+26, EDIT+29, EDIT+30, DELETE+7
^IBE(357.4 - [#357.4]	GRPDEL+5
^TMP("SELIDX"	EDIT+6, DELETE+6

Name	Line Occurrences
ADDEXIT	ADDSLCTN+7
EXIT	EDITEXIT+1, DELETE+13, ADDSLCTN+9, ADDEXIT+1, FORMAT+3, GRPDEL+3, GRPDEL+9, GROUPADD+4, GROUPADD+12, GRPEDIT+3 , GRPEDIT+9, GRP1+1, GRP1+2
GRP1	GRP1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CONT	EDIT+13, EDIT+22, EDIT+25, EDIT+33
DA	EDIT+10!, EDIT+12!, EDIT+13!, EDIT+18!, EDIT+25, EDIT+33!, DELETE+4!, DELETE+6, DELETE+7, DELETE+12! , GRPDEL+6!, GROUPADD+8!, GROUPADD+10!, GRPEDIT+2~, GRPEDIT+5, GRPEDIT+6
DA(1	EDIT+20, EDIT+25
DD	GROUPADD+7!
DIC	EDIT+18!, EDIT+20, ADDSLCTN+12!, ADDSLCTN+14!, ADDBLANK+6!, GRPDEL+3!, GROUPADD+7!, GROUPADD+8!, GROUPADD+10!, GRPEDIT+2~ , GRPEDIT+3!, GRPEDIT+5, GRPRESEQ+3~, GRP1*!
DIC("S"	ADDSLCTN+12, ADDSLCTN+14, ADDBLANK+6, GRPDEL+3, GRPEDIT+3, GRP1
DIC(0	EDIT+20, ADDSLCTN+12, ADDSLCTN+14, ADDBLANK+6, GRPDEL+3, GROUPADD+7, GRPEDIT+3, GRP1
DIE	EDIT+12!, EDIT+13!, EDIT+25, EDIT+33!, GROUPADD+8!, GROUPADD+10!, GRPEDIT+2~, GRPEDIT+5*
DIE("NO^"	GROUPADD+10*
DIK	EDIT+10!, DELETE+6, DELETE+12!, GRPDEL+6*!
DINUM	EDIT+18!, GROUPADD+7!
DIR	GROUPADD+5!
DIR("B"	GROUPADD+5*
DIR(0	GROUPADD+5*
>> DIRUT	ADDBLANK+7, GROUPADD+5
DLAYGO	EDIT+19~, EDIT+20*
DO	EDIT+18!, GROUPADD+7!
DR	EDIT+12!, EDIT+13!, EDIT+25, EDIT+28, EDIT+32, EDIT+33!, GROUPADD+10!, GRPEDIT+2~, GRPEDIT+5*
GRP	GRPDEL+2~, GRPDEL+4, GRPDEL+5, GRPDEL+6, GROUPADD+2~, GRPEDIT+2~, GRPEDIT+4, GRPEDIT+5, GRPRESEQ+3~
IBFLAG	GRPRSEQ1+1~, GRPRSEQ1+2*
IBGROUP	GRPRSEQ1+1~, GRPRSEQ1+2, GRPRSEQ1+3
IBGRP	EDIT+8, DELETE+8, ADDSLCTN+12, ADDSLCTN+14, ADDBLANK+4~, ADDBLANK+6, GRPDEL+3, GRPEDIT+3*, GRPRESEQ+3~
IBGRP(	GRPRSEQ1+3
IBGRUP	GRPRESEQ+3~, GRP1+1, GRP1+2
IBGRUP(	GRP1*
>> IBLIST	GROUPADD+10, GRPRESEQ+4
>> IBLIST("CLRM"	ADDSLCTN+5
>> IBLIST("EDITI	NG CLRM" , ADDSLCTN+5*
>> IBLIST("RTN"	ADDSLCTN+4
>> IBLIST("SCEDITABLE"	EDIT+23
>> IBLIST("SCHDR"	EDIT+25
>> IBLIST("SCPIECE"	EDIT+23
>> IBLIST("SCTYPE"	EDIT+17, EDIT+23
>> IBRTN	ADDSLCTN+4*, ADDSLCTN+6, ADDSLCTN+10
>> IBRTN("ACTION"	ADDSLCTN+7
>> IBRTN("DATA_LOCATION"	ADDSLCTN+8, ADDSLCTN+11, ADDSLCTN+16
IBVAL	EDIT+26, EDIT+28, EDIT+30, EDIT+31, EDIT+33!
NAME	GROUPADD+2~, GROUPADD+6*, GROUPADD+7
NODE	EDIT+2~, EDIT+7, EDIT+8, EDIT+12, DELETE+7, DELETE+8
NQTY	EDIT+2~, EDIT+27, EDIT+28
OQTY	EDIT+2~, EDIT+27, EDIT+28
>> ORD	EDIT+8, DELETE+8
QUIT	ADDSLCTN+1~, ADDSLCTN+9, ADDSLCTN+10, ADDSLCTN+11, ADDSLCTN+12, ADDSLCTN+14, ADDSLCTN+15, GROUPADD+2~, GROUPADD+3, GROUPADD+4 , GROUPADD+5, GROUPADD+9
SC	EDIT+2~, EDIT+17, EDIT+20, EDIT+23, EDIT+25
SEL	EDIT+2~, EDIT+4, EDIT+5, EDIT+6, DELETE+2~, DELETE+5, DELETE+6, DELETE+9, DELETE+11
SLCTN	EDIT+2~, EDIT+6*, EDIT+7, EDIT+10, EDIT+12, EDIT+13, EDIT+17, EDIT+20, EDIT+22, EDIT+23 , EDIT+24, EDIT+25, EDIT+26, EDIT+29, EDIT+30
SUB	EDIT+2~, EDIT+22*, EDIT+23, EDIT+25, EDIT+26, EDIT+30, ADDSLCTN+1~
>> VALMBCK	ADDBLANK+9, GRPDEL+8, GRPEDIT+8, EXIT
>> VALMY(	EDIT+4, DELETE+5
>> X	EDIT+20, ADDSLCTN+12, GROUPADD+7
>> XQORNOD(0	EDIT+3, DELETE+3
>> Y	ADDSLCTN+12, ADDSLCTN+14, ADDBLANK+6, ADDBLANK+7, GRPDEL+3, GRPDEL+4, GROUPADD+6, GROUPADD+9, GROUPADD+10, GRPEDIT+3 , GRPEDIT+4, GRP1, GRP1+1, GRP1+2

Customize PDF page

Package: Automated Information Collection System

Routine: IBDFQEA

Information

Source Information

Call Graph

Call Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: