RCDPEAR1 ;ALB/TMK/PJH - ERA Unmatched Aging Report (file #344.4) ;Dec 20, 2014@18:41:35
Source file <RCDPEAR1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ; entry point - ERA Unmatched Aging Report [RCDPE ERA AGING REPORT]
; data from ELECTRONIC REMITTANCE ADVICE file (#344.4) |
|
| EN1Q | ; exit and clean up
|
|
| RPTOUT | ; Entry point for listing report
; Input: RCTMPND - Name of the subscript for ^TMP to use to return all lines ; (for bulletin). If undefined or null, output is printed ; Returns: Global if RCTMPND not null: ^TMP($J,RCTMPND,line#)=line text |
|
| EXIT | ; Exit the report
; PRCA*4.5*298, added ListMan check |
|
| HDRBLD | ; Create the report header
; Input: RCADJ - 1 - Display Adjustment/Code information, 0 otherwise ;PRCA*4.5*409 Added RCADJ ; RCDISPTY - 1 - Output to excel, 0 otherwise ; RCDTRNG - Date range selected ; RCXCLUDE - TRICARE /CHAMPVA flags ; VAUTD - Divisions to include in report (if listed in VAUTD array) ; Output: RCHDR(0) - Header text line count ; RCHDR(1) - Excel column data (only set If DISPTY=1) ; RCHDR("XECUTE") - M code for page number ; RCHDR("RUNDATE")- Date/time report generated, external format ; RCPGNUM - Page counter ; RCSTOP - Flag to exit |
|
| HDRLM | ; Create the list manager version of the report header
; Input: RCDADJ - 1 - Display Adjustment/Code info 0 otherwise ;PRCA*4.5*409 Added RCDADJ ; RCDTRNG - Date range filter value to be printed as part of the ; header ; RCPAY - 1 - All Payers ; 2 - Selected Payers ; RCPAY() - Array of selected Payers if RCPAY=2 ; RCLSTMGR - ; VAUTD - 1 - All divisions ; 2 - Selected divisions ; VAUTD() - Array of selected divisions (if VAUTD=2) ; Output: RCHDR(0) - Header text line count |
|
| HDRNM() | ; Extrinsic variable, name for header PRCA*4.5*298
|
|
| EXCEL | ; Print report to screen, one record per line for export to MS Excel.
|
|
| LSTXCEL | ; Display repeat info line before each EEOB detail section.
; First detail line does not need it |
|
| PRTQ2 | ||
| ZROBAL() | ; Get Zero Payment Filter
; Returns: 1 for yes, zero for no, -1 on '^' or timeout |
|
| DADJCDE() | ; Get Adjustment/Code Filter ;PRCA*4.5*409 Added method
; Returns: 1 for yes, zero for no, -1 on '^' or timeout |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
