RCDPEU ;ALB/TMK - ELECTRONIC ERA UTILITIES ;05-NOV-02
Source file <RCDPEU.m>
| 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 |
