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

Package: Accounts Receivable

Routine: RCDPLPS2


Information

RCDPLPS2 ;ALB/SAB - link payment tracking report ;5 Feb 2015

Source Information

Source file <RCDPLPS2.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 5 DD^%DT  NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Accounts Receivable 4 $$ENDORPRT^RCDPEARL  $$USERINIT^RCDPLPS1  ($$DISPTY,INFO)^RCDPRU  PAUSE^RCRJRTR1  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  ($$DT,$$FMTE,$$FMTH,$$HTFM)^XLFDT  

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 SUSPENSE AUDIT REPORT  

Entry Points

Name Comments DBIA/ICR reference
EN ;
DTRNG() ;
DATES(RCBDATE,RCEDATE) ;
USER() ;
ARCLERK() ;
RCPT() ; Prompt user for single receipt number for which to display entries
REPORT(RCBEGDT,RCENDDT,RCUSER,RCPT,RCEXCEL,RCENDFLG) ; report to show link payment audit log in FMS
DQ ;
EXTRACT(RCENTRY,RCCT) ; Extract and store data for a single suspense audit file entry
; Input: RCENTRY = IEN of SUSPENSE AUDIT FILE entry (#344.71)
; Output: ^TMP("RCDPLPS2",$J) containing report data
H ; header

External References

Name Field # of Occurrence
DD^%DT DQ+24, DQ+25, DQ+26
NOW^%DTC DQ+26
^%ZIS REPORT+4
HOME^%ZIS REPORT+15
^%ZISC DQ+69
^%ZTLOAD REPORT+12
^DIC RCPT+7
$$GET1^DIQ EXTRACT+24, EXTRACT+25, EXTRACT+26, EXTRACT+43, EXTRACT+44, EXTRACT+45, H+9
^DIR DATES+11, DATES+18, USER+8, ARCLERK+5
$$ENDORPRT^RCDPEARL DQ+71
$$USERINIT^RCDPLPS1 EXTRACT+37
$$DISPTY^RCDPRU EN+25
INFO^RCDPRU EN+26
PAUSE^RCRJRTR1 DQ+55, DQ+58, DQ+64
$$DT^XLFDT DATES+4
$$FMTE^XLFDT DATES+17, EXTRACT+37
$$FMTH^XLFDT DATES+6
$$HTFM^XLFDT DATES+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Task number "_ZTSK_" has been queued."
  • Line Location: REPORT+13
Function Call: WRITE
  • Prompt: !!,"Unable to queue this job."
  • Line Location: REPORT+14
Function Call: WRITE
  • Prompt: $P(RCDATA,U,3)_U_$P(RCDATA,U,4)_U_$P(RCDATA,U)_U_$P(RCDATA,"^",5)_U_$P(RCDATA,U,6)_U
  • Line Location: DQ+40
Function Call: WRITE
  • Prompt: $P(RCDATA,U,2)_U_$P(RCDATA,U,7)_U_$P(RCDATA,U,8),!
  • Line Location: DQ+41
Function Call: WRITE
  • Prompt: "^^^^^^^^"_$P(RCDATA,U)_U_$P(RCDATA,U,2)_U_$P(RCDATA,U,3),!
  • Line Location: DQ+47
Function Call: WRITE
  • Prompt: $P(RCDATA,U,3),?15,$P(RCDATA,U,4),?22,$P(RCDATA,U),?32,$J($P(RCDATA,"^",5),10,2)
  • Line Location: DQ+51
Function Call: WRITE
  • Prompt: $P(RCDATA,U,3),?22,$P(RCDATA,U),?32,$J(RCMFST,10,2)
  • Line Location: DQ+52
Function Call: WRITE
  • Prompt: ?43,$P(RCDATA,U,6),?51,$P(RCDATA,U,2),?56,$E($P(RCDATA,U,7),1,11)
  • Line Location: DQ+54
Function Call: WRITE
  • Prompt: !
  • Line Location: DQ+57
Function Call: WRITE
  • Prompt: ?18,$P(RCDATA,U),?26,$J("$"_$J($P(RCDATA,U,2),0,2),10),?38,$E($P(RCDATA,U,3),1,40),!
  • Line Location: DQ+63
Function Call: WRITE
  • Prompt: !!,$$ENDORPRT^RCDPEARL
  • Line Location: DQ+71
Function Call: WRITE
  • Prompt: !,"RECEIPT#^TRANSACTION^DATE^AMOUNT^CLAIM^USER^DISPOSITION^REASON^CLAIMS^AMOUNT^COMMENT",!
  • Line Location: H+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+5
Function Call: WRITE
  • Prompt: $C(13),"LINK PAYMENT TRACKING REPORT",?50,%
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !," FOR THE DATE RANGE: ",$S(RCPT="":RCDTDIS1_" TO "_RCDTDIS2,1:"")
  • Line Location: H+7
Function Call: WRITE
  • Prompt: ?55,"FOR USER(S): ",$E($S(RCUSER="A":"ALL",1:$$GET1^DIQ(200,RCUSER_",",.01,"E")),1,10)
  • Line Location: H+9
Function Call: WRITE
  • Prompt: ?55,"RECEIPT#: "_RCPT
  • Line Location: H+11
Function Call: WRITE
  • Prompt: !,"RECEIPT#",?15,"TRANS#",?22,"DATE",?36,"AMOUNT",?43,"CLAIM",?51,"USER",?56,"DISPOSITION"
  • Line Location: H+12
Function Call: WRITE
  • Prompt: !,?5,"REASON",?18,"CLAIMS"
  • Line Location: H+13
Function Call: WRITE
  • Prompt: !,RCRJLINE,!
  • Line Location: H+14
Routine Call
  • DIC
  • Line Location:
    • RCPT+7
Routine Call
  • DIR
  • Line Location:
    • DATES+11
    • DATES+18
    • USER+8
    • ARCLERK+5
Routine Call
  • %ZIS
  • Line Location:
    • REPORT+4
Routine Call
  • %ZIS
  • Line Location:
    • REPORT+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^VA(200 - [#200] GET1^DIQ
^RCY(344 - [#344] Classic Fileman Calls
^RCY(344.71 - [#344.71] GET1^DIQ
344.711 GET1^DIQ
^PRCA(430 - [#430] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344.71 - [#344.71] DQ+9, DQ+17, DQ+19, EXTRACT+6, EXTRACT+41
^TMP("RCDPLPS2" DQ+3!, DQ+31, DQ+33, DQ+34, DQ+37, DQ+45, DQ+46, DQ+61, DQ+62, DQ+68!
, EXTRACT+29, EXTRACT+31*, EXTRACT+35*, EXTRACT+36!, EXTRACT+37*, EXTRACT+40*, EXTRACT+46*, EXTRACT+47*

Label References

Name Line Occurrences
$$ARCLERK USER+13
$$DTRNG EN+14
$$RCPT EN+9
$$USER EN+21
DATES DTRNG+3
DQ REPORT+17
EXTRACT DQ+10, DQ+20
H DQ+29, DQ+55, DQ+58, DQ+64
REPORT EN+29

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+3~, EN+31*, DQ+1~, DQ+26, H+1~, H+5*, H+6
%ZIS REPORT+1~, REPORT+4*
D RCPT+1~
DIC RCPT+1~, RCPT+3*
DIC("A" RCPT+5*
DIC("S" RCPT+6*
DIC(0 RCPT+4*
DIR DATES+2~, DATES+11!, DATES+18!, USER+2~, USER+8!, ARCLERK+2~, ARCLERK+5!
DIR("?" DATES+9*, DATES+16*, USER+4*, ARCLERK+4*
DIR("A" DATES+10*, DATES+18*, USER+7*, ARCLERK+5*
DIR("B" DATES+17*, USER+5*
DIR(0 DATES+10*, DATES+18*, USER+6*, ARCLERK+5*
DIROUT DATES+2~, USER+2~, ARCLERK+2~
DIRUT DATES+2~, USER+2~, ARCLERK+2~
DTIME EN+31
DTOUT DATES+2~, DATES+12, DATES+19, USER+2~, USER+9, ARCLERK+2~, ARCLERK+6, RCPT+1~, RCPT+8
DUOUT DATES+2~, DATES+12, DATES+19, USER+2~, USER+9, ARCLERK+2~, ARCLERK+6, RCPT+1~, RCPT+8
IENS EXTRACT+39~, EXTRACT+42*, EXTRACT+43, EXTRACT+44, EXTRACT+45
IO DQ+28, DQ+29
IO("Q" REPORT+7, REPORT+15!
IO(0 DQ+28
IOF H+5
IOSL DQ+55, DQ+58, DQ+64
IOST DQ+28
PAGE DQ+1~, DQ+27*, H+5*
POP REPORT+1~, REPORT+4
RCAMT EXTRACT+4~, EXTRACT+22*, EXTRACT+37
RCBDATE DATES~, DATES+6*, DATES+12*, DATES+13*, DATES+18
RCBEGDT EN+3~, EN+6*, EN+18*, EN+29, REPORT~, DQ+16, DQ+24
RCCAMT EXTRACT+39~, EXTRACT+44*, EXTRACT+46, EXTRACT+47
RCCLAIM EXTRACT+39~, EXTRACT+43*, EXTRACT+46
RCCOM EXTRACT+39~, EXTRACT+45*, EXTRACT+46
RCCT DQ+4*, DQ+10, DQ+20, DQ+32*, DQ+33*, DQ+34, DQ+37, DQ+45, DQ+46, DQ+61
, DQ+62, EXTRACT~, EXTRACT+16*, EXTRACT+31, EXTRACT+37, EXTRACT+40, EXTRACT+46, EXTRACT+47
RCDATA DQ+34*, DQ+36, DQ+40, DQ+41, DQ+46*, DQ+47, DQ+51, DQ+52, DQ+54, DQ+56
, DQ+62*, DQ+63, EXTRACT+4~, EXTRACT+6*, EXTRACT+9, EXTRACT+12, EXTRACT+19, EXTRACT+20, EXTRACT+21, EXTRACT+22
, EXTRACT+24, EXTRACT+25, EXTRACT+27
RCDATE DQ+1~, DQ+16*, DQ+17*, DQ+19, DQ+30*, DQ+31*, DQ+33, DQ+34, DQ+37, DQ+45
, DQ+46, DQ+61, DQ+62, EXTRACT+4~, EXTRACT+19*, EXTRACT+31, EXTRACT+37, EXTRACT+40, EXTRACT+46, EXTRACT+47
RCDISP REPORT+1~
RCDTDIS1 DQ+1~, DQ+24*, H+7
RCDTDIS2 DQ+1~, DQ+25*, H+7
RCEDATE DATES~, DATES+6*, DATES+19*, DATES+20*
RCEND DTRNG+3, DTRNG+7, USER+2~, ARCLERK+2~
RCENDDT EN+3~, EN+6*, EN+18*, EN+29, REPORT~, DQ+16*, DQ+17, DQ+25
RCENDFLG EN+3~, EN+6*, EN+12, EN+15*, EN+22*, EN+29, EN+31, REPORT~, DQ+70*, DQ+71
RCENTRY DQ+1~, DQ+8*, DQ+9*, DQ+10, DQ+18*, DQ+19*, DQ+20, EXTRACT~, EXTRACT+6, EXTRACT+26
, EXTRACT+41, EXTRACT+42
RCEOB EXTRACT+4~, EXTRACT+23*, EXTRACT+24*, EXTRACT+25*, EXTRACT+37
RCEXCEL EN+3~, EN+25*, EN+26, EN+29, REPORT~, DQ+39, DQ+71, H+2
RCFLG EXTRACT+4~, EXTRACT+29*, EXTRACT+31, EXTRACT+32, EXTRACT+33
RCLUSER EXTRACT+4~, EXTRACT+12*, EXTRACT+13, EXTRACT+37
RCMFST DQ+1~, DQ+37*, DQ+38, DQ+52
RCMULT DQ+1~, DQ+36*, DQ+38, DQ+43, DQ+51, DQ+59
RCNOW DQ+1~, DQ+26*, H+5
RCPT EN+3~, EN+6*, EN+9*, EN+10, EN+12, EN+29, REPORT~, DQ+7, DQ+9, H+7
, H+8, H+11
RCRANGE EN+3~, EN+14*, EN+15, EN+18
RCREASON EXTRACT+4~, EXTRACT+27*, EXTRACT+34, EXTRACT+37
RCRECTDA EXTRACT+4~, EXTRACT+20*, EXTRACT+29, EXTRACT+31, EXTRACT+35, EXTRACT+37
RCRJFLAG DQ+1~, DQ+31, DQ+33, DQ+45, DQ+55, DQ+58, DQ+61, DQ+64, DQ+70
RCRJLINE DQ+1~, DQ+27*, H+14
RCSPL DQ+44*, DQ+45*, DQ+46, DQ+60*, DQ+61*, DQ+62, EXTRACT+39~, EXTRACT+40*, EXTRACT+41*, EXTRACT+42
, EXTRACT+46
RCSTART DTRNG+3, DTRNG+6, DTRNG+7, DTRNG+8, USER+2~, ARCLERK+2~
RCSTATUS EXTRACT+4~, EXTRACT+26*, EXTRACT+37
RCTODAY DATES+2~, DATES+4*, DATES+6, DATES+17, DATES+18
RCTRANDA EXTRACT+4~, EXTRACT+21*, EXTRACT+29, EXTRACT+31, EXTRACT+35, EXTRACT+37
RCUSER EN+3~, EN+6*, EN+21*, EN+22, EN+29, REPORT~, EXTRACT+13, H+9
RCX EXTRACT+4~, EXTRACT+33*, EXTRACT+36
RCX2 EXTRACT+4~, EXTRACT+33*, EXTRACT+36
RCY EXTRACT+4~, EXTRACT+33*, EXTRACT+34
RETURN RCPT+1~, RCPT+2*, RCPT+9*, RCPT+10
RNGFLG DATES+2~, USER+2~, ARCLERK+2~
SCREEN DQ+1~, DQ+28*, DQ+55, DQ+58, DQ+64, H+5
U EN+18, RCPT+9, DQ+36, DQ+40, DQ+41, DQ+47, DQ+51, DQ+52, DQ+54, DQ+56
, DQ+63, EXTRACT+12, EXTRACT+19, EXTRACT+20, EXTRACT+21, EXTRACT+22, EXTRACT+24, EXTRACT+25, EXTRACT+27, EXTRACT+33
, EXTRACT+35, EXTRACT+37, EXTRACT+46
X DATES+2~, USER+2~, ARCLERK+2~, RCPT+1~
Y DATES+2~, DATES+12, DATES+13, DATES+19, DATES+20, USER+2~, USER+9, USER+10, ARCLERK+2~, ARCLERK+6
, ARCLERK+7, RCPT+1~, RCPT+9, DQ+1~, DQ+24*, DQ+25*, DQ+26*, EXTRACT+4~
ZTDESC REPORT+8~, REPORT+10*
ZTQUEUED REPORT+8~, DQ+28
ZTRTN REPORT+8~, REPORT+9*
ZTSAVE REPORT+8~
ZTSAVE("RC*" REPORT+11*
ZTSAVE("VAUTD" REPORT+11*
ZTSK REPORT+8~, REPORT+13, REPORT+15!
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