Routine: ACRFIV4

Package	Total	Call Graph
Commitment Register	8	(DIE,DIR)^ACRFDIC SETDOC^ACRFEA1 (,INTEREST,PAYDATE)^ACRFIV41 (DISCOUNT,LOST)^ACRFIV42 PAY^ACRFIV43 ^ACRFPSS VENDOR^ACRFRR PAUSE^ACRFWARN

Package	Total	Caller Graph
Commitment Register	4	ACRFIV12 ACRFPAY1 ACRFPRC5 ACRFRR11

Entry Points

Name	Comments	DBIA/ICR reference
SCHT	;EP;DEFINE SCHEDULE TYPE ;Commented out in ACR2.116.06 IM15505; restored in ACR2.117.07 IM17139
EN	;
WHICH	;SELECT TYPE OF ACTION
DISCOUNT	;EP;DISCOUNT TERMS
VERIFY	;VERIFY THAT ALL DATA IS CORRECT
OBL	;EP;TO PRINT AMOUNT OBLIGATED
DOC()	;EP;TO PRINT DOCUMENT NO
EN1
CAN()	;EP;TO PRINT CAN
EXIT
DCAN	;DETERMINE WHICH CAN SHOULD BE USED FOR THE DISCOUNT OR PENALTY
W1
C1	;S ACRCANDA=ACR(Y)
OBJ()	;EP;TO PRINT AMOUNT OBLIGATED

External References

Name	Field # of Occurrence
DIE^ACRFDIC	SCHT+23
DIR^ACRFDIC	EN1+7, W1+13, SCHT+14, VERIFY+7
SETDOC^ACRFEA1	OBL+2
^ACRFIV41	EN1+11
INTEREST^ACRFIV41	W1+23
PAYDATE^ACRFIV41	EN+10, EN1+9
DISCOUNT^ACRFIV42	W1+21
LOST^ACRFIV42	W1+22
PAY^ACRFIV43	W1+4, VERIFY+2
^ACRFPSS	OBL+5
VENDOR^ACRFRR	EN1+12
PAUSE^ACRFWARN	EN+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: EN1+2
Function Call: WRITE	Prompt: !?10,"Payment Processing" Line Location: EN1+3
Function Call: WRITE	Prompt: ! Line Location: EN1+6
Function Call: WRITE	Prompt: @IOF Line Location: W1+0
Function Call: WRITE	Prompt: ! Line Location: W1+12
Function Call: WRITE	Prompt: !!,"ACCOUNT TYPE: ",$S($E(X)="C":"CHECKING",1:"SAVINGS"),!,"Bank routing and account data on file." Line Location: SCHT+12
Function Call: WRITE	Prompt: ! Line Location: SCHT+13
Function Call: WRITE	Prompt: ! Line Location: VERIFY+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAU - [#9002185.3]	SCHT+3
^ACRDOC - [#9002196]	EN+4, EN+5, DOC+2
^AUTTVNDR - [#9999999.11]	SCHT+3

Label References

Name	Line Occurrences
EN1	EN+20
SCHT	EN+13, SCHT+18
VERIFY	EN+22
W1	WHICH+1
WHICH	EN+18, EN1+10

Naked Globals

Name	Field # of Occurrence
^(0	DOC+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACRACH	SCHT+1, SCHT+17
ACRACHX	SCHT+1!
>> ACRBTYP	EN+12, EN+16, SCHT+3, SCHT+19, SCHT+20
ACRDATE	EXIT!
ACRDOC5	EN+2~, EN+4*, EN+6
>> ACRDOCDA	EN+3*, EN+4, EN+5, EN+6, EN+22, DOC+1, DOC+2, OBL+1
ACRDOCPO	EN+2~, EN+5*, EN+6
ACRDT	EXIT!, WHICH+2!, W1+21, W1+26!
>> ACRDUZ	SCHT+3, SCHT+19
ACRIV	EN1!, EN1+1*
ACRIVDAT	EXIT!
ACRIVDC	W1+26!, VERIFY+9!
>> ACRIVPAY	W1+4, W1+21, VERIFY+2
>> ACRIVT	W1+4, VERIFY+2
ACROUT	EN+11, EN+15, EN+17, EN+19, EN+20, EN+22, EN1+8, WHICH+1, W1+14, W1+21 , W1+31, SCHT+15, VERIFY+8, VERIFY+10!
ACRP	W1+26!, VERIFY+9!
ACRPAY	EXIT!, OBL+4*
>> ACRPAYME	VERIFY+10*
ACRPCNT	W1+26!
ACRPEN	EN+11, EN+15, EXIT!
ACRPPEN	W1+26!
ACRQUIT	EN+20, EN+21!, EN+22, EN1+8, EN1+9!, EN1+10!, EN1+11!, EN1+12!, WHICH+1, WHICH+2! , W1+14, W1+21, W1+25, W1+29, W1+31!, SCHT+16, VERIFY+9, VERIFY+10!
>> ACRREF	OBL+3
ACRREFX	OBL+3*, OBL+6!
ACRRRDAT	EXIT!
>> ACRRRNO	OBL+3
ACRT	W1+4, W1+26!, VERIFY+2
ACRTERMS	W1+4, W1+21, W1+22, W1+26!, W1+31, VERIFY+2, VERIFY+9!
ACRTMP	W1+3~, W1+5, W1+6, W1+7, W1+8, W1+9*, W1+10
ACRTYPE	EXIT!, W1+26!
>> ACRVDA	EN+6*, EN+7, SCHT+3, SCHT+19
>> ACRWHICH	W1+15, W1+25
>> DA	SCHT+19*
>> DIE	SCHT+20*
>> DIR("A"	EN1+5, W1+11, SCHT+6, VERIFY+4
>> DIR("B"	SCHT+7, SCHT+9, SCHT+12, VERIFY+5
>> DIR(0	EN1+4, W1+10, SCHT+5, SCHT+11, VERIFY+3*
>> DR	SCHT+21*
IOF	EN1+2, W1
U	EN+4, EN+5, SCHT+8, DOC+2
X	SCHT+2~, SCHT+3, SCHT+8, SCHT+12, DOC+2, DOC+3, CAN+1, CAN+2, OBJ+1, OBJ+2
>> Y	EN1+9, EN1+10, EN1+11, EN1+12, W1+14, W1+15, W1+21, W1+22, W1+23, W1+24 , W1+28, SCHT+16, SCHT+17, SCHT+18, VERIFY+9, VERIFY+10

Customize PDF page

Package: Commitment Register

Routine: ACRFIV4

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: