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

Package: DSS Extracts

Routine: ECXALAB


Information

ECXALAB ;ALB/JAP - ECS Extract Audit Report ;3/27/14 16:10

Source Information

Source file <ECXALAB.m>

Call Graph

Call Graph

Call Graph Total: 15

Package Total Call Graph
DSS Extracts 6 PROCESS^ECXALAB  DEFAULT^ECXDVSN  LAB^ECXDVSN1  AUDIT^ECXKILL  ($$EXPORT,EXPDISP)^ECXUTL1  (AUDIT,DEVICE)^ECXUTLA  
VA FileMan 5 (,DD)^%DT  NOW^%DTC  ^DIC  EN^DIQ  ^DIR  
Kernel 4 HOME^%ZIS  ^%ZISC  $$S^%ZTLOAD  $$RJ^XLFSTR  

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 LAB SOURCE AUDIT (PATIENT)  ECXALAB  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point for LAB extract audit report
PROCESS ;process data in file #727.813
PRINT ;print the LAB audit report by accession area and test
HEADER ;header and page control

External References

Name Field # of Occurrence
^%DT EN+24, PROCESS+7
DD^%DT PROCESS+9
NOW^%DTC PROCESS+9
HOME^%ZIS EN+48
^%ZISC EN+47
$$S^%ZTLOAD PROCESS+30, PRINT+3
^DIC PROCESS+22
EN^DIQ PRINT+31
^DIR EN+16, PRINT+34, HEADER+4
PROCESS^ECXALAB EN+46
DEFAULT^ECXDVSN EN+13
LAB^ECXDVSN1 EN+25
AUDIT^ECXKILL EN+22, EN+28, EN+35, EN+43, EN+49, PROCESS+34
$$EXPORT^ECXUTL1 EN+30
EXPDISP^ECXUTL1 EN+34
AUDIT^ECXUTLA EN+9
DEVICE^ECXUTLA EN+40
$$RJ^XLFSTR PRINT+17, PRINT+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Setup for ",ECXHEAD," Extract Audit Report --",!!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+36
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !,ACCNM
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !,?3,$E(WKLDNM,1,36),?40,WKLD,?56,$$RJ^XLFSTR(TOTP,5," "),?68,$$RJ^XLFSTR(TOTR,5," ")
  • Line Location: PRINT+17
Function Call: WRITE
  • Prompt: !,?3,$E(LN,1,70)
  • Line Location: PRINT+20
Function Call: WRITE
  • Prompt: !,"Total for "_ACCNM_":",?56,$$RJ^XLFSTR(GTOT("P"),5," "),?68,$$RJ^XLFSTR(GTOT("R"),5," "),!!
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+33
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+34
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,ECXARRAY("TYPE")_" ("_ECXHEAD_") Extract Audit Report"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !,"DSS Extract Log #: "_ECXARRAY("EXTRACT")
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"Date Range of Audit: "_ECXARRAY("START")_" to "_ECXARRAY("END")
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"Report Run Date/Time: "_ECXRUN
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,"DSS Site: "_$P(ECXDIV(DIV),U,2)_" ("_$P(ECXDIV(DIV),U,3)_")",?68,"Page: "_PG
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !!,"Accession Area (Feeder Location)",?40,"LMIP",?56,"# of Tests",?68,"# of Tests"
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !,?3,"Procedure",?40,"Code",?56,"(Patients)",?68,"(Referrals)"
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: HEADER+14
Routine Call
  • DIC
  • Line Location:
    • PROCESS+22
Routine Call
  • DIR
  • Line Location:
    • EN+16
    • PRINT+34
    • HEADER+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+48

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAM - [#64] Classic Fileman Calls
^ECX(727.1 - [#727.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(727.813 - [#727.813] PROCESS+14, PROCESS+15
^ECX(728 - [#728] PROCESS+5
^TMP($J EN+31!, EN+32*, PROCESS+2!, PROCESS+27*, PROCESS+28, PROCESS+29, PRINT+9, PRINT+10*, PRINT+12, PRINT+13
, PRINT+16*, PRINT+19*

Label References

Name Line Occurrences
HEADER PRINT+4, PRINT+8, PRINT+17, PRINT+20, PRINT+21
PRINT PROCESS+32
PROCESS EN+33

Naked Globals

Name Field # of Occurrence
^( PROCESS+28*, PROCESS+29*, PRINT+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % PROCESS+9
%X EN+3~
%Y EN+3~
ACC PROCESS+1~, PROCESS+11*, PROCESS+12, PROCESS+15*, PROCESS+19, PROCESS+20
ACC( PROCESS+12*, PROCESS+19, PROCESS+20, PRINT+5, PRINT+6
ACCAB PROCESS+12*, PRINT+1~, PRINT+4*, PRINT+5*, PRINT+6
ACCNM PROCESS+1~, PROCESS+12*, PROCESS+20*, PROCESS+27, PROCESS+28, PROCESS+29, PRINT+6*, PRINT+8, PRINT+9, PRINT+10
, PRINT+12, PRINT+13, PRINT+16, PRINT+19, PRINT+21
CNT PROCESS+1~, PROCESS+3*, PROCESS+28*, PROCESS+29*, PROCESS+30
DA EN+3~, PRINT+31*
DATA PROCESS+1~, PROCESS+15*, PROCESS+21, PROCESS+25
DATE PROCESS+1~, PROCESS+15*, PROCESS+17*, PROCESS+18
DIC EN+3~, PROCESS+22*, PRINT+31*
DIC(0 PROCESS+22*
DIQ EN+3~
DIR EN+3~, EN+16!, PRINT+1~, PRINT+34!, HEADER+4!
DIR("A" EN+15*
DIR("B" EN+16*
DIR(0 EN+15*, PRINT+34*, HEADER+4*
DIRUT EN+17, PRINT+1~
DIV PRINT+1~, PRINT+4*, PRINT+10, PRINT+16, HEADER+11
DIVNM PRINT+1~
DR EN+3~, PRINT+1~, PRINT+31*
DTOUT PRINT+1~
DUOUT PRINT+1~
>> ECXACC EN+25
>> ECXACC( PROCESS+11, PROCESS+12
>> ECXALL EN+13*, EN+19*, EN+25
>> ECXARRAY EN+9
>> ECXARRAY("DEF" PROCESS+6, PRINT+31
>> ECXARRAY("END" EN+24, PROCESS+7, PRINT+28, HEADER+9
>> ECXARRAY("EXTRACT" PROCESS+6, PRINT+10, PRINT+16, HEADER+8
>> ECXARRAY("START" EN+24, PROCESS+7, PRINT+28, HEADER+9
>> ECXARRAY("TYPE" PRINT+26, HEADER+7
>> ECXAUD EN+6*, EN+9
>> ECXDEF PROCESS+6*
ECXDESC EN+37*, EN+40, EN+45!
>> ECXDIV EN+13
>> ECXDIV( PRINT+4, PRINT+10, PRINT+16, HEADER+11
>> ECXEND EN+24*, PROCESS+7*, PROCESS+18
>> ECXERR EN+4*, EN+9, EN+10, EN+13, EN+14, EN+17*, EN+20, EN+25, EN+26
>> ECXEXT PROCESS+6*, PROCESS+14, PRINT+27
>> ECXHEAD EN+6*, EN+7, EN+9, EN+15, PRINT+26, HEADER+7
ECXPGM EN+37*, EN+40, EN+45!
ECXPORT EN+3~, EN+30*, PROCESS+33, PRINT+4, PRINT+8, PRINT+10, PRINT+16, PRINT+19, PRINT+23
>> ECXRUN PROCESS+9*, PRINT+29, HEADER+10
ECXSAVE EN+40, EN+45!
ECXSAVE("ECXACC(" EN+38*
ECXSAVE("ECXALL" EN+38*
ECXSAVE("ECXARRAY(" EN+38*
ECXSAVE("ECXDIV(" EN+38*
ECXSAVE("ECXHEAD" EN+38*
ECXSAVE("POP" EN+41
ECXSAVE("ZTSK" EN+44
>> ECXSTART EN+24*, PROCESS+7*, PROCESS+18
FILE PROCESS+1~, PROCESS+25*, PROCESS+26, PROCESS+28, PROCESS+29
GTOT PRINT+1~
GTOT("P" PRINT+6*, PRINT+14*, PRINT+19, PRINT+21
GTOT("R" PRINT+6*, PRINT+14*, PRINT+19, PRINT+21
IEN PROCESS+1~, PROCESS+14*, PROCESS+15
IO EN+47, PRINT+2
IO(0 EN+47
IOF PRINT+25, HEADER+6
IOSL PRINT+8, PRINT+17, PRINT+20, PRINT+21
IOST PRINT+24, PRINT+32, HEADER+2, HEADER+6
JJ PROCESS+1~, PRINT+33*, HEADER+1~, HEADER+3*
LMIP PROCESS+1~, PROCESS+5*, PROCESS+23
LN PRINT+1~, PRINT+4*, PRINT+20, PRINT+30, HEADER+14
PG PRINT+1~, PRINT+4*, PRINT+25*, PRINT+29, HEADER+4, HEADER+6*, HEADER+11
QFLG PRINT+1~, PRINT+4*, PRINT+5, PRINT+8, PRINT+12, PRINT+17, PRINT+20, PRINT+21, PRINT+32, HEADER+4*
, HEADER+5
QQFLG PROCESS+1~, PROCESS+3*, PROCESS+14, PROCESS+30*
RCNT EN+3~, EN+32*, PRINT+10*, PRINT+16*, PRINT+19*
SS PRINT+1~, PRINT+33*, HEADER+1~, HEADER+3*
TOTP PRINT+1~, PRINT+13*, PRINT+14, PRINT+16, PRINT+17
TOTR PRINT+1~, PRINT+13*, PRINT+14, PRINT+16, PRINT+17
U PROCESS+12, PROCESS+15, PROCESS+20, PROCESS+21, PROCESS+22, PROCESS+25, PROCESS+27, PROCESS+28, PROCESS+29, PRINT+10
, PRINT+13, PRINT+16, PRINT+19, HEADER+11
WKLD PROCESS+1~, PROCESS+21*, PROCESS+22, PROCESS+23*, PROCESS+24, PROCESS+27, PRINT+13*, PRINT+16, PRINT+17
WKLDNM PROCESS+1~, PROCESS+22*, PROCESS+24*, PROCESS+27, PROCESS+28, PROCESS+29, PRINT+12*, PRINT+13, PRINT+16, PRINT+17
X EN+3~, EN+24*, PROCESS+1~, PROCESS+7*, PROCESS+22*
Y EN+3~, EN+19, EN+24, PROCESS+1~, PROCESS+7, PROCESS+9*, PROCESS+22, HEADER+4
>> ZTQUEUED PROCESS+30, PRINT+3
ZTREQ PROCESS+30!, PRINT+3!
>> ZTSTOP PROCESS+30*, 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