Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
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>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$UP^XLFSTR  
VA FileMan 4 ^DIC  $$EXTERNAL^DILFD  $$GET1^DIQ  ^DIR  
Accounts Receivable 2 ($$ISTYPE,$$RTYPE)^RCDPEU1  $$NOW^RCDPRU  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Accounts Receivable 1 RCDPE ERA STATUS CHNG AUD REP  

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

External References

Name Field # of Occurrence
^%ZIS RANGE+7
HOME^%ZIS RANGE+16
^%ZISC REPORT+29
^%ZTLOAD RANGE+14
^DIC SELERA+5
$$EXTERNAL^DILFD STATUS+4
$$GET1^DIQ REPORT+23
^DIR EN+5, PAUSE+3, DTRNG+5, DTRNG+11
$$ISTYPE^RCDPEU1 REPORT+14
$$RTYPE^RCDPEU1 EN+14
$$NOW^RCDPRU REPORT+6
$$FMTE^XLFDT REPORT+22, HEADER+14
$$UP^XLFSTR REPORT+6

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
Routine Call
  • %ZIS
  • Line Location:
    • RANGE+7
Routine Call
  • %ZIS
  • Line Location:
    • RANGE+16
Routine Call
  • DIC
  • Line Location:
    • SELERA+5
Routine Call
  • DIR
  • Line Location:
    • EN+5
    • PAUSE+3
    • DTRNG+5
    • DTRNG+11

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RCY(344.72 - [#344.72] COMPILE+8, COMPILE+9, COMPILE+18, COMPILE+19, COMPILE+20
^TMP("RCDPEAPS" RUN+2!, RUN+10!, COMPILE+14*, COMPILE+23*, REPORT+10, REPORT+13, REPORT+15, REPORT+16, REPORT+17

Label References

Name Line Occurrences
$$DTRNG RANGE+2
$$PAUSE CHKP+4
$$SELERA EN+11
$$STATUS REPORT+22
CHKP REPORT+21
COMPILE RUN+5
ENQ RANGE+8, RANGE+9
HEADER REPORT+9, CHKP+5
PAUSE REPORT+31
RANGE EN+11
REPORT RUN+8
RUN RANGE+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS RANGE+5~, RANGE+6*
AUDDATE COMPILE+3~, COMPILE+10*, COMPILE+11, COMPILE+12, COMPILE+14, COMPILE+18*, COMPILE+19, COMPILE+23
BDATE COMPILE+3~, COMPILE+4*, COMPILE+12, COMPILE+18, DTRNG+3~, DTRNG+6*, DTRNG+7*, DTRNG+11, DTRNG+13
CNT COMPILE+3~, COMPILE+4*, COMPILE+13*, COMPILE+14, COMPILE+22*, COMPILE+23, REPORT+4~, REPORT+16*, REPORT+17
DATA COMPILE+3~, COMPILE+9*, COMPILE+10, COMPILE+14, COMPILE+20*, COMPILE+21, COMPILE+23, REPORT+4~, REPORT+17*, REPORT+19
, REPORT+22, REPORT+23, REPORT+24
DATE REPORT+4~, REPORT+15*, REPORT+16, REPORT+17, REPORT+22
DIC SELERA+3~, SELERA+4*
DIC(0 SELERA+4*
DIR EN+2~, PAUSE+1~, DTRNG+3~, DTRNG+8!
DIR("?" DTRNG+4*, DTRNG+9*
DIR("A" EN+4*, DTRNG+5*, DTRNG+11*
DIR("B" EN+4*, DTRNG+5*, DTRNG+10*, DTRNG+11*
DIR(0 EN+3*, PAUSE+2*, DTRNG+5*, DTRNG+11*
DIROUT EN+2~, PAUSE+1~, DTRNG+3~
DIRUT EN+2~, PAUSE+1~, DTRNG+3~
DT DTRNG+5, DTRNG+11
DTOUT EN+2~, PAUSE+1~, SELERA+3~, SELERA+6, DTRNG+3~, DTRNG+6, DTRNG+12
DUOUT EN+2~, PAUSE+1~, SELERA+3~, SELERA+6, DTRNG+3~, DTRNG+6, DTRNG+12
EDATE COMPILE+3~, COMPILE+4*, COMPILE+12, COMPILE+18
ERA REPORT+4~, REPORT+13*, REPORT+14, REPORT+15, REPORT+16, REPORT+17, REPORT+22
IEN COMPILE+3~, COMPILE+8*, COMPILE+9, COMPILE+19*, COMPILE+20
IO RANGE+17, REPORT+8
IO("Q" RANGE+9
IOF REPORT+27, HEADER+4
IOM REPORT+6, REPORT+23, REPORT+24, HEADER+7, HEADER+9, HEADER+13, HEADER+15
ION RANGE+11
IOSL CHKP+3
IOST REPORT+5
LINE HEADER+3~, HEADER+6*, HEADER+7, HEADER+8*, HEADER+9, HEADER+10*, HEADER+11*, HEADER+12*, HEADER+13, HEADER+14*
, HEADER+15
LINES REPORT+4~, REPORT+18*, REPORT+19*, REPORT+20*, REPORT+21, CHKP~, CHKP+3
POP RANGE+5~, RANGE+8
RCALL EN+2~, EN+7*, EN+11
RCERA EN+2~, EN+10*, EN+11*, RANGE+19, RUN~, RUN+5, COMPILE~, COMPILE+7, COMPILE+8, COMPILE+14
, COMPILE+17
RCHR REPORT+4~, REPORT+6*, REPORT+9, REPORT+21, HEADER~, HEADER+19, CHKP~, CHKP+5
RCNOW REPORT+4~, REPORT+6*, REPORT+9, REPORT+21, HEADER~, HEADER+10, CHKP~, CHKP+5
RCPG REPORT+4~, REPORT+6*, REPORT+9, REPORT+13, REPORT+15, REPORT+16, REPORT+21, REPORT+31, HEADER~, HEADER+5*
, HEADER+8, CHKP~, CHKP+4*, CHKP+5
RCRANGE EN+2~, RANGE+1*, RANGE+2*, RANGE+19, RUN~, RUN+5, RUN+8, COMPILE~, COMPILE+4, REPORT~
, REPORT+9, REPORT+21, HEADER~, HEADER+14, CHKP~, CHKP+5
RCSCR REPORT+4~, REPORT+5*, REPORT+20, REPORT+21, REPORT+27, REPORT+31, CHKP~, CHKP+4
RCTYPE EN+2~, EN+10*, EN+14*, REPORT+14, HEADER+12
STATUS STATUS~, STATUS+2, STATUS+3, STATUS+4
U COMPILE+4, COMPILE+10, COMPILE+14, COMPILE+21, COMPILE+23, REPORT+19, REPORT+22, REPORT+23, REPORT+24, HEADER+14
X EN+2~, PAUSE+1~, SELERA+3~, DTRNG+3~
Y EN+2~, EN+6, EN+7, PAUSE+1~, PAUSE+4, SELERA+3~, SELERA+6, SELERA+7, DTRNG+3~, DTRNG+6
, DTRNG+7, DTRNG+12, DTRNG+13
Y(0 DTRNG+10
ZTDESC RANGE+5~, RANGE+13*
ZTIO RANGE+5~, RANGE+11*
>> ZTQUEUED REPORT+28
>> ZTREQ REPORT+28*
ZTRTN RANGE+5~, RANGE+10*
ZTSAVE RANGE+5~
ZTSAVE("*" RANGE+12*
ZTSK RANGE+5~, RANGE+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All