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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECXTRYIT

Package: DSS Extracts

Routine: ECXTRYIT


Information

ECXTRYIT ;BIR/DMA-Test Run for Setup Extract Print Population ;6/15/17 15:30

Source Information

Source file <ECXTRYIT.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  ($$FMTE,$$HTE,$$HTFM)^XLFDT  
VA FileMan 1 ^DIR  

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 ECXTRYIT  
Event Capture 1 ECXTRYIT  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from ooption
DATE
END
START ;queued entry point
HEAD

External References

Name Field # of Occurrence
^%ZIS DATE+2
^%ZISC ENDSTART+21
^%ZTLOAD DATE+2
^DIR DATE
$$FMTE^XLFDT START+20, HEAD
$$HTE^XLFDT DATE
$$HTFM^XLFDT EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will print the admission data and data for the last",!,"transfer and treating specialty change for all patients who",!,"were in the hospital on the day you select.",!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,"NOTE - This will generate a report of your inpatient population on the",!,"BEGINNING of the day you select, not the end of the day as MAS/HAS reports",!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "do. For example, for this report, if you choose October 1, 1994, the report",!,"will start at midnight at the beginning of the day."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: " For the MAS/HAS report,",!,"you would choose September 30, 1994. The MAS/HAS report begins at midnight",!,"at the end of the day.",!!!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!,"Must be a date in the past",!!
  • Line Location: DATE+0
Function Call: WRITE
  • Prompt: !!,"This report must be queued to a 132 column printer.",!
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: F
  • Line Location: START+20
Function Call: WRITE
  • Prompt: Q:W=""
  • Line Location: START+20
Function Call: WRITE
  • Prompt: !,?5,$P(NAM,"^"),?45,$P(EC,"^"),?66,$$FMTE^XLFDT($P(EC,"^",2))
  • Line Location: START+20
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !!,?30,"INPATIENT WARD LIST (DSS) FOR ",$$FMTE^XLFDT(ECD)," FOR WARD ",W,!!,?12,"PATIENT",?50,"SSN",?66,"ADMIT DATE",!
  • Line Location: HEAD+0
Routine Call
  • %ZIS
  • Line Location:
    • DATE+2
Routine Call
  • DIR
  • Line Location:
    • DATE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] START+3, START+4, START+5, START+14, START+18
^DGPM("APMV" START+14
^DGPM("ATID1" START+3, START+4
^DIC(42 - [#42] START+18
^DPT - [#2] START+18
^TMP($J START+2!, START+3*, START+5*, START+7, START+14*, START+17, START+18*, START+20, START+21!

Label References

Name Line Occurrences
DATE DATE
END DATEDATE+2
HEAD START+20

Naked Globals

Name Field # of Occurrence
^( START+3, START+4, START+7!, START+14, START+18, START+20
^(0 START+3, START+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DATE+2*!
DFN START+1~, START+2*, START+3*, START+4, START+5, START+7*, START+14*, START+17*, START+18
DIR DATE!
DIR("A" DATE*
DIR("B" DATE*
DIR(0 DATE*
DIRUT DATE, END!
DT EN+1*, DATE
DTOUT END!
DUOUT END!
EC START+1~, START+3*, START+4*, START+5, START+14*, START+20*
EC1 START+1~, START+3*, START+4*, START+5
ECAS START+1~, START+3*
ECCA START+1~, START+14*, START+17*, START+18
ECD DATE*, END!, START+2, START+3, START+5, HEAD
ECD0 START+1~, START+2*, START+3, START+14
ECDA START+1~, START+3*, START+4*, START+5, START+14*
ECM START+1~, START+14*
ECX START+1~, START+3*, START+4*, START+5
IOF HEAD
IOSL START+20
NAM START+1~, START+20*
POP DATE+2, END!
W START+1~, START+18*, START+20*, HEAD
X END!, START+7*
Y DATE, END!
>> ZTDESC DATE+2*
>> ZTREQ START+21*
>> ZTRTN DATE+2*
>> ZTSAVE("ECD" DATE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All