Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACRFACC

Package: Commitment Register

Routine: ACRFACC


Information

ACRFACC ;IHS/OIRM/DSD/THL,AEF - DEFINE ARMS USER BY ACCESS LEVEL; [ 11/01/2001 9:44 AM ]

Source Information

Source file <ACRFACC.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Commitment Register 2 (@(,DIC,DIE,DIK,DIR,FILE)^ACRFDIC  (PAUSE,WARNING)^ACRFWARN  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Commitment Register 3 ACRFAU  ACRFMENU  ACRFNEWF  

Entry Points

Name Comments DBIA/ICR reference
KILLSEC ;EP;DELETES USER AS HOLDER OF THE SECURITY KEY
ACCLVL ;SELECTS ACCESS LEVEL
BPA ;EP;TO ASSIGN MULTIPLE BPA'S TO A USER
EN ;EP;FOR MULTIPLE USER SETUP
BPAH ;HEADER FOR BPA LISTING
SETSEC ; ASSIGN XUSR THIS SECURITY KEY
OLDLVL ;DISPLAYS EXISTING ACCESS LEVEL AND QUERIES TO CHANGE ACCESS LEVEL
ACCESS ;EP;TO SET ACCESS LEVEL
EN1
EN2 ;EP;FOR SINGLE USER SETUP, USER MUST BE DEFINED PER:
EN11 ;EP;
EXIT
SETKILL ;EP;
SET ;EP;TO KILL OLD ACCESS LEVEL AND DELETE USER AS HOLDER OF SECURITY KEYS
BPA1 ;ADD USER AS CALLER TO A BPA
DISPLAY ;DISPLAYS ESTABLISHED ACCESS LEVELS
DELETE ;EP;TO DELETE USERS ACCESS TO ARMS INCLUDING ACCESS LEVEL, SECURITY

External References

Name Field # of Occurrence
@(^ACRFDIC ACCESS+7
DIC^ACRFDIC EN11+7
DIE^ACRFDIC DELETE+20, DELETE+38
DIK^ACRFDIC KILLSEC+8, DELETE+30, DELETE+44, DELETE+50, DELETE+58, DELETE+67
DIR^ACRFDIC ACCLVL+10, OLDLVL+14, DELETE+15, BPA+28
FILE^ACRFDIC SETSEC+8, DELETE+7, BPA1+6
PAUSE^ACRFWARN DELETE+69, BPA+18, BPA+23
WARNING^ACRFWARN DELETE+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !?22,"ESTABLISH USER ACCESS LEVEL"
  • Line Location: EN11+1
Function Call: WRITE
  • Prompt: !?22,"==========================="
  • Line Location: EN11+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN11+3
Function Call: WRITE
  • Prompt: !!?5,ACRUSER," has been assigned "
  • Line Location: EN2+5
Function Call: WRITE
  • Prompt: $S($D(ACRLVL):ACRLVL,1:"NO")," access to ARMS."
  • Line Location: EN2+6
Function Call: WRITE
  • Prompt: !!?10,"CODE"
  • Line Location: DISPLAY+1
Function Call: WRITE
  • Prompt: ?16,"LEVEL"
  • Line Location: DISPLAY+2
Function Call: WRITE
  • Prompt: ?26,"LEVEL NAME"
  • Line Location: DISPLAY+3
Function Call: WRITE
  • Prompt: !?10,"----"
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: ?16,"--------"
  • Line Location: DISPLAY+5
Function Call: WRITE
  • Prompt: ?26,"------------------------------"
  • Line Location: DISPLAY+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ACCLVL+9
Function Call: WRITE
  • Prompt: !!?5,ACRUSER," has ",ACRLVL," access"
  • Line Location: OLDLVL+5
Function Call: WRITE
  • Prompt: !!,"The following procedure will delete all access this users has to ARMS."
  • Line Location: DELETE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: DELETE+14
Function Call: WRITE
  • Prompt: !!,"ARMS related SECURITY KEYS being withdrawn."
  • Line Location: DELETE+23
Function Call: WRITE
  • Prompt: !,"ARMS APPROVAL AUTHORITIES being deleted."
  • Line Location: DELETE+25
Function Call: WRITE
  • Prompt: !,"Authority to sign as an ALTERNATE for someone else being deleted."
  • Line Location: DELETE+31
Function Call: WRITE
  • Prompt: !,"ARMS ACCESS LEVEL being deleted."
  • Line Location: DELETE+39
Function Call: WRITE
  • Prompt: !,"ARMS DEPARTMENT ACCOUNT access being deleted."
  • Line Location: DELETE+46
Function Call: WRITE
  • Prompt: !!,"Withdrawal of ALL ARMS access has been completed."
  • Line Location: DELETE+68
Function Call: WRITE
  • Prompt: !
  • Line Location: BPA+27
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: BPAH+1
Function Call: WRITE
  • Prompt: !,"ACTIVE BLANKET PURCHASE AGREEMENTS"
  • Line Location: BPAH+2
Function Call: WRITE
  • Prompt: !,"NO."
  • Line Location: BPAH+3
Function Call: WRITE
  • Prompt: ?5,"REQUISITION NO."
  • Line Location: BPAH+4
Function Call: WRITE
  • Prompt: ?23,"PO NUMBER"
  • Line Location: BPAH+5
Function Call: WRITE
  • Prompt: ?37,"VENDOR/CONTRACTOR"
  • Line Location: BPAH+6
Function Call: WRITE
  • Prompt: !,"---"
  • Line Location: BPAH+7
Function Call: WRITE
  • Prompt: ?5,"---------------"
  • Line Location: BPAH+8
Function Call: WRITE
  • Prompt: ?23,"------------"
  • Line Location: BPAH+9
Function Call: WRITE
  • Prompt: ?37,"-----------------------------"
  • Line Location: BPAH+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^ACRUAL - [#9002185.6] Classic Fileman Calls
^ACRAPL - [#9002190.55] Classic Fileman Calls
^ACRPA - [#9002199] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRACC - [#9002185.5] DISPLAY+11, OLDLVL+4, OLDLVL+10, SETKILL+5
^ACRACC("C" DISPLAY+8, DISPLAY+10, ACCLVL+15
^ACRAPL - [#9002190.55] DELETE+36
^ACRAPL("B" DELETE+27
^ACRAPL("SEC" DELETE+33
^ACRDOC - [#9002196] DELETE+61, DELETE+63, BPA+4, BPA+5, BPA+6, BPA+10
^ACRDOC("T" BPA+3
^ACRLOCB("SEC" DELETE+52, DELETE+54
^ACRPA("B" DELETE+47, DELETE+48
^ACRPO(1 DELETE+2*
^ACRUAL - [#9002185.6] ACCLVL+2, OLDLVL+3
^ACRUAL("B" DELETE+41
^ACRUAL("LVL" ACCLVL+1, ACCLVL+2, ACCLVL+7, ACCESS+1, ACCESS+8!, ACCESS+9*, ACCESS+10*, OLDLVL+1, OLDLVL+2!, OLDLVL+3!
, OLDLVL+6, OLDLVL+9, OLDLVL+16!, DELETE+45!
^AUTTVNDR - [#9999999.11] BPA+11
^DIC(19.1 - [#19.1] KILLSEC+4, KILLSEC+9!
^VA(200 - [#200] SETSEC+6, KILLSEC+3, KILLSEC+4

Label References

Name Line Occurrences
ACCESS ACCLVL+4
ACCLVL EN2+4
BPA1 BPA+31
BPAH BPA+8, BPA+19
DISPLAY EN2+3
EN1 EN+1
EXIT EN2+8
KILLSEC SETKILL+7
OLDLVL ACCLVL+1
SET ACCLVL+16, OLDLVL+18
SETKILL SET+2, DELETE+24
SETSEC SETKILL+6

Naked Globals

Name Field # of Occurrence
^(15 BPA+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACR EXIT!, DISPLAY+7*, DISPLAY+8*, DISPLAY+10
>> ACRAAUD DELETE+8*, DELETE+17
ACRACC EXIT!, DISPLAY+11*, DISPLAY+12, DISPLAY+13, DISPLAY+14
ACRD ACCESS+3*, ACCESS+7, ACCESS+11!
>> ACRDA DISPLAY+9*, DISPLAY+10*, DISPLAY+11, DELETE+26*, DELETE+27*, DELETE+28, DELETE+32*, DELETE+33*, DELETE+34, DELETE+40*
, DELETE+41*, DELETE+42, DELETE+53*, DELETE+54*, DELETE+56, DELETE+62*, DELETE+63*, DELETE+65
>> ACRDA(1 DELETE+51*, DELETE+52*, DELETE+54, DELETE+55, DELETE+60*, DELETE+61*, DELETE+63, DELETE+64
ACRDEPT EXIT!
ACRDOC0 BPA+1~, BPA+6*, BPA+14, BPA+15
ACRDOCDA BPA+1~, BPA+2*, BPA+3*, BPA+4, BPA+5, BPA+6, BPA+9, BPA+10, BPA1+2*
>> ACRDUZ EN11+9*, ACCLVL+1, ACCLVL+2, ACCESS+1, ACCESS+2, ACCESS+8, ACCESS+9, ACCESS+10, OLDLVL+1, OLDLVL+2
, OLDLVL+3, OLDLVL+6, OLDLVL+9, OLDLVL+16, SETSEC+2, KILLSEC+3, KILLSEC+4, KILLSEC+5, KILLSEC+7, KILLSEC+9
, DELETE+19, DELETE+27, DELETE+33, DELETE+36, DELETE+41, DELETE+45, DELETE+47, DELETE+48, DELETE+52, DELETE+54
, DELETE+61, DELETE+63, BPA1+3
ACRI EXIT!, SETSEC+1, KILLSEC+1~, KILLSEC+2*, KILLSEC+3*, KILLSEC+4, KILLSEC+6, KILLSEC+9, SETKILL+4*, SETKILL+5*
ACRII EXIT!
ACRJ EXIT!, ACCLVL+13*, BPA+1~, BPA+7*, BPA+8, BPA+9, BPA+13, BPA+21, BPA+25, BPA+31*
ACRJ( BPA+9*, BPA1+1, BPA1+2
ACRLVL EXIT!, EN2+6, ACCLVL+14*, ACCLVL+15, ACCESS+1*, OLDLVL+4*, OLDLVL+5, SETKILL+1, SETKILL+2
ACRLVLDA EXIT!, ACCLVL+1, ACCLVL+15*, ACCLVL+16, ACCESS+6, ACCESS+9, ACCESS+10, ACCESS+11!, OLDLVL+1*, OLDLVL+2!
, OLDLVL+3!, OLDLVL+4, OLDLVL+6, OLDLVL+8, OLDLVL+19!, SETKILL+5, DELETE+22*
ACRNWLVL EXIT!, ACCLVL+3*, ACCLVL+5!, ACCESS+3, ACCESS+8, ACCESS+11!, OLDLVL+17*, OLDLVL+19!, SETKILL+1, SETKILL+6
, SETKILL+7, DELETE+21*
>> ACROUT EN+1, BPA+3, BPA+20
ACRQUIT EN+1, EXIT!, EN11+8*, OLDLVL+15!, BPA+3, BPA+24!, BPA+29
ACRTXDA EXIT!
>> ACRUSER EN11+10*, EN11+11*, EN2+5, OLDLVL+5, OLDLVL+10
ACRVDA BPA+1~, BPA+10*, BPA+11*, BPA+12*, BPA+16
ACRX ACCLVL+12*, ACCLVL+13, BPA+1~, BPA+31*, BPA1+1, BPA1+2
>> ACRXREF DELETE+59*, DELETE+61, DELETE+63
ACRY EXIT!, BPA+1~
ACRYY BPA+1~, BPA+30*, BPA+31
ACRZ EXIT!, ACCLVL+13*, ACCLVL+14
>> DA ACCESS+2*, KILLSEC+6*, DELETE+17*, DELETE+28*, DELETE+34*, DELETE+36, DELETE+42*, DELETE+48*, DELETE+50, DELETE+56*
, DELETE+65*
>> DA(1 SETSEC+2*, SETSEC+3, SETSEC+6, KILLSEC+5*, DELETE+6*, DELETE+55*, DELETE+57, DELETE+64*, DELETE+66, BPA1+2*
, BPA1+4
>> DIC EN11+4*, ACCESS+4*, SETSEC+3*, SETSEC+7, DELETE+4*, BPA1+4*
>> DIC("A" EN11+6*
>> DIC("DR" ACCESS+6*, SETSEC+5*, DELETE+6*
>> DIC(0 EN11+5*, ACCESS+5*, SETSEC+4*, DELETE+5*, BPA1+5*
>> DIE DELETE+18*, DELETE+35*
>> DIK ACCESS+4*, KILLSEC+7*, DELETE+29*, DELETE+43*, DELETE+49*, DELETE+57*, DELETE+66*
DINUM EXIT!, ACCESS+2*, SETSEC+1*
>> DIR("A" ACCLVL+8*, OLDLVL+13*, DELETE+12*, BPA+26*
>> DIR("B" OLDLVL+12*, DELETE+13*
>> DIR(0 ACCLVL+6*, ACCLVL+7*, OLDLVL+11*, DELETE+11*, BPA+25*
DR ACCESS+11!, OLDLVL+19!, SETKILL+3!, DELETE+19*, DELETE+37*
DT SETSEC+5, BPA+5
DUZ ACCLVL+7, DELETE+3
IOF EN1, BPAH+1
IOSL BPA+17
U DISPLAY+12, DISPLAY+13, DISPLAY+14, OLDLVL+4, OLDLVL+10, DELETE+36, BPA+4, BPA+5, BPA+10, BPA+11
, BPA+14, BPA+15
X ACCESS+2*, OLDLVL+7~, OLDLVL+8*, OLDLVL+9*, OLDLVL+10, SETSEC+1*, SETSEC+6, DELETE+3*, DELETE+36*, DELETE+37
, BPA1+3*
>> Y EN11+8, EN11+9, ACCLVL+11, ACCLVL+12, OLDLVL+15, DELETE+8, DELETE+16, BPA+29, BPA+30
>> Y(0 EN11+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All