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 |