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

Package: DSS Extracts

Routine: ECXTSR


Information

ECXTSR ;MBS/BAH - Pharmacy DSS Extract Treating Specialty Report ;4/5/24 11:53

Source Information

Source file <ECXTSR.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 4 $$S^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  $$RJ^XLFSTR  EN^XUTMDEVQ  
VA FileMan 4 DD^%DT  NOW^%DTC  ($$GET1,GETS)^DIQ  ^DIR  
DSS Extracts 1 ($$EXPORT,EXPDISP)^ECXUTL1  

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
DSS Extracts 1 ECX TREAT SPEC RPT  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from option
EN1 ;Init variables
EXIT
DATES ;Prompt for start date
HEADER ;Print header
GETDATA ;Get data from Specialty File
STATCH(IEN,EFDT,SDATE,EDATE) ;Check if status changed during report period
DETAIL ;Print report
WAIT ;End of page logic

External References

Name Field # of Occurrence
DD^%DT EN+4
NOW^%DTC EN+4
$$S^%ZTLOAD WAIT+14
$$GET1^DIQ GETDATA+13
GETS^DIQ GETDATA+7
^DIR DATES+5, DATES+13, WAIT+11
$$EXPORT^ECXUTL1 EN+7
EXPDISP^ECXUTL1 EN+12
$$FMTE^XLFDT DATES+4, DATES+12, HEADER+4, HEADER+5, GETDATA+16
$$NOW^XLFDT DATES+4, DATES+12
$$RJ^XLFSTR HEADER+3
EN^XUTMDEVQ EN+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report requires 132 column format."
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,"Treating Specialty Report",?80,$$RJ^XLFSTR("PAGE: "_PAGE,10)
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"Start Date: "_$$FMTE^XLFDT(SDATE),?49,"Report Run Date/Time: "_ECRUN
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"End Date: "_$$FMTE^XLFDT(EDATE),!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"Note: '*' beside the status indicates status was changed during report period."
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,"PTF Code Name Status Effective Date"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,LN
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+8
Routine Call
  • DIR
  • Line Location:
    • DATES+5
    • DATES+13
    • WAIT+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42.4 - [#42.4] GETS^DIQ
42.41 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42.4 - [#42.4] GETDATA+4, GETDATA+10, GETDATA+12
^TMP($J EN+8!, EN+9*, EN+13!, EN1+5, GETDATA+3!, GETDATA+5!, GETDATA+7, GETDATA+8, GETDATA+16*, DETAIL+2
, DETAIL+3, DETAIL+6*

Label References

Name Line Occurrences
$$STATCH GETDATA+14
DATES EN+6
DETAIL EN+11, EN1+12
EXIT EN1+3, EN1+4, EN1+11, EN1+12
GETDATA EN+10, EN1+4
HEADER EN1+3, DETAIL+8
WAIT EN1+10, DETAIL+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+4
%DT EN+4!
ACTIVE GETDATA+1~, GETDATA+13*
CNT EN+1~, EN+9*, DETAIL+6*
DATE EN+1~, EN+4*, GETDATA+1~, GETDATA+2*
DIR DATES+1~, DATES+9!, WAIT+9~
DIR("A" DATES+3*, DATES+11*
DIR("B" DATES+4*, DATES+12*
DIR(0 DATES+2*, DATES+10*, WAIT+10*
DIROUT WAIT+9~
DIRUT DATES+1~, DATES+6, DATES+9!, DATES+14, WAIT+9~
DIVISION EN+1~
DTOUT WAIT+9~
DUOUT WAIT+9~
ECRUN EN+1~, EN+4*, HEADER+4
ECXPAT EN+1~
ECXPORT EN+1~, EN+7*, DETAIL+4
ECXTSRD GETDATA+1~, GETDATA+8*, GETDATA+9
EDATE EN+1~, DATES+15*, HEADER+5, GETDATA+2, GETDATA+14, STATCH~, STATCH+1
EFDT GETDATA+1~, GETDATA+10*, GETDATA+11, GETDATA+12, GETDATA+14, GETDATA+15*, GETDATA+16, STATCH~, STATCH+1
EFDTI GETDATA+1~, GETDATA+12*, GETDATA+13
ENDATE GETDATA+1~, GETDATA+2*, GETDATA+10
ERROR GETDATA+1~
I DETAIL+1~, DETAIL+2*, DETAIL+3
IEN GETDATA+1~, GETDATA+4*, GETDATA+7, GETDATA+8, GETDATA+10, GETDATA+12, GETDATA+13, GETDATA+14, GETDATA+16, STATCH~
IOF HEADER+2
IOSL DETAIL+8, WAIT+8
IOST WAIT+7
LN EN1+1~, HEADER+1*, HEADER+8
NAME GETDATA+1~, GETDATA+9*, GETDATA+16
PAGE EN1+1~, EN1+2*, HEADER+1*, HEADER+3
PTFC GETDATA+1~, GETDATA+9*, GETDATA+16
REPORT EN+1~
SDATE EN+1~, DATES+7*, HEADER+4, GETDATA+2, GETDATA+14, STATCH~, STATCH+1
STATCH GETDATA+1~, GETDATA+6*, GETDATA+14*, GETDATA+16
STATUS GETDATA+1~, GETDATA+6*, GETDATA+13*, GETDATA+16
STOP EN+1~, EN+2*, EN+6, EN1+3, EN1+4, EN1+12, DATES+6*, DATES+14*, DETAIL+2, DETAIL+8
, WAIT+5*, WAIT+12*, WAIT+14*, WAIT+15
TMP EN+1~
TXTYPE EN+1~
U GETDATA+16, DETAIL+5, DETAIL+7
X EN+1~, EN+4, EN+16*, DATES+1~, DATES+9!, DETAIL+3*, DETAIL+5*, DETAIL+6, DETAIL+7, WAIT+9~
Y EN+1~, EN+4*, DATES+1~, DATES+7, DATES+9!, DATES+15, WAIT+9~, WAIT+12
ZTDESC EN+15~, EN+18*, EN+20
ZTIO EN+15~, EN+17*
ZTSAVE EN+15~, EN+20
ZTSAVE( EN+16*
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