RCDPEFA2 ;AITC/FA - FIRST PARTY AUTO-DECREASE REPORT, cont. ; 5/29/19 12:31pm
Source file <RCDPEFA2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STADIV(RCVAUTD) | ; EP from RCDPEFA1 - Division/Station selection
 ; Input: None ; Output: RCVAUTD - Array of selected Divisions/Stations, passed by ref. ; Returns: 1 - All selected, 2 - specific Divisions/Stations, 0 - U or timeout  | 
|
| ASKPAT() | ; EP from RCDPEFA1 - Filter by Patient or 'ALL'
 ; Input: None ; Returns: P - Sort by Claim ; A - Sort by Patient Name ; 0 - User entered '^' or timed out  | 
|
| ASKPAT2() | ; Select the Patient to filter by
 ; Input: None ; Returns: IEN - Select Patient IEN file #2 ; 0 - User entered '^' or timed out or no patient selected  | 
|
| ASKPAT3() | ; Ask whether to display comment details for single patient search
 ; Input: None ; Returns: Y = Yes, display comment details ; N = No, do not display comment details ; -1 = User entered '^' or timed out  | 
|
| ASKSORT() | ; EP from RCDPEFA1 - Select the sort criteria
 ; Input: None ; Returns: C - Sort by Claim ; N - Sort by Patient Name ; 0 - User entered '^' or timed out  | 
|
| SORTORD(SORT) | ; EP from RCDPEFA1 - Select the sort order
 ; Input: SORT - 'C' - Sort by Claim Number ; 'N' - Sort by Patient Name ; Returns: F - First to Last ; L - Last to First ; 0 - User entered '^' or timed out  | 
|
| DTRNG() | ; EP from RCDPEFA1 - Get the date range for the report
 ; Input: None ; Returns: A1|A2|A3 - Where: ; A1 - 0 - User up-arrowed or timed out, 1 otherwise ; A2 - Auto-Post Start Date ; A3 - Auto-Post End Date  | 
|
| DATES(BDATE,EDATE) | ; Get a date range.
 ; Input: None ; Output: BDATE - Internal Auto-Post Start Date ; EDATE - Internal Auto-Post End Date  | 
|
| D1 | ; looping tag
 | 
|
| DISPTY() | ; EP from RCDPEFA1 - Get display/output type
 ; Input: None ; Returns: 1 - Output to Excel ; 0 - Output to paper  | 
|
| DETSUM() | ; EP from RCDPEFA1 - Get detail/summary type
 | 
|
| DEVICE(IO) | ; Select output device
 ; Input: None ; Output: IO - Array of selected output info ; Returns: 0 - No device selected, 1 Otherwise  | 
|
| LMAN(DATA,INPUT,RCCMT,XX) | ;EP from RCDPEFA1
 ; Format and save List Manager line ; Input: DATA - ERA line adjustment total ; INPUT - Input parameters in delimited list ; RCCMT - Array of free text comments for this decrease ; XX - List Counter for ^TMP("RCDPE_ADP",$J)  | 
|
| TOTALD(LMAN,HDRINFO,PAGE,STOP,DAY,DTOTAL,LCNT) | ; Totals for a single day
 ; Input: LMAN - 1 if output to List Template, 0 otherwise ; HDRINFO - Array of header information ; PAGE - Page Number ; DAY - FileMan date to display totals for ; DTOTAL - Array of totals by day ; LCNT - Current line count (only passedif LMAN=1) ; Output: PAGE - Updated Page Number (if a new header is displayed) ; STOP - 1 if user indiacted to stop ; LCNT - Updated line count (only passedif LMAN=1)  | 
|
| TOTALG(LMAN,HDRINFO,PAGE,GTOTAL,STOP,LCNT) | ; Overall report total
 ; Input: LMAN - 1 if output to Listman, 0 otherwise ; HDRINFO - Array of header info ; PAGE - Current Page Number ; GTOTAL - Grand Totals for report ; LCNT - Current line count (only passedif LMAN=1) ; Output: PAGE - Updated Page Number (if new header is displayed) ; LCNT - Updated line count (only passedif LMAN=1)  | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |