Routine: ACRFIRS7

Package	Total	Call Graph
Kernel	2	HOME^%ZIS ^%ZISC
VA Fileman	2	^DIC ^DIR
Commitment Register	1	QUE^ACRFUTL
IHS VA Utilities	1	^XBKVAR

Entry Points

External References

Name	Field # of Occurrence
HOME^%ZIS	EN+4
^%ZISC	DQ+4
QUE^ACRFUTL	EN+22
^DIC	INDIV+11
^DIR	HOW+5, RANGE+7, RANGE+13, ADD+7, LPR+7, ROW+6
^XBKVAR	EN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!! Line Location: ONE+4
Function Call: WRITE	Prompt: !,X Line Location: NAME+5
Function Call: WRITE	Prompt: ?32,X Line Location: NAME+6
Function Call: WRITE	Prompt: ?64,X Line Location: NAME+7
Function Call: WRITE	Prompt: ?96,X Line Location: NAME+8
Function Call: WRITE	Prompt: !,X Line Location: STR+7
Function Call: WRITE	Prompt: ?32,X Line Location: STR+8
Function Call: WRITE	Prompt: ?65,X Line Location: STR+9
Function Call: WRITE	Prompt: ?96,X Line Location: STR+10
Function Call: WRITE	Prompt: !,X Line Location: CITY+7
Function Call: WRITE	Prompt: ?32,X Line Location: CITY+8
Function Call: WRITE	Prompt: ?65,X Line Location: CITY+9
Function Call: WRITE	Prompt: ?96,X Line Location: CITY+10
Routine Call	%ZIS Line Location: EN+4
Routine Call	DIC Line Location: INDIV+11
Routine Call	DIR Line Location: HOW+5 RANGE+7 RANGE+13 ADD+7 LPR+7 ROW+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUTTVNDR - [#9999999.11]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTVNDR - [#9999999.11]	INDIV+14, NAME+4, STR+4, CITY+4
^AUTTVNDR("B"	BLOCK+6, BLOCK+8, BLOCK+9, BLOCK+11
^DIC(5 - [#5]	STATE+4

Label References

Name	Line Occurrences
$$STATE	CITY+5, CITY+6
ADD	EN+11
BLOCK	PRT+3
CITY	ONE+7
EACH	PRT+4
HOW	EN+5
INDIV	EN+9
LPR	EN+13
NAME	ONE+5
ONE	BLOCK+12, EACH+8
PRT	DQ+2
RANGE	EN+7
ROW	EN+15
STR	ONE+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACRADD	EN+2~, EN+11, EN+12, ADD~, ADD+10*, DQ+2, DQ+3!, PRT~, PRT+3, PRT+4 , BLOCK~, BLOCK+12, EACH~, EACH+8, ONE~, ONE+6, ONE+7, STR~, STR+5, STR+6 , CITY~, CITY+5, CITY+6
ACRF	RANGE+3~, RANGE+10, RANGE+17, BLOCK+3~, BLOCK+4, BLOCK+5, BLOCK+6, BLOCK+9*, BLOCK+11
ACRHOW	EN+2~, EN+5, EN+6, EN+7, EN+9, HOW~, HOW+8, RANGE~, RANGE+17, DQ+2 , DQ+3!, PRT~, PRT+3, PRT+4, BLOCK~, BLOCK+4, BLOCK+7
ACRL	RANGE+3~, RANGE+16, RANGE+17, BLOCK+3~, BLOCK+7, BLOCK+8*, BLOCK+9
ACRLPR	EN+2~, EN+13, EN+14, LPR~, LPR+10*, DQ+2, DQ+3!, PRT~, PRT+3, PRT+4 , BLOCK~, BLOCK+12, EACH~, EACH+8, ONE~, ONE+5, ONE+6, ONE+7, NAME~, NAME+6 , NAME+7, NAME+8, STR~, STR+8, STR+9, STR+10, CITY~, CITY+8, CITY+9, CITY+10
ACROUT	EN+2~, EN+7, EN+8, EN+9, EN+10, RANGE~, RANGE+8, RANGE+9, RANGE+14, RANGE+15 , INDIV~, INDIV+16*
ACRQUIT	INDIV+5~, INDIV+8, INDIV+12, INDIV+13
ACRROW	EN+2~, EN+15, EN+16, ROW~, ROW+9*, DQ+2, DQ+3!, PRT~, PRT+3, PRT+4 , BLOCK~, BLOCK+12, EACH~, EACH+8, ONE~, ONE+4
ACRVEN	EN+2~, EN+9, INDIV~, INDIV+6!, INDIV+16, DQ+2, DQ+3!, PRT~, PRT+4, BLOCK+10* , BLOCK+11, BLOCK+12, EACH~, EACH+4, EACH+7, EACH+8, ONE~, ONE+5, ONE+6, ONE+7 , NAME~, NAME+4, STR~, STR+4, CITY~, CITY+4
ACRVEN(	INDIV+14*, EACH+6, EACH+7
DIC	INDIV+5~, INDIV+9*
DIC("A"	INDIV+7, INDIV+15
DIC(0	INDIV+10*
DIR	HOW+3~, RANGE+3~, ADD+3~, LPR+3~, ROW+3~
DIR("A"	RANGE+5, RANGE+11, ADD+5, LPR+5, ROW+5*
DIR("B"	RANGE+6, RANGE+12, ADD+6, LPR+6
DIR(0	HOW+4, RANGE+4, ADD+4, LPR+4, ROW+4*
DIRUT	HOW+3~, HOW+6, RANGE+3~, RANGE+8, RANGE+14, ADD+3~, ADD+8, LPR+3~, LPR+8, ROW+3~ , ROW+7
DTOUT	HOW+3~, HOW+6, RANGE+3~, RANGE+8, RANGE+14, INDIV+5~, INDIV+12, ADD+3~, ADD+8, LPR+3~ , LPR+8, ROW+3~, ROW+7
DUOUT	HOW+3~, HOW+6, RANGE+3~, RANGE+8, RANGE+14, INDIV+5~, INDIV+12, ADD+3~, ADD+8, LPR+3~ , LPR+8, ROW+3~, ROW+7
I	ONE+3~, ONE+4*
U	RANGE+17, INDIV+14, BLOCK+4, BLOCK+7, NAME+4, STR+5, STR+6, CITY+5, CITY+6, STATE+4
X	HOW+3~, RANGE+3~, INDIV+5~, ADD+3~, LPR+3~, ROW+3~, EACH+3~, EACH+5, EACH+6, EACH+7 , NAME+3~, NAME+4, NAME+5, NAME+6, NAME+7, NAME+8, STR+3~, STR+4, STR+5, STR+6 , STR+7, STR+8, STR+9, STR+10, CITY+3~, CITY+4, CITY+5, CITY+6*, CITY+7, CITY+8 , CITY+9, CITY+10, STATE~, STATE+3, STATE+4
Y	HOW+3~, HOW+7, HOW+8, RANGE+3~, RANGE+9, RANGE+10, RANGE+15, RANGE+16, INDIV+5~, INDIV+13 , INDIV+14, ADD+3~, ADD+9, ADD+10, LPR+3~, LPR+9, LPR+10, ROW+3~, ROW+8, ROW+9 , STATE+2, STATE+3, STATE+4, STATE+5
>> ZTSAVE	EN+22
>> ZTSAVE(".ACRVEN"	EN+18*
>> ZTSAVE("ACRADD"	EN+19*
>> ZTSAVE("ACRHOW"	EN+17*
>> ZTSAVE("ACRLPR"	EN+20*
>> ZTSAVE("ACRROW"	EN+21*

Name	Comments	DBIA/ICR reference
EN	;EP -- MAIN ENTRY POINT
NAME(ACRVEN,ACRLPR)
RANGE(ACRHOW,ACROUT)
LPR(ACRLPR)
STR(ACRVEN,ACRLPR,ACRADD)
ROW(ACRROW)
BLOCK(ACRHOW,ACRADD,ACRLPR,ACRROW)
ONE(ACRVEN,ACRLPR,ACRROW,ACRADD)
INDIV(ACRVEN,ACROUT)
EACH(ACRVEN,ACRADD,ACRLPR,ACRROW)
CITY(ACRVEN,ACRLPR,ACRADD)
HOW(ACRHOW)
ADD(ACRADD)
STATE(X)	;----- RETURNS STATE ABBREVIATION
PRT(ACRHOW,ACRVEN,ACRADD,ACRLPR,ACRROW)
DQ	;EP -- QUEUED JOB STARTS HERE

Customize PDF page

Package: Commitment Register

Routine: ACRFIRS7

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: