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

Package: Accounts Receivable

Routine: RCDPEWLD


Information

RCDPEWLD ;ALB/CLT - Continuation of routine RCDPEWL0 ;09 DEC 2016

Source Information

Source file <RCDPEWLD.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 ^DIC  ($$GET1,GETS)^DIQ  ^DIR  
Accounts Receivable 2 $$UP^RCDPEARL  $$PAYFLAGS^RCDPEWL7  
Kernel 1 ($$NPI,$$QI)^XUSNPI  

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 RCDPEWL0  RCDPEWL7  

Entry Points

Name Comments DBIA/ICR reference
PROV(RCSCR,RCSCR1,RCXM1,RC) ;Get prov data from ERA (FILE 344.4) and claim (FILE 399)
LKBOX ;Get provider data from ELECTRONIC REMITTANCE ADVICE file (#344.4)
CLAIM ;Retrieve provider data from the claim
LINESET ;SET THE PRINT LINES
NPICHK ;CHECK THAT THE NPI RETURNED MATCHES THE ENTITY TYPE QUALIFIER
EXPSET ;SET THE PRINT LINE WITH THE ERROR AS DEFINED IN RCEXP
PARAMS(RCQUIT) ;PARAMETERS ENTRY CONTINUED FROM RCDPEWL0
PARMSQ ;
PARAMS2() ;EP from RCDPEWL0
; PRCA*4.5*317 - Moved due to routine size issues
; Input: None
; Returns: RCQUIT - 1 if user ^ or timed out, 0 otherwise
PAYMNT() ; Payment Type (Zero/Payment or Both) Selection ; PRCA*4.5*321 this whole subroutine
; Input: ^TMP("RCERA_PARAMS") - Global array of preferred values (if any)
; Output: ^TMP("RCERA_PARAMS",$J,"RCPAYMNT") - ERA Posting Status filter
; Returns: 1 if user quit or timed out, 0 otherwise
POSTSTAT() ; ERA Posting Status (Posted/Unposted/Both) Selection
; Input: ^TMP("RCERA_PARAMS") - Global array of preferred values (if any)
; Output: ^TMP("RCERA_PARAMS",$J,"RCPOST")- ERA Posting Status filter
; Returns: 1 if user quit or timed out, 0 otherwise
POSTMETH()
P1
MATCHST()
M1
CLAIMTYP()
PAYR() ; Payer Selection
; Input: ^TMP("RCERA_PARAMS",$J) - Global array of preferred values (if any)
; Output: ^TMP("RCERA_PARAMS",$J,"RCTYPE") - ERA Posting Status filter
; Returns: 1 if user quit or timed out, 0 otherwise
AUTOPST() ; Auto-post Status (Marked/Partial/Complete/All) Selection
; Input: ^TMP("RCERA_PARAMS") - Global array of preferred values (if any)
; Output: ^TMP("RCERA_PARAMS",$J,"RCAPSTA") - Auto-post Status filter
; Returns: 1 if user quit or timed out, 0 otherwise
A1
VALA(INP) ; Compare input auto-post status filter to other filters
; Input INP - Y value from ^DIR
; Output 1 = Valid 0 = Invalid
VALM(INP) ; Compare input match type filter to other filters
; Input INP - Y value from ^DIR
; Output 1 = Valid 0 = Invalid
FILTER(IEN344P4) ; Returns 1 if record in entry IEN344P4 in 344.4 passes
; the edits for the worklist selection of ERAs
; Parameters found in ^TMP("RCERA_PARAMS",$J)
FQ

External References

Name Field # of Occurrence
^DIC CLAIM+2
$$GET1^DIQ CLAIM+1, CLAIM+4, CLAIM+5, CLAIM+6, NPICHK+12, FILTER+20, FILTER+30
GETS^DIQ CLAIM+3
^DIR PAYMNT+14, POSTSTAT+14, P1+9, M1+9, CLAIMTYP+18, PAYR+17, PAYR+31, PAYR+41, A1+10
$$UP^RCDPEARL FILTER+48
$$PAYFLAGS^RCDPEWL7 FILTER+37
$$NPI^XUSNPI CLAIM+12
$$QI^XUSNPI NPICHK+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PAYMNT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: POSTSTAT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: M1+8
Function Call: WRITE
  • Prompt: !
  • Line Location: CLAIMTYP+17
Function Call: WRITE
  • Prompt: !
  • Line Location: PAYR+16
Function Call: WRITE
  • Prompt: !,"Names you select here will be the payer names from the ERA, not the ins. file"
  • Line Location: PAYR+24
Function Call: WRITE
  • Prompt: !
  • Line Location: PAYR+30
Function Call: WRITE
  • Prompt: !
  • Line Location: PAYR+40
Function Call: WRITE
  • Prompt: !
  • Line Location: A1+9
Routine Call
  • DIC
  • Line Location:
    • CLAIM+2
Routine Call
  • DIR
  • Line Location:
    • PAYMNT+14
    • POSTSTAT+14
    • P1+9
    • M1+9
    • CLAIMTYP+18
    • PAYR+17
    • PAYR+31
    • PAYR+41
    • A1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] GET1^DIQ
