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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: RCDPESP5

Package: Accounts Receivable

Routine: RCDPESP5


Information

RCDPESP5 ;ALB/SAB - ePayment Lockbox Site Parameters Definition - Files 344.71 ;29 Jan 2019 18:00:14

Source Information

Source file <RCDPESP5.m>

Entry Points

Name Comments DBIA/ICR reference
PRTCARC(PAID,RCARCTYP) ; Display current entries that have been defined for
; inclusion or exclusion into - PAID added - PRCA*4.5*326
; PRCA4*5*345 - Added RCARCTYP parameter
; Input: PAID: 0 - Auto-Decrease CARCs for Paid claim lines
; 1 - Auto-Decrease CARCs for No-Pay claim lines
; RCARCTYP: 0 - Medical Auto-Decrease CARCs
; 1 - Rx Auto-Decrease CARCs
; 2 - TRICARE Auto-Decrease CARCs
; Optional, defaults to 0
GETREASN(RCCARC) ; EP from ^RCDPESP7 - Get the reason for modification
UPDDATA(RCCIEN,RCSTAT,RCAMT,RCRSN,PAID,RCARCTYP) ; EP from RCDPESP7 - Update the database and audit log
; PAID added PRCA*4.5*326
; PRCA4*5*345 - Added RCARCTYP
; Input: RCCIEN - IEN of the CARC (#344.62(
; RCSTAT - 1 - Enabling Auto-Decrease, 0 - Disabling
; RCAMT - Auto-Decrease amount for the CARC
; RCRSN - Comment
; PAID - 1 - Paid CARC list, 0 - No-Pay CARC List
; RCARCTYP - 0 - Medical Claims, 1 - Rx Claims, 2 - TRICARE Claims
ADDDATA(RCCARC,RCAMT,RCRSN,PAID,RCARCTYP) ; EP from RCDPESP7 - Add new entry to the table
; PAID added PRCA*4.5*326
; PRCA4*5*345 - Added RCARCTYP
; Input: RCCARC - IEN of the CARC being added
; RCAMT - Auto-Decrease Amount
; RCRSN - Comment
; PAID - 1 - Paid Claims, 0 - No-Pay Claims
; RCARCTYP - 0 - Medical, 1 - Rx, 2 - TRICARE
AUDIT() ;EP from RCDPESP
; File Audit Trail entry
GETAUDIT(FLAG) ; Retrieve the parameter for the bill type
; BEGIN PRCA*4.5*321
FILEANS(FIELD,ANS) ; File the answer
CARCDSP(RCMAX,RCARCTYP) ; EP ^RCDPESP7
; Input: RCMAX - Maximum CARC amount
; RCARCTYP - 0 - Medical CARCs, 1 - Rx CARCs

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," CARC Description"_$J("Max. Amt",55),!," "_$$EQLSGNS^RCDPESP2(73)
  • Line Location: PRTCARC+13
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: PRTCARC+42
Function Call: WRITE
  • Prompt: !," NO CARC/AMOUNTS ENTERED"
  • Line Location: PRTCARC+44
Function Call: WRITE
  • Prompt: !
  • Line Location: AUDIT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CARCDSP+18

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RC(342 - [#342] Classic Fileman Calls,  GET1^DIQ
^RCY(344.62 - [#344.62] Classic Fileman Calls,  GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call