Routine: ACRFAU

Information

ACRFAU ;IHS/OIRM/DSD/THL,AEF - EDIT ARMS USER INFORMATION; [ 10/26/2006 9:44 AM ]

Source Information

Source file <ACRFAU.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Commitment Register	6	(ACCESS,DELETE,EN2,SETKILL)^ACRFACC (DDS,DIC,DIE,DIK,DIR,FILE)^ACRFDIC (EN,SETREQ)^ACRFDRC1 ($$NAME2,$$NAME3)^ACRFUTL1 PAUSE^ACRFWARN ^ACRFZIS
VA Fileman	2	%XY^%RCR EN1^DIP

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
Commitment Register	7	ACRFDIC ACRFEA4 ACRFEA42 ACRFSS1 ACRFSS41 ACRFTA ACRFTO

Entry Points

Name	Comments	DBIA/ICR reference
ACCESS
PLIST	;EP;TO DISPLAY LIST OF ARMS USERS
AUTHOR
SCREEN	;EP;TO DETERMINE IF SCREENMAN SHOULD BE INVOKED
FDMCAN	;EP;ASSIGN ACCESS TO MULTIPLE ACCOUNTS FROM FUNDS DISTRIBUTION
DCAN1
EMP1	;EP;TO SKIP FORM FEED
LIST	;EP;TO PRINT LIST OF ARMS USERS
MCAN	;EP;TO ASSIGN MULTIPLE CANS TO ARMS USER
10	;EP;TO LIST USERS WITH ACCESS LEVEL 10
MCAN1
AU1	;SELECT EMPLOYEE
AU2
AU	;EP;TO ENTER/UPDATE ARMS USER DATA
MP	;EP;TO ALLOW USER TO EDIT THEIR OWN USER DATA
BASIC	;EDIT BASIC ARMS USER DATA FROM THE PERSON AND EMPLOYEE FILES
EMPLOYEE	;EP;TO SELECT EMPLOYEE
PSUM	;EP;TO DISPLAY ARMS USER DATA
DELETE

External References

