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
Print Page as PDF
Routine: RCDPEX2

Package: Accounts Receivable

Routine: RCDPEX2


Information

RCDPEX2 ;ALB/TMK/KML/PJH - ELECTRONIC EOB DETAIL EXCEPTION MAIN LIST TEMPLATE ;20 Dec 2018 17:20:51

Source Information

Source file <RCDPEX2.m>

Entry Points

Name Comments DBIA/ICR reference
INIT ;EP from listman template RCDPEX EOB_SUM EXCEPTION LIST
; set up initial variables
REBLD ; Set up formatted global
BLD ;EP from RCDPEX3,RCDPEX31,RCDEPEX32
; Build list of messages from file 344.4
; Input: RCDWLIEN - Optional set to a selected ERA if the user opts to see
; exceptions after receiving an 'ACCESS DENIED' message
; in the ERA WORKLIST when they tried to create a scratch
; pad for the ERA (EXCDENY^RCDPEWLP). Otherwise, undefined
; RCPAY 'R' = RANGE, 'S' = SELECTED, 'A' = ALL
; RCTYPE - 'M' - Only display Medical Exceptions
; 'P' - Only display Pharmacy Exceptions
; 'T' - Tricare
; 'A' - Display Medical and Pharmacy and Tricare Exceptions
; ^TMP(^TMP("RCDPEU1",$J) holds selected payers to display.
FNL ;EP from listman template RCDPEX EOB_SUM EXCEPTION LIST
; Clean up list
SET(X,RCSEQ,RCMSG,RCS) ; Set arrays for EOB exception records
; Input: X - Data to set into the global
; RCSEQ - Listman line #
; RCMSG - IEN for 344.41 multiple
; RCS - IEN for 344.4
; Output: Line added to the listman body
HDR ;EP from listman template RCDPEX EOB_SUM EXCEPTION LIST
DIQ3444(DA,DR,RCPDATA) ; DIQ call to retrieve data for DR fields in file 344.4/344.41
; Input: DA - IEN for file 344.4
; DR - Semi-colon delimitted list of fields to be retrieved
; Output: RCPDATA - Array of selected fields
Info |  Source |  Entry Points