Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPRU2

Package: Accounts Receivable

Routine: RCDPRU2


Information

RCDPRU2 ;AITC/CJE - CARC REPORT ON PAYER OR CARC CODE ;

Source Information

Source file <RCDPRU2.m>

Entry Points

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.

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.6 - [#344.6] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call