Routine: ACRFPAY8

Package	Total	Call Graph
Commitment Register	6	DATES^ACRFDATE (DIC,DIE,DIR)^ACRFDIC (FYBAT,TRANSFER)^ACRFPAY2 $$NET^ACRFSSU PAUSE^ACRFWARN ^ACRFZIS

Package	Total	Caller Graph
Commitment Register	7	ACRFEXP2 ACRFIV12 ACRFPAY ACRFPAY1 ACRFPAY3 ACRFPAY6 ACRFPAY7

Entry Points

Name	Comments	DBIA/ICR reference
VENDOR	;EP;SELECT VENDOR
CCOMPLET	;EP;COMPLETE THE COMBINATION/TRANSFER OF BATCHES
EXP2	;EP;TO PRINT LIST OF BATCHES EXPORTED ON SPECIFIC DATE
EXP1	;
APPSUM	;EP;APPROPRIATION SUMMARY
BS1	;EP;
LCOD	;EP;SELECT LOCATION CODE
BSTATUS	;EP;TO PRINT BATCH STATUS
EXPH	;EXPORT LIST HEADER
APPSUMH	;APPROPRIATION SUMMARY HEADER
EXPEXIT
AH1
SSCHUP	;EP;
BS
TRAVELER	;EP;SELECT TRAVERER
EXPLIST	;EP;TO PRINT LIST OF EXPORT FILES FOR SPECIFIED DATE
SSCH	;UPDATE SEQUENCE ENTRY SCHEDULE NUMBER
CSELECT
BANK	;UPDATE BANK ROUTINE INFORMATION

External References

