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

Package: Accounts Receivable

Routine: RCDPEX3


Information

RCDPEX3 ;ALB/TMK/PJH - ELECTRONIC EOB EXCEPTION PROCESSING - FILE 344.4 ; 3/30/11 7:19pm

Source Information

Source file <RCDPEX3.m>

Call Graph

Call Graph

Call Graph Total: 16

Package Total Call Graph
Accounts Receivable 4 DISP^RCDPESR0  BLD^RCDPEX2  VPOUT^RCDPEX3  ($$LOCK,STORACT,TXT0,TXT00,TXT2,UPD)^RCDPEX31  
Kernel 4 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  
VA FileMan 4 ^DIE  $$EXTERNAL^DILFD  GETS^DIQ  ^DIR  
List Manager 2 (FULL,PAUSE)^VALM1  EN^VALM2  
Integrated Billing 1 $$PRVPHONE^IBJPS3  
MailMan 1 SENDMSG^XMXAPI  

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

Package Total Caller Graph
Accounts Receivable 6 RCDPEX SUM_FILE EXCEPTION  RCDPEX SUM_TRANSFER EOB OUT  RCDPEX SUM_VIEW/PRINT MESSAGE  RCDPEX3  RCDPEX31  RCDPEX32  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
VP ; View/Print ERA Msgs - File 344.4
VPOUT ; Entrypoint queued job
; RCDA, RCALL must be defined
VPQ
WRTSEP(RCDOT,RCPG) ; Separating lines if more records to print
PRT(RCTDA,RCTDA1,RCPG,RCSTOP) ; Print data from file 344.4 and 344.41
; RCTDA = ien file 344.4
; RCTDA1 = ien file 344.41
; RCPG = last page extracted
; RCSTOP = returned 1 if passed by ref and process stopped
XFR ; Transfer EOB(s) to other site
XFRQ
SEL(RCDA,ONE) ; Select entry(s) from list
; RCDA = array returned if selections made
; RCDA(n)=ien of bill selected file 344.4
; ONE = if set to 1, only one selection can be made at a time
HDR(RCPG) ;Print report hdr
; RCPG = last page #
ASK(RCSTOP) ;
UPD ; Try to update the IB EOB file from exception in 344.41

External References

Name Field # of Occurrence
^%ZIS VP+14, XFR+30
HOME^%ZIS VP+20, XFR+37
^%ZISC VPOUT+16
^%ZTLOAD VP+18, XFR+35
$$S^%ZTLOAD PRT+27
^DIE XFR+84
$$EXTERNAL^DILFD XFR+10
GETS^DIQ PRT+7, PRT+12, PRT+15
^DIR VP+5, XFR+6, XFR+12, XFR+20, XFR+26, XFR+52, XFR+58, ASK+3
$$PRVPHONE^IBJPS3 XFR+14
DISP^RCDPESR0 PRT+17
BLD^RCDPEX2 XFRQ
VPOUT^RCDPEX3 XFR+39
$$LOCK^RCDPEX31 XFR+45
STORACT^RCDPEX31 XFR+91
TXT0^RCDPEX31 PRT+8
TXT00^RCDPEX31 PRT+16
TXT2^RCDPEX31 PRT+13
UPD^RCDPEX31 UPD+1
FULL^VALM1 VP+2, XFR+2
PAUSE^VALM1 XFR+99
EN^VALM2 SEL+6
$$FMTE^XLFDT XFR+56, HDR+4
$$NOW^XLFDT XFR+84
SENDMSG^XMXAPI XFR+78

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+19
Function Call: WRITE
  • Prompt: !,RCDOT,!,RCDOT
  • Line Location: WRTSEP+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: WRTSEP+3
Function Call: WRITE
  • Prompt: !!,"***TASK STOPPED BY USER***"
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: !,$G(^TMP($J,"RC_SUMOUT",Z))
  • Line Location: PRT+31
Function Call: WRITE
  • Prompt: !
  • Line Location: XFR+12
Function Call: WRITE
  • Prompt: !
  • Line Location: XFR+20
Function Call: WRITE
  • Prompt: !
  • Line Location: XFR+52
Function Call: WRITE
  • Prompt: !
  • Line Location: XFR+58
Function Call: WRITE
  • Prompt: !!,"TRANSFER OF EEOB TO "_$P($G(^DIC(4,RCXTO,0)),U)_" RESULTS: ",!
  • Line Location: XFR+95
Function Call: WRITE
  • Prompt: !," ",RCER(RCECT)
  • Line Location: XFR+96
Function Call: WRITE
  • Prompt: !
  • Line Location: XFR+97
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?5,"EDI LOCKBOX EEOB DATA EXCEPTIONS - EEOB DETAIL",?55,$$FMTE^XLFDT(DT,2),?70,"Page: ",RCPG,!,$TR($J("",IOM)," ","=")
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ASK+3
Routine Call
  • %ZIS
  • Line Location:
    • VP+14
    • XFR+30
