RCDPESPB ;ALB/SAB, OI&T/hrubovcak - ePayment Lockbox Site Parameters Definition - Files 344.71 ;29 Jan 2019 18:00:14
Source file <RCDPESPB.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETCARC() | ; function, Retrieve the next CARC code to enable/disable
; Returns: CARC IEN or, -1 - User '^' out, or 0 - User didn't select a CARC |
|
| GETAMT(RCARCTYP) | ; Ask user the maximum amount to allow for auto-decrease
; PRCA4*5*345 - Added RCARCTYP ; Input: RCARCTYP - 0 - Medical, 1 - Pharmacy, 2 - TRICARE |
|
| CHECK(RCMAX,RCPAID,RCDSP,RCCNT,RCARCTYP) | ; Display/Reset any CARC maximum values which exceed upper limit
; PRCA*4.5*345 - Added RCARCTYP ; Input: RCMAX - Maximum allowed $ decrease per claim (from #344.61, #.05) ; RCPAID - 1 - CARCs for paid claims, 0 - CARCs for NO-PAY claims ; RCDSP - 1 - Display only, 0 - Update only ; RCCNT - 1 - Cumulative count of pay and no-pay records found ; RCARCTYP - 0 - Medical CARCs, 1 - Rx CARCs, 2 - TRICARE CARCs ; Output: Updates #344.62 - RCDPE CARC-RARC AUTO DEC ; Updates #344.7 - RCDPE PARAMETER AUDIT |
|
| XMSGBODY(TXT) | ; create Mail message body, TXT passed by ref.
; TXT=line count |
|
| PADPRMPT(P) | ; add space to prompt if needed
|
|
| SCREEN(IEN) | ; Screen out payers that don't have an associated ERA - PRCA*4.5*326
; Input: IEN - Internal entry number from file 344.6 ; Returns: 1 - Payer has an associated ERA, otherwise 0. |
|
| PAYTYP(TYP,FLD) | ; Check if payer is eligible to be selected for a give exclusion type
; Input: TYP - 1 or 2=Medical, 3 or 4=Rx, 5 or 6=TRICARE ; FLD - Field number from file 344.6 representing the Auto-Post or Auto-Decrease excusion for TYP. ; Note variable Y is the IEN of file 344.6, set by FileMan for screen check |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^RCY(344.6 - [#344.6] | GET1^DIQ |
| ^RCY(344.61 - [#344.61] | GET1^DIQ |
| ^RCY(344.62 - [#344.62] | GET1^DIQ |
