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

Package: Accounts Receivable

Routine: RCDPENR4


Information

RCDPENR4 ;ALB/SAB - EPay National Reports - ERA/EFT Report Utilities ;12/14/15

Source Information

Source file <RCDPENR4.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Accounts Receivable 5 ASK^RCDPEADP  ($$BILLIEN,HEADER,SAVEDATA)^RCDPENR1  (HEADER,PRINTINS)^RCDPENR2  ($$CLOSEDB,PRINTGT)^RCDPENR3  ($$ISSEL,$$ISTYPE)^RCDPEU1  
VA FileMan 2 ^DIC  $$GET1^DIQ  
Integrated Billing 1 $$DIV^IBJDF2  
Registration 1 DIVISION^VAUTOMA  

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

Package Total Caller Graph
Accounts Receivable 3 RCDPENR1  RCDPENR2  RCDPENRU  

Entry Points

Name Comments DBIA/ICR reference
SPAY() ;
M1(X,Y) ;
; first/last day of month in MMDDYYYY format (if Y=2), or date in
; external format (if Y=3).
GETERA(RCSDATE,RCEDATE,RCRATE,RCCLM) ;
TINARY(RCSTART,RCEND) ;
INTRSCT() ;
PRINTRP(RCTITLE,RCDATA,RCRPIEN,RCDISP,RCTFLG) ;
PAYSUM(RCINSTIN) ;Print the Payer Summary portion of the report for one payer. New for ; PRCA*4.5*349
; Input: RCINSTIN - Payer Name/TIN combination, key to ^TMP global.
DIV(RCDIV) ; build the list of divisions to report on.
; PRCA*4.5*349 - Moved from RCDPENR2 for size
GETDIV(RCDIV) ; Retrieve the Division
; PRCA*4.5*349 - Moved from RCDPENR2 for size

External References

Name Field # of Occurrence
^DIC SPAY+7
$$GET1^DIQ GETERA+19, GETERA+51, GETERA+53, GETERA+56, GETERA+57, GETERA+58, GETERA+59, GETERA+61, GETERA+64
$$DIV^IBJDF2 GETERA+50
ASK^RCDPEADP PRINTRP+16, PAYSUM+8
$$BILLIEN^RCDPENR1 GETERA+45
HEADER^RCDPENR1 PRINTRP+18
SAVEDATA^RCDPENR1 PRINTRP+40, PRINTRP+42, PRINTRP+44, PRINTRP+46, PRINTRP+48, PRINTRP+50, PRINTRP+52, PRINTRP+54
HEADER^RCDPENR2 PAYSUM+8
PRINTINS^RCDPENR2 PAYSUM+9
$$CLOSEDB^RCDPENR3 GETERA+48
PRINTGT^RCDPENR3 PAYSUM+22
$$ISSEL^RCDPEU1 GETERA+33
$$ISTYPE^RCDPEU1 GETERA+29
DIVISION^VAUTOMA GETDIV+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,RCTITLE,!!
  • Line Location: PRINTRP+22
Function Call: WRITE
  • Prompt: RCLINE,!
  • Line Location: PRINTRP+23
Function Call: WRITE
  • Prompt: "NUMBER OF 837s TRANSMITTED TO MEDICAL PAYERS",?65,$J(+$P(RCDATA,U),10)
  • Line Location: PRINTRP+29
Function Call: WRITE
  • Prompt: !,"NUMBER OF NCPDP CLAIMS TRANSMITTED TO PHARMACY PBMs",?65,$J(+$P(RCDATA,U,2),10)
  • Line Location: PRINTRP+30
Function Call: WRITE
  • Prompt: !,"NUMBER OF 835s RECEIVED FROM MEDICAL PAYERS",?65,$J(+$P(RCDATA,U,3),10)
  • Line Location: PRINTRP+31