Name	Field # of Occurrence
%XY^%RCR	MCAN+19
ACCESS^ACRFACC	AU1+20
DELETE^ACRFACC	DELETE
EN2^ACRFACC	ACCESS
SETKILL^ACRFACC	AU1+22
DDS^ACRFDIC	BASIC+5, BASIC+13
DIC^ACRFDIC	EMP1+8
DIE^ACRFDIC	AU1+13, BASIC+6, BASIC+14
DIK^ACRFDIC	DCAN1+4
DIR^ACRFDIC	AU2+20, MCAN+4, MCAN+9, MCAN+14
FILE^ACRFDIC	AU1+8, BASIC+9, MCAN1+6
EN^ACRFDRC1	AUTHOR
SETREQ^ACRFDRC1	AU1+16
$$NAME2^ACRFUTL1	10+9
$$NAME3^ACRFUTL1	EMP1+13
PAUSE^ACRFWARN	10+17, LIST+8
^ACRFZIS	PSUM+3, PLIST+3
EN1^DIP	LIST+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: AU2+0
Function Call: WRITE	Prompt: !?10,"Edit ARMS USER DATA for ",ACRUSER Line Location: AU2+1
Function Call: WRITE	Prompt: !!?5,"Select USER EDIT FUNCTION" Line Location: AU2+2
Function Call: WRITE	Prompt: !!?10,1 Line Location: AU2+3
Function Call: WRITE	Prompt: ?15,"Print User Profile" Line Location: AU2+4
Function Call: WRITE	Prompt: !?10,2 Line Location: AU2+5
Function Call: WRITE	Prompt: ?15,"Edit Basic Data" Line Location: AU2+6
Function Call: WRITE	Prompt: !?10,3 Line Location: AU2+7
Function Call: WRITE	Prompt: ?15,"Edit Signature Authorities" Line Location: AU2+8
Function Call: WRITE	Prompt: !?10,4 Line Location: AU2+9
Function Call: WRITE	Prompt: ?15,"Edit Access Level" Line Location: AU2+10
Function Call: WRITE	Prompt: !?10,5 Line Location: AU2+11
Function Call: WRITE	Prompt: ?15,"Delete User's ARMS Access" Line Location: AU2+12
Function Call: WRITE	Prompt: !?10,6 Line Location: AU2+13
Function Call: WRITE	Prompt: ?15,"Assign/Delete Access to Multiple Department Accounts" Line Location: AU2+14
Function Call: WRITE	Prompt: !?10,7 Line Location: AU2+15
Function Call: WRITE	Prompt: ?15,"Assign Access to Multiple Blanket Purchase Agreements" Line Location: AU2+16
Function Call: WRITE	Prompt: ! Line Location: AU2+19
Function Call: WRITE	Prompt: ! Line Location: BASIC+15
Function Call: WRITE	Prompt: @IOF Line Location: 10+3
Function Call: WRITE	Prompt: !?10,"LIST OF USERS WITH LEVEL 9 OR 10 ACCESS" Line Location: 10+4
Function Call: WRITE	Prompt: !?10,"---------------------------------------" Line Location: 10+5
Function Call: WRITE	Prompt: !!!,"The users listed above all have LEVEL 9 or 10 access to ARMS." Line Location: 10+12
Function Call: WRITE	Prompt: !!,"Only users who absolutely need this level of access and who are performing" Line Location: 10+13
Function Call: WRITE	Prompt: !,"ARMS Manager functions should have LEVEL 9 or 10 access." Line Location: 10+14
Function Call: WRITE	Prompt: !!,"Review this information to ensure that only authorized ARMS Managers" Line Location: 10+15
Function Call: WRITE	Prompt: !,"have LEVEL 9 or 10 access." Line Location: 10+16
Function Call: WRITE	Prompt: @IOF Line Location: EMPLOYEE+1
Function Call: WRITE	Prompt: !!?21,"\|" Line Location: EMP1+6
Function Call: WRITE	Prompt: "=" Line Location: EMP1+6
Function Call: WRITE	Prompt: "\|" Line Location: EMP1+7

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^ACRAU - [#9002185.3]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ACRAU - [#9002185.3]	AU1+3, AU1+4, AU1+9, AU1+14*, BASIC+7, SCREEN+3
^ACRAU("B"	AU1+3, AU1+15*
^ACRSYS(1	SCREEN+2, SCREEN+3
^ACRUAL - [#9002185.6]	AU1+19
^ACRUAL("LVL"	10+1, 10+7, 10+9, 10+11
^VA(200 - [#200]	10+9

Name	Line Occurrences
10	AU+1
@(	AU2+26
AU1	AU+3
AU2	AU1+25
DCAN1	MCAN+23, MCAN+29
EMPLOYEE	AU1+1, FDMCAN+2
MCAN	FDMCAN+4
MCAN1	MCAN+22, MCAN+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %X	MCAN+17*
>> %Y	MCAN+18*
ACRAU	AU2+22*, AU2+23, AU2+28!
ACRAUJ	AU2+23*, AU2+28!
ACRAUX	AU2+23, AU2+24, AU2+26, AU2+28!
>> ACRDA	AU1+23, AU1+24, MP+1, BASIC+1, BASIC+2, BASIC+7, BASIC+8, BASIC+10
ACRDEL	MCAN+1!, MCAN+6*, MCAN+22, MCAN+23, MCAN+28, MCAN+29, MCAN+30!
>> ACRDIC	MCAN+11*, MCAN+12, MCAN1, MCAN1+1, MCAN1+2, MCAN1+4, DCAN1, DCAN1+2, DCAN1+3
>> ACRDR	MP+3*, BASIC+12
ACRDUZ	AU1+2, AU1+3, AU1+4, AU1+5, AU1+9, AU1+10, AU1+12, AU1+14, AU1+15, AU1+19 , AU1+23, MCAN1+2, MCAN1+5, DCAN1+2, EMP1+1!, EMP1+10*, EMP1+13, FDMCAN+1!, FDMCAN+3
>> ACRI	MCAN1, DCAN1, EMP1+6*
>> ACRJ	MCAN+25, MCAN+26, MCAN+27
>> ACRLVLDA	AU1+18, AU1+21
ACRNWLVL	AU1+17!
>> ACROUT	AU+3, AU1+25, AU2+21, AU2+23, MCAN+5, MCAN+10, MCAN+15
ACRQUIT	AU+2, AU+3, AU+4!, AU1+2, AU1+25, AU1+26!, AU2+21, AU2+27!, MCAN+5, MCAN+10 , MCAN+15, EMP1+9, FDMCAN+3*
>> ACRRTN	PSUM+2, PLIST+2
ACRSCREN	BASIC+6!, BASIC+14!, SCREEN+1!, SCREEN+2, SCREEN+3
>> ACRUSER	AU2+1, EMP1+13*
>> ACRX	MCAN1, MCAN1+1, MCAN1+2, MCAN1+3, MCAN1+4, DCAN1, DCAN1+1, DCAN1+2, DCAN1+3
>> ACRY	AU2+21, AU2+22
ACRYY	MCAN+16~, MCAN+21, MCAN+27, MCAN1, DCAN1
ACRYY(	MCAN+26, MCAN+27
ACRYY(0	MCAN+21
ACRYY(1	MCAN+24
>> BY	LIST+3*
>> DA	AU1+10, BASIC+2, BASIC+10, DCAN1+2, DCAN1+4
>> DA(1	MCAN1+3, DCAN1+1
>> DIC	AU1+6, BASIC+8, MCAN1+4, LIST+1, EMP1+2*
>> DIC("A"	EMP1+4*
>> DIC("DR"	EMP1+5*
>> DIC(0	AU1+7, BASIC+8, MCAN1+5, EMP1+3
>> DIE	AU1+11, BASIC+3, BASIC+11*
>> DIK	DCAN1+3*
>> DINUM	AU1+5, BASIC+8
>> DIR("A"	AU2+18, MCAN+3, MCAN+8, MCAN+13
>> DIR(0	AU2+17, MCAN+2, MCAN+7, MCAN+12
>> DR	AU1+12, MP+2, BASIC+4, BASIC+12
DUZ	MP+1, 10+1, SCREEN+3
>> FLDS	LIST+2*
>> FR	LIST+4*
IOF	AU2, 10+3, EMPLOYEE+1
ION	LIST+6
>> IOP	LIST+6*
>> TO	LIST+5*
U	AU1+14, MCAN+12, SCREEN+3, EMP1+9
X	AU1+5, BASIC+8, MCAN1+5, 10+2~, 10+6, 10+7*, 10+9, 10+11, EMP1+9
Y	MCAN+5, MCAN+6, MCAN+10, MCAN+11, MCAN+15, MCAN+20!, 10+2~, 10+9, 10+10, 10+11 , EMP1+9, EMP1+10
>> ZTDESC	PSUM+1, PLIST+1

Customize PDF page

Package: Commitment Register

Routine: ACRFAU

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: