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: ACRFUP1

Package: Commitment Register

Routine: ACRFUP1


Information

ACRFUP1 ;IHS/OIRM/DSD/THL,AEF - ARMS USER PROFILES; [ 07/20/2006 9:44 AM ]

Source Information

Source file <ACRFUP1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Commitment Register 5 ^ACRFCAN  (DIK,FILE)^ACRFDIC  $$NAME3^ACRFUTL1  PAUSE^ACRFWARN  ^ACRPER  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Commitment Register 1 ACRFUP  

Entry Points

Name Comments DBIA/ICR reference
ACCHEAD
PS1 ;EP;TO PRINT ARMS USER SUMMARY DATA
NAME
SIGHEAD

External References

Name Field # of Occurrence
^ACRFCAN PS1+82
DIK^ACRFDIC PS1+16
FILE^ACRFDIC NAME+5
$$NAME3^ACRFUTL1 PS1+43, PS1+47
PAUSE^ACRFWARN PS1+50, PS1+77, PS1+80
^ACRPER NAME+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PS1+1
Function Call: WRITE
  • Prompt: !!?5
  • Line Location: PS1+3
Function Call: WRITE
  • Prompt: $S($P(^(20),U,4)="":"NO ",1:"")
  • Line Location: PS1+4
Function Call: WRITE
  • Prompt: "NO "
  • Line Location: PS1+5
Function Call: WRITE
  • Prompt: "Electronic Signature Code has been assigned."
  • Line Location: PS1+6
Function Call: WRITE
  • Prompt: !?5,"Government ATM card has been authorized."
  • Line Location: PS1+7
Function Call: WRITE
  • Prompt: !!?5,"NO Signature Authorities assigned."
  • Line Location: PS1+25
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ACRI>1
  • Line Location: PS1+42
Function Call: WRITE
  • Prompt: ?31,$E(ACRALTX,1,23)
  • Line Location: PS1+42
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ACRI>1
  • Line Location: PS1+43
Function Call: WRITE
  • Prompt: ?31,$E($$NAME3^ACRFUTL1(ACRALTDA),1,23)
  • Line Location: PS1+43
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ACRI>1
  • Line Location: PS1+44
Function Call: WRITE
  • Prompt: ?31,"_________________________"
  • Line Location: PS1+44
Function Call: WRITE
  • Prompt: ?57,$E(ACRALTX,1,25)
  • Line Location: PS1+46
Function Call: WRITE
  • Prompt: ?57,$E($$NAME3^ACRFUTL1(ACRALT),1,25)
  • Line Location: PS1+47
Function Call: WRITE
  • Prompt: !
  • Condition for execution: ACRI>0
  • Line Location: PS1+48
Function Call: WRITE
  • Prompt: ?31,"_________________________"
  • Line Location: PS1+48
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PS1+50
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PS1+51
Function Call: WRITE
  • Prompt: !!?5,"NO ACCESS LEVEL ASSIGNED."
  • Line Location: PS1+58
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PS1+59
Function Call: WRITE
  • Prompt: !!?5,ACRUSER," does not have access to any Department Accounts."
  • Line Location: PS1+60
Function Call: WRITE
  • Prompt: ?54,$P(^(0),U,4)
  • Line Location: PS1+75
Function Call: WRITE
  • Prompt: !
  • Line Location: PS1+79
Function Call: WRITE
  • Prompt: !
  • Line Location: PS1+81
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ACCHEAD+0
Function Call: WRITE
  • Prompt: !!,"Department Account access for: ",ACRUSER
  • Line Location: ACCHEAD+1
Function Call: WRITE
  • Prompt: !!,"ID NO (SA/DA)"
  • Line Location: ACCHEAD+2
Function Call: WRITE
  • Prompt: ?15,"ACCOUNT"
  • Line Location: ACCHEAD+3
Function Call: WRITE
  • Prompt: ?50,"FY"
  • Line Location: ACCHEAD+4
Function Call: WRITE
  • Prompt: ?54,"SUB-SUB-ACTIVITY"
  • Line Location: ACCHEAD+5
Function Call: WRITE
  • Prompt: !,"-------------"
  • Line Location: ACCHEAD+6
Function Call: WRITE
  • Prompt: ?15,"---------------------------------"
  • Line Location: ACCHEAD+7
Function Call: WRITE
  • Prompt: ?50,"--"
  • Line Location: ACCHEAD+8
Function Call: WRITE
  • Prompt: ?54,"----------------"
  • Line Location: ACCHEAD+9
Function Call: WRITE
  • Prompt: !!?5,"Your ",$P($P($P(^DD(9002190.5,.06,0),U,3),ACRCAT_":",2),";")
  • Line Location: SIGHEAD+1
Function Call: WRITE
  • Prompt: !?5,"Signature Authorities"
  • Line Location: SIGHEAD+2
Function Call: WRITE
  • Prompt: ?31,"Your alternates are:"
  • Line Location: SIGHEAD+3
Function Call: WRITE
  • Prompt: ?57,"You may sign for:"
  • Line Location: SIGHEAD+4
Function Call: WRITE
  • Prompt: !?5,"-------------------------"
  • Line Location: SIGHEAD+5
Function Call: WRITE
  • Prompt: ?31,"-------------------------"
  • Line Location: SIGHEAD+6
Function Call: WRITE
  • Prompt: ?57,"-----------------------"
  • Line Location: SIGHEAD+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACRAU - [#9002185.3] Classic Fileman Calls
^ACRAPL - [#9002190.55] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRACC - [#9002185.5] PS1+56, PS1+57
^ACRAPL - [#9002190.55] PS1+12, PS1+19
^ACRAPL("ALT" PS1+21, PS1+23, PS1+24
^ACRAPL("B" PS1+11
^ACRAPVT - [#9002190.5] PS1+17, PS1+18, PS1+24, PS1+37
^ACRAU - [#9002185.3] PS1+7, NAME+1
^ACRLOCB - [#9002188] PS1+66, PS1+67, PS1+68, PS1+69, PS1+70
^ACRLOCB("SEC" PS1+60, PS1+61, PS1+64
^ACRUAL("LVL" PS1+54, PS1+55
^AUTTPRG - [#9999999.62] PS1+71, PS1+73
^AUTTSSA - [#9999999.56] PS1+75
^DD("DD" NAME+10
^DD(9002190.5 SIGHEAD+1
^VA(200 - [#200] PS1+4, PS1+41, PS1+47, NAME+8

Label References

Name Line Occurrences
ACCHEAD PS1+62, PS1+78
NAME PS1+2, PS1+51, PS1+59
SIGHEAD PS1+29, PS1+32, PS1+50

Naked Globals

Name Field # of Occurrence
^(0 PS1+24, PS1+57, PS1+75
^(20 PS1+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACR PS1+12*, PS1+13, PS1+17, PS1+18, PS1+19, PS1+22*, PS1+23*, PS1+24, PS1+35*, PS1+36*
, PS1+37, PS1+39, PS1+41, PS1+53!, PS1+63*, PS1+64*, PS1+66, PS1+67, PS1+68, PS1+69
, PS1+70, PS1+72
>> ACR1 PS1+20*, PS1+21*, PS1+23, PS1+24
ACRALT PS1+38*, PS1+39*, PS1+40*, PS1+47, PS1+53!
>> ACRALTDA PS1+41*, PS1+43
ACRALTX PS1+53!
ACRAPVT PS1+10!, PS1+25, PS1+26, PS1+53!
ACRAPVT( PS1+19*, PS1+24*, PS1+31, PS1+34, PS1+36, PS1+39, PS1+41
ACRAPVT(0 PS1+28
ACRCAT PS1+17*, PS1+19, PS1+24*, PS1+27~, PS1+28*, PS1+30*, PS1+31*, PS1+32, PS1+34, PS1+36
, PS1+39, PS1+41, PS1+53!, SIGHEAD+1
ACRCATX PS1+27~, PS1+28*, PS1+32*
ACRDA PS1+8~, PS1+9*, PS1+11*, PS1+12, PS1+14, PS1+19
>> ACRDEPT PS1+67*, PS1+71, PS1+73
>> ACRDUZ PS1+11, PS1+24, PS1+54, PS1+55, PS1+60, PS1+61, PS1+64, NAME, NAME+6
>> ACRFY PS1+70*, PS1+74
>> ACRI PS1+39*, PS1+41, PS1+43, PS1+44, PS1+45, PS1+48*
>> ACRII PS1+38*, PS1+43*, PS1+44*, PS1+48
>> ACRLVL PS1+55*, PS1+56, PS1+57
ACRORD PS1+18*, PS1+19, PS1+24*, PS1+33*, PS1+34*, PS1+36, PS1+39, PS1+41, PS1+53!
>> ACROUT PS1+11, PS1+21, PS1+31, PS1+34, PS1+36, PS1+52, PS1+64, PS1+78, SIGHEAD
>> ACRQUIT PS1+11, PS1+21, PS1+31, PS1+34, PS1+36, PS1+52, PS1+64, PS1+78, SIGHEAD
>> ACRSADA PS1+68*, PS1+72
>> ACRSSADA PS1+69*, PS1+75
>> ACRUSER PS1+60, ACCHEAD+1
>> D0 PS1+4, PS1+7, NAME*, NAME+1, NAME+2, NAME+6*, NAME+8
>> DA PS1+14*
DC NAME+7~
>> DIC NAME+3*
>> DIC(0 NAME+4*
>> DIK PS1+15*
>> DINUM NAME+2*
DIP NAME+7~
DN NAME+7~
DT NAME+9
DXS NAME+7~
IOF PS1+1, PS1+50, PS1+51, PS1+59, ACCHEAD
IOSL PS1+50, PS1+51, PS1+59, PS1+76
IOST PS1+1, PS1+51, PS1+59
U PS1+4, PS1+7, PS1+12, PS1+17, PS1+18, PS1+24, PS1+37, PS1+39, PS1+41, PS1+57
, PS1+67, PS1+68, PS1+69, PS1+70, PS1+73, PS1+75, SIGHEAD+1
>> X NAME+2*
>> Y NAME+9*, NAME+12
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