^IBA(355.93 - [#355.93] GET1^DIQ
^IBM(361.1 - [#361.1] GET1^DIQ
^DGCR(399 - [#399] Classic Fileman Calls,  GET1^DIQ,  GETS^DIQ
^DIC(4 - [#4] GET1^DIQ
^DG(40.8 - [#40.8] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344.4 - [#344.4] PROV+6, CLAIM+1, FILTER+4, FILTER+28
^TMP("RCERA_PARAMS" PARAMS+1!, PAYMNT+5, PAYMNT+16*, POSTSTAT+5, POSTSTAT+16*, P1, P1+11*, M1, M1+12*, CLAIMTYP+5
, CLAIMTYP+20*, PAYR+5, PAYR+21*, PAYR+33!, PAYR+43*, A1, A1+13*, VALA+4, VALA+6, VALA+8
, VALM+4, FILTER+6, FILTER+7, FILTER+8, FILTER+9, FILTER+10, FILTER+11

Label References

Name Line Occurrences
$$AUTOPST P1+13
$$CLAIMTYP PARAMS2+12
$$MATCHST PARAMS2+10
$$PAYMNT PARAMS2+4
$$PAYR PARAMS2+14
$$POSTMETH PARAMS2+8
$$POSTSTAT PARAMS2+6
$$VALA A1+12
$$VALM M1+11
A1 A1+12
EXPSET NPICHK+5, NPICHK+8, NPICHK+10, NPICHK+13, NPICHK+14, NPICHK+15
FQ FILTER+14, FILTER+16, FILTER+18, FILTER+22, FILTER+24, FILTER+26, FILTER+28, FILTER+30, FILTER+32, FILTER+35
, FILTER+43, FILTER+44, FILTER+46
M1 M1+11
NPICHK LKBOX+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APTYPEDF AUTOPST+4~, A1*, A1+8
DIC PROV+1~, CLAIM+2*
DIC(0 CLAIM+2*
DIR PAYMNT+4~, PAYMNT+6!, POSTSTAT+4~, POSTSTAT+6!, POSTMETH+5~, P1+1!, MATCHST+4~, M1+1!, CLAIMTYP+4~, CLAIMTYP+7!
, PAYR+4~, PAYR+10!, PAYR+25!, PAYR+35!, AUTOPST+4~, A1+1!
DIR("?" PAYMNT+9*, PAYMNT+10*, PAYMNT+11*, POSTSTAT+9*, POSTSTAT+10*, POSTSTAT+11*, P1+4*, P1+5*, P1+6*, M1+4*
, M1+5*, M1+6*, CLAIMTYP+10*, CLAIMTYP+11*, CLAIMTYP+12*, CLAIMTYP+13*, CLAIMTYP+14*, PAYR+13*, PAYR+14*, PAYR+26*
, PAYR+36*, A1+4*, A1+5*, A1+6*, A1+7*
DIR("A" PAYMNT+7*, POSTSTAT+7*, P1+2*, M1+2*, CLAIMTYP+8*, PAYR+11*, PAYR+28*, PAYR+37*, A1+2*
DIR("B" PAYMNT+8*, PAYMNT+12*, POSTSTAT+8*, POSTSTAT+12*, P1+3*, P1+7*, M1+3*, M1+7*, CLAIMTYP+9*, CLAIMTYP+16*
, PAYR+12*, PAYR+15*, PAYR+29*, PAYR+38*, PAYR+39*, A1+3*, A1+8*
DIR(0 PAYMNT+6*, POSTSTAT+6*, P1+1*, M1+1*, CLAIMTYP+7*, PAYR+10*, PAYR+27*, PAYR+37*, A1+1*
DT FILTER+44
DTOUT PAYMNT+4~, PAYMNT+15, POSTSTAT+4~, POSTSTAT+15, POSTMETH+5~, P1+10, MATCHST+4~, M1+10, CLAIMTYP+4~, CLAIMTYP+19
, PAYR+4~, PAYR+18, PAYR+32, PAYR+42, AUTOPST+4~, A1+11
DUOUT PAYMNT+4~, PAYMNT+15, POSTSTAT+4~, POSTSTAT+15, POSTMETH+5~, P1+10, MATCHST+4~, M1+10, CLAIMTYP+4~, CLAIMTYP+19
, PAYR+4~, PAYR+18, PAYR+32, PAYR+42, AUTOPST+4~, A1+11
IEN344P4 FILTER~, FILTER+4, FILTER+20, FILTER+28, FILTER+30, FILTER+37
INP VALA~, VALA+4, VALA+6, VALA+8, VALM~, VALM+4
OK FILTER+3~, FILTER+4*, FILTER+14*, FILTER+16*, FILTER+18, FILTER+22*, FILTER+24*, FILTER+26*, FILTER+28*, FILTER+30*
, FILTER+32*, FILTER+35, FILTER+37*, FILTER+38*, FILTER+39*, FILTER+40*, FILTER+41*, FILTER+43*, FILTER+44*, FILTER+46
, FILTER+50*, FILTER+54*, FILTER+55*, FQ
Q FILTER+47~, FILTER+48*, FILTER+49
RC PROV~, PROV+5*, LKBOX+1*, LKBOX+2*, LINESET+2*, LINESET+4, LINESET+5, LINESET+6, LINESET+7, LINESET+10*
, LINESET+11*, LINESET+12*, LINESET+13*, LINESET+15*, LINESET+16*
RC0 FILTER+3~, FILTER+4*, FILTER+14, FILTER+32, FILTER+43, FILTER+44, FILTER+48, FILTER+54, FILTER+55
RC4 FILTER+3~, FILTER+4*, FILTER+16, FILTER+18
RCAPST FILTER+3~, FILTER+20*, FILTER+22, FILTER+24, FILTER+26, FILTER+28, FILTER+30
RCAPSTA FILTER+3~, FILTER+11*, FILTER+18, FILTER+22, FILTER+24, FILTER+26, FILTER+28, FILTER+30
RCAUTOP FILTER+3~, FILTER+7*, FILTER+16, FILTER+18
RCAUTOPDF POSTMETH+5~, P1*, P1+7
RCBILL PROV+1~, CLAIM+4*, CLAIM+5, CLAIM+6*, CLAIM+8
RCBLANK PROV+1~, PROV+4*, PROV+5, LINESET+7
RCBNM PROV+2~, CLAIM+5*, CLAIM+8
RCCLAIM PROV+1~, CLAIM+1*, CLAIM+2*, CLAIM+3, CLAIM+4
RCCOM1 PROV+2~, LINESET+14*, LINESET+15
RCCOM2 PROV+2~, LINESET+14*, LINESET+16, NPICHK+3*, NPICHK+5, NPICHK+15
RCDFR FILTER+3~, FILTER+8*, FILTER+43
RCDONE PAYR+4~, PAYR+8*, PAYR+9, PAYR+18*, PAYR+22*, PAYR+44*
RCDPEPV PROV+1~
RCDTO FILTER+3~, FILTER+8*, FILTER+44
RCEXP PROV+2~, NPICHK+1*, NPICHK+5*, NPICHK+8*, NPICHK+10*, NPICHK+13*, NPICHK+14*, NPICHK+15*, EXPSET+1
RCFLAG FILTER+36~, FILTER+37
RCFLAG("C" FILTER+40, FILTER+41
RCFLAG("P" FILTER+38, FILTER+41
RCFLAG("T" FILTER+39, FILTER+41
RCID PROV+1~, CLAIM+11*, CLAIM+12
RCIEN PROV+1~, CLAIM+10*, CLAIM+12, NPICHK+12~*
RCMATCH FILTER+3~, FILTER+6*, FILTER+32
RCMATCHD MATCHST+4~, M1*, M1+7
RCNPI PROV+1~, CLAIM+12*, CLAIM+13
RCOUT PAYR+4~, PAYR+8*, PAYR+18*, PAYR+45
RCPAYFR FILTER+3~, FILTER+9*, FILTER+49
RCPAYMNT FILTER+3~, FILTER+10*, FILTER+53, FILTER+54, FILTER+55
RCPAYR PAYR+4~, PAYR+19*, PAYR+20, PAYR+23, PAYR+43, FILTER+3~, FILTER+9*, FILTER+46
RCPAYR("FROM" PAYR+34*, PAYR+38, PAYR+43
RCPAYRDF PAYR+4~, PAYR+5*, PAYR+15, PAYR+29, PAYR+39
RCPAYTO FILTER+3~, FILTER+9*, FILTER+49
RCPOST FILTER+3~, FILTER+6*, FILTER+14
RCPOSTDF POSTSTAT+4~, POSTSTAT+5*, POSTSTAT+12
RCPROV PROV+2~, LKBOX+4*, LKBOX+5, LKBOX+7*, LKBOX+8*, LKBOX+9*, LKBOX+10, LKBOX+11, CLAIM+9*, CLAIM+10
, CLAIM+11, CLAIM+13, CLAIM+14, LINESET+1*, LINESET+4, LINESET+7, LINESET+8, EXPSET+1
RCQUIT PARAMS~, PARAMS+1, PARAMS2+4*, PARAMS2+5, PARAMS2+6*, PARAMS2+7, PARAMS2+8*, PARAMS2+9, PARAMS2+10*, PARAMS2+11
, PARAMS2+12*, PARAMS2+13, PARAMS2+14*, PARAMS2+15, PAYR+8*
RCRTN PROV+2~, NPICHK+6*, NPICHK+7, NPICHK+9, NPICHK+11, NPICHK+12, NPICHK+15
RCSCR PROV~, PROV+6, CLAIM+1
RCSCR1 PROV~, PROV+6, CLAIM+1
RCTYPE NPICHK+12~*, NPICHK+13, NPICHK+14, FILTER+3~, FILTER+7*, FILTER+35, FILTER+38, FILTER+39, FILTER+40, FILTER+41
RCTYPEDF PAYMNT+4~, PAYMNT+5*, PAYMNT+12, CLAIMTYP+4~, CLAIMTYP+5*, CLAIMTYP+16
RCWARN PROV+2~, LINESET+1*, LINESET+8*, LINESET+9, LINESET+12
RCXM1 PROV~
RCXM1( PROV+5*, LKBOX+1*, LKBOX+2*, LINESET+4*, LINESET+5, LINESET+6*, LINESET+7*, LINESET+10*, LINESET+11*, LINESET+12*
, LINESET+13*, LINESET+15*, LINESET+16*
RCXXX PROV+1~, CLAIM+9
RCXXX( CLAIM+9, CLAIM+10, CLAIM+11, CLAIM+13, CLAIM+14
RCYNODE3 PROV+2~, PROV+6*, LKBOX+5, LKBOX+8, LKBOX+9, LKBOX+10, LINESET+14, NPICHK+1, NPICHK+3, NPICHK+4
, NPICHK+8, NPICHK+10, NPICHK+13, NPICHK+14
RCYYY PROV+1~
RCYYY( LKBOX+4*, LKBOX+5*, LKBOX+10*, LKBOX+11*, CLAIM+13*, CLAIM+14*, LINESET+1, LINESET+4, LINESET+7, LINESET+8
, EXPSET+1*
RCYYY("BILLING" CLAIM+8*
U LKBOX+4, LKBOX+5, LKBOX+8, LKBOX+9, LKBOX+10, LKBOX+11, CLAIM+1, CLAIM+8, CLAIM+13, CLAIM+14
, LINESET+4, LINESET+7, LINESET+8, LINESET+14, NPICHK+1, NPICHK+3, NPICHK+4, NPICHK+7, NPICHK+8, NPICHK+9
, NPICHK+10, NPICHK+11, NPICHK+12, NPICHK+13, NPICHK+14, EXPSET+1, FILTER+8, FILTER+9, FILTER+14, FILTER+16
, FILTER+18, FILTER+32, FILTER+43, FILTER+44, FILTER+48, FILTER+54, FILTER+55
X PROV+1~, PROV+4*, CLAIM+2*
XUSNPI PROV+2~, NPICHK+4*, NPICHK+5, NPICHK+6
Y PROV+1~, CLAIM+2, PAYMNT+16, POSTSTAT+16, P1+11, P1+13, M1+11, M1+12, CLAIMTYP+20, PAYR+19
, PAYR+21, PAYR+34, PAYR+43, A1+12, A1+13
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