Routine Call
  • %ZIS
  • Line Location:
    • VP+20
    • XFR+37
Routine Call
  • DIE
  • Line Location:
    • XFR+84
Routine Call
  • DIR
  • Line Location:
    • VP+5
    • XFR+6
    • XFR+12
    • XFR+20
    • XFR+26
    • XFR+52
    • XFR+58
    • ASK+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] GETS^DIQ
344.41 GETS^DIQ
344.42 GETS^DIQ
^DIC(4 - [#4] EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] XFR+10, XFR+56, XFR+85, XFR+89, XFR+95
^RCY(344.4 - [#344.4] PRT+10, PRT+11, XFR+42, XFR+48, XFR+49, XFR+65
^TMP("RCDPEX_SUM-EOBDX" VPOUT+6, VPOUT+8, SEL+7
^TMP($J VPOUT+3!, VPQ!, PRT+24*, PRT+26, PRT+31, PRT+33!

Label References

Name Line Occurrences
ASK VPOUT+13, PRT+29
HDR WRTSEP+2, PRT+30
PRT VPOUT+7, VPOUT+11
SEL VP+10, XFR+3
VPQ VP+6, VP+9, VP+14, VP+15
WRTSEP VPOUT+8, VPOUT+11
XFRQ XFR+5, XFR+7, XFR+11, XFR+21, XFR+27, XFR+28

Naked Globals

Name Field # of Occurrence
^( VPOUT+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS VP+13~, VP+14*, XFR+29~, XFR+30*
DA XFR+1~, XFR+84*
DA(1 XFR+84*
DIE XFR+1~, XFR+84*
DIR VP+1~, VP+5!, XFR+1~, XFR+6!, XFR+12!, XFR+20!, XFR+26!, XFR+52!, XFR+58!, ASK+2~
DIR("A" VP+3*, XFR+6*, XFR+12*, XFR+17*, XFR+18*, XFR+19*, XFR+25*, XFR+52*, XFR+56*, XFR+57*
DIR("B" VP+4*, XFR+25*, XFR+52*, XFR+58*
DIR("S" XFR+6*
DIR(0 VP+3*, XFR+6*, XFR+12*, XFR+20*, XFR+25*, XFR+52*, XFR+58*, ASK+3*
DIROUT ASK+2~
DIRUT ASK+2~, ASK+4
DR XFR+1~, XFR+84*
DT HDR+4
DTOUT VP+6, XFR+7, XFR+21, XFR+27, ASK+2~
DUOUT VP+6, XFR+7, XFR+21, XFR+27, ASK+2~, ASK+4
DUZ XFR+77*, XFR+80*
IO VP+21
IO("Q" VP+15, VP+20!, XFR+31, XFR+37!
IOF HDR+2
IOM HDR+4
IOSL WRTSEP+2, PRT+28
IOST HDR+2, ASK+1
ONE SEL~, SEL+6
POP VP+1~, VP+14, XFR+1~, XFR+30
RC PRT+6~, PRT+8, PRT+10*, PRT+13, PRT+16, PRT+20*, PRT+21*, PRT+22*, XFR+1~, XFR+42*
, XFR+44, XFR+46, XFR+56, XFR+61, XFR+66, XFR+69, XFR+83, XFR+88, SEL+4~, SEL+7*
RC0 XFR+1~, XFR+48*, XFR+50, XFR+51, XFR+54, XFR+56
RCALL VP+1~, VP+7*, VP+9, VPOUT+5, VPOUT+9, XFR+1~, XFR+32*, XFR+38*
RCAMT XFR+43~, XFR+50*, XFR+71
RCBILL XFR+43~, XFR+51*, XFR+56, XFR+61, XFR+66, XFR+69, XFR+78, XFR+88
RCBODY XFR+43~, XFR+49*
RCBODY( XFR+74*, XFR+75*
RCBODY("" XFR+74, XFR+75
RCBODY(0 XFR+62!
RCBODY(1 XFR+63, XFR+68, XFR+73*
RCCHG XFR+1~, XFR+8*, XFR+82*, XFRQ
RCCONT XFR+1~, XFR+23*, XFR+72
RCDA VP+1~, VP+10, XFR+1~, XFR+3, SEL~, SEL+5!, SEL+7*
RCDA( VPOUT+10, VPOUT+11, XFR+42, XFR+44, SEL+7*
RCDA("" VP+9
RCDA(0 XFR+5
RCDEF XFR+1~, XFR+14*, XFR+15*, XFR+19, XFR+20, XFR+22
RCDIQ PRT+6~, PRT+8
RCDIQ1 PRT+6~, PRT+16
RCDIQ1( PRT+19, PRT+21
RCDIQ2 PRT+6~, PRT+13
RCDOMAIN XFR+1~, XFR+10*, XFR+11, XFR+76
RCDOT VPOUT+2~, VPOUT+4*, VPOUT+8, VPOUT+11, WRTSEP~, WRTSEP+1
RCDUZ XFR+1~, XFR+77*, XFR+80
RCECT XFR+1~, XFR+10*, XFR+46*, XFR+61*, XFR+66*, XFR+69*, XFR+83*, XFR+88*, XFR+96*
RCER XFR+1~, XFR+28*, XFR+30*, XFR+36*
RCER( XFR+46*, XFR+61*, XFR+66*, XFR+69*, XFR+83*, XFR+88*, XFR+96
RCER(0 XFR+93
RCOK XFR+1~, XFR+54, XFR+55*, XFR+60*
RCPG VPOUT+2~, VPOUT+4*, VPOUT+7, VPOUT+8, VPOUT+11, VPOUT+13, WRTSEP~, WRTSEP+2, PRT~, PRT+27
, PRT+28, PRT+29, PRT+30, HDR~, HDR+2, HDR+3*, HDR+4
RCSTOP VPOUT+2~, VPOUT+4*, VPOUT+6, VPOUT+7, VPOUT+11, VPOUT+13, PRT~, PRT+23*, PRT+26, PRT+27*
, PRT+28, PRT+29, ASK~, ASK+4*
RCTDA VP+1~, VPOUT+6*, VPOUT+7, VPOUT+11*, PRT~, PRT+7, PRT+8, PRT+10, PRT+11, PRT+12
, PRT+13, PRT+15, PRT+16, PRT+17, PRT+19, PRT+21
RCTDA1 VPOUT+2~, VPOUT+6*, VPOUT+7, VPOUT+11*, PRT~, PRT+15, PRT+16, PRT+17, PRT+19, PRT+21
RCWHY XFR+1~, XFR+91
RCWHY(1 XFR+41*
RCWHY(2 XFR+44*, XFR+85*, XFR+89*
RCX XFR+43~, XFR+63*, XFR+68, XFR+71*, XFR+72*, XFR+73
RCXDA XFR+1~, XFR+42, XFR+44*, XFR+45, XFR+48, XFR+49, XFR+65, XFR+78, XFR+84, XFR+91
RCXDA1 XFR+1~, XFR+42, XFR+44*, XFR+45, XFR+48, XFR+49, XFR+65, XFR+78, XFR+84, XFR+91
RCXM1 PRT+6~, PRT+8, PRT+13, PRT+16
RCXM1( PRT+10*, PRT+20*, PRT+21*, PRT+22*, PRT+24
RCXTO XFR+1~, XFR+8*, XFR+10, XFR+84, XFR+85, XFR+89, XFR+95
RCZ VPOUT+2~, VPOUT+6*, VPOUT+8, VPOUT+10*, VPOUT+11
U VPOUT+6, VPOUT+11, XFR+44, XFR+50, XFR+51, XFR+54, XFR+56, XFR+65, XFR+68, XFR+71
, XFR+72, XFR+85, XFR+89, XFR+95, SEL+7
>> VALMBCK VPQ+1*, XFRQ+1*
>> VALMY( SEL+7
X VP+1~, XFR+1~
XMBODY XFR+1~, XFR+77*, XFR+78
XMTO XFR+1~, XFR+78
XMTO("S.RCDPE EDI LOCKBOX SERVER@" , XFR+76*
XMZ XFR+43~, XFR+78, XFR+81, XFR+83, XFR+84
>> XQORNOD(0 SEL+6
Y VP+1~, VP+7, XFR+1~, XFR+8, XFR+22*, XFR+23, XFR+28, XFR+53, XFR+59
Z VPOUT+2~, PRT+6~, PRT+11*, PRT+12, PRT+13, PRT+21*, PRT+23*, PRT+24*, PRT+25*, PRT+26*
, PRT+31
ZTDESC VP+13~, VP+16*, XFR+29~, XFR+33*
>> ZTQUEUED VPOUT+13, VPOUT+15, VPOUT+16, PRT+27
ZTREQ VPOUT+15*, PRT+27!
ZTRTN VP+13~, VP+16*, XFR+29~, XFR+33*
ZTSAVE VP+13~, XFR+29~
ZTSAVE("RCALL" VP+17*, XFR+34*
ZTSAVE("RCDA" VP+17*, XFR+34*
ZTSAVE("^TMP(""RCDPEX_SUM-EOBDX"",$J)" XFR+34*
ZTSAVE("^TMP(""RCDPEX_SUM-EOBDX"",$J," VP+17*
ZTSK VP+19, VP+20!, XFR+36, XFR+37!
>> ZTSTOP PRT+27*
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 |  Naked Globals |  Local Variables  | All