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

Package: Accounts Receivable

Routine: RCDPEAPS


Information

RCDPEAPS ;ALB/DMB - ERA STATUS CHANGE AUDIT REPORT ;Nov 25, 2015

Source Information

Source file <RCDPEAPS.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
; Prompt for report type
RANGE ; Select date range for audit transactions
ENQ ;
RUN(RCERA,RCRANGE) ;
COMPILE(RCERA,RCRANGE) ;
; Compile the data
REPORT(RCRANGE) ;
; Display output
HEADER(RCNOW,RCPG,RCHR,RCRANGE) ;
; Print Header
PAUSE() ;
CHKP(RCNOW,RCPG,RCHR,RCRANGE,RCSCR,LINES) ;
; Check if we need to do a page break
SELERA() ;
; Lookup on the Electronic Remittance Advice (#344.4) file
DTRNG() ;
; Get the date range for the report
STATUS(STATUS) ;
; Convert internal status to external status

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$S($D(ZTSK):"REQUEST QUEUED TASK="_ZTSK,1:"REQUEST CANCELLED")
  • Line Location: RANGE+15
Function Call: WRITE
  • Prompt: !,"No data found"
  • Line Location: REPORT+10
Function Call: WRITE
  • Prompt: !,ERA,?15,$$FMTE^XLFDT(DATE,"2Z"),?38,$$STATUS($P(DATA,U,1)),?49,$$STATUS($P(DATA,U,2))
  • Line Location: REPORT+22
Function Call: WRITE
  • Prompt: ?63,$E($$GET1^DIQ(200,+$P(DATA,U,3)_",",.01),1,IOM-63)
  • Line Location: REPORT+23
Function Call: WRITE
  • Prompt: !,?3,$E($P(DATA,U,4),1,IOM-4)
  • Line Location: REPORT+24
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORT+25
Function Call: WRITE
  • Prompt: !,@IOF
  • Line Location: REPORT+27
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: ?(IOM-$L(LINE)\2),LINE
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: ?(IOM-$L(LINE)),LINE
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !?(IOM-$L(LINE)\2),LINE
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !?(IOM-$L(LINE)\2),LINE
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: !!,"ERA#",?15,"Date/Time Edited",?38,"Status (Old/New)",?63,"User"
  • Line Location: HEADER+17
Function Call: WRITE
  • Prompt: !?3,"Reason Text"
  • Line Location: HEADER+18
Function Call: WRITE
  • Prompt: !,RCHR
  • Line Location: HEADER+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^RCY(344.4 - [#344.4] Classic Fileman Calls,  EXTERNAL^DILFD
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call