Routine: ACRFDF

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

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

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

Customize PDF page

Package: Commitment Register

Routine: ACRFDF

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

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