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

Package: IFCAP

Routine: PRCH1A2


Information

PRCH1A2 ;WISC/PLT-PRCH1A continued ;6/10/97 15:22

Source Information

Source file <PRCH1A2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
IFCAP 6 (FT,YN)^PRC0A  (LOOKUP,PIECE)^PRC0B  $$FP^PRCH0A  DC^PRCH1A  RC^PRCH1A1  ^PRCHDP1  
VA FileMan 1 EN^DDIOL  

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: 2

Package Total Caller Graph
IFCAP 2 PRCH1A  PRCH7C  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
RECON(PRCA,PRCB,PRCRG) ;PRCA= ri of file 442, PRCB =ri of file 200,PRCRG=reconcile range %
REC
Q11 ;lookup
Q12
MCA
W
ACT0
START
ACT1
RC ;call reconcile routine PRCH1A1
EXIT
SS(IOTM,IOBM) ;screen size a-top, b=bottom margin
MC(DX,DY) ;move cursor dx=column #, dy=row number
CS
DISP ;
DPO ;display purchase order
DD
LU() ;low to upper

External References

Name Field # of Occurrence
EN^DDIOL RECON+6, RECON+8, RECON+10, REC+1, REC+2, Q11+1, W+12, ACT0+9, START+2, START+3
, ACT1+12
FT^PRC0A ACT0+3, ACT1+3, EXIT
YN^PRC0A Q12+8, MCA+5, W+5, RC+4
LOOKUP^PRC0B Q12+6, MCA+3, W+3
PIECE^PRC0B DPO+3, DD+2
$$FP^PRCH0A DPO+7
DC^PRCH1A ACT0+8, ACT1+11
RC^PRCH1A1 RC+1
^PRCHDP1 ACT1+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Matching Card XXXX"_$E(PRCCL,13,16)_", Vendor's Purchase Order #:",!
  • Line Location: Q12+1
Function Call: WRITE
  • Prompt: " Not Found"
  • Line Location: Q12+10
Function Call: WRITE
  • Prompt: !,"Matching Card XXXX"_$E(PRCCL,13,16)_", $Amount within Range "_PRCRG_"%:",!
  • Line Location: MCA+0
Function Call: WRITE
  • Prompt: " Not Found"
  • Line Location: MCA+7
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"Listing All Credit Card Charges with Matched Card XXXX"_$E(PRCCL,13,16)_":",!
  • Line Location: W+0
Function Call: WRITE
  • Prompt: " Not Found"
  • Line Location: W+7
Function Call: WRITE
  • Prompt: @IOSTBM
  • Line Location: SS+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CS+0
Function Call: WRITE
  • Prompt: PRCBK
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: " ",$P(A,U)," ",$E(D,4,5),"-",$E(D,6,7),"-",$E(D,2,3)," "
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: $P(^PRCD(442.5,$P(A,U,2),0),U,2)," "
  • Condition for execution: $P(A,U,2)
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: $E($P(^PRCD(442.3,$P(C,U),0),U),1,34)
  • Condition for execution: $P(C,U)
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: !,?13,"FCP: ",$P($P(A,U,3)," ")," ",$J($P(A,U,16),0,2)
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: ?35,$P($G(^PRC(440,$P(B,U),0)),U)
  • Condition for execution: $P(B,U)
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: ?18,"You are reconciling this PURCHASE CARD ORDER:"
  • Line Location: DPO+2
Function Call: WRITE
  • Prompt: !,"IFCAP Order FCP: ",$G(A(442,PRCRI(442),1,"E")),?50,"Purchase Date: ",$G(A(442,PRCRI(442),.1,"E"))
  • Line Location: DPO+4
Function Call: WRITE
  • Prompt: !,"Vendor Name: ",$G(A(442,PRCRI(442),5,"E")),?50,"P.O.#: ",$G(A(442,PRCRI(442),.01,"E"))
  • Line Location: DPO+5
Function Call: WRITE
  • Prompt: !,"STATUS: ",$G(A(442,PRCRI(442),.5,"E")),?60,"$Amount: ",$J($G(A(442,PRCRI(442),92,"E")),0,2)
  • Line Location: DPO+6
Function Call: WRITE
  • Prompt: !,"Total Reconciled Charges: ",$J($P($$FP^PRCH0A(PRCRI(442)),U,2),0,2)
  • Line Location: DPO+7
Function Call: WRITE
  • Prompt: !,$TR($J("",78)," ","-")
  • Line Location: DPO+8
Function Call: WRITE
  • Prompt: !,?20,"to this credit card CHARGE:"
  • Line Location: DD+1
Function Call: WRITE
  • Prompt: !,"Reconcile Doc: ",$G(A(440.6,PRCRI(440.6),.01,"E")),?50,"Purchase Date: ",$G(A(440.6,PRCRI(440.6),8,"E"))
  • Line Location: DD+3
Function Call: WRITE
  • Prompt: !,"Vendor Name: ",$G(A(440.6,PRCRI(440.6),31,"E")),?50,"P.O.#: ",$G(A(440.6,PRCRI(440.6),20,"E"))
  • Line Location: DD+4
Function Call: WRITE
  • Prompt: !,"TXN REF: ",$G(A(440.6,PRCRI(440.6),9,"E")),?60,"$Amount: ",$J($G(A(440.6,PRCRI(440.6),13,"E")),0,2)
  • Line Location: DD+5
