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

Package: Accounts Receivable

Routine: RCDPEWL2


Information

RCDPEWL2 ;ALB/TMK/KML - ELECTRONIC EOB WORKLIST ACTIONS ;7/7/10 6:43pm

Source Information

Source file <RCDPEWL2.m>

Call Graph

Call Graph

Call Graph Total: 25

Package Total Call Graph
Accounts Receivable 10 EN^PRCAAPR  ^PRCACM  ^PRCAWREA  GETERR^RCDPEDS  ($$BILLREF,DISP)^RCDPESR0  (DISP,SEL)^RCDPEWL  (EDIT,INIT)^RCDPEWL3  RESTMP^RCDPEWL6  
FILESP^RCDPEWL8  ^RCDPRTP  
Integrated Billing 7 GETEOB^IBCECSA6  $$ISRX^IBCEF1  EN1AR^IBECEA  OPTION^IBJTLA  MAIN^IBOHPT1  ^IBRREL  $$ECME^IBTRE  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  $$FMTE^XLFDT  
List Manager 3 EN^VALM  (FULL,PAUSE)^VALM1  EN^VALM2  
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: 22

Package Total Caller Graph
Accounts Receivable 21 RCDP RECEIPT PROFILE ERA WORKLIST  RCDPE ECME INFORMATION  RCDPE EOB WL EDIT SPLIT  RCDPE EOB WL RESEARCH EXIT  RCDPE EOB WORKLIST BILL COMMENT  RCDPE EOB WORKLIST CHG MAINT  RCDPE EOB WORKLIST CL MATCH RPT  RCDPE EOB WORKLIST FULL ACCT PROF  
RCDPE EOB WORKLIST ON HOLD RPT  RCDPE EOB WORKLIST PREVIEW PRINT  RCDPE EOB WORKLIST REESTABLISH  RCDPE EOB WORKLIST REL HOLD  RCDPE EOB WORKLIST RESEARCH  RCDPE EOB WORKLIST SPLIT MENU  RCDPE EOB WORKLIST TPJI  RCDPE VIEW/PRINT WORKLIST EOB  
RCDPEAA3  RCDPEWL4  RCDPEWL5  RCDPEWL6  RCDPRPL3  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
VP(RCSCR,RCDAZ) ; View/Print EOB Detail data from file 361.1
; RCSCR = ien of entry in file 344.4
; RCDAZ = array subscripted by a sequential # and
; RCDAZ(n) = one of 3 formats
; ERA level adjustments
; ADJ^the ien of the adj in 344.42
; EOB exists in file 361.1:
; ien of line in 344.41^ien of 361.1
; EOB doesn't exist in 361.1:
; ien of line in 344.41^-1
VPOUT ; Entrypoint for queued job
VPQ
TPJI ; Jump to Third Party Joint Inquiry for the claim
TPJIQ
FAP ; Jump to Full Account Profile
FAPQ
RELHOLD ; Jump to Release Hold function
RELHQ
CMRPT ; Jump to claims matching report
CMQ
CHGMNT ; Jump to charge maintenance
CHMQ
LSTHLD ; Jump to list current/on hold charges
LHQ
REEST ;EP - Protocol action - RCDPE EOB WORKLIST REESTABLISH
; Jump to re-establish bill
REESTQ
BILLCOM ; Jump to bill comment log
BILLCOMQ
ASK(RCSTOP) ;
RHDR(RCSCR,RCDT,RCPG) ;Prints EOB detail report heading
RET ; Pause before returning to list
NOWAY ; Msg for unidentified bill
NOWAY1 ; Msg for ERA level Adjustment
SET1(RCIBY,RCDA,RCDA1,RC3444,RCREF) ; Set up variables for receipt/ERA
CHKFILE ; If the user leaves the split line screen without filing - double check
; that they didn't want to file it.
EDITSP ; Action that edits the split lines
; RCLINE,RCSCR must already exist
EDITQ
PREOB ; Print/View EOB detail
PREOBQ
RESEARCH ; Invoke the research menu
RQ
SEL(RCEDIT) ;
EXIT ; Exits back to ERA menu actions from research
WL(RCRCPT) ; Entrypoint to the ERA Worklist from Receipt Processing
WLQ
NOTAV ; Display not available msg
GOECME ; Select an EEOB and then jump to the [IBJT ECME RESP INFO SCREEN]
GOEBQ

External References

Name Field # of Occurrence
^%ZIS VP+13
HOME^%ZIS VP+19
^%ZISC VPOUT+45
^%ZTLOAD VP+17
$$S^%ZTLOAD VPOUT+36
^DIR CHGMNT+11, ASK+3, RET+2, NOWAY+2, NOWAY1+2, CHKFILE+5, WL+7, WL+10, NOTAV+3
GETEOB^IBCECSA6 VPOUT+29
$$ISRX^IBCEF1 GOECME+14
EN1AR^IBECEA CHGMNT+8
OPTION^IBJTLA TPJI+4
MAIN^IBOHPT1 LSTHLD+7
^IBRREL RELHOLD+7
$$ECME^IBTRE GOECME+15
EN^PRCAAPR FAP+6
^PRCACM BILLCOM+6
^PRCAWREA REEST+12
GETERR^RCDPEDS VPOUT+30
$$BILLREF^RCDPESR0 VPOUT+23, VPOUT+28
DISP^RCDPESR0 VPOUT+22
DISP^RCDPEWL WL+12
SEL^RCDPEWL PREOB+3, GOECME+6
EDIT^RCDPEWL3 EDITSP+11
INIT^RCDPEWL3 EDITSP+13
RESTMP^RCDPEWL6 TPJI+5, FAP+7, RELHOLD+8, CMRPT+8, CHGMNT+9, LSTHLD+8, REEST+13, BILLCOM+8
FILESP^RCDPEWL8 CHKFILE+6
^RCDPRTP CMRPT+7
EN^VALM RESEARCH+7, GOECME+16
FULL^VALM1 TPJI+1, FAP+1, RELHOLD+2, CMRPT+2, CHGMNT+2, LSTHLD+2, REEST+3, BILLCOM+1, CHKFILE+3, EDITSP+3
, PREOB+2, RESEARCH+4, WL+3, GOECME+5
PAUSE^VALM1 REEST+6, GOECME+11, GOECME+14, GOECME+15
EN^VALM2 SEL+2
$$FMTE^XLFDT RHDR+5, RHDR+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Your task number "_ZTSK_" has been queued.",1:"Unable to queue this job.")
  • Line Location: VP+18
Function Call: WRITE
  • Prompt: !,"***TASK STOPPED BY USER***"
  • Line Location: VPOUT+36
Function Call: WRITE
  • Prompt: !!,$G(^TMP("PRCA_EOB1",$J,RC3611,1))
  • Line Location: VPOUT+40
Function Call: WRITE
  • Prompt: !,$G(^TMP("PRCA_EOB",$J,RC3611,Z0))
  • Line Location: VPOUT+41
Function Call: WRITE
  • Prompt: !
  • Line Location: CHGMNT+11
Function Call: WRITE
  • Prompt: !!,"This action can only be taken by users that have the RCDPEAR security key.",!
  • Line Location: REEST+5
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: RHDR+3
Function Call: WRITE
  • Prompt: !,?15,"EDI LOCKBOX EEOB DETAIL FROM WORKLIST",?55,$$FMTE^XLFDT(RCDT,2),?70,"Page: ",RCPG
  • Line Location: RHDR+5
Function Call: WRITE
  • Prompt: !!,$E(" ERA NUMBER: "_RCSCR_$J("",25),1,25)_"ERA DATE: "_$$FMTE^XLFDT($P(Z,U,4)),!,"INS COMPANY: "_$P(Z,U,6)_"/"_$P(Z,U,3)
  • Line Location: RHDR+7
Function Call: WRITE
  • Prompt: !,"ERA TRACE #: "_$P(Z,U,2)
  • Line Location: RHDR+8
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM)," ","=")
  • Line Location: RHDR+9
Function Call: WRITE
  • Prompt: !
  • Line Location: RET+2
Function Call: WRITE
  • Prompt: !
  • Line Location: NOWAY+2
Function Call: WRITE
  • Prompt: !
  • Line Location: NOWAY1+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: CHKFILE+3
Function Call: WRITE
  • Prompt: !
  • Line Location: WL+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WL+10
Function Call: WRITE
  • Prompt: !
  • Line Location: NOTAV+3
Function Call: WRITE
  • Prompt: !!,"Problem with Bill IEN: "_IBIFN_", ERA: "_RCERA_" Please report this issue."
  • Line Location: GOECME+11
Function Call: WRITE
  • Prompt: !!,"Not available. This is not a Pharmacy Claim."
  • Line Location: GOECME+14
Function Call: WRITE
  • Prompt: !!,"Not available. This is a Pharmacy Claim, but not an ECME Claim."
  • Line Location: GOECME+15
Routine Call
  • %ZIS
  • Line Location:
    • VP+13
Routine Call
  • %ZIS
  • Line Location:
    • VP+19
Routine Call
  • DIR
  • Line Location:
    • CHGMNT+11
    • ASK+3
    • RET+2
    • NOWAY+2
    • NOWAY1+2
    • CHKFILE+5
    • WL+7
    • WL+10
    • NOTAV+3
Routine Call
  • VALM
  • Line Location:
    • RESEARCH+7
    • GOECME+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] GOECME+12
