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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACRFDF

Package: Commitment Register

Routine: ACRFDF


Information

ACRFDF ;IHS/OIRM/DSD/THL,AEF - DISTRIBUTE FUNDS; [ 07/23/2002 5:47 PM ]

Source Information

Source file <ACRFDF.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Commitment Register 5 ^ACRFCTL1  (DIST,SARRAY)^ACRFDF1  DIR^ACRFDIC  DISPLAY^ACRFEDG  GET^ACRFEDG1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Commitment Register 1 ACRFDTP  

Entry Points

Name Comments DBIA/ICR reference
EN ;EP;TO DISTRIBUTE FUNDS
GROUP ;EP;TO DISTRIBUTE FUNDS TO A FUNDS DISTRIBUTION GROUP
ED ;DISPLAY AND EDIT CURRENT DISTRIBUTION
GMESS
EN1 ;SELECT TYPE OF DISTRIBUTION
ED1 ;DISPLAY DISTIBUTION
EXIT
GROUP1
PAUSE

External References

Name Field # of Occurrence
^ACRFCTL1 GROUP+7
DIST^ACRFDF1 GROUP+38
SARRAY^ACRFDF1 GROUP1+7, ED+29
DIR^ACRFDIC EN1+5, GROUP+4, GROUP+15, GROUP+25, GROUP+36, ED+20, ED+24, PAUSE+5
DISPLAY^ACRFEDG GROUP+10
GET^ACRFEDG1 GROUP+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"Distribute Funds to:"
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !!,"Distribute Funds by:"
  • Line Location: GROUP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: GROUP+14
Function Call: WRITE
  • Prompt: !
  • Line Location: GROUP+24
Function Call: WRITE
  • Prompt: !!,"To complete the Distribution you must enter detailed information"
  • Line Location: GROUP+30
Function Call: WRITE
  • Prompt: !,"on each distribution. This data entry process will now begin."
  • Line Location: GROUP+31
Function Call: WRITE
  • Prompt: !
  • Line Location: GROUP+35
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !,"Current Distribution:"
  • Line Location: ED+2
Function Call: WRITE
  • Prompt: !!,"ID NO."
  • Line Location: ED+3
Function Call: WRITE
  • Prompt: ?8,"LOCATION"
  • Line Location: ED+4
Function Call: WRITE
  • Prompt: ?40,$S(ACRDM=1:"PERCENT",1:"AMOUNT")
  • Line Location: ED+5
Function Call: WRITE
  • Prompt: !,"------"
  • Line Location: ED+6
Function Call: WRITE
  • Prompt: ?8,"------------------------------"
  • Line Location: ED+7
Function Call: WRITE
  • Prompt: ?40,"------------"
  • Line Location: ED+8
Function Call: WRITE
  • Prompt: !,"------"
  • Line Location: ED+11
Function Call: WRITE
  • Prompt: ?8,"------------------------------"
  • Line Location: ED+12
Function Call: WRITE
  • Prompt: ?40,"------------"
  • Line Location: ED+13
Function Call: WRITE
  • Prompt: !?20,"TOTAL DISTRIBUTED:"
  • Line Location: ED+14
Function Call: WRITE
  • Prompt: ?40,$J($FN(ACRZ,"P",2),10),$S(ACRDM=1:"%",1:"")
  • Line Location: ED+15
Function Call: WRITE
  • Prompt: !
  • Line Location: ED+19
Function Call: WRITE
  • Prompt: !,ACRX
  • Line Location: ED1+2
Function Call: WRITE
  • Prompt: ?8,$P(ACRX(ACRX),U)
  • Line Location: ED1+3
Function Call: WRITE
  • Prompt: ?40,$J($FN($P(ACRX(ACRX),U,2),"P",2),10)
  • Line Location: ED1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+4
Function Call: WRITE
  • Prompt: !!,*7,*7,"This distribution was not completed."
  • Line Location: GMESS+1
Function Call: WRITE
  • Prompt: !,"All entries must be redone."
  • Line Location: GMESS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRDG - [#9002198] GROUP+18, GROUP1+1, GROUP1+2

Label References

Name Line Occurrences
ED GROUP+20
ED1 ED+10
EN1 EN+1
GMESS GROUP1+8
GROUP EN1+7
GROUP1 GROUP+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACRACTPT EXIT!, GROUP1+4*
ACRCUM EXIT!, GROUP+17*, ED+28*
ACRDFN EXIT!, GROUP1+6*
ACRDG EXIT!, GROUP+9
ACRDGDA EXIT!, GROUP+18, GROUP1+1, GROUP1+2
ACRDM EXIT!, GROUP+6*, ED+5, ED+15, ED+16
ACRGL EN+1, EXIT!, GROUP+7*
ACRGLB EXIT!, GROUP1+5*
>> ACRJ ED+9*, ED+22, ED1+1*
>> ACROUT EN+1, EN1+6, GROUP+5, GROUP+9, GROUP+20, GROUP+26, GROUP1+8, ED+21, ED+25
ACRPSE PAUSE!, PAUSE+7*
ACRQUIT EN+1, EXIT!, EN1+6, EN1+7!, EN1+8*, GROUP+5, GROUP+9, GROUP+20, GROUP+21!, GROUP+26
, GROUP1+8, ED+16*, ED+21, ED+25, ED+30!
ACRX EXIT!, GROUP+17*, GROUP+18*, GROUP+19, GROUP+26, GROUP1+1, GROUP1+2, ED+9*, ED+10*, ED+26*
, ED1+2, ED1+3, ED1+4, ED1+5, GMESS!
ACRX( ED+10, ED+27, ED+28, ED1+3, ED1+4, ED1+5
ACRY EXIT!, GROUP1+3*, ED+27*
ACRZ EXIT!, ED+9*, ED+15, ED1+5*
>> ACRZDA EN+1
>> DIR("A" EN1+4*, GROUP+3*, GROUP+12*, GROUP+23*, GROUP+33*, ED+18*, ED+23*, PAUSE+2*
>> DIR("B" GROUP+13*, GROUP+34*, PAUSE+3*
>> DIR(0 EN1+3*, GROUP+2*, GROUP+11*, GROUP+22*, GROUP+32*, ED+17*, ED+22*, PAUSE+1*
IOF EN1+1, ED+1
U GROUP1+3, GROUP1+4, GROUP1+5, GROUP1+6, ED+27, ED+28, ED1+3, ED1+4, ED1+5
X EN1+7, EN1+8, GROUP+6, GROUP+26, GROUP1~, GROUP1+1*, GROUP1+3, GROUP1+4, ED+21, ED+26
, ED+27, ED+28
Y GROUP+16, GROUP+37, GROUP1~, GROUP1+2*, GROUP1+5, GROUP1+6, PAUSE+6

Marked Items

Name Field # of Occurrence
$T(@ACRENTRY^ACRFCTL1 GROUP+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All