RCDPRU2 ;AITC/CJE - CARC REPORT ON PAYER OR CARC CODE ;
Source file <RCDPRU2.m>
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 |