Name	Field # of Occurrence
DATES^ACRFDATE	EXP1+4
DIC^ACRFDIC	VENDOR+9, LCOD+4, TRAVELER+4
DIE^ACRFDIC	BANK+16, SSCH+6
DIR^ACRFDIC	CCOMPLET+6
FYBAT^ACRFPAY2	BS+4
TRANSFER^ACRFPAY2	CCOMPLET+15
$$NET^ACRFSSU	BS1+44, APPSUM+13
PAUSE^ACRFWARN	BS1+59, APPSUM+23, APPSUM+29, EXP2+36, EXP2+38
^ACRFZIS	EXP1+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"VENDOR'S NAME REQUIRED",! Line Location: VENDOR+12
Function Call: WRITE	Prompt: !!,"LOCATION CODE REQUIRED",! Line Location: LCOD+7
Function Call: WRITE	Prompt: !!,"TRAVELER'S NAME REQUIRED",! Line Location: TRAVELER+7
Function Call: WRITE	Prompt: ! Line Location: CCOMPLET+5
Function Call: WRITE	Prompt: @IOF Line Location: BS+1
Function Call: WRITE	Prompt: !!,"Select Fiscal Year and Batch number for the" Line Location: BS+2
Function Call: WRITE	Prompt: !,"Batch STATUS Report" Line Location: BS+3
Function Call: WRITE	Prompt: @IOF Line Location: BS1+6
Function Call: WRITE	Prompt: !?20,"Batch STATUS Report" Line Location: BS1+7
Function Call: WRITE	Prompt: !?20,"Report Date: " Line Location: BS1+8
Function Call: WRITE	Prompt: Y Line Location: BS1+11
Function Call: WRITE	Prompt: !!,"Fiscal Year.......: ",ACRFY Line Location: BS1+12
Function Call: WRITE	Prompt: !,"Batch Number......: ",ACRBATNO Line Location: BS1+13
Function Call: WRITE	Prompt: !,"Treasury Schedule.: ",$P(ACR2,U,6) Line Location: BS1+14
Function Call: WRITE	Prompt: " (This batch has no payments)" Line Location: BS1+16
Function Call: WRITE	Prompt: !,"Payment Due.......: " Line Location: BS1+17
Function Call: WRITE	Prompt: !,"Payment Open/Clsd.: " Line Location: BS1+22
Function Call: WRITE	Prompt: $S($P(ACR2,U,3)="O":"OPEN",$P(ACR2,U,3)="C":"CLOSED",1:"NOT SPECIFIED") Line Location: BS1+23
Function Call: WRITE	Prompt: !,"Payment Certified.: " Line Location: BS1+24
Function Call: WRITE	Prompt: "Not yet certified" Line Location: BS1+29
Function Call: WRITE	Prompt: !,"Payment Exported..: " Line Location: BS1+30
Function Call: WRITE	Prompt: "Not yet exported" Line Location: BS1+35
Function Call: WRITE	Prompt: !,"ECS FileName......: ",$P(ACR2,U,11) Line Location: BS1+36
Function Call: WRITE	Prompt: !,"Number of Paymts..: ",J Line Location: BS1+51
Function Call: WRITE	Prompt: !,"Tot amt of Paymts.: ",$J($FN(ACRTOT,"P,",2),12) Line Location: BS1+52
Function Call: WRITE	Prompt: ! Line Location: BS1+58
Function Call: WRITE	Prompt: !?25,$J($FN(Z,"P,",2),15) Line Location: APPSUM+27
Function Call: WRITE	Prompt: @IOF Line Location: APPSUMH+1
Function Call: WRITE	Prompt: !!,"Appropriation Summary " Line Location: APPSUMH+2
Function Call: WRITE	Prompt: !!?10,"APPROPRIATION",?25,"AMOUNT" Line Location: APPSUMH+5
Function Call: WRITE	Prompt: !?10,"-------------",?25,"---------------" Line Location: AH1+0
Function Call: WRITE	Prompt: @IOF Line Location: EXP1+2
Function Call: WRITE	Prompt: !?17,"Enter the EXPORT DATE(S)",! Line Location: EXP1+3
Function Call: WRITE	Prompt: @IOF Line Location: EXPH+1
Function Call: WRITE	Prompt: !?10,"List of files exported on " Line Location: EXPH+2
Function Call: WRITE	Prompt: Y Line Location: EXPH+5
Function Call: WRITE	Prompt: !?10,"Report Date: " Line Location: EXPH+6
Function Call: WRITE	Prompt: Y Line Location: EXPH+9
Function Call: WRITE	Prompt: ?55,"PAGE: ",ACRDC Line Location: EXPH+11
Function Call: WRITE	Prompt: !?40,"PAYMENTS",?62,"CREDITS" Line Location: EXPH+12
Function Call: WRITE	Prompt: !,"BATCH",?8,"SCHD",?20,"ECS FILE",?30,"FORMAT",?38,"NO.",?44,"AMOUNT",?59,"NO.",?66,"AMOUNT" Line Location: EXPH+13
Function Call: WRITE	Prompt: !,"------",?8,"------",?20,"--------",?30,"------",?38,"---",?42,"---------------",?59,"---",?63,"---------------" Line Location: EXPH+14

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ACRAU - [#9002185.3]	Classic Fileman Calls
^AUTTVNDR - [#9999999.11]	Classic Fileman Calls
^AUTTLCOD - [#9999999.66]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRAU - [#9002185.3]	BANK+6
^ACROUT	EXP2+30
^AFSLAFP - [#9002325]	CCOMPLET+15, BS1+3, BS1+4, BS1+5, BS1+16, BS1+40, BS1+41, BS1+42, BS1+43, BANK+2 , BANK+5, SSCHUP+1, SSCHUP+4, SSCHUP+5, SSCHUP+8, SSCH+7, APPSUM+6, APPSUM+7, APPSUM+8, APPSUM+12 , EXP2+11, EXP2+12, EXP2+16, EXP2+17
^AFSLAFP("EXP"	EXP2+4, EXP2+6, EXP2+8
^AUTTVNDR - [#9999999.11]	VENDOR+6, VENDOR+7, BANK+4
^DD("DD"	BS1+10, BS1+20, BS1+27, BS1+33, EXP2+22, EXPH+4, EXPH+8
^DD(9002325.01	BS1+15
^TMP("ACREXP"	EXPEXIT+1!, EXP2+18*, EXP2+19, EXP2+25, EXP2+28, EXP2+30, EXP2+31

Label References

Name	Line Occurrences
AH1	APPSUM+26
APPSUM	BS1+60
APPSUMH	APPSUM+3, APPSUM+25
BANK	SSCHUP+8
BS	BSTATUS+2
BS1	BS+7
EXP1	EXPLIST+2
EXPEXIT	EXPLIST+1, EXP1+1
EXPH	EXP2+26, EXP2+36
LCOD	LCOD+7
SSCH	SSCHUP+7
TRAVELER	TRAVELER+7
VENDOR	VENDOR+12

Naked Globals

Name	Field # of Occurrence
^(0	VENDOR+6, VENDOR+7
^(1	SSCHUP+5, SSCH+7*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR("SOURCE"	CCOMPLET+9, CCOMPLET+10
ACR0	BS+6~, BS1+3*, BS1+25, BS1+26
ACR1	BS+6~, BS1+4, SSCHUP+2~, SSCHUP+5, SSCHUP+7
ACR2	BS+6~, BS1+5*, BS1+14, BS1+15, BS1+18, BS1+19, BS1+23, BS1+31, BS1+32, BS1+36
ACRACH	VENDOR+5, CSELECT!
>> ACRAMT	BS1+42, BS1+44, BS1+47, BS1+50
ACRAPPN	BS1+37!, APPSUM+28!
ACRAPPN(	APPSUM+11, APPSUM+13, APPSUM+14*, APPSUM+17, APPSUM+19, APPSUM+20
ACRBATDA	BS!, BS+5, BS1+2, BS1+3, BS1+4, BS1+5, BS1+16, BS1+40, BS1+41, BS1+42 , BS1+43, BS1+44, BANK+2, BANK+5, BANK+12, SSCHUP+1, SSCHUP+4, SSCHUP+5, SSCHUP+8, SSCH+2 , SSCH+7, APPSUM+6, APPSUM+7, APPSUM+8, APPSUM+12, APPSUM+13, EXP2+7, EXP2+8, EXP2+11, EXP2+12 , EXP2+16, EXP2+17, EXP2+18
>> ACRBATNO	BS1+13, APPSUMH+3
>> ACRBEGIN	EXP1+5, EXP2+3, EXP2+21
>> ACRBSCH	SSCHUP+7, SSCH+5, SSCH+7
>> ACRBTYP	BS1+43, BS1+44, APPSUM+12, APPSUM+13
ACRCHK	BANK+1~, BANK+8*, BANK+15
ACRDAN	BANK+1~, BANK+10*, BANK+15
>> ACRDATE	EXP2+3, EXP2+4, EXP2+6, EXP2+8, EXP2+18, EXP2+24, EXP2+25, EXP2+28, EXP2+30, EXP2+31 , EXPH+3
ACRDC	EXPEXIT!, EXP2+2~, EXPH+10*, EXPH+11
ACRDEST	CSELECT!
>> ACRDUZ	TRAVELER+8*
>> ACREND	EXP2+4
>> ACRFY	BS1+12
ACRFYDA	BS!, BS+5, BS1+2, BS1+3, BS1+4, BS1+5, BS1+16, BS1+40, BS1+41, BS1+42 , BS1+43, BS1+44, BANK+2, BANK+5, BANK+11, SSCHUP+1, SSCHUP+4, SSCHUP+5, SSCHUP+8, SSCH+1 , SSCH+7, APPSUM+6, APPSUM+7, APPSUM+8, APPSUM+12, APPSUM+13, EXP2+5, EXP2+6, EXP2+8, EXP2+11 , EXP2+12, EXP2+16, EXP2+17
ACRJ	SSCHUP+2~, SSCHUP+3, SSCHUP+6
>> ACRLBDT	LCOD+8*
>> ACROUT	VENDOR+10, VENDOR+11, LCOD+5, LCOD+6, TRAVELER+5, TRAVELER+6, BSTATUS+2, EXPLIST+2, EXP2+25, EXP2+28 , EXP2+36
ACRQUIT	BSTATUS+2, BSTATUS+3!, BS+5, SSCHUP+4, APPSUM+2!, APPSUM+17, APPSUM+19, APPSUM+21, APPSUM+24, EXPLIST+2 , EXPEXIT!, EXP1+5, EXP2+1!, EXP2+37!
>> ACRREF	VENDOR+7, VENDOR+14
ACRRTN	BANK+1~, BANK+9, BANK+15, EXP1+6
>> ACRS	CCOMPLET+8, CCOMPLET+9, CCOMPLET+10
>> ACRSBAT	CCOMPLET+11*, CCOMPLET+13, CCOMPLET+15
>> ACRSCHNO	APPSUMH+4
ACRSEQDA	BS1+38~, BS1+39, BS1+40, BS1+41, BS1+42, BS1+44, BANK+2, BANK+5, BANK+13, SSCHUP+2~ , SSCHUP+3, SSCHUP+4, SSCHUP+5, SSCH+3, SSCH+7, APPSUM+4~, APPSUM+5, APPSUM+6, APPSUM+7, APPSUM+8 , APPSUM+13, EXP2+10, EXP2+11, EXP2+12
>> ACRSFY	CCOMPLET+12*, CCOMPLET+15
>> ACRSS	CCOMPLET+14, CCOMPLET+15
>> ACRTCODE	BS1+41*, BS1+45, BS1+48
ACRTOT	BS1+38~, BS1+39, BS1+47, BS1+52, BS1+57
ACRTOTC	BS1+38~, BS1+39, BS1+50, BS1+55, BS1+57
>> ACRVDA	VENDOR+6, VENDOR+13*
ACRVDAT	VENDOR+7, VENDOR+8!, VENDOR+14*
>> ACRVDAX	VENDOR+13*
ACRX	CSELECT!, EXP2+2~
>> ACRXALL	BSTATUS+1, BS1+1, BS1+59, APPSUM+1
ACRXX	EXP2+2~, EXP2+27, EXP2+28, EXP2+30, EXP2+31
ACRXY	EXP2+2~, EXP2+29, EXP2+30, EXP2+31
ACRY	EXP2+2~, EXP2+16*, EXP2+18
ACRZ	EXP2+2~, EXP2+17*, EXP2+18
>> DA	BANK+13, SSCH+3
>> DA(1	BANK+12, BANK+14, SSCH+2, SSCH+4
>> DA(2	BANK+11, BANK+14, SSCH+1, SSCH+4
>> DIC	VENDOR+1, LCOD+1, TRAVELER+1*
>> DIC("A"	VENDOR+3, LCOD+3, TRAVELER+3*
>> DIC("B"	VENDOR+6, VENDOR+7
>> DIC("S"	VENDOR+4, VENDOR+5
>> DIC(0	VENDOR+2, LCOD+2, TRAVELER+2*
>> DIE	BANK+14, SSCH+4
>> DIR("A"	CCOMPLET+2, CCOMPLET+3
>> DIR("B"	CCOMPLET+4*
>> DIR(0	CCOMPLET+1*
>> DR	BANK+15, SSCH+5
DT	BS1+9, EXPH+7
>> DTOUT	VENDOR+11, LCOD+6, TRAVELER+6
>> DUOUT	VENDOR+11, LCOD+6, TRAVELER+6
IOF	BS+1, BS1+6, APPSUMH+1, EXP1+2, EXPH+1
IOSL	APPSUM+21, EXP2+36
J	BS1+38~, BS1+39, BS1+46, BS1+51
K	BS1+38~, BS1+39, BS1+49, BS1+53, BS1+54
N1	EXP2+9~, EXP2+10, EXP2+14, EXP2+18
N2	EXP2+9~, EXP2+10, EXP2+15, EXP2+18
T1	EXP2+9~, EXP2+10, EXP2+14, EXP2+18
T2	EXP2+9~, EXP2+10, EXP2+15, EXP2+18
U	VENDOR+6, VENDOR+7, LCOD+8, CCOMPLET+12, BS1+14, BS1+15, BS1+18, BS1+19, BS1+23, BS1+25 , BS1+26, BS1+31, BS1+32, BS1+36, BS1+41, BS1+42, BS1+43, BANK+2, BANK+3, BANK+5 , BANK+7, BANK+8, BANK+9, BANK+10, SSCHUP+1, SSCHUP+7, SSCHUP+8, SSCH+7, APPSUM+9, APPSUM+10 , APPSUM+11, APPSUM+12, APPSUM+13, APPSUM+14, EXP2+13, EXP2+14, EXP2+15, EXP2+18, EXP2+32, EXP2+33 , EXP2+34, EXP2+35
X	VENDOR+10, LCOD+5, TRAVELER+5, CCOMPLET+10, CCOMPLET+11, CCOMPLET+12, BANK+1~, BANK+2, BANK+3, BANK+4 , BANK+5, BANK+6, APPSUM+7, APPSUM+10, APPSUM+13, APPSUM+14, APPSUM+16, APPSUM+17, APPSUM+18, APPSUM+19 , APPSUM+20, APPSUM+22~, EXP2+9~, EXP2+12*, EXP2+13, EXP2+14, EXP2+15
Y	VENDOR+12, VENDOR+13, VENDOR+14, LCOD+7, LCOD+8, TRAVELER+7, TRAVELER+8, CCOMPLET+7, BS1+9, BS1+11 , BS1+19, BS1+21, BS1+26, BS1+28, BS1+32, BS1+34, BANK+1~, BANK+3, BANK+4, BANK+5 , BANK+6, BANK+7, BANK+8, BANK+9, BANK+10, APPSUM+4~, APPSUM+8, APPSUM+9, APPSUM+11, APPSUM+13 , APPSUM+14, APPSUM+22~, EXP2+9~, EXP2+13, EXP2+14, EXP2+15, EXP2+21, EXP2+23, EXPH+3, EXPH+5 , EXPH+7, EXPH+9
Z	APPSUM+4~, APPSUM+10, APPSUM+13, APPSUM+15, APPSUM+17, APPSUM+22~, APPSUM+27, EXP2+2~, EXP2+9~, EXP2+31 , EXP2+32, EXP2+33, EXP2+34, EXP2+35
>> ZTDESC	EXP1+7*
>> ZTRTN	EXP1+6*

Customize PDF page

Package: Commitment Register

Routine: ACRFPAY8

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: