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 |  Local Variables  | All
Print Page as PDF
Routine: PRCFDA

Package: IFCAP

Routine: PRCFDA


Information

PRCFDA ;WISC@ALTOONA/CTB-PROCESS PAYMENT IN ACCTG ;2/9/96 15:58 [2/1/99 2:26pm]

Source Information

Source file <PRCFDA.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
IFCAP 10 ^PRCEFIS4  (,ASK,ASK2,EX)^PRCFDA2  STATUS^PRCFDE1  $$CLSD1358^PRCFDE2  PAUSE^PRCFDPVU  ($$OBLIG,DISC,SUM)^PRCFDT  MSG^PRCFQ  ^PRCFSITE  
^PRCFYN  POST^PRCH58LQ  
VA FileMan 5 ^DIC  ^DIE  ^DIK  EN^DIQ  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
IFCAP 6 FMS LINE  PRCFD PROCESS PAYMENT IN ACCTG  PRCFDA1  PRCFDA1X  PRCFDA2  PRCFDA3  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
EN
B
BOC ; Ask for BOC
EDIT ; edit the FMS line entry in 421.5
DOC ;PROCESS FMS DOC
SUMM ; Display Accounting Summary - Entry Point from Input Template
OT
NUMSTA() ;Determine number of unique stations in IFCAP system
EXIT ; IF NO fms line BOC chosen,display message and exit
UNP ; Check for posted liquidation amounts and unpost

External References

Name Field # of Occurrence
^DIC V+5
^DIE BOC+27, EDIT+9, EDIT+14, EDIT+15, EDIT+19
^DIK UNP+4
EN^DIQ EN+12
^DIR EN+8, EN+13
^PRCEFIS4 B+14
^PRCFDA2 DOC+13
ASK^PRCFDA2 BOC+6
ASK2^PRCFDA2 BOC+4
EX^PRCFDA2 EN+2, EN+4, EN+8, EN+9, BBOC+5, DOC+1, OT+1, EXIT+1
STATUS^PRCFDE1 B+3, EXIT+4
$$CLSD1358^PRCFDE2 EN+4
PAUSE^PRCFDPVU DOC+6
$$OBLIG^PRCFDT DOC+1
DISC^PRCFDT EDIT+12
SUM^PRCFDT EDIT+20
MSG^PRCFQ DOC+4, DOC+6, OT+1, EXIT+2
^PRCFSITE V+3
^PRCFYN EN+6, B+2, DOC+10, EXIT+4
POST^PRCH58LQ UNP+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This invoice is being edited by someone else, please try later!"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !!?5,"There are no BOCs on this obligation, processing terminated."
  • Line Location: BOC+5
Function Call: WRITE
  • Prompt: !!?15,"Exiting."
  • Line Location: BOC+7
Function Call: WRITE
  • Prompt: !,"FMS Line # ",PRCFA("LNO")
  • Line Location: EDIT+5
Function Call: WRITE
  • Prompt: !,"OBLIGATION AMOUNT: ",PRCFA("AMT")
  • Line Location: EDIT+7
Function Call: WRITE
  • Prompt: !,"Warning - Computed Liquidation amt of $",$FN(PRCFA("LIQ"),"",2)," exceeds",!?5,"total obligated amt of $",$FN(PRCFA("AMT"),"",2)," for BOC ",BOC," on ",$P($G(^PRCF(421.5,PRCF("CIDA"),1)),U,3),"."
  • Line Location: EDIT+13
Function Call: WRITE
  • Prompt: !!?2,"****WARNING**** - Certified Invoice total $",$FN(PRCF("CAMT")/100,"",2)," does not match sum of",!,"Line Amounts: $",$FN(PRCF("TAMT"),"",2)
  • Line Location: EDIT+20
Function Call: WRITE
  • Prompt: !?7,"If you believe that the Total Invoice Amount Certified for",!,"payment is incorrect, the invoice should be returned to voucher audit",!,"for review."
  • Line Location: EDIT+21
Function Call: WRITE
  • Prompt: !?2,"There are no Line Amounts - FMS will not accept this!"
  • Line Location: EDIT+22
Function Call: WRITE
  • Prompt: !,"Unliquidated obligation amounts and BOCs on this order are:"
  • Line Location: SUMM+3
Function Call: WRITE
  • Prompt: ?12,BOC
  • Line Location: SUMM+15
