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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACRFPAY8

Package: Commitment Register

Routine: ACRFPAY8


Information

ACRFPAY8 ;IHS/OIRM/DSD/THL,AEF - CERTIFY AND EXPORT PAYMENT BATCH; [ 11/01/2001 9:44 AM ]

Source Information

Source file <ACRFPAY8.m>

Call Graph

Call Graph Total: 6

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

Caller Graph

Caller Graph Total: 7

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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All