Routine: ACRFMENU

Package	Total	Call Graph
Commitment Register	5	KILLSEC^ACRFACC ^ACRFEXIT CURRENT^ACRFPAH $$NAME2^ACRFUTL1 (P1,PAUSE,WARNING)^ACRFWARN
Kernel	3	^%ZIS ENS^%ZISS ^XUSCLEAN

Package	Total	Caller Graph
Commitment Register	39	ACRF1441 ACRF1442 ACRF262 ACRF3542 ACRFCA ACRFCA1 ACRFDHR4 ACRFDIAC ACRFEA2 ACRFEA21 ACRFEA3 ACRFFDS ACRFFS ACRFIV41 ACRFIV43 ACRFIV5 ACRFNEWF ACRFPAY7 ACRFPAYE ACRFPCC ACRFPITM ACRFPOL ACRFPRCS ACRFPRS ACRFPSC1 ACRFRR12 ACRFRRP1 ACRFSOF ACRFSOF1 ACRFSS12 ACRFSS2 ACRFSSA1 ACRFSSD1 ACRFTA ACRFTR1 ACRFTV ACRFTV1 ACRFTV2 ACRFWARN

Entry Points

Name	Comments	DBIA/ICR reference
FR	;EP
H1
TITLE	;EP;TO DISPLAY TITLE
TEXT	;;WARNING: RESTRICTED GOVERNMENT FINANCIAL DATA, UNAUTHORIZED
U1	;EP;TO TURN UNDERLINE ON
U2	;EP;TO TURN UNDERLINE OFF
HOME	;EP;TO SET TERMINAL CONTROL VARIABLES
FQS	;EP
FM	;EP
RV	;WARNING MESSAGE WHEN REVERSE VIDEO NOT DEFINED
PT	;EP
TM	;EP
NQ	;;
ODD	;EP
NSV	;EP;TO CHECK FOR SECURITY VIOLATIONS
HEAD	;EP;TO DISPLAY HEADER
DASH1(Z)	;EP;TO WRITE DASHES WITHOUT LINE FEED
DHRX	;EP
IRS	;EP
EA	;EP
VM	;EP
HDVS
DHRM	;EP
CLEAN	;EP;TO KILL SELECTD VARIABLES
YTF	;EP -- YOUR TRAVEL FORMS
DHRE	;EP
DASH(Z)	;EP;TO WRITE LINE OF DASHES
DHR	;EP
PT1	;EP
HEAD1
SS	;EP
OF	;EP
EDI	;EP
SU	;EP
MM	;EP
EXIT
B1	;EP;TO TURN BLINK ON
B2	;EP;TO TURN BLINK OFF
SR	;EP
SF	;EP
SD	;EP

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?80-$L(ACRY)/2,ACRY Line Location: EXIT+1
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+1
Function Call: WRITE	Prompt: !?80-$L(ACRX)\2,ACRX Line Location: H1+1
Function Call: WRITE	Prompt: @IOF Line Location: RV+1
Function Call: WRITE	Prompt: !?10,"WARNING WARNING WARNING WARNING WARNING" Line Location: RV+2
Function Call: WRITE	Prompt: 7,7 Line Location: RV+3
Function Call: WRITE	Prompt: !!,"Your DEVICE and/or TERMINAL TYPE are not properly defined to work with the ARMS" Line Location: RV+4
Function Call: WRITE	Prompt: !,"system. The REVERSE VIDEO ON and/or REVERSE VIDEO OFF are not properly defined." Line Location: RV+5
Function Call: WRITE	Prompt: !,"This is the responsibility of the AREA OFFICE computer site manager." Line Location: RV+6
Function Call: WRITE	Prompt: !!,"Please contact this individual for assistance. Let him/her know that you" Line Location: RV+7
Function Call: WRITE	Prompt: !,"are logged in on device NO.: ",$I Line Location: RV+8
Function Call: WRITE	Prompt: ! Line Location: DASH+2
Function Call: WRITE	Prompt: $$DASH1(Z) Line Location: DASH+3
Function Call: WRITE	Prompt: "-" Line Location: DASH1+3
Routine Call	%ZIS Line Location: TITLE+4

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(2 - [#3.2]	HOME+1, HOME+2
^ACRACC(3	NSV+6
^ACRUAL("LVL"	NSV+2
^DIC(4 - [#4]	HDVS
^DIC(9.4 - [#9.4]	HDVS+1
^VA(200 - [#200]	HEAD1+8, NSV+6

Name	Line Occurrences
$$DASH1	DASH+3
H1	HEAD1
HDVS	HEAD1+1
HEAD	TITLE+6
HOME	TITLE+5
NSV	EXIT+3
RV	HEAD1+15, HOME+5
TITLE	MM+1, EA+1, OF+1, FR+1, FM+1, SR+1, SF+1, SS+1, TM+1, VM+1 , PT1+2, SU+1, EDI+1, FQS+1, IRS+1, DHR+1, DHRM+1, DHRE+1, DHRX+1, ODD+1

Name	Field # of Occurrence
^(0	HEAD1+8, HDVS

Name	Field # of Occurrence
ACRBOX	CLEAN+1!
>> ACRDUZ	NSV+7*
ACRFINSS	TITLE+2*, CLEAN+1!
>> ACRJ	HEAD1*
ACRLPAT	HDVS+17~, HDVS+18*
ACRLVL	NSV+1~, NSV+2*, NSV+3, NSV+9
>> ACRNOFM	TITLE+1, HEAD1+14*
ACROF	HEAD1+15, HOME+4*, HOME+5, CLEAN+1!
ACRON	HEAD1+15, HOME+3*, HOME+5, CLEAN+1!
ACRPPO	CLEAN+1!
ACRPTX	CLEAN+1!
ACRREV	CLEAN+1!
ACRRR	CLEAN+1!
ACRSOF	CLEAN+1!
ACRTRM	EXIT!, HOME+1*, HOME+3, HOME+4, CLEAN+1!
ACRTRN	CLEAN+1!
ACRX	EXIT!, HEAD1+4, HEAD1+5, HEAD1+6, HEAD1+7, H1, H1+1, HDVS*, HDVS+21
>> ACRXY	HOME+2*
ACRY	EXIT+1, MM+1, EA+1, OF+1, FR+1, FM+1, SR+1, SF+1, SS+1, TM+1* , VM+1, PT1+1, SU+1, EDI+1, FQS+1, IRS+1, DHR+1, DHRM+1, DHRE+1, DHRX+1 , ODD+1*, CLEAN+1!
ACRZ	EXIT!, HDVS+20, CLEAN+1!
DUZ	HEAD1+2, HEAD1+4, HEAD1+8, NSV+2, NSV+6, NSV+7
DUZ(2	HDVS
I	DASH1+2~, DASH1+3*
>> IOBOFF	B1+1, B2+1
>> IOBON	B1+1
IOF	HEAD+1, RV+1
>> IOP	TITLE+3*
IOST	HDVS+20
IOST(0	HOME+1, HOME+2
>> IOUOFF	U1+1, U2+1
>> IOUON	U1+1
U	HEAD1+8, HDVS, HOME+3, HOME+4
X	NSV+4~, NSV+5, NSV+6
Z	DASH~, DASH+1, DASH+3, DASH1~, DASH1+1, DASH1+3

Name	Field # of Occurrence
$T(TEXT+ACRJ	H1