Function Call: WRITE
  • Prompt: !,"Total Invoice Amount Certified for Payment=$"
  • Line Location: SUMM+20
Function Call: WRITE
  • Prompt: $J(PRCF("CAMT")/100,0,2)
  • Line Location: SUMM+21
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1
Function Call: WRITE
  • Prompt: !!,"Liquidation # ",ZX1," for ",$FN(LAMT,",",2)," has been deleted and unposted."
  • Line Location: UNP+6
Routine Call
  • DIC
  • Line Location:
    • V+5
Routine Call
  • DIE
  • Line Location:
    • BOC+27
    • EDIT+9
    • EDIT+14
    • EDIT+15
    • EDIT+19
Routine Call
  • DIR
  • Line Location:
    • EN+8
    • EN+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCF(421.5 - [#421.5] Classic Fileman Calls
^PRC(424 - [#424] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(421.5 BOC+9
^PRC(411 - [#411] NUMSTA+2
^PRC(442 - [#442] B+21, B+22, B+23, B+27, B+28, DOC+2
^PRCD(420.2 - [#420.2] SUMM+6, SUMM+13
^PRCF(421.5 - [#421.5] ENEN+2, EN+3, BB+6, B+7, B+10, B+31, BOC+9*, BOC+10
BOC+11*, BOC+12*, BOC+13*, BOC+14*, BOC+22, BOC+23, EDIT+13
^TMP("PRCFDA" V+2!, OT!, UNP+1

Label References

Name Line Occurrences
$$NUMSTA V+6
B EN+1
BOC EDIT+21, DOC+12
DOC BOC+4, BOC+6, EDIT+23
EXIT BOC+4, BOC+6
OT BOC+27, EDIT+9, EDIT+15, EDIT+19, DOC+10, DOC+11
PRCFDA V+6
SUMM B+32
UNP OT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% V+3, V+6!, EN+4, EN+6*, B+2*, B+3, DOC+9*, DOC+10, DOC+11, DOC+12
EXIT+4*
%A EN+5*, B+1*, DOC+9!*, EXIT+3*
%B EN+6*, B+2*, DOC+9!*, EXIT+4*
BOC B+20~*, B+21*, B+22, B+24, BOC+3*, BOC+11, BOC+14, BOC+21, BOC+22, BOC+23
EDIT+4, EDIT+6, EDIT+13, SUMM+2~, SUMM+6*, SUMM+8, SUMM+13*, SUMM+15*
C V+6!
CNT BOC+1~
CNT1 BOC+1~, BOC+2*, BOC+3*, BOC+4, BOC+5, BOC+6, BOC+20
DA EN+10~, EN+11*, BOC+4*, BOC+6*, BOC+28!, EDIT+1*, UNP+2~, UNP+3*
DA(1 BOC+15*, BOC+16, EDIT+2*, EDIT+3
DIC V+5*!, EN+10~, EN+11*
DIC("S" V+4*
DIC(0 V+5*
DIE BOC+16*, BOC+28!, EDIT+3*
DIK UNP+2~, UNP+4*
DIQ EN+10~
DIQ(0 EN+11*
DIR EN+8!, EN+10~
DIR("A" EN+7*, EN+13*
DIR("B" EN+8*, EN+13*
DIR(0 EN+7*, EN+13*
>> DIROUT EN+8, EN+9
>> DIRUT EN+8, EN+9, BOC+4, BOC+6
DR EN+10~, BOC+17*, BOC+24*, BOC+28!, EDIT+8*, EDIT+9!, EDIT+14*!, EDIT+15*!, EDIT+19*!
DTOUT V+6!, BOC+27, EDIT+9, EDIT+15, EDIT+19
DUOUT V+6!, EN+8, EN+9
FMSLN B+20~, B+23*, B+24
I B+29*, SUMM+2~, SUMM+10*, SUMM+11, SUMM+12, SUMM+13, SUMM+14, NUMSTA+1~*, NUMSTA+2*, NUMSTA+3
IEN B+20~, B+21*, B+22*, B+23, B+24
IOF EN+11
J SUMM+2~, SUMM+11*, SUMM+12, SUMM+13
LAMT UNP+2~, UNP+3*, UNP+5, UNP+6
>> OK EDIT+20, EDIT+21
PO B+18!, UNP+2~, UNP+5
PODA B+18!
PRC V+6!
PRC("FY" B+13, B+16*
PRC("PARAM" B+13, B+16*
PRC("PER" B+12, B+15*
PRC("SITE" EN*, B+12, B+14, B+15*
>> PRC10DA DOC+1
>> PRCF("CAMT" B+31*, BOC+22, EDIT+20, SUMM+21
>> PRCF("CIDA" EN*, EN+2, EN+3, EN+11, BB+6, B+7, B+10, B+31, BOC+7
BOC+8*, BOC+9, BOC+10, BOC+11, BOC+12, BOC+13, BOC+14, BOC+15, BOC+22, BOC+23
EDIT+2, EDIT+13
>> PRCF("PO" DOC+2*, DOC+4
>> PRCF("PODA" B+7*, B+8, B+9, B+21, B+22, B+23, B+27, B+28, DOC+2
>> PRCF("TAMT" EDIT+20, EDIT+22
PRCF("VIEW" EN+11*, EN+12!
>> PRCF("X" V+3*
PRCFA UNP+2~, UNP+5
PRCFA("AMT" EDIT+6*, EDIT+7, EDIT+13, EDIT+14, EDIT+17, EDIT+18
PRCFA("ERROR PROCESSING" , V+3, EN+1, EN+3*, EN+4, B+14
PRCFA("LAMT" EDIT+11*
PRCFA("LIQ" EDIT+13, EDIT+14, EDIT+16*, EDIT+17, EDIT+18
PRCFA("LIQAMT" B+11*, B+18!
PRCFA("LNO" EDIT+4*, EDIT+5
PRCFA("PF" EDIT+16*, EDIT+17*, EDIT+18*
PRCFA("PODA" B+9*, B+18!, UNP+3*
PRCFA("REF" B+10*, B+18!
PRCFCIDA V+2~, BOC+7, BOC+8
>> PRCFD("CAMT" B+6*, B+11
PRCFD("PAYMENT" B+9*, B+18!
>> PRCFDICA EN*
PRCFEEE BOC+1~, BOC+21*
PRCFEX BOC+1~, BOC+6
PRCFEXIT BOC+1~, BOC+4
PRCFFLG V+2~, BOC+4, BOC+6, DOC+11
PRCFN BOC+1~, BOC+22*, BOC+23*
PRCFNO BOC+1~, BOC+2*, BOC+3*
>> PRCFNUM BOC+4, BOC+6, BOC+10, BOC+11, BOC+12, BOC+14, BOC+22, BOC+23, EDIT+1, EDIT+4
EDIT+6
PRCFX B+20!
PRCFX("FY" B+13*, B+16
PRCFX("PARAM" B+13*, B+16
PRCFX("PER" B+12*, B+15
PRCFX("SA" B+24*, B+29*, BOC+3, BOC+21, BOC+22, BOC+23, EDIT+4, EDIT+6, SUMM+1, SUMM+6
SUMM+10, SUMM+11, SUMM+12, SUMM+13
PRCFX("SHAMT" B+28*, B+29, SUMM+16
PRCFX("SHBOC" B+27*, B+29
PRCFX("SITE" B+12*, B+15
PRCRI V+6!, EN+10~
PRCUNLIQ SUMM+4, SUMM+5, SUMM+10, SUMM+19!
RECORD EN+10~
RECORD1 EN+10~
SHIP SUMM+2~, SUMM+13*, SUMM+15, SUMM+16, SUMM+17
SUBTOT SUMM+2~, SUMM+5*, SUMM+7*, SUMM+10*, SUMM+12*, SUMM+14*
U ENEN+3, EN+4, BB+6, B+7, B+10, B+23, B+28, B+29
B+31, BOC+9, BOC+12, BOC+13, BOC+22, BOC+23, EDIT+4, EDIT+6, EDIT+13, DOC+2
SUMM+6, SUMM+12, SUMM+13, UNP+3
X V+6!, B+3*, EDIT+10*, EDIT+11, EDIT+16, DOC+3*, DOC+4*, DOC+5*, OT+1*, NUMSTA+1~*
, NUMSTA+2*, EXIT+2*, EXIT+4*, UNP+1*, UNP+2, UNP+3
Y V+6!, ENEN+9, BB+4*, BOC+27, EDIT+9, EDIT+15, EDIT+19
Y(0 EN+4
ZX V+5!
ZX1 UNP+2~, UNP+3*, UNP+6
ZX2 V+5!
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 |  Local Variables  | All