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

Package Total Call Graph
VA FileMan 3 ^DIC  ($$GET1,GETS)^DIQ  ^DIR  
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: 1

Package Total Caller Graph
Accounts Receivable 1 RCDPEWL0  

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
VALP(INP) ; Compare input posting method filter to other filters
; Input INP - Y value from ^DIR
; Output 1 = Valid 0 = Invalid

External References

Name Field # of Occurrence
^DIC CLAIM+2
$$GET1^DIQ CLAIM+1, CLAIM+4, CLAIM+5, CLAIM+6, NPICHK+12
GETS^DIQ CLAIM+3
^DIR PAYMNT+14, POSTSTAT+14, P1+9, M1+9, CLAIMTYP+17, PAYR+17, PAYR+31, PAYR+41, A1+10
$$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+16
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+17
    • PAYR+17
    • PAYR+31
    • PAYR+41
    • A1+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^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
^TMP("RCERA_PARAMS" PARAMS+1!, PAYMNT+5, PAYMNT+16*, POSTSTAT+5, POSTSTAT+16*, P1, P1+12*, M1, M1+12*, CLAIMTYP+5
, CLAIMTYP+19*, PAYR+5, PAYR+21*, PAYR+33!, PAYR+43*, A1, A1+13*, VALA+4, VALA+6, VALA+8
, VALM+4, VALP+4

Label References

Name Line Occurrences
$$AUTOPST P1+14
$$CLAIMTYP PARAMS2+12
$$MATCHST PARAMS2+10
$$PAYMNT PARAMS2+4
$$PAYR PARAMS2+14
$$POSTMETH PARAMS2+8
$$POSTSTAT PARAMS2+6
$$VALA A1+12
$$VALM M1+11
$$VALP P1+11
A1 A1+12
EXPSET NPICHK+5, NPICHK+8, NPICHK+10, NPICHK+13, NPICHK+14, NPICHK+15
M1 M1+11
NPICHK LKBOX+12
P1 P1+11

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*, 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+15*
, 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*
DTOUT PAYMNT+4~, PAYMNT+15, POSTSTAT+4~, POSTSTAT+15, POSTMETH+5~, P1+10, MATCHST+4~, M1+10, CLAIMTYP+4~, CLAIMTYP+18
, 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+18
, PAYR+4~, PAYR+18, PAYR+32, PAYR+42, AUTOPST+4~, A1+11
INP VALA~, VALA+4, VALA+6, VALA+8, VALM~, VALM+4, VALP~, VALP+4
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*
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
RCDONE PAYR+4~, PAYR+8*, PAYR+9, PAYR+18*, PAYR+22*, PAYR+44*
RCDPEPV PROV+1~
RCEXP PROV+2~, NPICHK+1*, NPICHK+5*, NPICHK+8*, NPICHK+10*, NPICHK+13*, NPICHK+14*, NPICHK+15*, EXPSET+1
RCID PROV+1~, CLAIM+11*, CLAIM+12
RCIEN PROV+1~, CLAIM+10*, CLAIM+12, NPICHK+12~*
RCMATCHD MATCHST+4~, M1*, M1+7
RCNPI PROV+1~, CLAIM+12*, CLAIM+13
RCOUT PAYR+4~, PAYR+8*, PAYR+18*, PAYR+45
RCPAYR PAYR+4~, PAYR+19*, PAYR+20, PAYR+23, PAYR+43
RCPAYR("FROM" PAYR+34*, PAYR+38, PAYR+43
RCPAYRDF PAYR+4~, PAYR+5*, PAYR+15, PAYR+29, PAYR+39
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
RCTYPEDF PAYMNT+4~, PAYMNT+5*, PAYMNT+12, CLAIMTYP+4~, CLAIMTYP+5*, CLAIMTYP+15
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
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+12, P1+14, M1+11, M1+12, CLAIMTYP+19
, 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