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

Package: Accounts Receivable

Routine: RCDPEX31


Information

RCDPEX31 ;ALB/TMK - ELECTRONIC EOB EXCEPTION PROCESSING - FILE 344.4 ;Jun 11, 2014@15:50:59

Source Information

Source file <RCDPEX31.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 5 $$GET1^DID  (,WP)^DIE  $$IENS^DILF  GETS^DIQ  ^DIR  
Accounts Receivable 3 UPDEOB^RCDPESR2  BLD^RCDPEX2  SEL^RCDPEX3  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  
List Manager 1 (FULL,PAUSE)^VALM1  
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: 5

Package Total Caller Graph
Accounts Receivable 5 RCDPESR5  RCDPEWL0  RCDPEX3  RCDPEX32  RCDPEX4  

Entry Points

Name Comments DBIA/ICR reference
UPD ; Try to update the IB EOB file from exception in 344.41
UPDQ
DEL ; Delete exception conditions from EOB detail list - file 344.4
DELQ
TXT0(RCTDA,RCDIQ,RCXM1,RC) ; Append 0-node captioned data to array RCXM1
TXT00(RCTDA,RCTDA1,RCDIQ1,RCXM1,RC) ; Extract 0-node data for file 344.41
TXT2(RCTDA,RCTDA1,RCDIQ2,RCXM1,RC) ; Extract all data for file 344.42
LOCK(RCTDA,RCTDA1,RCSHH) ; Attempt to lock file entry in file 344.41
; Return 1 if successful, 0 if not able to lock
; RCSHH = 1 if there should be no direct writes
STORACT(RCTDA,RCTDA1,RCWHY) ; Store the detail for the action taken for
; the exception record at ^RCY(344.4,RCTDA,1,RCTDA,0)
; RCWHY(#) = lines containing the reason/explanation for the action
; RCWHY(1) should contain the description of the action taken
; It will be appended to the first line of the message after
; the date and user who made the change.

External References

Name Field # of Occurrence
$$GET1^DID TXT0+7, TXT00+8, TXT2+7
^DIE UPD+13, DEL+25
WP^DIE STORACT+12
$$IENS^DILF STORACT+12
GETS^DIQ DEL+19, DEL+20
^DIR DEL+11, DEL+14
UPDEOB^RCDPESR2 UPD+10
BLD^RCDPEX2 UPD+18, DEL+43
SEL^RCDPEX3 UPD+3, DEL+3
FULL^VALM1 UPD+2, DEL+2
PAUSE^VALM1 UPD+9, UPD+17, DEL+42, LOCK+8
$$FMTE^XLFDT DEL+29, DEL+32, STORACT+9
$$NOW^XLFDT DEL+32, STORACT+9
SENDMSG^XMXAPI DEL+39

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"EEOB cannot be filed in IB"_$S($P($G(^RCY(344.4,RCTDA,1,RCTDA1,0)),U,7)=1:" - the bill # is invalid",1:"")
  • Line Location: UPD+8
Function Call: WRITE
  • Prompt: !,"EEOB DETAIL UPDATE ",$S(Z:"WAS SUCCESSFUL",1:"ENCOUNTERED ERRORS")
  • Line Location: UPD+14
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL+8
Function Call: WRITE
  • Prompt: !,"A MailMan message has been sent to report this action.",!
  • Line Location: DEL+41
Function Call: WRITE
  • Prompt: !,*7,"Another user is editing this entry ... please try again later"
  • Line Location: LOCK+8
Routine Call
  • DIE
  • Line Location:
    • UPD+13
    • DEL+25
Routine Call
  • DIE
  • Line Location:
    • STORACT+12
Routine Call
  • DIR
  • Line Location:
    • DEL+11
    • DEL+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.4 - [#344.4] GET1^DID,  GETS^DIQ
344.41 GET1^DID,  GETS^DIQ,  WP^DIE
344.42 GET1^DID

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344.4 - [#344.4] UPD+7, UPD+8, UPD+11, DEL+17, DELQ, LOCK+6
^VA(200 - [#200] DEL+32, STORACT+9

Label References

Name Line Occurrences
$$LOCK UPD+6, DEL+7
DELQ DEL+5, DEL+7, DEL+12, DEL+15
STORACT UPD+16, DEL+26
TXT0 DEL+22
TXT00 DEL+24
UPDQ UPD+4, UPD+6, UPD+7

Naked Globals

Name Field # of Occurrence
^(1 DEL+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UPD+1~, UPD+13*, DEL+1~, DEL+25*
DA(1 UPD+13*, DEL+25*
DAT TXT0+2~, TXT0+8*, TXT0+9, TXT0+11, TXT0+12, TXT0+13, TXT00+2~, TXT00+9*, TXT00+11, TXT00+13
, TXT00+14, TXT00+15, TXT2+2~, TXT2+8*, TXT2+9, TXT2+11, TXT2+12, TXT2+13
DIE UPD+1~, UPD+13*, DEL+1~, DEL+25*
>> DIQUIET LOCK+8
DIR DEL+1~, DEL+11!, DEL+14!
DIR("?" DEL+13*
DIR("A" DEL+9*, DEL+10*, DEL+13*
DIR("B" DEL+10*
DIR(0 DEL+9*, DEL+13*
DR UPD+1~, UPD+13*, DEL+1~, DEL+25*
DTOUT DEL+1~, DEL+15
DUOUT DEL+1~, DEL+15
DUZ DEL+32, DEL+38, STORACT+9
LINE TXT0+2~, TXT0+3*, TXT0+9*, TXT0+10, TXT0+11*, TXT0+12*, TXT0+13*, TXT0+14, TXT00+2~, TXT00+3*
, TXT00+11*, TXT00+12, TXT00+13*, TXT00+14*, TXT00+15*, TXT00+16, TXT2+2~, TXT2+3*, TXT2+9*, TXT2+10
, TXT2+11*, TXT2+12*, TXT2+13*, TXT2+14
OK LOCK+4~, LOCK+5*, LOCK+9*, LOCK+10
RC TXT0~, TXT0+3*, TXT0+4*, TXT0+9*, TXT0+11*, TXT0+12*, TXT0+14*, TXT0+15*, TXT00~, TXT00+3*
, TXT00+4*, TXT00+11*, TXT00+13*, TXT00+14*, TXT00+16*, TXT00+17*, TXT2~, TXT2+3*, TXT2+9*, TXT2+11*
, TXT2+12*, TXT2+14*, TXT2+15*, STORACT+7~, STORACT+10*, STORACT+11*
RC0 DEL+1~, DEL+17*, DEL+28, DEL+29
RC00 DEL+1~, DEL+17*, DEL+28
RCDA UPD+1~, UPD+3, UPD+4*, UPD+5, DEL+1~, DEL+3, DEL+4*, DEL+5, DEL+6, STORACT+7~
, STORACT+8*, STORACT+12
RCDA( UPD+5, DEL+6
RCDA("" DEL+4
RCDA(0 UPD+4
RCDA(1 STORACT+8*
RCDIQ DEL+1~, DEL+22, TXT0~
RCDIQ( TXT0+5, TXT0+6, TXT0+8
RCDIQ1 DEL+1~, DEL+24, TXT00~
RCDIQ1( TXT00+5, TXT00+6, TXT00+9
RCDIQ2 TXT2~
RCDIQ2( TXT2+5, TXT2+6, TXT2+8
RCE DEL+1~, DEL+21*, DEL+22, DEL+23*, DEL+24, DEL+33*, DEL+34*, DEL+35*
RCOK DEL+1~
RCSHH LOCK~, LOCK+8
RCT DEL+1~, TXT00+2~, TXT00+4*, TXT00+5, TXT00+6, TXT00+9, TXT2+2~, TXT2+4*, TXT2+5, TXT2+6
, TXT2+8
RCT( DEL+34*, DEL+35*
RCT("" DEL+33
RCT(1 DEL+28*
RCT(2 DEL+28*
RCT(3 DEL+29*
RCT(4 DEL+30*
RCT(5 DEL+31*
RCT(6 DEL+32*
RCT(7 DEL+33*
RCTDA UPD+1~, UPD+5*, UPD+6, UPD+7, UPD+8, UPD+10, UPD+11, UPD+13, UPD+16, DEL+1~
DEL+6*, DEL+7, DEL+17, DEL+19, DEL+20, DEL+22, DEL+24, DEL+25, DEL+26, DELQ
, TXT0~, TXT0+5, TXT0+6, TXT0+8, TXT00~, TXT00+4, TXT2~, TXT2+4, LOCK~, LOCK+6
, STORACT~, STORACT+8
RCTDA1 UPD+1~, UPD+5*, UPD+6, UPD+7, UPD+8, UPD+10, UPD+11, UPD+13, UPD+16, DEL+1~
DEL+6*, DEL+7, DEL+17, DEL+20, DEL+24, DEL+25, DEL+26, DELQ, TXT00~, TXT00+4
, TXT2~, TXT2+4, LOCK~, LOCK+6, STORACT~, STORACT+8
RCTXT STORACT+7~
RCTXT( STORACT+11*
RCTXT(1 STORACT+9*
RCWHY UPD+1~, UPD+16, DEL+1~, DEL+26, STORACT~
RCWHY( STORACT+11
RCWHY(1 UPD+15*, DEL+16*, STORACT+9
RCWHY(2 UPD+15*, DEL+16*
RCWHYTXT DEL+1~, DEL+16*, DEL+31
RCX DEL+1~, DEL+22, DEL+24
RCX( DEL+23*, DEL+34
RCXM1 TXT0~, TXT00~, TXT2~
RCXM1( TXT0+4*, TXT0+9*, TXT0+11*, TXT0+12*, TXT0+14*, TXT0+15*, TXT00+4*, TXT00+11*, TXT00+13*, TXT00+14*
, TXT00+16*, TXT00+17*, TXT2+9*, TXT2+11*, TXT2+12*, TXT2+14*, TXT2+15*
U UPD+5, UPD+7, UPD+8, UPD+11, DEL+6, DEL+28, DEL+29, DEL+32, STORACT+9
>> VALMBCK UPDQ*, DELQ+1*
X DEL+1~
XMBODY DEL+37~, DEL+38*, DEL+39
XMINSTR DEL+37~, DEL+39
XMINSTR("FROM" DEL+38*
XMSUBJ DEL+37~, DEL+38*, DEL+39
>> XMTO DEL+39
>> XMTO( DEL+38*
>> XMTO("G.RCDPE PAYMENTS" , DEL+38*
XMZ DEL+37~, DEL+39
Y DEL+1~, DEL+12, DEL+16
Z UPD+1~, UPD+11*, UPD+12, UPD+13, UPD+14, UPD+15, DEL+1~, DEL+34*, TXT0+2~, TXT0+5*
, TXT0+6, TXT0+7, TXT0+8, TXT00+2~, TXT00+5*, TXT00+6, TXT00+7, TXT00+8, TXT00+9, TXT2+2~
, TXT2+5*, TXT2+6, TXT2+7, TXT2+8, STORACT+7~, STORACT+10*, STORACT+11*
Z0 TXT0+2~, TXT0+7*, TXT0+8, TXT00+2~, TXT00+8*, TXT00+9, TXT2+2~, TXT2+7*, TXT2+8
Z1 TXT0+2~, TXT00+2~
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