Routine: ACRFCCP1

Package	Total	Call Graph
Commitment Register	4	$$NAME2^ACRFUTL1 PAUSE^ACRFWARN ^ACRPCCH ^ACRPCCV

Entry Points

Name	Comments	DBIA/ICR reference
HEAD
P1
HEAD1	;
ITEM	;PRINT EACH ITEM
H1
DASH
P11	;
CH	;SET ARRAY FOR ALL CARD HOLDERS
CANTOT	;PRINT TOTAL FOR EACH CAN
PRINT	;EP;TO PRINT CREDIT CARD REPORT

External References

Name	Field # of Occurrence
$$NAME2^ACRFUTL1	P1+8, H1+7
PAUSE^ACRFWARN	P1+20, HEAD1+1, CANTOT+4
^ACRPCCH	H1+16
^ACRPCCV	P11+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?20,"TOTAL CREDIT CARD PURCHASES FOR: " Line Location: P1+11
Function Call: WRITE	Prompt: $P($P(X,",",2)," ")," ",$P(X,",") Line Location: P1+12
Function Call: WRITE	Prompt: ?90,$J($FN(ACRTOTAL,"P",2),12) Line Location: P1+13
Function Call: WRITE	Prompt: ?113,$J($FN(ACRTOTPD,"P",2),12) Line Location: P1+14
Function Call: WRITE	Prompt: @IOF Line Location: P1+21
Function Call: WRITE	Prompt: @IOF Line Location: H1+1
Function Call: WRITE	Prompt: !,"RECORD OF CREDIT CARD ORDERS" Line Location: H1+2
Function Call: WRITE	Prompt: ?55,"FROM......: " Line Location: H1+3
Function Call: WRITE	Prompt: Y Line Location: H1+9
Function Call: WRITE	Prompt: !,"CARDHOLDER: ",$P($P(X,",",2)," ")," ",$P(X,",") Line Location: H1+10
Function Call: WRITE	Prompt: ?55,"TO........: " Line Location: H1+11
Function Call: WRITE	Prompt: Y Line Location: H1+14
Function Call: WRITE	Prompt: ! Line Location: ITEM+25
Function Call: WRITE	Prompt: ?16,$P(Z,U) Line Location: ITEM+26
Function Call: WRITE	Prompt: ?48,ACRCAN Line Location: ITEM+27
Function Call: WRITE	Prompt: ?57,ACROBJ Line Location: ITEM+28
Function Call: WRITE	Prompt: ?63,$J(ACRQUAN,6) Line Location: ITEM+29
Function Call: WRITE	Prompt: ?71,ACRUI Line Location: ITEM+30
Function Call: WRITE	Prompt: ?78,$J($FN(ACRUC,"P",2),11) Line Location: ITEM+31
Function Call: WRITE	Prompt: ?90,$J($FN(ACRTP,"P",2),12) Line Location: ITEM+32
Function Call: WRITE	Prompt: ?103,ACRRCD Line Location: ITEM+33
Function Call: WRITE	Prompt: ?113,$J($FN(ACRPAID,"P",2),12) Line Location: ITEM+34
Function Call: WRITE	Prompt: !?16,$P(Z,U,ACRJ) Line Location: ITEM+35
Function Call: WRITE	Prompt: !!?20,"TOTAL CREDIT CARD PURCHASES FOR CAN NO.: ",ACRX Line Location: CANTOT+1
Function Call: WRITE	Prompt: ?90,$J($FN($P(ACR(ACRX),U),"P",2),12) Line Location: CANTOT+2
Function Call: WRITE	Prompt: ?113,$J($FN($P(ACR(ACRX),U,2),"P",2),12) Line Location: CANTOT+3
Function Call: WRITE	Prompt: ! Line Location: DASH+0
Function Call: WRITE	Prompt: "-" Line Location: DASH+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC - [#9002196]	P1+4, CH+4
^ACRDOC("D"	CH+3
^ACROBL - [#9002189]	CH+6
^ACRSS - [#9002193]	ITEM+2, CH+17, CH+18
^ACRSS("J"	P11+7, P11+10, CH+15
^ACRUI - [#9002190.6]	ITEM+6
^AUTTCAN - [#9999999.57]	ITEM+3, CH+20
^AUTTOBJC - [#9999999.59]	ITEM+4
^DD("DD"	H1+5, H1+13, ITEM+22
^TMP("ACRD"	PRINT+3, PRINT+5, P1+2, P1+3, P11+17, CH+1!, CH+21*

Label References

Name	Line Occurrences
CANTOT	PRINT+6
CH	PRINT+1
DASH	P1+10, P1+16, P11+17, H1+15
H1	P1
HEAD	P11+3, P11+10, P11+18, ITEM+35
HEAD1	HEAD
ITEM	P11+9
P1	PRINT+5
P11	P1+6

Naked Globals

Name	Field # of Occurrence
^(0	ITEM+6, CH+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR(	PRINT+4, ITEM+18, ITEM+19*, CANTOT+2, CANTOT+3
>> ACRAPV	CH+6*, CH+7
>> ACRBEGIN	H1+4, CH+9
>> ACRBYCAN	PRINT+6, CH+13, CH+14
ACRCAN	ITEM+3, ITEM+27, CH+12!, CH+13, CH+14, CH+20*, CH+21
>> ACRCANDA	CH+18*, CH+19, CH+20
>> ACRDATE	P1+5, ITEM+21, CH+5, CH+9, CH+10
>> ACRDOC	P1+1, P1+2, P1+3, P11+17
>> ACRDOC0	P1+4, P11+14, ITEM+24, CH+4, CH+8, CH+21
>> ACRDOCDA	P1+3, P1+4, P11+7, P11+10, CH+2, CH+3*, CH+4, CH+6, CH+15, CH+21
>> ACRDUZ	PRINT+4, PRINT+5, P1+2, P1+3, P1+8, P11+17, H1+7, CH+8
>> ACREND	H1+12, CH+10
>> ACRI	P11+6, P11+8, P11+11, ITEM+20
>> ACRJ	ITEM+35*
>> ACROBJ	ITEM+4*, ITEM+28
>> ACRP	PRINT+4, P1+19, ITEM+17
>> ACRPAID	ITEM+11*, ITEM+14, ITEM+15, ITEM+17, ITEM+19, ITEM+34
>> ACRPO	P1+4, P11+2, CH+4, CH+11
>> ACRQUAN	ITEM+7*, ITEM+29
>> ACRQUIT	PRINT+3, PRINT+5, P1+2, P11+7, H1, CH+3
>> ACRRCD	ITEM+10*, ITEM+33
>> ACRREQ	P1+4, P1+5, CH+4, CH+5
>> ACRREQ2	P1+4, CH+4
>> ACRSSDA	P11+6, P11+7, P11+10, ITEM+2, CH+15*, CH+16, CH+17, CH+18
>> ACRT	PRINT+4, P1+15, P1+18, ITEM+16
>> ACRTOT	P11+6, P11+15, ITEM+12
>> ACRTOTAL	P1+1, P1+13, P1+15, ITEM+13
>> ACRTOTP	P11+6, P11+16, ITEM+14
>> ACRTOTPD	P1+1, P1+14, ITEM+15
>> ACRTP	ITEM+9*, ITEM+12, ITEM+13, ITEM+16, ITEM+18, ITEM+32
>> ACRUC	ITEM+8*, ITEM+31
>> ACRUI	ITEM+5, ITEM+6, ITEM+30
>> ACRX	PRINT+2, PRINT+3, PRINT+4, PRINT+5, P1+2, P1+3, P11+17, ITEM+18, ITEM+19, CANTOT+1 , CANTOT+2, CANTOT+3
>> D0	P11+2*
DC	P11+1!, P11+5!
DIP	P11+1!, P11+5!
DXS	P11+1!, P11+5!
I	DASH+1~, DASH+2*
IOF	P1+21, H1+1
IOSL	HEAD
U	P1+5, P11+2, P11+14, ITEM+3, ITEM+4, ITEM+5, ITEM+6, ITEM+7, ITEM+8, ITEM+9 , ITEM+10, ITEM+11, ITEM+18, ITEM+19, ITEM+24, ITEM+26, ITEM+35, CH+5, CH+6, CH+8 , CH+11, CH+18, CH+20, CH+21, CANTOT+2, CANTOT+3
X	P1+8, P1+9, P1+12, H1+7, H1+8, H1+10, ITEM+1~, ITEM+2*, ITEM+3, ITEM+4
Y	H1+4, H1+9, H1+12, H1+14, ITEM+1~, ITEM+2, ITEM+5, ITEM+7, ITEM+8, ITEM+9 , ITEM+10, ITEM+11, ITEM+21, ITEM+23
Z	ITEM+1~, ITEM+2*, ITEM+26, ITEM+35

Customize PDF page

Package: Commitment Register

Routine: ACRFCCP1

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: