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

Package: Accounts Receivable

Routine: RCDPEU2


Information

RCDPEU2 ;AITC/CJE - ELECTRONIC PAYER UTILITIES ;05-NOV-02

Source Information

Source file <RCDPEU2.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 (FIND,LIST)^DIC  FILE^DIE  $$GET1^DIQ  ^DIR  
Accounts Receivable 1 (AUTOCOPY,AUTOMOVE,AUTOREM)^RCDPEM5  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Accounts Receivable 4 RCDPEM3  RCDPLPL3  RCDPLPL4  RCDPUREC  

Entry Points

Name Comments DBIA/ICR reference
EFT344(PROMPT,IEN344) ; Select and EFT and update reciept - EP
; Input: PROMPT - Prompt to use when picking an EFT
; IEN344 - Internal entry number to file 344
; Output
ASKEFT(PROMPT,SCREEN) ; Select an EFT for an EDI Lockbox receipt - EP
; Inputs: PROMPT - Prompt to use when asking user to enter an EFT.
; SCREEN - Screen for use in file 344.31 look-up
; Returns: IEN from file 344.31 or -1 if user times out or '^'
PICKEFT() ; Given output from FIND^DIC, pick an EFT from the list
; Input: ^TMP("DILIST",$J) in non-packed format
; Returns: IEN from file 344.31, or 0 if user does not pick an item from the list
READ(LAST) ;
; Input: LAST - The last number displayed that can be picked in the number range 1-LAST
; Returns: IEN from 344.31 if one is picked, otherwise -1 (^ or timeout) or 0 - nothing picked
WRITE(X) ; Write out one entry from 344.31
; Input: X=Counter from ^TMP("DILIST",$J) output from FIND^DIC
; Output: To screen
CHKEOB(RCRECTDA,RCTRANDA,RCARRAY) ; EP from RCDPLPL3/4- Link payment to account, move/copy remove EOBs
; Inputs RCRECTDA - Receipt IEN file 344
; RCTRANDA - Payment multiple 344.01 IEN under RCRECTDA
; RCARRAY - If linking to multiple claims this array contains the list of claims
; A1^A2^A3^A4 where A1=Account Linked to, A2=Amount, A3=Comment, A4=Account Name
; Outputs None
ORIG(RCERA,RCOSEQ) ; Get the original claim from the EOB worklist
; Inputs RCERA - ERA IEN from file 344.49
; RCOSEQ - Sequence number IEN from multiple 344.491
; Returns IEN from 361.1. EOB from 344.41

External References

Name Field # of Occurrence
FIND^DIC ASKEFT+21
LIST^DIC ASKEFT+19
FILE^DIE EFT344+9
$$GET1^DIQ WRITE+11, WRITE+12, CHKEOB+9, CHKEOB+10, CHKEOB+11, CHKEOB+15, CHKEOB+16, CHKEOB+26, CHKEOB+27, CHKEOB+31
, CHKEOB+39, ORIG+7, ORIG+9
^DIR READ+6
AUTOCOPY^RCDPEM5 CHKEOB+80
AUTOMOVE^RCDPEM5 CHKEOB+66
AUTOREM^RCDPEM5 CHKEOB+85
$$FMTE^XLFDT WRITE+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,IEN34431,!!
  • Line Location: EFT344+11
Function Call: WRITE
  • Prompt: !,PROMPT
  • Line Location: ASKEFT+13
Function Call: WRITE
  • Prompt: !,$J(X,4),?7,EFTID,?16," ",PAYNAM
  • Line Location: WRITE+15
Function Call: WRITE
  • Prompt: !,?16," ",PAYTR,?48," ",$J(PAYAMT,10)
  • Line Location: WRITE+16
Function Call: WRITE
  • Prompt: ?59," ",DEPNO,?71," ",DEPDAT
  • Line Location: WRITE+17
Routine Call
  • DIC
  • Line Location:
    • ASKEFT+21
Routine Call
  • DIC
  • Line Location:
    • ASKEFT+19
Routine Call
  • DIE
  • Line Location:
    • EFT344+9
Routine Call
  • DIR
  • Line Location:
    • READ+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344 - [#344] GET1^DIQ
344.01 GET1^DIQ
^RCY(344.3 - [#344.3] GET1^DIQ
344.41 GET1^DIQ
344.491 GET1^DIQ
^IBM(361.1 - [#361.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] CHKEOB+43, CHKEOB+55, CHKEOB+62, CHKEOB+73
^RCY(344.49 - [#344.49] CHKEOB+23, CHKEOB+25, ORIG+5
^TMP("DIERR" EFT344+10, ASKEFT+6!
^TMP("DILIST" ASKEFT+6!, ASKEFT+22, ASKEFT+24, PICKEFT+5, READ+8, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9
, WRITE+10

Label References

Name Line Occurrences
$$ASKEFT EFT344+6
$$ORIG CHKEOB+13
$$PICKEFT ASKEFT+26
$$READ PICKEFT+10
WRITE PICKEFT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CCLAIM CHKEOB+6~
CLAIM CHKEOB+6~, CHKEOB+27*, CHKEOB+28, CHKEOB+51*, CHKEOB+52, CHKEOB+54, CHKEOB+55, CHKEOB+61!, CHKEOB+66, CHKEOB+71!
, CHKEOB+78, CHKEOB+80
CLAIM( CHKEOB+74*, CHKEOB+77*
CLAIM(1 CHKEOB+64*
CNT PICKEFT+4~, PICKEFT+7*, PICKEFT+8, PICKEFT+9, PICKEFT+10
COUNT ASKEFT+5~, ASKEFT+22*, ASKEFT+23, ASKEFT+25, PICKEFT+4~, PICKEFT+5*, PICKEFT+7, PICKEFT+9
DA ASKEFT+5~, READ+3~
DEPDAT WRITE+3~, WRITE+12*, WRITE+17
DEPNO WRITE+3~, WRITE+11*, WRITE+17
DIC ASKEFT+5~
DIC("W" EFT344+10!
DIR ASKEFT+5~, READ+3~
DIR(0 READ+5*
DIROUT ASKEFT+5~, READ+3~
DIRUT ASKEFT+5~, READ+3~
DT ASKEFT+13
DTOUT ASKEFT+5~, READ+3~, READ+7
DUOUT ASKEFT+5~, READ+3~, READ+7
EEOBS ORIG+4~, ORIG+7*, ORIG+8, ORIG+9
EFTID WRITE+3~, WRITE+6*, WRITE+15
EFTIEN WRITE+3~, WRITE+5*, WRITE+11, WRITE+12
EFTTR WRITE+3~
FDA EFT344+4~
FDA(344 EFT344+8*
FIELDS ASKEFT+5~, ASKEFT+9*, ASKEFT+19, ASKEFT+21
FILE ASKEFT+5~, ASKEFT+8*, ASKEFT+19, ASKEFT+21
FLAGS ASKEFT+5~, ASKEFT+10*, ASKEFT+19, ASKEFT+21
IEN344 EFT344~, EFT344+7, EFT344+8
IEN34431 EFT344+4~, EFT344+6*, EFT344+7, EFT344+8, EFT344+11
IEN344491 CHKEOB+6~, CHKEOB+24*, CHKEOB+25*, CHKEOB+26, CHKEOB+27, CHKEOB+31
IEN3611 CHKEOB+6~, CHKEOB+13*, CHKEOB+14, CHKEOB+15, CHKEOB+16, CHKEOB+66, CHKEOB+80, CHKEOB+85
IEN491 ORIG+4~, ORIG+5*, ORIG+6, ORIG+7
IENS ASKEFT+5~, ASKEFT+8*
IFN CHKEOB+6~, CHKEOB+31*, CHKEOB+32, CHKEOB+43*, CHKEOB+44, CHKEOB+55*, CHKEOB+56, CHKEOB+62*, CHKEOB+63, CHKEOB+64
, CHKEOB+73*, CHKEOB+74
INDEXES ASKEFT+5~, ASKEFT+11*
JUST CHKEOB+6~, CHKEOB+84*, CHKEOB+85
JUST1 CHKEOB+6~
LAST READ~, READ+5
LCLAIM CHKEOB+6~
LCLAIM( CHKEOB+44*, CHKEOB+56*, CHKEOB+76
NCLAIM CHKEOB+6~, CHKEOB+37*, CHKEOB+39*, CHKEOB+40*, CHKEOB+41, CHKEOB+43, CHKEOB+62, CHKEOB+73
NCLAIMS CHKEOB+6~, CHKEOB+37*, CHKEOB+53*, CHKEOB+54*, CHKEOB+84
OIFN CHKEOB+6~, CHKEOB+16*
ORIG CHKEOB+6~, CHKEOB+15*, CHKEOB+28, CHKEOB+41, CHKEOB+52
PAYAMT WRITE+3~, WRITE+10*, WRITE+16
PAYNAM WRITE+3~, WRITE+7*, WRITE+14*, WRITE+15
PAYTR WRITE+3~, WRITE+9*, WRITE+16
PROMPT EFT344~, EFT344+6, ASKEFT~, ASKEFT+13
QUIT ASKEFT+5~, ASKEFT+7*, ASKEFT+12, ASKEFT+14*, ASKEFT+15*, ASKEFT+16*, ASKEFT+24*, ASKEFT+27*, PICKEFT+4~, PICKEFT+6*
, PICKEFT+7, PICKEFT+9, PICKEFT+10*, READ+3~, CHKEOB+6~
RCARRAY CHKEOB~, CHKEOB+38, CHKEOB+60, CHKEOB+70, CHKEOB+72, CHKEOB+75
RCARRAY( CHKEOB+47, CHKEOB+49, CHKEOB+50, CHKEOB+51
RCERA CHKEOB+7~, CHKEOB+9*, CHKEOB+11, CHKEOB+13, CHKEOB+23, CHKEOB+25, CHKEOB+26, CHKEOB+27, CHKEOB+31, ORIG~
, ORIG+5, ORIG+7, ORIG+9
RCLORIG CHKEOB+7~, CHKEOB+18*, CHKEOB+41*, CHKEOB+52*, CHKEOB+60, CHKEOB+72, CHKEOB+83
>> RCLSUSP CHKEOB+18*, CHKEOB+50*, CHKEOB+83
RCORIG CHKEOB+7~
RCOSEQ CHKEOB+7~, CHKEOB+11*, CHKEOB+12, CHKEOB+13, CHKEOB+22, CHKEOB+23, ORIG~, ORIG+5
RCRECTDA CHKEOB~, CHKEOB+9, CHKEOB+10, CHKEOB+39
RCSEQ CHKEOB+7~, CHKEOB+10*, CHKEOB+11
RCSORIG CHKEOB+7~, CHKEOB+18*, CHKEOB+29*, CHKEOB+60, CHKEOB+70, CHKEOB+83
RCTRANDA CHKEOB~, CHKEOB+10, CHKEOB+39
RETURN ASKEFT+5~, ASKEFT+7*, ASKEFT+14*, ASKEFT+15*, ASKEFT+16*, ASKEFT+24*, ASKEFT+26*, ASKEFT+27, ASKEFT+28, PICKEFT+4~
, PICKEFT+6*, PICKEFT+10*, PICKEFT+11, READ+3~, READ+4*, READ+8*, READ+9
SCLAIM CHKEOB+7~, CHKEOB+60, CHKEOB+70
SCLAIM( CHKEOB+32*, CHKEOB+74, CHKEOB+77
SCREEN EFT344+4~, EFT344+5*, EFT344+6, ASKEFT~, ASKEFT+19, ASKEFT+21
SP WRITE+3~, WRITE+4*
TIN WRITE+3~, WRITE+8*, WRITE+14
VALUE ASKEFT+5~, ASKEFT+13*, ASKEFT+15, ASKEFT+16, ASKEFT+17*, ASKEFT+18, ASKEFT+21, ASKEFT+23, READ+3~
X ASKEFT+5~, READ+3~, WRITE~, WRITE+5, WRITE+6, WRITE+7, WRITE+8, WRITE+9, WRITE+10, WRITE+15
, CHKEOB+7~, CHKEOB+22*, CHKEOB+23*, CHKEOB+25, CHKEOB+46*, CHKEOB+47*, CHKEOB+49, CHKEOB+50, CHKEOB+51, CHKEOB+76*
, CHKEOB+77
Y ASKEFT+5~, READ+3~, READ+8
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