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

Package: Accounts Receivable

Routine: RCDPEREC


Information

RCDPEREC ;ALB/TMK/KML/PJH - RECONCILIATION REPORT FOR EDI LOCKBOX FMS DOCS ; 8/2/10 4:17pm

Source Information

Source file <RCDPEREC.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  $$FMTE^XLFDT  
Accounts Receivable 2 $$FMSSTAT^RCDPUREC  $$PAYTOTAL^RCDPURED  
VA FileMan 1 ^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: 1

Package Total Caller Graph
Accounts Receivable 1 RCDPE DEPOSIT RECON REPORT  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entrypoint for producing the report
ENQUE ; Queued entrypoint for the report
; RCDDT = starting EFT deposit date
; RCSEL = 'A' if all deposits included ... 'N' if only those not fully
; transferred out of 8NZZ
EFTDEP(RCD,RCSTOP,RCPG) ;
; RCD = deposit date (FM) concatenated with the deposit #
TOT(RCD,RCSTOP,RCPG) ; Output the total lines for the deposit
NEWPG(RCPG) ; Check for new page needed, output header
; Function returns 1 if user chooses to stop output
SELECT() ; Select first deposit #
; Function returns values selected for first deposit #
HDR1(RCPG) ;Print report hdr
; RCPG = last page #^0/1 for top of page indicator
ASK(RCSTOP) ;

External References

Name Field # of Occurrence
^%ZIS EN+10
HOME^%ZIS EN+16
^%ZISC ENQUE+59
^%ZTLOAD EN+14
$$S^%ZTLOAD ENQUE+14, EFTDEP+3
^DIR EN+2, EN+6, ASK+3
$$FMSSTAT^RCDPUREC ENQUE+16, ENQUE+28
$$PAYTOTAL^RCDPURED ENQUE+27
$$FMTE^XLFDT EFTDEP+9, HDR1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number"_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !,?3,$J("",6)," UNMATCHED ",$E($P(Z,U,2)_$J("",30),1,30)_" "_$E($P(Z,U,3)_$J("",20),1,20)
  • Line Location: ENQUE+43
Function Call: WRITE
  • Prompt: !,?13,$P(Z,U,4)
  • Line Location: ENQUE+44
Function Call: WRITE
  • Prompt: !,?3,"ERROR IN EFT DETAIL LINE #: ",RCTRANS
  • Line Location: ENQUE+46
Function Call: WRITE
  • Prompt: !,?3,$E(+RC00_$J("",6),1,6)_" "_$E($P(RC00,U,3)_$J("",10),1,10)_" "_$E($P(Z,U,2)_$J("",30),1,30)_" "_$E($P(Z,U,3)_$J("",20),1,20)
  • Line Location: ENQUE+49
Function Call: WRITE
  • Prompt: !,?13,$E($P(Z,U,4)_$J("",50),1,50)
  • Line Location: ENQUE+51
Function Call: WRITE
  • Prompt: !,?43,$E($P(RC00,U,5)_$J("",10),1,10),!,?15,$E($P(RC00,U,2)_$J("",10),1,10)_" "_$E($P(RC00,U,4)_$J("",15),1,15)
  • Line Location: ENQUE+52
Function Call: WRITE
  • Prompt: !,"TASK STOPPED BY USER"
  • Line Location: ENQUE+57
Function Call: WRITE
  • Prompt: !!
  • Line Location: EFTDEP+6
Function Call: WRITE
  • Prompt: !,$E($$FMTE^XLFDT($P(Z,U,2),"2D")_$J("",8),1,8)," ",$E(+$G(^TMP($J,"RCDEP",RCD,"EFT"))_$J("",6),1,6)," ",$E($P(Z,U)_$J("",9),1,9)," ",$J($P(Z,U,3),13,2)," ",$E($S($P(Z,U,6):$$FMTE^XLFDT($P(Z,U,6),"2D"),1:"UNPOSTED")_$J("",8),1,8)
  • Line Location: EFTDEP+9
Function Call: WRITE
  • Prompt: !,?5,$E($P(Z0,U)_$J("",20),1,20)," ",$P(Z0,U,2)
  • Line Location: EFTDEP+10
Function Call: WRITE
  • Prompt: !,$J("",26),"TOTAL AMOUNT SENT VIA 'TR' DOCUMENTS: ",$J($G(^TMP($J,"RCDEP",RCD,"TOT")),15,2)
  • Line Location: TOT+2
Function Call: WRITE
  • Prompt: !,$J("",26),"TOTAL AMOUNT STILL TO BE TRANSFERRED: ",$J($P($G(^TMP($J,"RCDEP",RCD,"TOT")),U,2)-$G(^TMP($J,"RCD",RCD,"TOT")),15,2)
  • Line Location: TOT+3
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR1+3
Function Call: WRITE
  • Prompt: !,"EDI LOCKBOX FUND 5287.4/8NZZ RECONCILIATION REPORT",?55,$$FMTE^XLFDT(DT,2),?70,"Page: ",+RCPG
  • Line Location: HDR1+5
Function Call: WRITE
  • Prompt: !!,"DEP DATE ENTRY# DEP # TOTAL DEP AMT POST DT RECEIPT #",!,?5,"CR DOCUMENT CR DOC STATUS"
  • Line Location: HDR1+7
Function Call: WRITE
  • Prompt: !,?3,"EFT # MATCHED TO PAYER NAME PAYER ID ",!,?13,"TRACE #"
  • Line Location: HDR1+8
Function Call: WRITE
  • Prompt: !,?20,"RECEIPT #"
  • Line Location: HDR1+10
Function Call: WRITE
  • Prompt: !,?15,"TR DOCUMENT TR DOC STATUS"
  • Line Location: HDR1+11
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","=")
  • Line Location: HDR1+12
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+3
Routine Call
  • %ZIS
  • Line Location:
    • EN+10
Routine Call
  • %ZIS
  • Line Location:
    • EN+16
Routine Call
  • DIR
  • Line Location:
    • EN+2
    • EN+6
    • ASK+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344 - [#344] ENQUE+21, ENQUE+26
^RCY(344.3 - [#344.3] ENQUE+9, ENQUE+10
^RCY(344.31 - [#344.31] ENQUE+12, ENQUE+48
^RCY(344.4 - [#344.4] ENQUE+23, ENQUE+24, ENQUE+29
^TMP($J ENQUE+6!, ENQUE+16*, ENQUE+19*, ENQUE+23*, ENQUE+24*, ENQUE+29*, ENQUE+31!, ENQUE+32*, ENQUE+36!, ENQUE+37
, ENQUE+38, ENQUE+40, ENQUE+42, ENQUE+60!, EFTDEP+4, EFTDEP+9, TOT+2, TOT+3

Label References

Name Line Occurrences
$$NEWPG ENQUE+41, EFTDEP+5, EFTDEP+6, TOT+1
ASK ENQUE+54, NEWPG+5
EFTDEP ENQUE+38
ENQUE EN+18
HDR1 ENQUE+57, NEWPG+6
TOT ENQUE+37

Naked Globals

Name Field # of Occurrence
^( ENQUE+40, EFTDEP+4
^("RCUNM" ENQUE+42

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+1~, EN+10*
DIR EN+1~, EN+2!, EN+6!, SELECT+3~, ASK+2~
DIR("A" EN+2*, EN+6*
DIR("B" EN+5*
DIR(0 EN+2*, EN+6*, ASK+3*
DIROUT ASK+2~
DIRUT ASK+2~, ASK+4
DT EN+2, HDR1+5
DTOUT EN+1~, EN+3, EN+7, SELECT+3~, ASK+2~
DUOUT EN+1~, EN+3, EN+7, SELECT+3~, ASK+2~, ASK+4
IO EN+17
IO("Q" EN+11, EN+16!
IOF HDR1+3
IOM HDR1+12
IOSL EFTDEP+6, NEWPG+4
IOST HDR1+3, ASK+1
POP EN+1~, EN+10
RC0 ENQUE+5~, ENQUE+10*, ENQUE+16, ENQUE+31, ENQUE+32, ENQUE+38*
RC00 ENQUE+5~, ENQUE+12*, ENQUE+16, ENQUE+17, ENQUE+19, ENQUE+22, ENQUE+23, ENQUE+24, ENQUE+40*, ENQUE+42
, ENQUE+46, ENQUE+48, ENQUE+49, ENQUE+52
RC000 ENQUE+5~, ENQUE+23, ENQUE+26*, ENQUE+29
RCD ENQUE+5~, ENQUE+11*, ENQUE+16, ENQUE+19, ENQUE+23, ENQUE+24, ENQUE+29, ENQUE+31, ENQUE+32, ENQUE+35*
, ENQUE+37*, ENQUE+38, ENQUE+40, ENQUE+42, EFTDEP~, EFTDEP+4, EFTDEP+9, TOT~, TOT+2, TOT+3
RCDDT EN+1~, EN+3*, EN+4, ENQUE+8*, ENQUE+9*, ENQUE+11
RCDEP ENQUE+5~, ENQUE+9*, ENQUE+11
RCEFT ENQUE+5~, ENQUE+9*, ENQUE+10, ENQUE+12, ENQUE+16
RCEFT1 ENQUE+5~, ENQUE+12*, ENQUE+19, ENQUE+21, ENQUE+23, ENQUE+24, ENQUE+26, ENQUE+29
RCPG ENQUE+35*, ENQUE+37, ENQUE+38, ENQUE+41, ENQUE+54, EFTDEP~, EFTDEP+5, EFTDEP+6, EFTDEP+7, TOT~
, TOT+1, NEWPG~, NEWPG+3, NEWPG+4, NEWPG+5, NEWPG+6, NEWPG+7*, HDR1~, HDR1+3, HDR1+4*
, HDR1+5
RCR ENQUE+5~, ENQUE+26*, ENQUE+27, ENQUE+28, ENQUE+29
RCSEL EN+1~, EN+7*, EN+8, ENQUE+31
RCSTAT ENQUE+5~, ENQUE+28*, ENQUE+29
RCSTOP ENQUE+5~, ENQUE+8*, ENQUE+9, ENQUE+12, ENQUE+14*, ENQUE+30, ENQUE+36, ENQUE+37, ENQUE+38, ENQUE+39
, ENQUE+40, ENQUE+41*, ENQUE+54, ENQUE+57, EFTDEP~, EFTDEP+3*, EFTDEP+5*, EFTDEP+6*, TOT~, TOT+1*
, ASK~, ASK+4*
RCT ENQUE+5~, ENQUE+8*, ENQUE+14*
RCTOT ENQUE+5~, ENQUE+10*, ENQUE+23*, ENQUE+27*, ENQUE+31, ENQUE+32
RCTOT1 ENQUE+5~
RCTRANS ENQUE+5~, ENQUE+17*, ENQUE+19, ENQUE+23, ENQUE+24, ENQUE+29, ENQUE+40*, ENQUE+42, ENQUE+46
RCX NEWPG+2~, NEWPG+3*, NEWPG+7
RCZ NEWPG+2~, NEWPG+3*, NEWPG+5, NEWPG+8
U ENQUE+16, ENQUE+17, ENQUE+19, ENQUE+22, ENQUE+23, ENQUE+24, ENQUE+28, ENQUE+29, ENQUE+31, ENQUE+32
, ENQUE+43, ENQUE+44, ENQUE+49, ENQUE+51, ENQUE+52, EFTDEP+7, EFTDEP+9, EFTDEP+10, TOT+3, NEWPG+3
, NEWPG+7, HDR1+4
X SELECT+3~, HDR1+2~
Y EN+3, EN+7, SELECT+3~
Z ENQUE+5~, ENQUE+42*, ENQUE+43, ENQUE+44, ENQUE+48*, ENQUE+49, ENQUE+51, EFTDEP+2~, EFTDEP+4*, EFTDEP+9
, HDR1+2~
Z0 ENQUE+5~, EFTDEP+2~, EFTDEP+4*, EFTDEP+10, HDR1+2~
ZTDESC EN+1~, EN+12*
>> ZTQUEUED ENQUE+14, ENQUE+56, ENQUE+59, EFTDEP+3
ZTREQ ENQUE+14!, ENQUE+58*, EFTDEP+3!
ZTRTN EN+1~, EN+12*
ZTSAVE EN+1~
ZTSAVE("RCDDT" EN+13*
ZTSAVE("RCSEL" EN+13*
ZTSK EN+1~, EN+15, EN+16!
>> ZTSTOP ENQUE+14*, EFTDEP+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All