Function Call: WRITE
  • Prompt: !,"NUMBER OF 835s RECEIVED FROM PHARMACY PBMS",?65,$J(+$P(RCDATA,U,4),10)
  • Line Location: PRINTRP+32
Function Call: WRITE
  • Prompt: !,"NUMBER OF 837s WITH A CORRESPONDING 835 (MRA Excluded)",?65,$J(+$P(RCDATA,U,5),10)
  • Line Location: PRINTRP+33
Function Call: WRITE
  • Prompt: !,"NUMBER OF NCPDP CLAIM WITH A CORRESPONDING 835",?65,$J(+$P(RCDATA,U,6),10)
  • Line Location: PRINTRP+34
Function Call: WRITE
  • Prompt: !,"AVG #DAYS BETWEEN 837 TRANSMIT AND 835 RECEIVED",?65,$J(+$P(RCDATA,U,7),10,1)
  • Line Location: PRINTRP+35
Function Call: WRITE
  • Prompt: !,"AVG #DAYS BETWEEN NCPDP CLAIM TRANSMIT AND 835 RCVD",?65,$J(+$P(RCDATA,U,8),10,1)
  • Line Location: PRINTRP+36
Function Call: WRITE
  • Prompt: !,RCLINE,!
  • Line Location: PRINTRP+37
Routine Call
  • DIC
  • Line Location:
    • SPAY+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] GET1^DIQ
