Routine: ACRFPAY4

Information

ACRFPAY4 ;IHS/OIRM/DSD/THL,AEF - CERTIFY AND EXPORT PAYMENT BATCH; [ 07/22/2005 8:27 AM ]

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
Commitment Register	8	(DDS,DIC,DIE,DIK,DIR,FILE)^ACRFDIC ^ACRFESIG KP^ACRFODOC PAIDUP^ACRFPAID (AP,NEXT)^ACRFPAY VALCHK^ACRFPAY5 VENDOR^ACRFRR PAUSE^ACRFWARN

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Commitment Register	2	ACRFPAY ACRFPAY6

Entry Points

Name	Comments	DBIA/ICR reference
VS1	;EP;TO SYNCRONIZE BETWEEN ARMS PAYEE AND 1166 AFP APPROVALS FOR
VS2	;SYCHRONIZE BETWEEN ARMS AND 1166
VDATA	;DISPLAY ARMS AND 1166 PAYEE DATA
VENDOR	;SELECT VENDOR FOR PAYMENT
R1
BNCHK	;BATCH NUMBER CHECK TO ENSURE NO DUPLICATE NUMBERS
R11
FY	;EP;
CLOSEB	;EP;CLOSE A BATCH
REOPEN	;EP;TO REOPEN CLOSED BATCH
ADD	;EP;ADD A NEW BATCH
VSYNC	;EP - REVIEW SELECTED PAYMENTS
DHR	;ALLOW RE-CREATION OF DHR'S
DELETE	;EP;DELETE A PAYMENT

External References

Name	Field # of Occurrence
DDS^ACRFDIC	ADD+55
DIC^ACRFDIC	VENDOR+5, R1+6, R11+6
DIE^ACRFDIC	VS2+7, R11+27, DHR+14, CLOSEB+14
DIK^ACRFDIC	DELETE+22
DIR^ACRFDIC	R11+17, DHR+5, CLOSEB+7, DELETE+7, DELETE+15, ADD+13, ADD+21, ADD+27, ADD+40, FY+5
FILE^ACRFDIC	ADD+9, ADD+48
^ACRFESIG	CLOSEB+9
KP^ACRFODOC	DELETE+25
PAIDUP^ACRFPAID	CLOSEB+26
AP^ACRFPAY	ADD+56
NEXT^ACRFPAY	VSYNC+6
VALCHK^ACRFPAY5	CLOSEB+1
VENDOR^ACRFRR	VS1+9
PAUSE^ACRFWARN	VDATA+19, VSYNC+3, CLOSEB+17, CLOSEB+22, CLOSEB+27, DELETE+3, BNCHK+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: VDATA+7
Function Call: WRITE	Prompt: !!,"ARMS PAYEE: ",$P(ACRV0,U),?50,"EIN: ",$P(ACRV11,U,13) Line Location: VDATA+8
Function Call: WRITE	Prompt: !?12,$P(ACRV14,U) Line Location: VDATA+9
Function Call: WRITE	Prompt: !?12,$P(ACRV14,U,2) Line Location: VDATA+10
Function Call: WRITE	Prompt: !?12,$P(ACRV14,U,3),", ",$P($G(^DIC(5,+$P(ACRV14,U,3),0)),U,2)," ",$P(ACRV14,U,5) Line Location: VDATA+11
Function Call: WRITE	Prompt: !!,"1166 PAYEE: ",$P(ACRP0,U),?50,"EIN: ",$P(ACRP11,U,13) Line Location: VDATA+12
Function Call: WRITE	Prompt: !?12,$P(ACRP14,U) Line Location: VDATA+13
Function Call: WRITE	Prompt: !?12,$P(ACRP14,U,2) Line Location: VDATA+14
Function Call: WRITE	Prompt: !?12,$P(ACRP14,U,3),", ",$P($G(^DIC(5,+$P(ACRP14,U,3),0)),U,2)," ",$P(ACRP14,U,5) Line Location: VDATA+15
Function Call: WRITE	Prompt: !!,"Payment Sequence NO. ",$P(ACRSEQ0,U) Line Location: VDATA+16
Function Call: WRITE	Prompt: !,"will now be updated with the new Payee information." Line Location: VDATA+17
Function Call: WRITE	Prompt: ! Line Location: VDATA+18
Function Call: WRITE	Prompt: !!,"You must select a vendor for this payment." Line Location: VENDOR+6
Function Call: WRITE	Prompt: ! Line Location: R1+5
Function Call: WRITE	Prompt: ! Line Location: R11+5
Function Call: WRITE	Prompt: ! Line Location: R11+16
Function Call: WRITE	Prompt: !!,"Batch NO: "_ACRBATNO_" from Fiscal Year "_ACRFYNO Line Location: R11+20
Function Call: WRITE	Prompt: !,$S(+$G(^AFSLAFP(ACRFYDA,1,ACRBATDA,2)):"Can now be RE-EXPORT'ed.",1:"Is now OPEN for further processing.") Line Location: R11+21
Function Call: WRITE	Prompt: ! Line Location: DHR+4
Function Call: WRITE	Prompt: ! Line Location: CLOSEB+6
Function Call: WRITE	Prompt: ! Line Location: DELETE+6
Function Call: WRITE	Prompt: ! Line Location: DELETE+14
Function Call: WRITE	Prompt: !!?10,"FISCAL YEAR.: ",ACRFY Line Location: ADD+31
Function Call: WRITE	Prompt: !?10,"BATCH NUMBER: ",ACRBATNO Line Location: ADD+32
Function Call: WRITE	Prompt: !?10,"BATCH TYPE..: ",$S(ACRBTYP="V":"Vendor Payment",1:"Travel Payment") Line Location: ADD+33
Function Call: WRITE	Prompt: !?10,"PAYMENT TYPE: ",$S("BE"[ACRACH:"ACH NON-Grouped","CF"[ACRACH:"Check-Grouped","NO"[ACRACH:"Check-Not Grouped",ACRACH="G":"NO-Check (DHR-ONLY)",1:"") Line Location: ADD+35
Function Call: WRITE	Prompt: ! Line Location: ADD+39
Function Call: WRITE	Prompt: ! Line Location: FY+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AFSLAFP - [#9002325]	Classic Fileman Calls
^AUTTVNDR - [#9999999.11]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACRDOC - [#9002196]	VS1+10
^AFSLAFP - [#9002325]	VS1+4, VS1+5, VS1+7, R11+13, R11+21, R11+25, DHR+8, CLOSEB+15, CLOSEB+19, DELETE+24 , ADD+45
^AFSLAFP("B"	ADD+4
^AFSLAFP("L"	BNCHK+1
^AUTTVNDR - [#9999999.11]	VDATA+1, VDATA+2, VDATA+3, VDATA+4, VDATA+5, VDATA+6, VENDOR+4
^DIC(5 - [#5]	VDATA+11, VDATA+15, VS2+6
^TMP("ACRPAY"	VSYNC+6, DELETE+17

Label References

Name	Line Occurrences
ADD	ADD+18
BNCHK	ADD+16
DHR	R11+19
FY	ADD+2
R1	REOPEN+1
R11	R1+11
VDATA	VS1+12
VENDOR	VS1+11, VENDOR+6
VS1	VSYNC+6
VS2	VS1+13

Naked Globals

Name	Field # of Occurrence
^(0	R11+25, ADD+45*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACR0	DELETE+25
>> ACRACH	ADD+30*, ADD+35, ADD+47
>> ACRBATDA	VS1+3, VS1+4, VS1+5, VS1+7, VS2+2, R11+8, R11+11, R11+13, R11+21, R11+23 , R11+25, DHR+8, DHR+10, CLOSEB+10, CLOSEB+15, CLOSEB+19, DELETE+19, ADD+50
ACRBATNO	R11+9, R11+14, R11+20, CLOSEB+16, CLOSEB+20, CLOSEB+25, DELETE+25, ADD+15, ADD+18, ADD+32 , ADD+42, BNCHK+1, BNCHK+2, BNCHK+5!
>> ACRBTYP	VSYNC+1, ADD+23*, ADD+33, ADD+47
>> ACRCERT	CLOSEB+4, CLOSEB+9, CLOSEB+13, CLOSEB+15, CLOSEB+19, CLOSEB+25
>> ACRDOC	DELETE+25
>> ACRDOCDA	VS1+4*, VS1+8, VS1+10, VS1+11
ACRFY	DELETE+23, DELETE+24, DELETE+25, ADD+1~, ADD+4, ADD+6, ADD+31, FY+8
ACRFYDA	VS1+3, VS1+4, VS1+5, VS1+7, VS2+3, R1+8~, R1+9, R11, R11+1, R11+10 , R11+13, R11+21, R11+22, R11+24, R11+25, DHR+8, DHR+11, CLOSEB+11, CLOSEB+12, CLOSEB+15 , CLOSEB+19, DELETE+20, DELETE+24, ADD+1~, ADD+4, ADD+5, ADD+10*, ADD+43, ADD+44, ADD+45 , ADD+51, BNCHK+1
ACRFYNO	R1+8~, R1+10*, R11+14, R11+20
>> ACRJ	VSYNC+6, DELETE+17
>> ACRMAX	DELETE+1, DELETE+4
>> ACROF	BNCHK+2
>> ACRON	BNCHK+2
>> ACROUT	REOPEN+1, R1+11
ACRP0	VS1+2~, VDATA+1*, VDATA+12
ACRP11	VS1+2~, VDATA+2*, VDATA+12
ACRP14	VS1+2~, VDATA+3*, VDATA+13, VDATA+14, VDATA+15
ACRPVDA	VS1+6~, VS1+7*, VDATA+1, VDATA+2, VDATA+3, VENDOR+4
ACRQUIT	VSYNC+6, VSYNC+7!, REOPEN+1, REOPEN+2!, R1+7, R1+11, R11+7, CLOSEB+2, CLOSEB+9, CLOSEB+18* , CLOSEB+23, CLOSEB+24, CLOSEB+28, DELETE+8, DELETE+16, DELETE+17, DELETE+26!, ADD+3, ADD+14, ADD+17 , ADD+22, ADD+28, ADD+41, ADD+49, FY+6, FY+7
>> ACRSEQ0	VS1+5*, VDATA+16
>> ACRSEQDA	VS1+3, VS1+4, VS1+5, VS1+7, VS2+1, VSYNC+6, DHR+7, DHR+8, DHR+9, DELETE+17 , DELETE+18
ACRV0	VS1+2~, VDATA+4*, VDATA+8, VS2+6
ACRV11	VS1+2~, VDATA+5*, VDATA+8, VS2+5
ACRV14	VS1+2~, VDATA+6*, VDATA+9, VDATA+10, VDATA+11, VS2+6
ACRVDA	VS1+6~, VS1+10, VDATA+4, VDATA+5, VDATA+6, VS2+6, VENDOR+7
>> ACRXX	VSYNC+5, VSYNC+6, DELETE+9, DELETE+17
>> ACRY	VSYNC+5, DELETE+9, DELETE+11
>> DA	VS2+1, R11+11, R11+23, DHR+9, CLOSEB+10, DELETE+18, ADD+50*
>> DA(1	VS2+2, VS2+4, R11, R11+10, R11+22, DHR+10, DHR+12, CLOSEB+11, DELETE+19, DELETE+21 , ADD+43, ADD+51*
>> DA(2	VS2+3, VS2+4, DHR+11, DHR+12, DELETE+20*, DELETE+21
>> DDSFILE(1	ADD+53*
>> DIC	VENDOR+1, R1, R11+1, ADD+7, ADD+44*
>> DIC("A"	VENDOR+3, R1+2, R11+3*
>> DIC("B"	VENDOR+4, R1+3
>> DIC("DR"	ADD+47*
>> DIC("S"	R1+4, R11+4
>> DIC(0	VENDOR+2, R1+1, R11+2, ADD+8, ADD+46*
>> DIE	VS2+4, R11+24, DHR+12, CLOSEB+12, ADD+52*
>> DIK	DELETE+21*
>> DIR("A"	R11+13, R11+14, DHR+2, CLOSEB+4, DELETE+5, DELETE+10, DELETE+11, ADD+12, ADD+20, ADD+26 , ADD+37, FY+3
>> DIR("B"	R11+15, DHR+3, CLOSEB+5, DELETE+13, ADD+38, FY+2
>> DIR(0	R11+12, DHR+1, CLOSEB+3, DELETE+4, DELETE+12, ADD+11, ADD+19, ADD+25, ADD+36, FY+1
>> DIRUT	FY+6
>> DR	VS2+6, R11+25, R11+26, DHR+13, CLOSEB+13, ADD+54
DT	R1+3, CLOSEB+13, ADD+47, FY+2
>> DTOUT	FY+6
>> DUOUT	FY+6
DUZ	CLOSEB+13, ADD+47
IOF	VDATA+7
U	VS1+7, VS1+10, VDATA+8, VDATA+9, VDATA+10, VDATA+11, VDATA+12, VDATA+13, VDATA+14, VDATA+15 , VDATA+16, VS2+6, VENDOR+4, R1+10, R11+9, R11+25, CLOSEB+15, CLOSEB+19, DELETE+25
X	VS2+5, VS2+6, VSYNC+4~, VSYNC+6, DELETE+17, ADD+6, ADD+14, ADD+15, ADD+42*, FY+8
>> Y	VENDOR+6, VENDOR+7, R1+7, R1+9, R11+7, R11+8, R11+18, DHR+6, CLOSEB+8, DELETE+8 , DELETE+16, ADD+10, ADD+22, ADD+23, ADD+28, ADD+30, ADD+41, ADD+49, ADD+50
>> Y(0	R1+10, R11+9

Customize PDF page

Package: Commitment Register

Routine: ACRFPAY4

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: