Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ACRFPAY

Package: Commitment Register

Routine: ACRFPAY


Information

ACRFPAY ;IHS/OIRM/DSD/THL,AEF - CERTIFY AND EXPORT PAYMENT BATCH; [ 02/13/2007 9:19 AM ]

Source Information

Source file <ACRFPAY.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Commitment Register 16 (DDS,DIR)^ACRFDIC  (EXIT,N1166)^ACRFIV11  ($$COUNT,AIRLINE)^ACRFIV12  EPMT^ACRFODOC  $$CKLK^ACRFPAY  (326,COMBINE,DOCX,NONARMS)^ACRFPAY1  (BATCHL,DBATCH,EXPORT,PAY,PAY1)^ACRFPAY3  (ADD,REOPEN)^ACRFPAY4  
(BATCHD,REPORTS)^ACRFPAY6  BSTATUS^ACRFPAY8  ^ACRFPAYU  ^ACRFPR  (ACRIV,REOPEN)^ACRFRR  ^ACRFTA  $$DOL^ACRFUTL  PAUSE^ACRFWARN  
VA Fileman 1 HLP^DDSUTL  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Commitment Register 5 ACRFPAY  ACRFPAY3  ACRFPAY4  ACRFPAY6  ACRFPAYU  

Entry Points

Name Comments DBIA/ICR reference
NEWSEQ1
CERTIFY ;EP;TO LIST AND SELECT BATCHES TO BE CERTIFIED
BATCHS ;EP - SELECT BATCH
SREV ;EP;REVIEW SELECTED PAYMENTS
NEWSEQ ;EP;CREATE NEW SEQUENCE
ADDPAY ;EP;ADD PAYMENT
CONTRACT ;ALLOW ADD OF MULTIPLE NEW CONTRACT PAYMENTS
NEXT ;EP
EN1
C1
PAYE ;EP;EDIT PAYMENT INFO
BANKINFO ;EP;TO ENTER BANK INFO
EN
R1
AP ;EP;TO ADD PAYMENT INFO
BADSRN ;BAD SUB-ROUTING NUMBER - MESSAGE USED BY ACR BANK INFORMATION SCREEN
FMA ;CHECK FILE MAN ACCESS CODES
CKLK(X,Y,DUZ) ;EP; EXTRINSIC FUNCTION TO CHECK FOR BLOCKS ; ACR*2.1*16.01 IM14473
UPODOC(ACRFYDA,ACRBATDA,ACRSEQDA)
BADRN ;BAD ROUTING NUMBER - MESSAGE USED BY ACR BANK INFORMATION SCREEN
REVIEW
EXIT

External References

Name Field # of Occurrence
DDS^ACRFDIC PAYE+7, BANKINFO+5
DIR^ACRFDIC EN1+8, BATCHS+17, AP+6, NEXT+5, CONTRACT+7
EXIT^ACRFIV11 NEWSEQ1+15
N1166^ACRFIV11 NEWSEQ1+14
$$COUNT^ACRFIV12 ADDPAY+1
AIRLINE^ACRFIV12 EN1+26
EPMT^ACRFODOC UPODOC+31
$$CKLK^ACRFPAY EN1+29, EN1+32, EN1+35, EN1+39, EN1+44, EN1+49
326^ACRFPAY1 CONTRACT+15
COMBINE^ACRFPAY1 EN1+37
DOCX^ACRFPAY1 CONTRACT+12
NONARMS^ACRFPAY1 NEWSEQ+1
BATCHL^ACRFPAY3 R1
DBATCH^ACRFPAY3 EN1+45
EXPORT^ACRFPAY3 EN1+33
PAY^ACRFPAY3 C1+7
PAY1^ACRFPAY3 C1+8
ADD^ACRFPAY4 EN1+36
REOPEN^ACRFPAY4 EN1+40
BATCHD^ACRFPAY6 R1+3, C1+15
REPORTS^ACRFPAY6 EN1+42
BSTATUS^ACRFPAY8 EN1+47
^ACRFPAYU EN1+51
^ACRFPR EN1+46
ACRIV^ACRFRR EN1+25
REOPEN^ACRFRR EN1+41
^ACRFTA EN1+50
$$DOL^ACRFUTL UPODOC+20
PAUSE^ACRFWARN BATCHS+3, ADDPAY+5, CERTIFY+4, C1+11, FMA+6, FMA+13, CKLK+12
HLP^DDSUTL BADRN+3, BADRN+4, BADSRN+3, BADSRN+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !!?10,"Select the Payment Function"
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: BATCHS+12
Function Call: WRITE
  • Prompt: !
  • Line Location: AP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: NEXT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CONTRACT+6
Function Call: WRITE
  • Prompt: !!,"DOCUMENT NUMBER.....: ",ACRDOCX
  • Line Location: CONTRACT+9
Function Call: WRITE
  • Prompt: !,"CONTRACTOR..........: ",$P($G(^AUTTVNDR(+$G(ACRVDAX),0)),U)
  • Line Location: CONTRACT+10
Function Call: WRITE
  • Prompt: *7
  • Line Location: BADRN+2
Function Call: WRITE
  • Prompt: *7
  • Line Location: BADSRN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACRAPL("AC" CERTIFY+2
^ACRAU - [#9002185.3] FMA+8
^AFSLAFP - [#9002325] BATCHS+25, BATCHS+26, BATCHS+27, PAYE+10, C1+5, UPODOC+8, UPODOC+10, UPODOC+14, UPODOC+22
^AFSLAFP("CERT" C1+4, C1+7
^AFSLODOC( UPODOC+26, UPODOC+28
^AFSLODOC("B" UPODOC+24
^AUTTVNDR - [#9999999.11] CONTRACT+4, CONTRACT+10, UPODOC+21
^TMP("ACRBAT" BATCHS+20
^TMP("ACRBI" EXIT+2!
^TMP("ACREFTR" EXIT+2!
^TMP("ACREXP" EXIT+2!
^TMP("ACRINV" EXIT+2!
^TMP("ACRINVR" EXIT+2!
^TMP("ACRIV" EXIT+2!
^TMP("ACRNORR" EXIT+2!
^TMP("ACRPAY" BATCHS+21, BATCHS+22, SREV+3
^TMP("ACRPAYL" EXIT+2!
^TMP("ACRRR" EXIT+2!
^TMP("ACRSYNC" EXIT+2!
^VA(200 - [#200] UPODOC+21
^XUSEC( CKLK+9
^XUSEC("ACRFZ EDIT EFT" BANKINFO+1
^XUSEC("ACRFZ NO CERTIFY" CERTIFY+2
^XUSEC("ACRFZ VIEW EFT" BANKINFO+1

Label References

Name Line Occurrences
ADDPAY AP+8
BATCHS R1+1, C1+13
C1 CERTIFY+5
CERTIFY EN1+30
CONTRACT NEWSEQ1+16
EN1 EN
EXIT ACRFPAY+4, EN1
FMA ACRFPAY+3
NEWSEQ ADDPAY+6
NEWSEQ1 CONTRACT+17
NEXT SREV+3
PAYE ADDPAY+9, SREV+3
R1 REVIEW
REVIEW EN1+27
UPODOC PAYE+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACR EXIT!, C1+1!
ACR0 EXIT!
ACR1 EXIT!
ACR2 EXIT!
ACRACH EXIT!, PAYE+9
ACRAMT UPODOC+7~, UPODOC+19*, UPODOC+20*, UPODOC+30
ACRBAT EXIT+1!, BATCHS+28!
ACRBATCH UPODOC+7~, UPODOC+11*, UPODOC+12, UPODOC+28, UPODOC+30
ACRBATDA EXIT!, BATCHS+23*, BATCHS+25, BATCHS+27, ADDPAY+1, PAYE+2, PAYE+8, PAYE+10, C1+6*, C1+7*
, UPODOC~, UPODOC+10, UPODOC+14, UPODOC+22
ACRBATNO EXIT!
ACRBSCH EXIT!, BATCHS+27*
ACRBTYP EXIT!, PAYE+6, PAYE+11, BANKINFO+2, BANKINFO+3
>> ACRCANDA NEWSEQ1
ACRCERT EXIT!, BATCHS+11, C1+2*
ACRDATE UPODOC+7~, UPODOC+13*, UPODOC+30
ACRDEST EXIT!
ACRDOC EXIT!, CONTRACT+13, UPODOC+7~, UPODOC+15*, UPODOC+16, UPODOC+26
ACRDOCX NEWSEQ1+17!, CONTRACT+3, CONTRACT+9, CONTRACT+11
ACRESIG EXIT!
>> ACREXP BATCHS+11, BATCHS+13
ACRFY EXIT!, BATCHS+26*, C1+5*, UPODOC+7~, UPODOC+8*, UPODOC+9, UPODOC+24
ACRFYDA EXIT!, BATCHS+24*, BATCHS+25, BATCHS+26, BATCHS+27, ADDPAY+1, PAYE+1, PAYE+8, PAYE+10, C1+3*
, C1+4*, C1+5, C1+7, UPODOC~, UPODOC+8, UPODOC+10, UPODOC+14, UPODOC+22
ACRFYX EXIT!
ACRIV EXIT+1!, EN1+41*!
>> ACRIVPAY( NEWSEQ1
ACRJ EXIT!, SREV+3*
ACRJJ EXIT!
ACRMAX EXIT!, BATCHS+1, C1+1!, C1+9
ACRNEXT ADDPAY+10*, AP+2, AP+4!
>> ACROBJDA NEWSEQ1*, NEWSEQ1+1
ACROUT EN, EXIT!, REVIEW, R1+2, R1+3, ADDPAY+7, NEWSEQ+2, CERTIFY+5, C1+14, C1+15
, CONTRACT+16
ACRPAY EXIT!, C1+1!
ACRPAYEE EXIT!
ACRPDFOR UPODOC+7~, UPODOC+23*, UPODOC+30
ACRQUIT ACRFPAY+4, EN, EXIT!, EN1+9*, EN1+25!, EN1+26!, EN1+27!, EN1+28!, EN1+31!, EN1+34!
, EN1+37!, EN1+38!, EN1+41!, EN1+42!, EN1+43!, EN1+47!, EN1+48!, EN1+51!, REVIEW, REVIEW+1!
, R1+2, R1+3, R1+4!, BATCHS+4*, BATCHS+18*, BATCHS+21*, BATCHS+25*, ADDPAY+7!, NEWSEQ+2, SREV+3
, SREV+4!, NEXT+6*, CERTIFY+5, CERTIFY+6!, C1+12*, C1+14, C1+15, C1+16!, FMA+7*, FMA+14*
, CONTRACT+8*, CONTRACT+13*, CONTRACT+16
ACRREF EXIT!
ACRREFX AP+8, NEWSEQ1+16, NEWSEQ1+17!
ACRS EXIT!
ACRSBAT EXIT!
ACRSCHNO UPODOC+7~, UPODOC+22*, UPODOC+30
ACRSEQ UPODOC+7~, UPODOC+17*, UPODOC+18, UPODOC+28, UPODOC+30
ACRSEQDA EXIT!, SREV+3*, PAYE+3, PAYE+8, PAYE+10, UPODOC~, UPODOC+14
ACRSEQNO EXIT!
ACRSFY EXIT!
ACRSNO EXIT+1!
ACRSS EXIT!
ACRSSN UPODOC+7~, UPODOC+21*, UPODOC+30
ACRTOT EXIT!
>> ACRVDA CONTRACT+14*
ACRVDAT EXIT+1!
ACRVDAX NEWSEQ1+17!, CONTRACT+4, CONTRACT+10, CONTRACT+14
ACRXALL EXIT!, BATCHS+6!, BATCHS+19*
ACRXX EXIT!, SREV+2*, SREV+3
ACRY EXIT!, SREV+2
D0 UPODOC+7~, UPODOC+24*, UPODOC+25, UPODOC+26, UPODOC+28, UPODOC+31
D1 UPODOC+7~, UPODOC+26*, UPODOC+27, UPODOC+28, UPODOC+31
D2 UPODOC+7~, UPODOC+28*, UPODOC+29, UPODOC+31
>> DA PAYE+3*, PAYE+13*
>> DA(1 PAYE+2*
>> DA(2 PAYE+1*
DATA UPODOC+7~, UPODOC+10*, UPODOC+11, UPODOC+13, UPODOC+14*, UPODOC+15, UPODOC+17, UPODOC+19, UPODOC+21, UPODOC+23
, UPODOC+30*, UPODOC+31
>> DDSFILE BANKINFO+3*
>> DDSFILE(1 PAYE+5*
>> DIE PAYE+4*, BANKINFO+2*
>> DIR("?" BATCHS+9*, BATCHS+10*
>> DIR("A" EN1+6*, BATCHS+8*, BATCHS+11*, AP+2*, NEXT+2*, CONTRACT+2*, CONTRACT+3*, CONTRACT+4*
>> DIR("B" AP+3*, NEXT+3*, CONTRACT+5*
>> DIR(0 EN1+3*, EN1+4*, EN1+5*, BATCHS+7*, AP+1*, NEXT+1*, CONTRACT+1*
>> DR PAYE+6*, BANKINFO+4*
DUZ EN1+29, EN1+32, EN1+35, EN1+39, EN1+44, EN1+49, BANKINFO+1, CERTIFY+2, FMA+8, CKLK~
, CKLK+9
DUZ(0 FMA+1
IOF EN1+1
J C1~
U BATCHS+23, BATCHS+24, BATCHS+26, BATCHS+27, PAYE+11, C1+5, FMA+8, CONTRACT+4, CONTRACT+10, UPODOC+8
, UPODOC+11, UPODOC+13, UPODOC+15, UPODOC+17, UPODOC+19, UPODOC+21, UPODOC+22, UPODOC+23, UPODOC+30
X BATCHS+5~, BATCHS+22*, BATCHS+23, BATCHS+24, SREV+1~, SREV+3*, PAYE+10*, PAYE+11*, PAYE+12, PAYE+13
, C1~, CONTRACT+11*, CKLK~, CKLK+9
Y EN1+9, EN1+25, EN1+26, EN1+27, EN1+28, EN1+31, EN1+34, EN1+37, EN1+38, EN1+41
, EN1+42, EN1+43, EN1+46, EN1+47, EN1+48, EN1+51, BATCHS+18, BATCHS+19, BATCHS+20*, BATCHS+21
, BATCHS+22, AP+7, NEXT+6, C1~, CONTRACT+8, CKLK~, CKLK+11
Z CKLK+8~, CKLK+9*, CKLK+10, CKLK+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All