^IBM(361.1 - [#361.1] VPOUT+30, GOECME+10
^RCY(344.4 - [#344.4] VPOUT+12, VPOUT+23, VPOUT+28, RHDR+2, PREOB+12, PREOB+14, WL+5, GOECME+10
^RCY(344.49 - [#344.49] PREOB+6, WL+9, GOECME+9
^TMP("PRCA_EOB" VPOUT+3!, VPOUT+13*, VPOUT+14*, VPOUT+15*, VPOUT+16*, VPOUT+17*, VPOUT+25*, VPOUT+30, VPOUT+31*, VPOUT+33
, VPOUT+35, VPOUT+41, VPQ!
^TMP("PRCA_EOB1" VPOUT+3!, VPOUT+8!, VPOUT+23*, VPOUT+27!, VPOUT+28*, VPOUT+40, VPQ!
^TMP("RCDPE_EOB_SPLIT_OK" CHKFILE+4
^TMP("RC_SAVE_TMP" TPJI+3*, FAP+5*, RELHOLD+6*, CMRPT+6*, CHGMNT+7*, LSTHLD+6*, REEST+11*, BILLCOM+5*
^TMP($J VPOUT+21!, VPOUT+24!, TPJI+3, FAP+5, RELHOLD+6, CMRPT+6, CHGMNT+7, LSTHLD+6, REEST+11, BILLCOM+5
, CHKFILE+7!, RESEARCH+2!, RESEARCH+3*, RQ!
^XUSEC("PRCA EDI LOCKBOX CHARGES" CHGMNT+6
^XUSEC("RCDPEAR" REEST+4

Label References

Name Line Occurrences
ASK VPOUT+38, VPOUT+42
BILLCOMQ BILLCOM+3
CHMQ CHGMNT+4
CMQ CMRPT+4
EDITQ EDITSP+5, EDITSP+8
FAPQ FAP+3
GOEBQ GOECME+4, GOECME+8, GOECME+11, GOECME+14, GOECME+15
LHQ LSTHLD+4
NOTAV TPJI+2, FAP+3, RELHOLD+4, CMRPT+4, CHGMNT+4, LSTHLD+4, REEST+9, BILLCOM+3, EDITSP+5, RESEARCH+5
PREOBQ PREOB+5
REESTQ REEST+9
RELHQ RELHOLD+4
RET FAP+6, RELHOLD+7, CMRPT+7, LSTHLD+7, REEST+14, BILLCOM+7
RHDR VPOUT+39
RQ RESEARCH+5
SEL EDITSP+7
TPJIQ TPJI+2
VP PREOB+17
VPQ VP+13, VP+14, VPOUT+5
WLQ WL+6, WL+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS VP+11~, VP+13*
DA EDITSP+2~
DFN GOECME+1~, GOECME+12*
DIR RELHOLD+1~, CMRPT+1~, CHGMNT+1~, CHGMNT+11!, LSTHLD+1~, ASK+2~, RET+1~, RET+2!, NOWAY+1~, NOWAY+2!
, NOWAY1+1~, NOWAY1+2!, CHKFILE+2~, CHKFILE+5!, WL+2~, WL+7!, WL+10!, NOTAV+1~, NOTAV+3!
DIR("A" CHGMNT+11*, RET+2*, NOWAY+2*, NOWAY1+2*, CHKFILE+5*, WL+7*, WL+10*, NOTAV+3*
DIR("B" CHKFILE+5*
DIR(0 CHGMNT+11*, ASK+3*, RET+2*, NOWAY+2*, NOWAY1+2*, CHKFILE+5*, WL+7*, WL+10*, NOTAV+3*
DIROUT ASK+2~
DIRUT ASK+2~, ASK+4
DT VPOUT+4
DTOUT FAP+6!, REEST+12!, BILLCOM+6!, ASK+2~
DUOUT ASK+2~, ASK+4
DUZ CHGMNT+6, REEST+4
IBIFN GOECME+1~, GOECME+10*, GOECME+11, GOECME+13*, GOECME+14, GOECME+15
IO VP+20
IO("Q" VP+14, VP+19!
IOF RHDR+3
IOM RHDR+9
IOSL VPOUT+37
IOST ASK+1, RHDR+3
POP VP+11~, VP+13
PRC REEST+2~
RC1 VPOUT+1~, VPOUT+34*, VPOUT+40*
RC3444 VPOUT+1~, VPOUT+4*, SET1~, SET1+1*
RC3611 VPOUT+1~, VPOUT+7*, VPOUT+8, VPOUT+12, VPOUT+13, VPOUT+23, VPOUT+27, VPOUT+28, VPOUT+29, VPOUT+30
, VPOUT+33*, VPOUT+35, VPOUT+40, VPOUT+41
RCAPAR GOECME+1~, GOECME+2*, GOECME+3*, GOECME+13, GOEBQ+1
RCDA VP+11~, RELHOLD+1~, SET1~, SET1+1*, PREOB+1~, PREOB+3, PREOB+4*, PREOB+5, PREOB+6*, PREOB+7
, GOECME+1~, GOECME+6, GOECME+7*, GOECME+8, GOECME+9*, GOECME+10
RCDA( PREOB+4, GOECME+7
RCDA(0 PREOB+4, GOECME+7
RCDA1 SET1~, SET1+1*
RCDASH VPOUT+1~, VPOUT+4*, VPOUT+17, VPOUT+25, VPOUT+31
RCDAZ VP~, PREOB+1~, PREOB+7*, PREOB+17, GOECME+1~
RCDAZ( VPOUT+6, VPOUT+7, VPOUT+19, VPOUT+22, VPOUT+23, VPOUT+28, PREOB+7*, PREOB+8, PREOB+10, PREOB+12*
, PREOB+15*
RCDAZ(0 VPOUT+5
RCDEF EDITSP+2~, EDITSP+10*, EDITSP+11
RCDG GOECME+1~, GOECME+10*, GOECME+11, GOECME+12, GOECME+13
RCDIR EDITSP+10, EDITSP+11, EDITSP+12!*
RCDONE EDITSP+2~, EDITSP+9*, EDITSP+11
RCDT VPOUT+1~, VPOUT+4*, VPOUT+39, RHDR~, RHDR+5
RCEDIT EDITSP+2~, EDITSP+7, EDITSP+8, EDITSP+10, SEL~, SEL+3*
RCERA GOECME+3*, GOECME+4, GOECME+10, GOECME+11, GOEBQ+1!
RCIBY CMRPT+1~, LSTHLD+1~, SET1~
RCIBY("IBEOB" SET1+1
>> RCIENS GOECME+3
>> RCLINE EDITSP+11
RCPG VPOUT+1~, VPOUT+4*, VPOUT+36, VPOUT+37, VPOUT+38, VPOUT+39, VPOUT+42, RHDR~, RHDR+3, RHDR+4*
, RHDR+5
RCRCPT WL~, WL+5
RCREF VPOUT+1~, VPOUT+7*, VPOUT+10, SET1~, SET1+1*
RCSAVE EDITSP+2~, EDITSP+10*, EDITSP+12
RCSAVE1 EDITSP+2~, EDITSP+10*, EDITSP+12
RCSCR VP~, VPOUT+4, VPOUT+12, VPOUT+22, VPOUT+23, VPOUT+28, VPOUT+39, RELHOLD+1~, CHGMNT+1~, RHDR~
, RHDR+2, RHDR+7, EDITSP+11, PREOB+6, PREOB+12, PREOB+14, PREOB+17, GOECME+3*, GOECME+4, GOECME+9
, GOEBQ+1!
RCSCR("NOEDIT" TPJI+2, FAP+3, RELHOLD+4, CMRPT+4, CHGMNT+4, LSTHLD+4, REEST+9, BILLCOM+3, EDITSP+5, RESEARCH+5
RCSPLIT EDITSP+10*, EDITSP+11, EDITSP+12!*
RCSPLIT( EDITSP+10, EDITSP+12
RCSPLIT(0 CHKFILE+4
RCSTOP VPOUT+1~, VPOUT+4*, VPOUT+33, VPOUT+35, VPOUT+36*, VPOUT+37, VPOUT+38, VPOUT+42, ASK~, ASK+4*
RCZ VPOUT+1~, VPOUT+6*, VPOUT+7, VPOUT+19, VPOUT+22, VPOUT+23, VPOUT+28
RCZ0 VPOUT+1~, VPOUT+12*, VPOUT+14, VPOUT+15, VPOUT+16
U VPOUT+7, VPOUT+14, VPOUT+15, VPOUT+16, VPOUT+19, VPOUT+23, VPOUT+28, RHDR+7, RHDR+8, SET1+1
, PREOB+6, PREOB+15, GOECME+3, GOECME+9, GOECME+10, GOECME+12
>> VALMBCK VPQ+1*, TPJIQ*, FAPQ*, RELHQ*, CMQ*, CHGMNT+13*, LSTHLD+10*, REEST+7*, REESTQ*, BILLCOMQ*
, EDITQ*, PREOBQ*, EXIT+1*, WLQ*, NOTAV+4*, GOEBQ*
>> VALMBG RESEARCH+3
VALMY SEL+1~
VALMY(0 SEL+3
X RELHOLD+1~, CMRPT+1~, CHGMNT+1~, LSTHLD+1~, RET+1~, NOWAY+1~, NOWAY1+1~, CHKFILE+2~, WL+2~, NOTAV+1~
>> XQORNOD(0 SEL+2
Y RELHOLD+1~, CMRPT+1~, CHGMNT+1~, LSTHLD+1~, RET+1~, NOWAY+1~, NOWAY1+1~, CHKFILE+2~, CHKFILE+6, WL+2~
, NOTAV+1~
Z VPOUT+1~, RHDR+1~, RHDR+2*, RHDR+7, RHDR+8, PREOB+1~, PREOB+8*, PREOB+10, PREOB+12, PREOB+15
, WL+2~, WL+5*, WL+6, WL+9, WL+12, GOECME+1~
Z0 VPOUT+1~, VPOUT+35*, VPOUT+41, PREOB+1~, PREOB+10*, PREOB+11, PREOB+12, PREOB+14*, PREOB+15, GOECME+1~
ZTDESC VP+11~, VP+15*
>> ZTQUEUED VPOUT+36, VPOUT+44, VPOUT+45
ZTREQ VPOUT+36!, VPOUT+44*
ZTRTN VP+11~, VP+15*
ZTSAVE VP+11~
ZTSAVE("RC*" VP+16*
ZTSK VP+18, VP+19!
>> ZTSTOP VPOUT+36*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All