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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECXATRT

Package: DSS Extracts

Routine: ECXATRT


Information

ECXATRT ;ALB/JAP - TRT Extract Audit Report ;11/15/17 10:30

Source Information

Source file <ECXATRT.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
DSS Extracts 5 PROCESS^ECXATRT  TRT^ECXDVSN  AUDIT^ECXKILL  ($$EXPORT,EXPDISP)^ECXUTL1  (AUDIT,DEVICE)^ECXUTLA  
VA FileMan 5 (,DD)^%DT  NOW^%DTC  EN^DIQ  EN^DIQ1  ^DIR  
Kernel 4 HOME^%ZIS  ^%ZISC  $$S^%ZTLOAD  $$RJ^XLFSTR  
Registration 1 $$ACTIVE^DGACT  

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

Package Total Caller Graph
DSS Extracts 2 ECX TRT SOURCE AUDIT  ECXATRT  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point for TRT extract audit report
PROCESS ;process data in file #727.817
PRINT ;print trt data by site, by service, by specialty
HEADER ;header and page control

External References

Name Field # of Occurrence
^%DT PROCESS+5
DD^%DT PROCESS+7
NOW^%DTC PROCESS+7
HOME^%ZIS EN+34
^%ZISC EN+33
$$S^%ZTLOAD PROCESS+9, PROCESS+60, PROCESS+64, PRINT+3
$$ACTIVE^DGACT PROCESS+24
EN^DIQ PRINT+43
EN^DIQ1 PROCESS+13, PROCESS+21
^DIR PRINT+46, HEADER+4
PROCESS^ECXATRT EN+32
TRT^ECXDVSN EN+11
AUDIT^ECXKILL EN+14, EN+24, EN+29, EN+35, PROCESS+73
$$EXPORT^ECXUTL1 EN+19
EXPDISP^ECXUTL1 EN+23
AUDIT^ECXUTLA EN+7
DEVICE^ECXUTLA EN+26
$$RJ^XLFSTR PRINT+19, PRINT+31, PRINT+34

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Setup for ",ECXHEAD," Extract Audit Report --",!!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+25
Function Call: WRITE
  • Prompt: !,SERV
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: ?22,$E(SPEC,1,30)_" ("_TS_")",?68,$$RJ^XLFSTR(TOT,5," "),!
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: ?25,$E(FTSNM,1,30),!
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: "Total for "_SERV_":",?68,$$RJ^XLFSTR(SVCTOT,5," "),!
  • Line Location: PRINT+31
Function Call: WRITE
  • Prompt: !!,"Grand Total for all Services:",?68,$$RJ^XLFSTR(GTOT,5," ")
  • Line Location: PRINT+34
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+45
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+46
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"Treating Specialty Change"_" ("_ECXHEAD_") Extract Audit Report"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"DSS Extract Log #: "_ECXARRAY("EXTRACT")
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"Date Range of Audit: "_ECXARRAY("START")_" to "_ECXARRAY("END")
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,"Report Run Date/Time: "_ECXRUN
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !,"DSS Site: "_$P(ECXDIV(DIV),U,2)_" ("_$P(ECXDIV(DIV),U,3)_")",?68,"Page: "_PG
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !!,"Service",?22,"Specialty (DSS Code)",?68,"# of Losses"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,?25,"Facility Treating Specialty"
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: HEADER+15
Routine Call
  • DIR
  • Line Location:
    • PRINT+46
    • HEADER+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+34

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42.4 - [#42.4] Classic Fileman Calls
^DIC(45.7 - [#45.7] Classic Fileman Calls
^ECX(727.1 - [#727.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42.4 - [#42.4] PROCESS+12, PROCESS+53, PROCESS+54
^DIC(45.7 - [#45.7] PROCESS+20
^ECX(727.817 - [#727.817] PROCESS+31, PROCESS+32
^TMP($J EN+20!, EN+21*, PROCESS+2!, PROCESS+15*, PROCESS+29*, PROCESS+59, PROCESS+65, PROCESS+66, PROCESS+67, PROCESS+69*
PRINT+8, PRINT+9*, PRINT+11, PRINT+15, PRINT+17, PRINT+18*, PRINT+22, PRINT+23, PRINT+24*, PRINT+25*
PRINT+29*, PRINT+33*

Label References

Name Line Occurrences
HEADER PRINT+7, PRINT+14, PRINT+26, PRINT+31, PRINT+34
PRINT PROCESS+71
PROCESS EN+22

Naked Globals

Name Field # of Occurrence
^( PROCESS+12, PROCESS+20, PROCESS+59*, PROCESS+68, PRINT+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PROCESS+7
%X EN+1~
%Y EN+1~
A1 PROCESS+1~, PROCESS+24*, PROCESS+25
A2 PROCESS+1~, PROCESS+24*, PROCESS+25
CNT PROCESS+1~, PROCESS+3*, PROCESS+59*, PROCESS+60
DA EN+1~, PROCESS+13*, PROCESS+21*, PRINT+43*
DATA PROCESS+1~, PROCESS+32*, PROCESS+53*, PROCESS+54*, PROCESS+55
DATE PROCESS+1~, PROCESS+32*, PROCESS+36*, PROCESS+37
DIC EN+1~, PROCESS+11*, PROCESS+19*, PRINT+43*
DIQ EN+1~, PROCESS+11*, PROCESS+19*
DIQ(0 PROCESS+11*, PROCESS+19*
DIR EN+1~, PRINT+1~, PRINT+46!, HEADER+4!
DIR(0 PRINT+46*, HEADER+4*
DIRUT PRINT+1~
DIV PROCESS+1~, PROCESS+10*, PROCESS+15, PROCESS+32*, PROCESS+34*, PROCESS+38, PROCESS+59, PROCESS+65*, PROCESS+66, PROCESS+67
PROCESS+69, PRINT+1~, PRINT+6*, PRINT+8, PRINT+9, PRINT+11, PRINT+15, PRINT+17, PRINT+18, PRINT+25
HEADER+12
DIVNM PRINT+1~
DR EN+1~, PROCESS+11*, PROCESS+19*, PRINT+43*
DTOUT PRINT+1~
DUOUT PRINT+1~
ECX PROCESS+1~, PROCESS+13!, PROCESS+21!
ECX( PROCESS+14, PROCESS+22
>> ECXALL EN+10*, EN+11
>> ECXARRAY EN+7
>> ECXARRAY("DEF" PROCESS+4, PRINT+43
>> ECXARRAY("END" PROCESS+5, PRINT+40, HEADER+10
>> ECXARRAY("EXTRACT" PROCESS+4, HEADER+9
>> ECXARRAY("START" PROCESS+5, PRINT+40, HEADER+10
>> ECXARRAY("TYPE" PRINT+38
>> ECXAUD EN+4*, EN+7
>> ECXDEF PROCESS+4*
ECXDESC EN+17*, EN+26, EN+31!
>> ECXDIV EN+11
>> ECXDIV( PROCESS+10, PROCESS+38, PROCESS+65, PRINT+6, PRINT+9, PRINT+18, PRINT+25, HEADER+12
>> ECXEND PROCESS+5*, PROCESS+24, PROCESS+37
>> ECXERR EN+2*, EN+7, EN+8, EN+11, EN+12
>> ECXEXT PROCESS+4*, PROCESS+31, PRINT+9, PRINT+18, PRINT+25, PRINT+39
>> ECXHEAD EN+4*, EN+5, EN+7, PRINT+38, HEADER+8
ECXPGM EN+17*, EN+26, EN+31!
ECXPORT EN+1~, EN+19*, PROCESS+72, PRINT+7, PRINT+9, PRINT+14, PRINT+18, PRINT+19, PRINT+24, PRINT+25
PRINT+29, PRINT+33
>> ECXRUN PROCESS+7*, PRINT+41, HEADER+11
ECXSAVE EN+26, EN+31!
ECXSAVE("ECXALL" EN+18*
ECXSAVE("ECXARRAY(" EN+18*
ECXSAVE("ECXDIV(" EN+18*
ECXSAVE("ECXHEAD" EN+18*
ECXSAVE("POP" EN+27
ECXSAVE("ZTSK" EN+30
>> ECXSTART PROCESS+5*, PROCESS+24, PROCESS+37
ECXTS PROCESS+52~, PROCESS+53*, PROCESS+54*
FIRST PRINT+1~, PRINT+21*, PRINT+24*
FTS PROCESS+1~, PROCESS+20*, PROCESS+21, PROCESS+22, PROCESS+24, PROCESS+29, PRINT+22*, PRINT+23
FTSNM PROCESS+1~, PROCESS+20*, PROCESS+22*, PROCESS+29, PRINT+23*, PRINT+24, PRINT+25, PRINT+26
GTOT PRINT+1~, PRINT+6*, PRINT+20*, PRINT+33, PRINT+34
IEN PROCESS+1~, PROCESS+31*, PROCESS+32
IO EN+33, PRINT+2
IO(0 EN+33
IOF PRINT+37, HEADER+6
IOSL PRINT+14, PRINT+26, PRINT+31, PRINT+34
IOST PRINT+36, PRINT+44, HEADER+2, HEADER+6
JJ PRINT+1~, PRINT+45*, HEADER+1~, HEADER+3*
LN PRINT+1~, PRINT+4*, PRINT+30, PRINT+42, HEADER+15
>> LOS PROCESS+55*, PROCESS+58
MN PROCESS+1~
NEWFTS PROCESS+1~
NEWSPEC PROCESS+1~
NEWTS PROCESS+52~, PROCESS+55*, PROCESS+57
NUM PROCESS+1~
NUM( PROCESS+15*, PROCESS+28*, PROCESS+29*, PROCESS+57
P PRINT+1~
PG PRINT+1~, PRINT+4*, PRINT+37*, PRINT+41, HEADER+4, HEADER+6*, HEADER+12
QFLG PRINT+1~, PRINT+4*, PRINT+11, PRINT+14, PRINT+15, PRINT+22, PRINT+26, PRINT+28, PRINT+31, PRINT+34
PRINT+44, HEADER+2, HEADER+4*, HEADER+5
QQFLG PROCESS+1~, PROCESS+3*, PROCESS+31, PROCESS+60*
RCNT EN+1~, EN+21*, PRINT+9*, PRINT+18*, PRINT+24, PRINT+25*, PRINT+29*, PRINT+33
SERV PROCESS+1~, PROCESS+14*, PROCESS+15, PROCESS+68*, PROCESS+69, PRINT+11*, PRINT+14, PRINT+15, PRINT+17, PRINT+18
PRINT+25, PRINT+29, PRINT+31
SPEC PROCESS+1~, PROCESS+12*, PROCESS+14*, PROCESS+15, PROCESS+68*, PROCESS+69, PRINT+15*, PRINT+17, PRINT+18, PRINT+19
PRINT+25
SS PRINT+1~, PRINT+45*, HEADER+1~, HEADER+3*
SVCTOT PRINT+1~, PRINT+12*, PRINT+20*, PRINT+29, PRINT+31
>> TOT PROCESS+67*, PROCESS+69, PRINT+17*, PRINT+18, PRINT+19, PRINT+20
TS PROCESS+1~, PROCESS+12*, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+22*, PROCESS+23, PROCESS+28, PROCESS+29, PROCESS+55*
PROCESS+57, PROCESS+59, PROCESS+66*, PROCESS+67, PROCESS+68, PROCESS+69, PRINT+17*, PRINT+18, PRINT+19, PRINT+22
PRINT+23, PRINT+25
U PROCESS+15, PROCESS+32, PROCESS+53, PROCESS+54, PROCESS+55, PROCESS+59, PROCESS+67, PROCESS+68, PROCESS+69, PRINT+9
PRINT+17, PRINT+18, PRINT+24, PRINT+25, HEADER+12
W PROCESS+1~
X EN+1~, PROCESS+1~, PROCESS+5*
Y EN+1~, PROCESS+1~, PROCESS+5, PROCESS+7*, HEADER+4
>> ZTQUEUED PROCESS+9, PROCESS+60, PROCESS+64, PRINT+3
ZTREQ PROCESS+9!, PROCESS+60!, PROCESS+64!, PRINT+3!
>> ZTSTOP PROCESS+9*, PROCESS+60*, PROCESS+64*, PRINT+3*
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 |  Naked Globals |  Local Variables  | All