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

Package: DSS Extracts

Routine: ECXPHAA


Information

ECXPHAA ;ALB/JRC Pharmacy DSS Extract UDP/IVP Source Audit Report ;3/13/18 14:33

Source Information

Source file <ECXPHAA.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
DSS Extracts 4 $$GETDIV^ECXDEPT  $$PAT^ECXNUT  ($$EXPORT,EXPDISP)^ECXUTL1  $$PSJ59P5^ECXUTL5  
VA FileMan 4 $$OREF^DILF  $$GET1^DIQ  EN^DIQ1  ^DIR  
Kernel 3 $$S^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  EN^XUTMDEVQ  
Registration 2 IN5^VADPT  DIVISION^VAUTOMA  

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 1 ECX PHA UDP/IVP SOURCE AUDIT  
Event Capture 1 ECX PHA UDP/IVP SOURCE AUDIT  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from option
EN1 ;Init variables
EXIT
REPORT ;Select report
DIVISION ;Prompt for division
; Set Divisions into screen array (prompt is one/many/all)
DATES ;Prompt for start date
HEADER ;Print header
GETIDATA ;Get data from pharmacy IVP intermediate files
GETUDATA ;Get unit dose data from intermediate file 728.904
DETAIL ;Print report
WAIT ;End of page logic
GETWARD() ;170 Section added to find ward at time of IV when ward is incorrectly set to 0 in pharmacy

External References

