Routine: BCHPOS2

Package	Total	Call Graph
VA Fileman	2	FILE^DICN IXALL^DIK

Package

Total

Call Graph

FILE^DICN IXALL^DIK

Name	Comments	DBIA/ICR reference
LOOKUPS	; do lookups for the various fields
MULTIPL	; add multiple entry
PROCESS	;populate the file with 99 entries
EOJ	; end of job
SETUP	; set up initial variables for DIC call
START	;start of routine
RINDEX	;re-index the PROTOCOL file

Name	Field # of Occurrence
FILE^DICN	PROCESS+13, MULTIPL+8
IXALL^DIK	RINDEX+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"....exists: ",BCHNAME Line Location: PROCESS+5
Function Call: WRITE	Prompt: !,"Entry was unsuccessful: ",X Line Location: PROCESS+14
Function Call: WRITE	Prompt: !,"....adding: ",X Line Location: PROCESS+16
Function Call: WRITE	Prompt: !?5,"Multiple entry was unsuccessful: ",X Line Location: MULTIPL+9
Function Call: WRITE	Prompt: !!,"....Re-indexing the PROTOCOL file." Line Location: RINDEX+2

FileNo	Call Tags
^ORD(101 - [#101]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(101	MULTIPL+3
^DIC(9.4 - [#9.4]	LOOKUPS+4
^HL(771 - [#771]	PROCESS+7, LOOKUPS+11
^HL(771.2 - [#771.2]	LOOKUPS+20
^HL(771.5 - [#771.5]	LOOKUPS+17
^HL(779.001 - [#779.001]	LOOKUPS+23
^HL(779.003 - [#779.003]	LOOKUPS+14
^ORD(101 - [#101]	START+1, PROCESS+5, LOOKUPS+7

Name	Field # of Occurrence
BCHCODE	EOJ+4!
BCHCOND	EOJ+2!, SETUP+7, LOOKUPS+2, LOOKUPS+14, LOOKUPS+15
BCHDIC	EOJ+2!, PROCESS+12, MULTIPL+1, SETUP+5*
BCHDR	EOJ+2!, PROCESS+9, SETUP+7*
BCHEVNT	EOJ+2!, SETUP+7, LOOKUPS+2, LOOKUPS+23, LOOKUPS+24
BCHFAC	EOJ+4!
BCHFLG	EOJ+2!, LOOKUPS+1, LOOKUPS+5, LOOKUPS+8, LOOKUPS+12, LOOKUPS+15, LOOKUPS+18, LOOKUPS+21, LOOKUPS+24
BCHIEN	EOJ+2!, PROCESS+15*, MULTIPL+1, MULTIPL+4
BCHISEQC	EOJ+2!, SETUP+2*
BCHITEM	EOJ+2!, MULTIPL+6, LOOKUPS+2, LOOKUPS+7, LOOKUPS+8
BCHMTR	EOJ+3!, SETUP+7, LOOKUPS+2, LOOKUPS+20, LOOKUPS+21
BCHN	EOJ+4!, PROCESS+2*, PROCESS+3
BCHNAME	EOJ+3!, PROCESS+4*, PROCESS+5, PROCESS+10
BCHPKG	EOJ+3!, SETUP+7, LOOKUPS+2, LOOKUPS+4, LOOKUPS+5
BCHPTR	EOJ+3!, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+9
BCHRPC	EOJ+3!, PROCESS+3*, PROCESS+4, PROCESS+7
BCHSA	EOJ+3!, LOOKUPS+2, LOOKUPS+11, LOOKUPS+12
BCHTEXT	EOJ+3!, SETUP+1*, SETUP+7
BCHVID	EOJ+3!, SETUP+7, LOOKUPS+2, LOOKUPS+17, LOOKUPS+18
D0	EOJ+1!
DA	EOJ+1!
DA(1	MULTIPL+4*
DD	EOJ+1!, PROCESS+11!, MULTIPL+7!, SETUP+4!
DDH	EOJ+1!
DI	EOJ+1!
DIC	EOJ+1!, PROCESS+12, MULTIPL+1
DIC("DR"	PROCESS+9, MULTIPL+5
DIC("P"	MULTIPL+3*
DIC(0	MULTIPL+2, SETUP+5
DIE	EOJ+1!
DIK	RINDEX+1*, RINDEX+4!
DLAYGO	EOJ+1!, SETUP+5*
DO	EOJ+1!, PROCESS+11!, MULTIPL+7!, SETUP+4!
DR	EOJ+1!
U	MULTIPL+3
X	EOJ+1!, PROCESS+10, PROCESS+14!, PROCESS+16, PROCESS+17!, MULTIPL+6, MULTIPL+9!, MULTIPL+10!
Y	EOJ+1!, PROCESS+14, PROCESS+15, PROCESS+17!, MULTIPL+9, MULTIPL+10!

Information