344.41 GET1^DIQ
^DIC(36 - [#36] Classic Fileman Calls
^IBM(361.1 - [#361.1] GET1^DIQ
^DGCR(399 - [#399] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" M1+9
^RCY(344.4 - [#344.4] GETERA+8, GETERA+10, GETERA+11, GETERA+37, GETERA+38, GETERA+62, GETERA+70
^RCY(344.6 - [#344.6] TINARY+16, TINARY+22, TINARY+24, TINARY+26
^TMP("RCDPEADP" TINARY+8!, TINARY+11*, TINARY+17*, TINARY+27*, INTRSCT+5, INTRSCT+9, INTRSCT+10, INTRSCT+11!, INTRSCT+15, INTRSCT+16
, INTRSCT+23, INTRSCT+24
^TMP("RCDPENR2" GETERA+76*, INTRSCT+5*, INTRSCT+10*, INTRSCT+16*, INTRSCT+17!, INTRSCT+25*, PAYSUM+7, PAYSUM+14, DIV+6*, DIV+10*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC SPAY+2~, SPAY+4*, SPAY+7!
DIC("?" SPAY+5*
DIC("A" SPAY+6*
DIC("S" SPAY+4*
DIC(0 SPAY+4*
DINUM SPAY+2~
DLAYGO SPAY+2~
DT M1+3
DTOUT SPAY+2~, SPAY+9
DUOUT SPAY+2~, SPAY+9
I PAYSUM+3~, PAYSUM+11*, PAYSUM+12, PAYSUM+14, PAYSUM+15
IOSL PRINTRP+15, PAYSUM+8
J PAYSUM+3~, PAYSUM+11*, PAYSUM+12, PAYSUM+13, PAYSUM+14, PAYSUM+20
NAME SPAY+2~
OKAY GETERA+2~, GETERA+28, GETERA+29*, GETERA+32, GETERA+33*
RC835 PRINTRP+13~
RC837 PRINTRP+13~
RCAMTBL GETERA+2~, GETERA+57*, GETERA+73
RCAMTPD GETERA+2~, GETERA+58*, GETERA+73
RCANCPDP PRINTRP+13~
>> RCAUTO PAYSUM+13
RCAVG837 PRINTRP+13~
RCBDIV GETERA+2~
RCBILL GETERA+2~, GETERA+45*, GETERA+46, GETERA+48, GETERA+50, GETERA+53, GETERA+56, GETERA+59, GETERA+73, GETERA+76
RCCLM GETERA~, GETERA+48
RCDATA GETERA+2~, GETERA+11*, GETERA+12, GETERA+13, GETERA+17, GETERA+22, GETERA+23, GETERA+26, GETERA+27, GETERA+34
, GETERA+73*, GETERA+74*, GETERA+75*, GETERA+76, PRINTRP~, PRINTRP+29, PRINTRP+30, PRINTRP+31, PRINTRP+32, PRINTRP+33
, PRINTRP+34, PRINTRP+35, PRINTRP+36, PRINTRP+39, PRINTRP+41, PRINTRP+43, PRINTRP+45, PRINTRP+47, PRINTRP+49, PRINTRP+51
, PRINTRP+53, PAYSUM+3~, PAYSUM+14*, PAYSUM+22
RCDISP PRINTRP~, PRINTRP+15, PRINTRP+20*, PRINTRP+21, PRINTRP+28, PRINTRP+38, PAYSUM+22
RCDIV GETERA+2~, GETERA+50*, GETERA+51*, GETERA+75, DIV~, GETDIV~, GETDIV+9*
RCDIV( DIV+10
RCDIV("A" DIV+6, GETDIV+7*
RCDOS GETERA+2~, GETERA+56*, GETERA+73
RCDTBILL GETERA+2~, GETERA+59*, GETERA+60, GETERA+73
RCDTLDT GETERA+2~, GETERA+38*, GETERA+39, GETERA+41
RCEDATE GETERA~, GETERA+8
RCEFT PAYSUM+3~, PAYSUM+19*, PAYSUM+20
RCEFTPD GETERA+2~
RCEFTST GETERA+2~, GETERA+17*, GETERA+18, GETERA+65
RCEFTTXT PAYSUM+3~, PAYSUM+17*, PAYSUM+19, PAYSUM+21
RCEFTTYP GETERA+2~, GETERA+65*, GETERA+66
RCEND TINARY~, TINARY+11, TINARY+14, TINARY+24
RCEOB GETERA+3~, GETERA+41*, GETERA+42, GETERA+45, GETERA+57, GETERA+58, GETERA+64, GETERA+73
RCERA PAYSUM+3~
RCERAFLG PAYSUM+3~, PAYSUM+16*, PAYSUM+21*, PAYSUM+22
RCERAIDX GETERA+3~, GETERA+67*, GETERA+68, GETERA+76
RCERANUM GETERA+3~, GETERA+34*, GETERA+75
RCERARCD GETERA+3~, GETERA+22*, GETERA+73
RCERATXT PAYSUM+3~, PAYSUM+18*, PAYSUM+20, PAYSUM+21
RCERATYP PAYSUM+3~, PAYSUM+15*, PAYSUM+17, PAYSUM+18
>> RCEXCEL PAYSUM+22
RCFILE TINARY+5~
RCFLG PRINTRP+13~, PRINTRP+15, PRINTRP+17*
RCI TINARY+5~, TINARY+22*, TINARY+24*, TINARY+26, DIV+3~, DIV+9*, DIV+10*
RCIEN GETERA+3~, GETERA+9*, GETERA+10*, GETERA+11, GETERA+19, GETERA+29, GETERA+33, GETERA+37, GETERA+38, GETERA+61
, GETERA+70, GETERA+73
RCINS GETERA+3~, GETERA+27*, GETERA+71
RCINSTIN GETERA+3~, GETERA+71*, GETERA+75, GETERA+76, PAYSUM~, PAYSUM+6*, PAYSUM+7*, PAYSUM+9, PAYSUM+14
RCJ TINARY+5~, TINARY+15*, TINARY+16*, TINARY+17, TINARY+25*, TINARY+26*, TINARY+27
RCLDATE GETERA+3~, GETERA+6*, GETERA+8*, GETERA+10
RCLIEN GETERA+3~, GETERA+36*, GETERA+37*, GETERA+38, GETERA+61, GETERA+62
>> RCLINE PRINTRP+23, PRINTRP+37
RCLPIEN INTRSCT+2~, INTRSCT+22*, INTRSCT+23*, INTRSCT+24, INTRSCT+25
RCMETHOD GETERA+3~, GETERA+61*, GETERA+74, GETERA+76
RCNCPDP PRINTRP+13~
RCNNCPDP PRINTRP+13~
RCNO837 PRINTRP+13~
RCPAPER GETERA+4~, GETERA+62*, GETERA+64*, GETERA+66
>> RCPAY GETERA+28, GETERA+32
RCPAYER GETERA+4~
RCPOSTED GETERA+4~, GETERA+70*, GETERA+74
RCPSTAT GETERA+4~, GETERA+19*, GETERA+20
RCPYRFLG INTRSCT+2~, INTRSCT+22*, INTRSCT+26*, INTRSCT+29
RCRATE GETERA~, GETERA+54
RCRATETP GETERA+4~, GETERA+53*, GETERA+54
RCRPIEN PRINTRP~, PRINTRP+40, PRINTRP+42, PRINTRP+44, PRINTRP+46, PRINTRP+48, PRINTRP+50, PRINTRP+52, PRINTRP+54
RCSDATE GETERA~, GETERA+6
RCSPACE PRINTRP+13~, PRINTRP+25*, PRINTRP+26*
RCSTART TINARY~, TINARY+11, TINARY+14, TINARY+16, TINARY+22
>> RCSTOP PRINTRP+15, PRINTRP+16, PRINTRP+17, PAYSUM+6*, PAYSUM+7, PAYSUM+8, PAYSUM+11, PAYSUM+24
RCSTR PRINTRP+13~, PRINTRP+39*, PRINTRP+40, PRINTRP+41*, PRINTRP+42, PRINTRP+43*, PRINTRP+44, PRINTRP+45*, PRINTRP+46, PRINTRP+47*
, PRINTRP+48, PRINTRP+49*, PRINTRP+50, PRINTRP+51*, PRINTRP+52, PRINTRP+53*, PRINTRP+54
RCSTRING PAYSUM+3~, PAYSUM+20*, PAYSUM+22
RCTFLG PRINTRP~, PRINTRP+20*, PRINTRP+21
RCTIN GETERA+4~, GETERA+26*, GETERA+71
RCTITLE PRINTRP~, PRINTRP+22
RCTRACE GETERA+4~, GETERA+23*, GETERA+24, GETERA+25*, GETERA+74
RCTRBD GETERA+4~, GETERA+24*, GETERA+25
RCTRLN GETERA+4~, GETERA+24*, GETERA+25
RCTRNTYP GETERA+4~, GETERA+66*, GETERA+67, GETERA+75
>> RCTYPE GETERA+28, GETERA+29
U SPAY+12, M1+5, M1+8, GETERA+13, GETERA+17, GETERA+22, GETERA+23, GETERA+26, GETERA+27, GETERA+34
, GETERA+41, GETERA+62, GETERA+70, GETERA+73, GETERA+74, GETERA+75, PRINTRP+29, PRINTRP+30, PRINTRP+31, PRINTRP+32
, PRINTRP+33, PRINTRP+34, PRINTRP+35, PRINTRP+36, PRINTRP+39, PRINTRP+41, PRINTRP+43, PRINTRP+45, PRINTRP+47, PRINTRP+49
, PRINTRP+51, PRINTRP+53
VAUTD GETDIV+5~, GETDIV+7, GETDIV+8, GETDIV+9
X SPAY+2~, M1~, M1+3*, M1+4, M1+5*, M1+6*, M1+7, M1+8*, M1+9*, M1+10
X1 M1+3~, M1+8*
X2 M1+3~, M1+4*, M1+5, M1+8
Y SPAY+2~, SPAY+12, M1~, M1+3*, M1+5, M1+6, M1+7, M1+9*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables  | All