Name Field # of Occurrence
$$S^%ZTLOAD WAIT+14
$$OREF^DILF EN+22
$$GET1^DIQ GETIDATA+16, GETIDATA+18
EN^DIQ1 GETIDATA+24, GETUDATA+16, GETUDATA+18
^DIR REPORT+5, DATES+5, DATES+13, WAIT+11
$$GETDIV^ECXDEPT DIVISION+18, GETIDATA+19, GETIDATA+25, GETIDATA+28, GETUDATA+12, GETUDATA+19
$$PAT^ECXNUT GETIDATA+8, GETUDATA+10
$$EXPORT^ECXUTL1 EN+11
EXPDISP^ECXUTL1 EN+16
$$PSJ59P5^ECXUTL5 GETIDATA+28
IN5^VADPT GETWARD+4
DIVISION^VAUTOMA DIVISION+14
$$FMTE^XLFDT DATES+4, DATES+12, HEADER+4, HEADER+5, HEADER+6, DETAIL+5, DETAIL+6
$$NOW^XLFDT DATES+4, DATES+12
EN^XUTMDEVQ EN+27

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !,$S(REPORT=2:"UDP",REPORT=1:"IVP",1:"")_" Source Audit Report",?70,"PAGE: "_PAGE
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !!,"Run Date: "_$$FMTE^XLFDT(DT)
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !!,"Start Date: "_$$FMTE^XLFDT(SDATE)
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"End Date: "_$$FMTE^XLFDT(EDATE)
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !!,?1,"Division",?24,"Date",?39,"Record Count"
  • 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:
    • REPORT+5
    • DATES+5
    • DATES+13
    • WAIT+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(42 - [#42] GET1^DIQ
^SC - [#44] Classic Fileman Calls
55.01 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(42 - [#42] GETUDATA+12
^ECX( GETIDATA+4, GETIDATA+5, GETIDATA+9, GETIDATA+10, GETUDATA+5, GETUDATA+6, GETUDATA+7
^ECX(728.113 - [#728.113] GETIDATA+11
^TMP($J EN+12!, EN+13*, EN+17!, EN1+6, GETIDATA+31*, GETUDATA+23*, DETAIL+4, DETAIL+5*

Label References

Name Line Occurrences
$$GETWARD GETIDATA+17
@( EN+14, EN1+5
DATES EN+10
DETAIL EN+15, EN1+13
DIVISION EN+8
EXIT EN1+3, EN1+5, EN1+12, EN1+13
HEADER EN1+3, DETAIL+6
REPORT EN+6
WAIT EN1+11, DETAIL+6

Naked Globals

Name Field # of Occurrence
^( DETAIL+4
^(0 GETIDATA+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMIT GETIDATA+13~, GETIDATA+15*
CLINIC GETIDATA+13~, GETIDATA+15*, GETIDATA+22*, GETIDATA+23, GETIDATA+25, GETUDATA+2~, GETUDATA+17*, GETUDATA+18, GETUDATA+19
CNT EN+1~, EN+13*, DETAIL+5*
COUNT GETUDATA+2~, DETAIL+2~, DETAIL+3*, DETAIL+4*, DETAIL+5, DETAIL+6
DA GETIDATA+2~, GETIDATA+10*, GETIDATA+11, GETIDATA+14~, GETIDATA+23*, GETUDATA+2~, GETUDATA+15*, GETUDATA+18*
DA( GETUDATA+16*
DATA GETUDATA+2~, GETUDATA+7*, GETUDATA+11
DATE GETIDATA+2~, GETIDATA+3*, GETIDATA+4*, GETIDATA+5, GETIDATA+9, GETIDATA+10, GETIDATA+31, GETUDATA+2~, GETUDATA+3*, GETUDATA+5*
GETUDATA+6, GETUDATA+23, DETAIL+2~, DETAIL+3*, DETAIL+4*, DETAIL+5, DETAIL+6
DFN GETIDATA+2~, GETIDATA+5*, GETIDATA+8, GETIDATA+9, GETIDATA+10, GETIDATA+16, GETUDATA+2~, GETUDATA+7*, GETUDATA+10, GETUDATA+15
DIC GETIDATA+14~, GETIDATA+23*, GETUDATA+2~, GETUDATA+15*, GETUDATA+18*
DIQ GETIDATA+14~, GETIDATA+23*, GETUDATA+2~, GETUDATA+15*, GETUDATA+18*
DIQ(0 GETIDATA+23*, GETUDATA+15*, GETUDATA+18*
DIR REPORT+1~, DATES+1~, DATES+9!, WAIT+9~
DIR("A" REPORT+4*, DATES+3*, DATES+11*
DIR("B" DATES+4*, DATES+12*
DIR(0 REPORT+3*, DATES+2*, DATES+10*, WAIT+10*
DIROUT WAIT+9~
DIRUT REPORT+1~, REPORT+6, DATES+1~, DATES+6, DATES+9!, DATES+14, WAIT+9~
DIV DIVISION+12~, DIVISION+18*, DETAIL+2~, DETAIL+3*, DETAIL+4*, DETAIL+5, DETAIL+6
DIVISION EN+1~, GETIDATA+13~, GETIDATA+15*, GETIDATA+19*, GETIDATA+25*, GETIDATA+26*, GETIDATA+27, GETIDATA+28*, GETIDATA+30, GETIDATA+31
GETUDATA+2~, GETUDATA+12*, GETUDATA+19*, GETUDATA+20*, GETUDATA+22, GETUDATA+23
DR GETIDATA+14~, GETIDATA+23*, GETUDATA+2~, GETUDATA+15*, GETUDATA+18*
DR( GETUDATA+15*
DT HEADER+4
DTOUT WAIT+9~
DUOUT REPORT+1~, REPORT+6, WAIT+9~
EC GETIDATA+2~, GETIDATA+11*, GETIDATA+22, GETIDATA+27, GETIDATA+28, GETWARD+2
ECPAT GETIDATA+2~, GETUDATA+2~
ECXDIC GETIDATA+14~, GETUDATA+2~, GETUDATA+20!
ECXDIC( GETUDATA+17
ECXDIC(44 GETIDATA+25, GETUDATA+19
ECXPORT EN+1~, EN+11*, DETAIL+5
EDATE EN+1~, DATES+15*, HEADER+6, GETIDATA+3, GETUDATA+3
ENDATE GETIDATA+2~, GETIDATA+3*, GETIDATA+4, GETUDATA+2~, GETUDATA+3*, GETUDATA+5
ERROR GETIDATA+2~, GETIDATA+8*, GETUDATA+2~, GETUDATA+10*
EVDT GETWARD+1~, GETWARD+2*, GETWARD+3
FAC DIVISION+12~, DIVISION+18*
FILE GETIDATA+2~, GETIDATA+3*, GETIDATA+4, GETIDATA+5, GETIDATA+9, GETIDATA+10, GETUDATA+2~, GETUDATA+4*, GETUDATA+5, GETUDATA+6
GETUDATA+7
IOF HEADER+2
IOSL DETAIL+6, WAIT+7, WAIT+8
IOST WAIT+7
L GETUDATA+2~
LN EN1+1~, HEADER+1*, HEADER+8
MOVEMENT GETIDATA+13~, GETIDATA+15*
ON GETIDATA+2~, GETIDATA+9*, GETIDATA+10, GETIDATA+16, GETUDATA+2~, GETUDATA+11*, GETUDATA+13, GETUDATA+16, GETUDATA+17
PAGE EN1+1~, EN1+2*, HEADER+1*, HEADER+3
RECORD GETUDATA+2~, GETUDATA+6*, GETUDATA+7
REPORT EN+1~, EN+14, EN1+4, EN1+9, REPORT+7*, HEADER+3
SCRNARR EN+1~, EN+2*, EN+3, EN+22, EN+24, EXITDIVISION+16, DIVISION+18, GETIDATA+30, GETUDATA+22
SDATE EN+1~, DATES+7*, HEADER+5, GETIDATA+3, GETUDATA+3
SPECIAL GETIDATA+13~, GETIDATA+15*
STOP EN+1~, EN+2*, EN+4*, EN+6, EN+8, EN+10, EN1+3, EN1+5, EN1+13, REPORT+6*
DIVISION+15*, DATES+6*, DATES+14*, GETIDATA+4, GETIDATA+5, GETIDATA+9, GETIDATA+10, GETIDATA+11, GETIDATA+20, GETUDATA+3*
GETUDATA+5, GETUDATA+6, GETUDATA+13, DETAIL+4, DETAIL+6, WAIT+5*, WAIT+12*, WAIT+14*, WAIT+15
SUB EN1+1~, EN1+2*, EN1+4*, EN1+5
TMP EN+1~, EN+22*, EN+23
U GETIDATA+22, GETIDATA+27, GETIDATA+28, GETUDATA+7, GETUDATA+11, GETUDATA+12, DETAIL+5, GETWARD+2, GETWARD+5
VAIP GETWARD+1~
VAIP("D" GETWARD+3*
VAIP(5 GETWARD+5
VAUTD DIVISION+12~, DIVISION+16, DIVISION+17
VAUTD( DIVISION+18
WARD GETIDATA+13~, GETIDATA+15*, GETIDATA+16*, GETIDATA+17*, GETIDATA+18*, GETIDATA+19, GETIDATA+20, GETUDATA+2~, GETUDATA+11*, GETUDATA+12
GETUDATA+13
WARDODT GETWARD+1~, GETWARD+5*, GETWARD+6*, GETWARD+7
X EN+1~, EN+20*, DATES+1~, DATES+9!, WAIT+9~
Y REPORT+7, DIVISION+12~, DIVISION+15, DATES+1~, DATES+7, DATES+9!, DATES+15, WAIT+9~, WAIT+12
ZTDESC EN+19~, EN+26*, EN+27
ZTIO EN+19~, EN+25*
ZTSAVE EN+19~, EN+27
ZTSAVE( EN+20*, EN+23*, EN+24*
ZTSAVE("SCRNARR" EN+21*
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