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: RCDPESPA

Package: Accounts Receivable

Routine: RCDPESPA


Information

RCDPESPA ;OICO/HRUBOVCAK - ePayment Lockbox Parameter Audit Report ;29 Jan 2019 18:00:14

Source Information

Source file <RCDPESPA.m>

Entry Points

Name Comments DBIA/ICR reference
AUDPARM ;EP from RCDPESP2
; EDI Lockbox Parameters Audit Report [RCDPE PARAMETER AUDIT REPORT]
; Report logic moved from RCDPESP2, 11 October 2018
; Report displays the RCDPE PARAMETER AUDIT file (#344.7)
; and changes to the RCDPE PARAMETER file (#344.61)
RPTEND ; end of report
HDRLPR(RCRPRT,RCSTOP) ; Report header Lockbox Parameter Report
; Input: RCRPRT("eXcel") - If true output for Excel
; RCRPRT("hdrPg#") - Current Page count
; RCSTOP - Report exit flag
; RCRPRT("dtRange") - Selected Date Range
; RCRPRT("typRprt") - Type of report to run
; Output: RCRPRT("hdrPg#") - Updated Page count
GETPAYER() ; GET THE PAYER NAME + PAYER ID
CNTR(TXT) ; center TXT
DTRNG() ; function, returns date range for the report
DATES(BDATE,EDATE) ; Get a date range, both values passed by ref.
RTYPE(DEF) ; EP from RCDPESP2, RCDPESP1
; Type of information to display
; Input: DEF - default value
; Returns:
; ; *future build*, add Tricare, change 'Both' to 'All'
; M - Medical, P - Pharmacy, T - Tricare, A - All, -1 - ^ or timed out
TYPMTCH(RCRPRT,RCPARAM) ; function, print changed parameter?
; Input passed by ref:
; RCRPRT("typRprt") - Report filter
; RCPARAM - values for the changed parameter
; Returns: 1 if valid to print, 0 otherwise
PAD(A,N) ; pad A with N spaces
YESNO(RCPARAM,Y) ; Yes/No text, RCPARAM passed by ref., Y=RCTMP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"EDI Lockbox Parameters Audit Report",!
  • Line Location: AUDPARM+39
Function Call: WRITE
  • Prompt: !!,"FileMan error when collecting report data."
  • Line Location: AUDPARM+75
Function Call: WRITE
  • Prompt: !,RCPARAM_U_RCPARAM("dt&tm")_U_RCPARAM("oldVal")_U_RCPARAM("newVal")_U_RCPARAM("usr")
  • Line Location: AUDPARM+128
Function Call: WRITE
  • Prompt: !,$E(Y,1,IOM)
  • Line Location: AUDPARM+131
Function Call: WRITE
  • Prompt: !," * No PARAMETER AUDIT entries to report. *",!
  • Line Location: RPTEND+3
Function Call: WRITE
  • Prompt: !!,$$ENDORPRT^RCDPEARL,!
  • Line Location: RPTEND+5
Function Call: WRITE
  • Prompt: !,"PARAMETER^DATE/TIME EDITED^OLD VALUE^NEW VALUE^USER"
  • Line Location: HDRLPR+9
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDRLPR+14
Function Call: WRITE
  • Prompt: $$CNTR("EDI Lockbox Parameter Audit Report"),?IOM-8,"Page: "_RCRPRT("hdrPg#")
  • Line Location: HDRLPR+16
Function Call: WRITE
  • Prompt: !,$$CNTR("RUN DATE: "_RCRPRT("hdrDate"))
  • Line Location: HDRLPR+17
Function Call: WRITE
  • Prompt: !,$$CNTR("DATE RANGE: "_RCRPRT("dtRange"))
  • Line Location: HDRLPR+18
Function Call: WRITE
  • Prompt: !,$$CNTR("REPORT TYPE: "_RCRPRT("hdrTyp"))
  • Line Location: HDRLPR+19
Function Call: WRITE
  • Prompt: !!,"LOCKBOX PARAMETER UPDATES"
  • Line Location: HDRLPR+20
Function Call: WRITE
  • Prompt: !,"-------------------------- Values"
  • Line Location: HDRLPR+21
Function Call: WRITE
  • Prompt: !,"Parameter Date/Time Edited Old New User"
  • Line Location: HDRLPR+22
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM-1)," ","=")
  • Line Location: HDRLPR+23

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RCY(344.6 - [#344.6] GET1^DIQ
^RCY(344.61 - [#344.61] GET1^DIQ
^RCY(344.7 - [#344.7] LIST^DIC
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call