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

Package: Accounts Receivable

Routine: RCDPURET


Information

RCDPURET ;WISC/RFJ-Receipt utilities (transactions) ;1 Jun 99

Source Information

Source file <RCDPURET.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 ^DIC  FILE^DICN  ^DIE  (,IX)^DIK  $$EXTERNAL^DILFD  ^DIR  
Accounts Receivable 4 $$BAL^PRCAFN  (AUDIT,SUSPDIS)^RCBEPAY  RECEIPT^RCDPRECT  LASTEDIT^RCDPUREC  
Kernel 1 $$TRIM^XLFSTR  

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

Package Total Caller Graph
Accounts Receivable 17 RCBEADJ1  RCDPAPLI  RCDPEAD  RCDPEAP  RCDPEM  RCDPEM0  RCDPEMA  RCDPEWL5  
RCDPLPL1  RCDPLPL2  RCDPLPL3  RCDPLPL4  RCDPRPL1  RCDPRPL3  RCDPURED  RCDPXPAP  
RCXFMSCR  

Entry Points

Name Comments DBIA/ICR reference
SELTRAN(DA) ; select a transaction for a receipt
; returns -1 for timeout or ^, 0 for no selection, or ien of trans
ADDTRAN(RECTDA,RCDUZ) ; add transaction for receipt (in da)
CSTRAN(RECTDA,RCPAYAMT,CSRECORD) ; add SUSPENSE transaction for receipt (in da) ;PRCA*4.5*301
EDITTRAN(RECTDA,TRANDA) ; edit a receipt transaction
; returns 1 for success, or 0 (error message)
EDITACCT(RECTDA,TRANDA) ; edit the account on a receipt
DELEACCT(RECTDA,TRANDA) ; delete the account on a receipt
EDITFMS(RECTDA,TRANDA,DEFAULT) ; edit fms document number for clearing suspense
MOVETRAN(RCOLDREC,RCOLDTRA,RCNEWREC) ; move a transactions data
CANCTRAN(RECTDA,RECTRAN) ; cancel a transaction
DELETRAN(RECTDA,TRANDA) ; delete a transaction
SETUNAPP(RECTDA,TRANDA,UNAPPNUM) ; store the unapplied deposit number
PAYDEF(DEBTOR) ; get default for payment amount (used in input templates for payments)
PENDPAY(DEBTOR) ; return pending payments for a debtor
; returns ^tmp($j,"rcdpurec","pp",rectda,tranda)=data in 344.01
; and the total pending payment dollars
TRACE(DEBTOR) ;ENTER TOP TRACE NUMBER FOR TOP RECEIPTS
TRACEQ
GETRSN() ;

External References

Name Field # of Occurrence
^DIC SELTRAN+5
FILE^DICN ADDTRAN+12
^DIE CSTRAN+32, EDITTRAN+50, EDITACCT+5, DELEACCT+5, EDITFMS+6, CANCTRAN+6, SETUNAPP+5, TRACE+5
^DIK DELETRAN+3
IX^DIK MOVETRAN+13
$$EXTERNAL^DILFD EDITTRAN+13
^DIR GETRSN+7
$$BAL^PRCAFN PAYDEF+3
AUDIT^RCBEPAY DELEACCT+10
SUSPDIS^RCBEPAY DELEACCT+11
RECEIPT^RCDPRECT EDITTRAN+66
LASTEDIT^RCDPUREC CSTRAN+34, EDITTRAN+51, EDITACCT+6, DELEACCT+6, CANCTRAN+7, DELETRAN+4
$$TRIM^XLFSTR GETRSN+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," Amount Owed: $",$J($$PAYDEF^RCDPURET($P(^RCY(344,DA(1),1,DA,0),U,9)),0,2)
  • Line Location: CSTRAN+8
Function Call: WRITE
  • Prompt: !,"WARNING: Credit Card Number NOT entered."
  • Line Location: EDITTRAN+59
Function Call: WRITE
  • Prompt: !,"WARNING: Date of check is greater than the date of payment."
  • Line Location: EDITTRAN+60
Function Call: WRITE
  • Prompt: !,"Adding a NEW payment transaction to receipt "_$P(^RCY(344,RCNEWREC,0),"^")_": "
  • Line Location: MOVETRAN+4
Function Call: WRITE
  • Prompt: "# ",RCNEWTRA
  • Line Location: MOVETRAN+8
Function Call: WRITE
  • Prompt: !,"A comment is required when changing the status of an item in Suspense. Please",!,"try again."
  • Line Location: GETRSN+10
Routine Call
  • DIC
  • Line Location:
    • SELTRAN+5
Routine Call
  • DIE
  • Line Location:
    • CSTRAN+32
    • EDITTRAN+50
    • EDITACCT+5
    • DELEACCT+5
    • EDITFMS+6
    • CANCTRAN+6
    • SETUNAPP+5
    • TRACE+5
Routine Call
  • DIR
  • Line Location:
    • GETRSN+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCD(340 - [#340] Classic Fileman Calls
344.01 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRCA(430 - [#430] PAYDEF+4, TRACE+3
^PRCA(430.3 - [#430.3] PAYDEF+4
^RC(341.1 - [#341.1] EDITTRAN+8
^RCD(340 - [#340] TRACE+3, TRACE+6
^RCY(344 - [#344] ADDTRAN+2, ADDTRAN+5, ADDTRAN+6, CSTRAN+16, CSTRAN+19, CSTRAN+20, CSTRAN+33*, EDITTRAN+2, EDITTRAN+8, EDITTRAN+11
, EDITTRAN+13, EDITTRAN+54, MOVETRAN+4, MOVETRAN+11*, CANCTRAN+3, PENDPAY+6, PENDPAY+7, PENDPAY+8
^RCY(344.4 - [#344.4] EDITTRAN+9
^RCY(344.49 - [#344.49] EDITTRAN+11
^TMP($J PENDPAY+4!, PENDPAY+11*
^VA(200 - [#200] CANCTRAN+3

Label References

Name Line Occurrences
$$ADDTRAN MOVETRAN+5
$$EDITTRAN MOVETRAN+15
$$TRACE EDITTRAN+58
DELETRAN EDITTRAN+63
TRACEQ TRACE+2, TRACE+4

Naked Globals

Name Field # of Occurrence
^(0 ADDTRAN+2*, CSTRAN+16*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% SELTRAN+2~, EDITTRAN+4~, DELETRAN+1~
%DT ADDTRAN+1~, CSTRAN+15~, EDITTRAN+4~, MOVETRAN+1~
%T ADDTRAN+1~, CSTRAN+15~, EDITTRAN+4~, MOVETRAN+1~
%Y EDITTRAN+4~
C EDITTRAN+4~, EDITACCT+1~, EDITFMS+1~
>> CSDEP CSTRAN+30
CSRECORD CSTRAN~, CSTRAN+29, CSTRAN+30
D EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, CANCTRAN+1~, SETUNAPP+1~
D0 ADDTRAN+1~, CSTRAN+15~, EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, MOVETRAN+1~, CANCTRAN+1~, DELETRAN+1~, SETUNAPP+1~
D1 EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, MOVETRAN+1~, DELETRAN+1~
DA SELTRAN~, SELTRAN+3, ADDTRAN+1~, CSTRAN+15~, CSTRAN+26*, CSTRAN+29, CSTRAN+33, EDITTRAN+4~, EDITTRAN+47*, EDITACCT+1~
, EDITACCT+4*, DELEACCT+1~, DELEACCT+4*, EDITFMS+1~, EDITFMS+5*, MOVETRAN+1~, MOVETRAN+12*, CANCTRAN+1~, CANCTRAN+5*, DELETRAN+1~
, DELETRAN+2*, SETUNAPP+1~, SETUNAPP+4*, TRACE+1~, TRACE+3*, TRACE+4, TRACE+6
DA(1 ADDTRAN+9*, CSTRAN+25*, EDITTRAN+47*, EDITACCT+4*, DELEACCT+4*, EDITFMS+5*, MOVETRAN+12*, CANCTRAN+5*, DELETRAN+2*, SETUNAPP+4*
DATA EDITTRAN+4~, EDITTRAN+54*, EDITTRAN+56, EDITTRAN+57, EDITTRAN+58, EDITTRAN+59, EDITTRAN+60, PENDPAY+3~, PENDPAY+8*, PENDPAY+10
, PENDPAY+11, PENDPAY+12
DD ADDTRAN+1~, CSTRAN+15~, CSTRAN+24!
DDH EDITTRAN+4~, EDITACCT+1~, EDITFMS+1~
DEBTOR PAYDEF~, PAYDEF+2, PAYDEF+3, PAYDEF+4, PENDPAY~, PENDPAY+7, TRACE~, TRACE+2, TRACE+3
DEFAULT EDITFMS~, EDITFMS+3
DG EDITTRAN+4~, MOVETRAN+1~
DI ADDTRAN+1~, CSTRAN+15~, EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, CANCTRAN+1~, SETUNAPP+1~
DIC SELTRAN+2~, SELTRAN+3*, ADDTRAN+1~, ADDTRAN+10*, CSTRAN+15~, CSTRAN+28!, EDITTRAN+4~, EDITTRAN+46*, EDITACCT+1~, EDITACCT+3*
, DELEACCT+1~, DELEACCT+3*, EDITFMS+1~, EDITFMS+4*, MOVETRAN+1~, CANCTRAN+1~, CANCTRAN+2*, DELETRAN+1~, SETUNAPP+1~, SETUNAPP+2*
, TRACE+1~, TRACE+5*
DIC("A" SELTRAN+3*
DIC("DR" ADDTRAN+11*, CSTRAN+31*
DIC("W" SELTRAN+4*
DIC(0 SELTRAN+3*, ADDTRAN+10*
DICR EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, MOVETRAN+1~, DELETRAN+1~
DIE ADDTRAN+1~, CSTRAN+15~, CSTRAN+27*, EDITTRAN+4~, EDITTRAN+46*, EDITACCT+1~, EDITACCT+3*, DELEACCT+1~, DELEACCT+3*, EDITFMS+1~
, EDITFMS+4*, CANCTRAN+1~, CANCTRAN+2*, SETUNAPP+1~, SETUNAPP+2*, TRACE+1~, TRACE+5*
DIG EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, DELETRAN+1~
DIH EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, DELETRAN+1~
DIK MOVETRAN+1~, MOVETRAN+12*, DELETRAN+1~, DELETRAN+2*
DINUM ADDTRAN+1~, ADDTRAN+7*, CSTRAN+15~, CSTRAN+21*, CSTRAN+26
DIPGM EDITTRAN+4~, EDITACCT+1~, EDITFMS+1~
DIR GETRSN+2~, GETRSN+7!
DIR("?" GETRSN+6*
DIR("A" GETRSN+7*
DIR(0 GETRSN+7*
DIROUT GETRSN+2~
DIRUT GETRSN+2~
DISYS EDITACCT+1~, EDITFMS+1~
DIU EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, MOVETRAN+1~, DELETRAN+1~
DIV EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, DELETRAN+1~
DIW EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, DELETRAN+1~
DLAYGO ADDTRAN+1~, ADDTRAN+10*, CSTRAN+15~
DO ADDTRAN+1~, CSTRAN+15~, CSTRAN+24!
DQ ADDTRAN+1~, CSTRAN+15~, EDITTRAN+4~, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, CANCTRAN+1~, SETUNAPP+1~
DR ADDTRAN+1~, CSTRAN+15~, CSTRAN+29*, CSTRAN+30*, CSTRAN+31, EDITTRAN+4~, EDITTRAN+10*, EDITTRAN+14*, EDITTRAN+17*, EDITTRAN+18*
, EDITTRAN+27*, EDITTRAN+31*, EDITTRAN+33*, EDITTRAN+38*, EDITTRAN+39*, EDITTRAN+40*, EDITTRAN+43*, EDITTRAN+44*, EDITTRAN+49*, EDITACCT+1~
, EDITACCT+2*, DELEACCT+1~, DELEACCT+2*, EDITFMS+1~, EDITFMS+2*, EDITFMS+3*, CANCTRAN+1~, CANCTRAN+4*, SETUNAPP+1~, SETUNAPP+3*
, TRACE+1~, TRACE+5*
DTOUT SELTRAN+2~, SELTRAN+6, GETRSN+2~, GETRSN+8
DUOUT SELTRAN+2~, SELTRAN+6, GETRSN+2~, GETRSN+8
DUZ ADDTRAN+11, EDITTRAN+49, CANCTRAN+3
DZ EDITTRAN+4~, EDITACCT+1~, EDITFMS+1~
RCADJ EDITTRAN+5~, EDITTRAN+9*, EDITTRAN+14*
RCAMOUNT EDITTRAN+4~
RCDATA SELTRAN+2~, CANCTRAN+1~, CANCTRAN+3*
RCDUZ ADDTRAN~, ADDTRAN+11
RCERA EDITTRAN+5~, EDITTRAN+9*, EDITTRAN+11
RCNEWREC MOVETRAN~, MOVETRAN+4, MOVETRAN+5, MOVETRAN+11, MOVETRAN+12, MOVETRAN+15
RCNEWTRA MOVETRAN+1~, MOVETRAN+5*, MOVETRAN+6, MOVETRAN+8, MOVETRAN+11, MOVETRAN+12, MOVETRAN+15
RCOLDREC MOVETRAN~, MOVETRAN+11
RCOLDTRA MOVETRAN~, MOVETRAN+11
RCPAYAMT CSTRAN~, CSTRAN+29
RCTODAY GETRSN+2~
RCTYPE EDITTRAN+4~, EDITTRAN+8*, EDITTRAN+37, EDITTRAN+42, EDITTRAN+58, EDITTRAN+59
RCXADJ EDITTRAN+5~
RCXAMONT EDITTRAN+5~, EDITTRAN+30*
RCXERA EDITTRAN+5~, EDITTRAN+14*
RCXSUSP EDITTRAN+5~, EDITTRAN+20*
RCXSUSP1 EDITTRAN+5~, EDITTRAN+26*
RECTDA ADDTRAN~, ADDTRAN+2, ADDTRAN+5, ADDTRAN+6, ADDTRAN+9, ADDTRAN+10, CSTRAN~, CSTRAN+16, CSTRAN+19, CSTRAN+20
, CSTRAN+25, CSTRAN+27, CSTRAN+33, CSTRAN+34, EDITTRAN~, EDITTRAN+2, EDITTRAN+8, EDITTRAN+9, EDITTRAN+11, EDITTRAN+13
, EDITTRAN+46, EDITTRAN+47, EDITTRAN+51, EDITTRAN+54, EDITTRAN+63, EDITTRAN+66, EDITACCT~, EDITACCT+3, EDITACCT+4, EDITACCT+6
, DELEACCT~, DELEACCT+3, DELEACCT+4, DELEACCT+6, DELEACCT+10, DELEACCT+11, EDITFMS~, EDITFMS+4, EDITFMS+5, CANCTRAN~
, CANCTRAN+2, CANCTRAN+3, CANCTRAN+5, CANCTRAN+7, DELETRAN~, DELETRAN+2, DELETRAN+4, SETUNAPP~, SETUNAPP+2, SETUNAPP+4
, PENDPAY+3~, PENDPAY+6*, PENDPAY+7, PENDPAY+8, PENDPAY+11
RECTRAN CANCTRAN~, CANCTRAN+3, CANCTRAN+5
RESULT EDITTRAN+4~, EDITTRAN+55*, EDITTRAN+56*, EDITTRAN+57*, EDITTRAN+58*, EDITTRAN+59, EDITTRAN+60, EDITTRAN+63, EDITTRAN+66, EDITTRAN+68
, MOVETRAN+1~, MOVETRAN+15*, MOVETRAN+16
TOTAL PENDPAY+3~, PENDPAY+12*, PENDPAY+13
TRACE TRACE+1~, TRACE+2*, TRACE+6*, TRACEQ
TRANDA EDITTRAN~, EDITTRAN+2, EDITTRAN+11, EDITTRAN+13, EDITTRAN+47, EDITTRAN+54, EDITTRAN+63, EDITTRAN+66, EDITACCT~, EDITACCT+4
, DELEACCT~, DELEACCT+4, DELEACCT+10, DELEACCT+11, EDITFMS~, EDITFMS+5, DELETRAN~, DELETRAN+2, SETUNAPP~, SETUNAPP+4
, PENDPAY+3~, PENDPAY+7*, PENDPAY+8, PENDPAY+11
U CSTRAN+29, CSTRAN+30, CSTRAN+33, EDITTRAN+13, TRACE+3
UNAPPNUM SETUNAPP~, SETUNAPP+3
X SELTRAN+2~, ADDTRAN+1~, ADDTRAN+5*, ADDTRAN+6*, ADDTRAN+7, CSTRAN+15~, CSTRAN+19*, CSTRAN+20*, CSTRAN+21, EDITTRAN+4~
, EDITACCT+1~, DELEACCT+1~, EDITFMS+1~, MOVETRAN+1~, CANCTRAN+1~, DELETRAN+1~, SETUNAPP+1~, PAYDEF+1~, PAYDEF+3*, PAYDEF+4*
, PAYDEF+5, GETRSN+2~
Y SELTRAN+2~, SELTRAN+6*, SELTRAN+7, ADDTRAN+1~, ADDTRAN+13, CSTRAN+15~, EDITTRAN+4~, MOVETRAN+1~, CANCTRAN+1~, DELETRAN+1~
, SETUNAPP+1~, GETRSN+2~, GETRSN+5, GETRSN+8*, GETRSN+9*, GETRSN+10, GETRSN+11
Z EDITTRAN+12~, EDITTRAN+13*, EDITTRAN+14
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