Function Call: WRITE
  • Prompt: !,$TR($J("",78)," ","-")
  • Line Location: DD+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] DISP+3
^PRC(440.5 - [#440.5] RECON+7, REC+4, W+9, W+11
^PRC(442 - [#442] RECON+4, RECON+9, REC, START+4
^PRCD(442.3 - [#442.3] DISP+3
^PRCD(442.5 - [#442.5] DISP+2
^PRCH(440.6 - [#440.6] Q12+8, MCA+5, W+5, START, START+1, RC+2

Label References

Name Line Occurrences
$$LU ACT0+4, ACT1+5
ACT0 ACT0+7, ACT0+8, ACT0+9
ACT1 ACT1+7, ACT1+10, ACT1+11, ACT1+12
CS ACT1+8, EXIT+1, DPO+2
DD START, START+1, ACT1+8, ACT1+10, ACT1+11
DPO RECON+5, REC, ACT0+7, ACT0+8, RC+3, DD
EXIT RECON+6, RECON+8, RECON+10, REC+1, REC+2, Q12+7, MCA+4, W+4, ACT0+3, ACT0+5
, ACT1+4, RC+2
MC DPO+9, DD, DD+7
MCA Q12
Q12 W+9, W+11
REC ACT0+6, ACT1+6, RC+5
SS ACT1+8, EXIT+1, DPO+9, DD
START Q12+7, MCA+4, W+4

Naked Globals

Name Field # of Occurrence
^(0 REC
^(23 START, START+4
^(6 Q12+8, MCA+5, W+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A RECON+3~, RECON+7*, RECON+8, DISP+2, DISP+3, DPO+1~, DD~
A( DD+3, DD+4, DD+5
A(442 DPO+4, DPO+5, DPO+6
B RECON+3~, DISP+2, DISP+3
C RECON+3~, DISP+3
D RECON+3~, DISP+2*
D0 ACT1+8~*
DX MC~, MC+1*
DY MC~, MC+1*
IOBM SS~
IOF CS
>> IOSTBM EXIT+1, SS+1
IOTM SS~
>> IOXY MC+1
PRCA RECON~, RECON+4
PRCAMT RECON+2~, REC*, REC+3, START+3
PRCAMTH RECON+2~, REC+3*
PRCAMTL RECON+2~, REC+3*
PRCB RECON~, RECON+4, RECON+8, RECON+9*, RECON+10, REC*
>> PRCBK DISP+2
PRCBOC RECON+2~
PRCC RECON+2~, REC*, REC+2, REC+4*, W+8, W+10, START+2
PRCCL RECON+2~, REC+4*, Q12+1, Q12+2, MCA, MCA+1, W, W+1, W+8*, W+9*
, W+10*, W+11*
PRCCNT RECON+2~, Q12+6*, Q12+7, MCA+3*, MCA+4, W+3*, W+4
PRCCOA RECON+2~
PRCCP RECON+2~, START*, START+1*, START+2, START+4*
PRCCR RECON+2~, REC*, W+8*, W+9, W+10*, W+11
PRCD RECON+2~
PRCDI RECON+2~
>> PRCDUZ REC*, REC+1, Q12+2, MCA+1, W+1
>> PRCE START*, START+1*, START+3, START+4*
PRCER RECON+2~, RECON+6*, RECON+8*, RECON+10*, REC+1*, REC+2*, RC+2*, EXIT, EXIT+2
PRCPDT RECON+2~
PRCPO RECON+2~, REC*, Q12
PRCR RECON+2~, START*, START+4*
PRCRG RECON~, REC+3*, MCA
PRCRI RECON+2~
PRCRI( RECON+4*, RECON+6, RECON+7, Q12*, Q12+7*, Q12+8, MCA+4*, MCA+5, W+4*, W+5
, W+9*, W+11*, START, START+1, RC+2, DD+2, DD+3, DD+4, DD+5
PRCRI(200 RECON+4*
PRCRI(442 RECON+4*, RECON+9, REC, ACT0+8, START+4, ACT1+8, ACT1+11, DPO+3, DPO+4, DPO+5
, DPO+6, DPO+7
PRCSTC RECON+2~
PRCVAL RECON+2~
U RECON+10, REC, REC+4, Q12+8, MCA+5, W+5, W+9, W+11, START+1, START+3
, DISP+2, DISP+3, DPO+7
>> X RECON+11*, REC, Q12+2*, Q12+6, Q12+7, Q12+8, MCA+1*, MCA+3, MCA+4, MCA+5
, W+1*, W+3, W+4, W+5, ACT0+3, ACT1+3, ACT1+4, RC+4, EXIT, EXIT+2*
>> X("S" Q12+2*, MCA+1*, W+1*
>> X("W" Q12+5*, MCA+2*, W+2*
>> X(1 ACT0*, ACT1*
>> X(2 ACT0+1*, ACT1+1*
>> X(3 ACT0+1*, ACT1+1*
>> Y Q12+6, Q12+7, Q12+8*, MCA+3, MCA+4, MCA+5*, W+3, W+4, W+5*, ACT0+3
, ACT0+4*, ACT0+5, ACT0+6, ACT0+7, ACT0+8, ACT1+3, ACT1+5*, ACT1+6, ACT1+7, ACT1+10
, ACT1+11, ACT1+12, RC+4, RC+5, EXIT, LU+1
>> Y(1 ACT0+2*, ACT1+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All