RCDPEX4 ;ALB/DRF - ELECTRONIC EOB EXCEPTION PROCESSING - FILE 344.4 ;Jun 06, 2014@19:11:19
Source file <RCDPEX4.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | ($$ADD3611,$$DUP,ERRUPD,UPD3611)^IBCEOB $$RXBIL^IBNCPDPU |
Accounts Receivable | 1 | STORACT^RCDPEX31 |
VA FileMan | 1 | ^DIE |
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 |
Package | Total | Caller Graph |
---|---|---|
Accounts Receivable | 2 | RCDPEM RCDPEX2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ||
REMOVE(RCXDA1,RCXDA,RCBILL,RCSAVE) | ;Remove from exception list and file EEOB against matched claim
|
|
CHGED(DA,RCEOB,RCSAVE) | ; Change bad bill # to good one for EOB
; DA = DA and DA(1) to use for DIE call ; RCEOB = the ien of the entry in file 361.1 ; RCSAVE = the free text of the original bill # |
|
SDATE(ERA,LINE) | ;Return Service Date for the ERA
; INPUT ; ERA = ERA number ; LINE = ERA line ; OUTPUT ; SDATE = Service date |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRCA(430 - [#430] | EN+11 |
^RCY(344.4 - [#344.4] | EN+1, EN+2, EN+3, EN+5, EN+7, EN+13, REMOVE+7, REMOVE+8, REMOVE+21, SDATE+9 , SDATE+10 |
^TMP("RCDPERR-EOB" | REMOVE+31, REMOVE+40! |
^TMP($J | REMOVE+5!, REMOVE+9*, REMOVE+11*, REMOVE+12*, REMOVE+14!, REMOVE+40! |
Name | Field # of Occurrence |
---|---|
^( | REMOVE+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | EN~, EN+9!, EN+10 |
ARRAY("ECME" | EN+9* |
ARRAY("FILLDT" | EN+9* |
DA | REMOVE+6~, REMOVE+18*, REMOVE+36*, REMOVE+37, CHGED~ |
DA(1 | REMOVE+18*, REMOVE+36*, REMOVE+38, CHGED+5 |
DIE | REMOVE+6~, REMOVE+38*, CHGED+4~, CHGED+5* |
DR | REMOVE+6~, REMOVE+38*, CHGED+4~, CHGED+5* |
ECME | EN~, EN+5*, EN+9, EN+11 |
EOB | EN~, EN+3*, EN+5, EN+7, EN+9, EN+11, EN+13 |
ERA | EN~, EN+2*, EN+3, EN+5, EN+7, EN+9, EN+11, EN+13, SDATE~, SDATE+9 , SDATE+10 |
LINE | SDATE~, SDATE+9, SDATE+10 |
Q | REMOVE+6~, REMOVE+8*, REMOVE+11 |
Q0 | REMOVE+6~, REMOVE+8*, REMOVE+9, REMOVE+10*, REMOVE+11 |
RC0 | REMOVE+6~, REMOVE+7*, REMOVE+10 |
RCBILL | EN~, EN+10*, EN+11, REMOVE~, REMOVE+13, REMOVE+21 |
RCBILL(1 | EN+11*, REMOVE+10 |
RCEOB | REMOVE+6~, REMOVE+13*, REMOVE+15, REMOVE+18, REMOVE+21*, REMOVE+23, REMOVE+29, REMOVE+32, REMOVE+37, CHGED~ , CHGED+5 |
RCER | EN~, EN+1*, EN+2, EN+3 |
RCSAVE | REMOVE~, REMOVE+18, REMOVE+37, CHGED~, CHGED+5 |
RCWHY | REMOVE+16~, REMOVE+17, REMOVE+24~, REMOVE+25, REMOVE+34~, REMOVE+35 |
RCWHY(1 | REMOVE+16*, REMOVE+24*, REMOVE+34* |
RCXDA | REMOVE~, REMOVE+7, REMOVE+8, REMOVE+17, REMOVE+18, REMOVE+25, REMOVE+35, REMOVE+36 |
RCXDA1 | REMOVE~, REMOVE+7, REMOVE+8, REMOVE+17, REMOVE+18, REMOVE+21, REMOVE+25, REMOVE+35, REMOVE+36 |
REC | SDATE+7~, SDATE+10*, SDATE+11, SDATE+12 |
SDATE | SDATE+7~, SDATE+8*, SDATE+9, SDATE+12*, SDATE+14*, SDATE+15 |
STDAT | SDATE+7~, SDATE+8*, SDATE+11*, SDATE+14 |
SUB | SDATE+7~, SDATE+8*, SDATE+9*, SDATE+10 |
U | EN+5, EN+11, REMOVE+9, REMOVE+10, REMOVE+21, SDATE+11, SDATE+12 |
X | CHGED+4~ |
Y | CHGED+4~ |