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

Package: Accounts Receivable

Routine: PRCARPS


Information

PRCARPS ;SF-ISC/YJK-REPAYMENT PAYMENT STATEMENT ;10/23/93 9:50 AM

Source Information

Source file <PRCARPS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Accounts Receivable 2 WRST^PRCARPS1  BILL^PRCAUTL  
Registration 1 KVAR^VADPT  
VA FileMan 1 (,DD)^%DT  

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
Accounts Receivable 2 PRCAC PRINT STATEMENT  PRCAC REPRINT STATEMENT  

Entry Points

Name Comments DBIA/ICR reference
BEGIN ;PRCA*4.5*315 Allow GOTBILL (PRCABN) to be passed in
PRINTST
EN
PRT
QUE
CLOSEDV
KILLV ;
END
GETPT
GETPAY
GETPB
SETLINE
EN1 ;Reprint the payment statement.
LOOK
DATE
CLDATE

External References

Name Field # of Occurrence
^%DT EN+1, PRT+1, DATE
DD^%DT GETPAY+1
^%ZIS EN+2
^%ZISC CLOSEDV
^%ZTLOAD QUE+1
WRST^PRCARPS1 PRT
BILL^PRCAUTL BEGIN+1
KVAR^VADPT END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,*7,"NO REPAYMENT PLAN FOR THIS ACCOUNT.",!
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !,*7,"NO REPAYMENT PLAN FOR THIS ACCOUNT.",!
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: !,"NO PAYMENT DATA!",!
  • Line Location: EN+0
Function Call: WRITE
  • Prompt: !,*7,"THE DATE DOES NOT MATCH !, PLEASE CHECK REPAYMENT PROFILE.",!!
  • Line Location: EN1+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] BEGIN+2, BEGIN+3, BEGIN+4, PRT+2*, GETPTGETPT+1, GETPT+2, GETPBLOOK+1, CLDATE
^PRCA(433 - [#433] GETPAYGETPAY+3, GETPAY+4

Label References

Name Line Occurrences
BEGIN PRINTSTEN1+1
CLDATE EN1+4
CLOSEDV EN+3, PRT+3
DATE EN1+2
EN PRINTSTEN1+4
EN1 EN1+4
END PRINTSTEN1+1, EN1+2, EN1+3
GETPAY PRT
GETPB PRT
GETPT EN
KILLV PRINTSTEN1+4
LOOK EN1+3
PRINTST PRINTST
PRT EN+2, EN+4
QUE EN+3
SETLINE PRT

Naked Globals

Name Field # of Occurrence
^( LOOK+1
^(0 BEGIN+2, GETPT+1, GETPT+2, CLDATE*
^(3 GETPAY+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+1*!, PRT+1*!, DATE*
%DT("A" DATE*
>> %ZIS EN+2*
DT EN+1*, PRT+1*, PRT+2
>> GOTBILL BEGIN+1, BEGIN+3, BEGIN+4
I END!
IO EN+2, EN+3, EN+4
IO("Q" EN+3!
>> IO(0 EN+2, EN+3
IOM SETLINE
>> POP EN+2
PRCA END!
PRCA("BILLN" BEGIN+2*, QUE
PRCA("DEBTNAM" END!
PRCA("DEBTOR" BEGIN+2*, QUE, END!
PRCA1 END!, EN1+3*, LOOK+1*
PRCABN BEGIN+1, BEGIN+2, BEGIN+3, BEGIN+4, PRT+2, QUE, END!, GETPTGETPT+1, GETPT+2
GETPBLOOK+1, CLDATE
PRCABN1 END!, LOOK+1*, CLDATE
PRCACITY END!
PRCADT END!, GETPAY*, GETPAY+1, GETPAY+2*
PRCADUE QUE, END!, GETPT*, GETPT+2*
PRCAKEN GETPT*, GETPT+1, GETPT+2, GETPT+3!
PRCAKIP END!
PRCALL PRCARPS+5~
PRCALL(1 SETLINE+1*
PRCALL(10 SETLINE+1*
PRCALL(11 SETLINE+1*
PRCALL(2 SETLINE+1*
PRCALL(3 SETLINE+1*
PRCALL(4 SETLINE+1*
PRCALL(5 SETLINE+1*
PRCALL(6 SETLINE+1*
PRCALL(7 SETLINE+1*
PRCALL(8 SETLINE+1*
PRCALL(9 SETLINE+1*
PRCALN END!, SETLINE*, SETLINE+1
PRCALN(0 SETLINE*
PRCALN(1 SETLINE*
PRCALN(2 SETLINE*
PRCALN(3 SETLINE*
PRCALN(4 SETLINE*
PRCALN(5 SETLINE*
PRCALN(6 SETLINE*
PRCAMT END!, GETPAY+3*
PRCANO END!
PRCANOD PRT+2, QUE, END!, GETPT*, GETPT+1*
PRCAPB END!
PRCAPB( GETPB+1*
PRCAPP PRT!, END!
PRCAPP( GETPAY+5*
PRCAPT EN*, QUE, END!, GETPT+1*, GETPAYGETPAY+3, GETPAY+4
PRCARDT END!, EN1+2!, LOOK+1, DATE*
PRCAREP BEGIN+5*, PRINTST*, END!, EN1+1*
PRCASSAN END!
PRCAST1 END!
PRCATY END!
U BEGIN+2, PRT+2, GETPTGETPT+1, GETPT+2, GETPAYGETPAY+3, GETPAY+5, GETPB+1, LOOK+1
CLDATE
>> X EN+1*, PRT+1*
>> Y EN+1, PRT+1, GETPAY+1*, GETPAY+2, DATE
Z GETPT+1*, GETPT+2*, GETPT+3!, GETPAY+5*, GETPAY+6!, GETPB+1*, GETPB+2!
Z0 LOOK+1*, LOOK+2!
Z1 LOOK*, LOOK+1*!
Z3 GETPAY+4*, GETPAY+5, GETPAY+6!
Z4 GETPB*, GETPB+1, GETPB+2!
>> ZTDESC QUE+1*
ZTRTN QUE+1*!
ZTSAVE QUE!, QUE+1!
ZTSAVE("PRCA(""BILLN"")" QUE*
ZTSAVE("PRCA(""DEBTOR"")" QUE*
ZTSAVE("PRCABN" QUE*
ZTSAVE("PRCADUE" QUE*
ZTSAVE("PRCANOD" QUE*
ZTSAVE("PRCAPT" QUE*
ZTSK QUE!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All