RCDPRU2 ;AITC/CJE - CARC REPORT ON PAYER OR CARC CODE ;
Source file <RCDPRU2.m>
| 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 |
|---|---|---|
| SUM(ARRAY,IEN,BILL,CARC,PAYER,BAMT,PAMT,DESC,AAMT,SORT) | ; EP
; Count Claims and summarize for the report ; IEN: IEN from 361.1 file; BILL: The K-Bill number; ITEM: Top level sort item PAYER or CARC to summarize; ; BAMT: Billed Amount; PAMT: Paid Amount ; AAMT: Adjustment Amount; ; LVL: second level sort (CARC/Payer) ; SORT: "C" is CARC or "P" is Payer first level sort, |
|
| PAYTIN(PY,L) | ; EP
; Truncate Payer/TIN string to L characters for reports ; Input: PY = Payer/TIN string ; L = Maximum length allowed ; Return: Payer/TIN string truncated to length L |
|
| PAYTINS(PY,RETURN) | ; Get all PAYER/TIN strings for the TIN in PY
; Input: PY String with Payer Name/TIN in it ; Output: RETURN passed by reference, array of Payer Name/TINS with same TIN as input PY |
|
| PAYLIST(ARRAY,TYPE,RETURN) | ; Expand list of payers to include ones with the same TIN
; Input: ARRAY - array of payer names or IENS ; TYPE - E=External (Payer Name array) or I=Internal (IEN array) ; Output: RETURN array passed by reference |
|
| TINLIST(PIEN,RETURN,TYPE) | ; Given a payer IEN from #344.6, get list of payers with the same TIN
; Input: PIEN - Payer IEN (#344.6) ; ARRAY - array of payer names or IENS ; TYPE - E=External (Payer Name array) or I=Internal (IEN array) ; Output: ARRAY passed by reference with modified entries |
|
| CHK(TYPE,ITEM,ARRAY) | ; Check to see if this ITEM is included for processing
; If all are included no need to check further |
|
| GPAYR(TIN) | ; First payer name derived from TIN - PRCA*4.5*321
; Input: TIN - Payer ID ; Return: The first payer name related to TIN ; *Note more than one entry in 344.6 may have this TIN but for sort by name ; purposes we have to select one of them. |
| FileNo | Call Tags |
|---|---|
| ^RCY(344.6 - [#344.6] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RCY(344.6 - [#344.6] | PAYTINS+7, PAYLIST+11, TINLIST+9, GPAYR+6 |
| Name | Line Occurrences |
|---|---|
| TINLIST | PAYLIST+8, PAYLIST+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AAMT | SUM~, SUM+14, SUM+26, SUM+34 |
| ARRAY | SUM~, SUM+9, SUM+10*, SUM+11*, SUM+12*, SUM+14*, SUM+15*, SUM+16, SUM+17*, SUM+18* , SUM+19*, SUM+21, SUM+22*, SUM+23*, SUM+24*, SUM+26*, SUM+27*, SUM+29, SUM+30*, SUM+31* , SUM+32*, SUM+34*, SUM+36, PAYLIST~, CHK~ |
| ARRAY( | PAYLIST+6, CHK+2, CHK+4 |
| BAMT | SUM~, SUM+11, SUM+18, SUM+23, SUM+31 |
| BILL | SUM~, SUM+29, SUM+34, SUM+36 |
| CARC | SUM~, SUM+6, SUM+7 |
| COUNT | PAYTINS+3~, PAYTINS+5*, PAYTINS+10*, PAYTINS+11 |
| DESC | SUM~, SUM+15, SUM+27 |
| IEN | SUM~, SUM+9, SUM+16, SUM+21, SUM+36 |
| ITEM | SUM+5~, SUM+6*, SUM+7*, SUM+9, SUM+10, SUM+11, SUM+12, SUM+14, SUM+15, SUM+16 , SUM+17, SUM+18, SUM+19, SUM+21, SUM+22, SUM+23, SUM+24, SUM+26, SUM+27, SUM+34 , SUM+36, CHK~, CHK+3, CHK+4 |
| KEY | PAYLIST+4~, PAYLIST+5*, PAYLIST+6*, PAYLIST+8, PAYLIST+11 |
| L | PAYTIN~, PAYTIN+7, PAYTIN+9 |
| LVL | SUM+5~, SUM+6*, SUM+7*, SUM+16, SUM+17, SUM+18, SUM+19, SUM+21, SUM+22, SUM+23 , SUM+24, SUM+26, SUM+27, SUM+36 |
| NAME | PAYTINS+3~, PAYTINS+8*, PAYTINS+9, PAYTINS+11 |
| PAMT | SUM~, SUM+12, SUM+19, SUM+24, SUM+32 |
| PAYER | SUM~, SUM+6, SUM+7 |
| PIEN | TINLIST~, TINLIST+6 |
| PNAME | TINLIST+5~, TINLIST+11*, TINLIST+12 |
| PY | PAYTIN~, PAYTIN+6, PAYTIN+7, PAYTIN+8, PAYTINS~, PAYTINS+6 |
| RETURN | PAYTIN+5~, PAYTIN+6*, PAYTIN+9*, PAYTIN+10, PAYTINS~, PAYTINS+4!, PAYLIST~, PAYLIST+8, PAYLIST+12, TINLIST~ , GPAYR+5~ |
| RETURN( | PAYTINS+11*, TINLIST+12*, TINLIST+14* |
| SORT | SUM~, SUM+6, SUM+15, SUM+16, SUM+21, SUM+27 |
| TIN | PAYTINS+3~, PAYTINS+6*, PAYTINS+7, PAYTINS+11, TINLIST+5~, TINLIST+6*, TINLIST+7, TINLIST+9, GPAYR~, GPAYR+6 |
| TYPE | PAYLIST~, PAYLIST+7, PAYLIST+8, PAYLIST+9, PAYLIST+12, TINLIST~, TINLIST+10, CHK~, CHK+2, CHK+4 |
| U | SUM+10, SUM+11, SUM+12, SUM+14, SUM+15, SUM+17, SUM+18, SUM+19, SUM+22, SUM+23 , SUM+24, SUM+26, SUM+27, SUM+30, SUM+31, SUM+32, SUM+34 |
| XX | PAYTIN+5~, PAYTIN+8*, PAYTIN+9* |
| YY | PAYTIN+5~, PAYTIN+8*, PAYTIN+9 |
| ZZ | PAYTIN+5~, PAYTIN+8*, PAYTINS+3~, PAYTINS+7*, PAYTINS+8, PAYLIST+4~, PAYLIST+10*, PAYLIST+11*, PAYLIST+12, TINLIST+5~ , TINLIST+8*, TINLIST+9*, TINLIST+11, TINLIST+14, GPAYR+5~, GPAYR+6*, GPAYR+7 |
