RCDPEU ;ALB/TMK - ELECTRONIC ERA UTILITIES ;05-NOV-02
Source file <RCDPEU.m>
| Package | Total | Call Graph |
|---|---|---|
| Accounts Receivable | 2 | EN^RCDPEM $$GETBILL^RCDPESR0 |
| VA FileMan | 2 | $$GET1^DIQ ^DIR |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EFTMTCH | ; Match an electronic EFT's deposit to a paper EOB's receipt record
; Select the receipt record. Match the totals. |
|
| MATCHQ2 | ||
| MATCH | ; Manual start of ERA/EFT automatic matching
|
|
| ADJ(RC3444,RCADJ) | ; Function-determines if ERA record contains adjustments
; RC3444 = ien of ERA entry in file 344.4 ; Return value = 1 for ERA level adjustments found, 2 if claim level ; adjustments found, 3 if both found ; Also returns RCADJ(ERA ien,seq#)=bill # for claim level adjustments |
|
| DEPREC(RC3443) | ; Returns the ien of the receipt for the EFT deposit RC3443
; RC3443 = ien of entry in file 344.3 |
|
| EDILB(RCRCPT) | ; Given receipt ien RCRCPT, return 1 if the receipt is for
; an EDI Lockbox deposit (EFT), 2 if for EDI Lockbox detail (EOB/ERA) ; or 0 if not EDI Lockbox related (paper check) |
|
| EDILBDEP(RCDEP) | ; Given deposit ien RCDEP (file 344.1), return 1 if there is
; an EFT referrencing it in file 344.3 |
|
| EDILBEV(PAYTYP) | ; Given ien of file 341.1 PAYTYP, return 1 if the pay type's
; event number is EDI LOCKBOX ; Input: PAYTYP - IEN for AR EVENT TYPE (341.1) ; Returns: 0 if PAYTP is not 14 or 18, Otherwise returns PAYTYP IEN |
|
| LBEVENT() | ; Returns the IEN of EDI Lockbox event 14 in file 341.1
|
|
| HACERA(RCERA) | ; Functions to determine if ERA entry in file 344.4 is an
; ERA received from HAC (CHAMPVA) ; RCERA = ien of entry file 344.4 ; Returns 1 if it is, 0 if not ; PRCA*4.5*367 - Add logic to determine if ERA is CHAMPVA |
|
| HACEFT(RCEFT) | ; Functions to determine if EFT entry in file 344.3 is an
; EFT received from HAC (CHAMPVA) ; RCEFT = ien of entry file 344.3 ; Returns 1 if it is, 0 if not |
| FileNo | Call Tags |
|---|---|
| ^RCY(344.4 - [#344.4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RC(341.1 - [#341.1] | EDILBEV+7, LBEVENT+1 |
| ^RCY(344 - [#344] | DEPREC+4, EDILB+5, EDILB+7, EDILB+8 |
| ^RCY(344.3 - [#344.3] | DEPREC+3, EDILBDEP+3, HACEFT+4 |
| ^RCY(344.4 - [#344.4] | ADJ+9, ADJ+13 |
| Name | Field # of Occurrence |
|---|---|
| ^( | ADJ+13 |
| ^(0 | EDILB+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADJ+6~, ADJ+13* |
| DA(1 | ADJ+12* |
| DIR | EFTMTCH+2~, EFTMTCH+4! |
| DIR("A" | EFTMTCH+4* |
| DIR("S" | EFTMTCH+3* |
| DIR(0 | EFTMTCH+3* |
| DTOUT | EFTMTCH+2~, EFTMTCH+5 |
| DUOUT | EFTMTCH+2~, EFTMTCH+5 |
| PAYTYP | EDILBEV~, EDILBEV+7, EDILBEV+9 |
| RC3443 | DEPREC~, DEPREC+3 |
| RC3444 | ADJ~, ADJ+9, ADJ+12, ADJ+13 |
| RCADJ | ADJ~, ADJ+7*, ADJ+9*, ADJ+11, ADJ+13*, ADJ+15 |
| RCADJ( | ADJ+13* |
| RCDEP | EFTMTCH+2~, EFTMTCH+6*, EDILBDEP~, EDILBDEP+3 |
| RCEFT | HACEFT~, HACEFT+4 |
| RCERA | HACERA~, HACERA+6, HACERA+7 |
| RCPMTHD | HACERA+5~, HACERA+7*, HACERA+8 |
| RCRCPT | EDILB~, EDILB+5, EDILB+7, EDILB+8 |
| RCTRACE | HACERA+5~, HACERA+6*, HACERA+8 |
| U | ADJ+13, DEPREC+3, EDILB+5, EDILB+7, EDILB+8, EDILBEV+7, HACEFT+4 |
| X | EFTMTCH+2~, EDILB+3~, EDILB+5*, EDILB+6, EDILBDEP+2~, EDILBDEP+3*, EDILBDEP+4, EDILBEV+6~, EDILBEV+7*, EDILBEV+8 |
| Y | EFTMTCH+2~, EFTMTCH+6, EDILBDEP+2~ |
| Z | ADJ+6~, ADJ+13*, DEPREC+2~, DEPREC+3*, DEPREC+4*, DEPREC+5, EDILB+3~, EDILB+4*, EDILB+7*, EDILB+8* , EDILB+9 |