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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: HLEVREP1

Package: Health Level Seven

Routine: HLEVREP1


Information

HLEVREP1 ;O-OIFO/LJA - Event Monitor REPORTS ;02/04/2004 14:42

Source Information

Source file <HLEVREP1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Health Level Seven 4 $$BTE^HLCSMON  TELL^HLEVMST0  MONVALL^HLEVREP2  CTRLMON^HLEVREP3  
Kernel 3 ENDR^%ZISS  ($$FMADD,$$FMTE)^XLFDT  ($$CJ,$$REPEAT,$$UP)^XLFSTR  
VA FileMan 2 BROWSE^DDBR  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Level Seven 1 HLEV MONITOR MAP REPORT  

Entry Points

Name Comments DBIA/ICR reference
MAPALL ; Do everything to get ^TMP($J,"HLMAP") data ready for printing...
ADDHDR(DAY) ; Add HDR code...
CTRL ; Menu map display...
ROUNDHR(FM) ;
MAPHOUR(EVNM,HOUR) ; Store in display global...
ADDLINE(DAY,TXT) ; Add one line of text to screen ^TMP global
PURGING ; How for back does purging start?
EOR ;HLEVREP1 - Event Monitor REPORTS ;5/16/03 14:42
MAPBUILD ; Make lines for browsing report
EX
MAPDEVCE ; Just dump to screen...
HD(TXT)
MAPSCRN ; Build screen for days...
EVNM(EVNM,LEN) ; Convert event name[ien] to LENgth, truncating name part prn
MAPCOLLM ; Collect map ^TMP data - Master job runs...
MAPDATE(DATEPMT) ; Select date...
MAPCOLLE ; Collect map ^TMP data - Events...

External References

Name Field # of Occurrence
ENDR^%ZISS CTRL+4
BROWSE^DDBR CTRL+42
^DIR MAPDATE+5
$$BTE^HLCSMON CTRL+11
TELL^HLEVMST0 CTRL+17
MONVALL^HLEVREP2 CTRL+14
CTRLMON^HLEVREP3 CTRL+43
$$FMADD^XLFDT CTRL+33
$$FMTE^XLFDT CTRL+22, CTRL+24, CTRL+34, CTRL+51, MAPDEVCE+4, MAPDATE+4, ADDHDR+1
$$CJ^XLFSTR CTRL+37, MAPDEVCE+4, PURGING+4, HD, ADDHDR+1
$$REPEAT^XLFSTR CTRL+37, HD+1, ADDHDR+4, ADDLINE+5, ADDLINE+8, EVNM+2, EVNM+7
$$UP^XLFSTR MAPDATE+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CTRL+10
Function Call: WRITE
  • Prompt: !!,"Collecting..."
  • Line Location: CTRL+12
Function Call: WRITE
  • Prompt: !!,"Data found for ",$$FMTE^XLFDT(DATEFRST)
  • Line Location: CTRL+22
Function Call: WRITE
  • Prompt: "."
  • Line Location: CTRL+23
Function Call: WRITE
  • Prompt: " to ",$$FMTE^XLFDT(DATELAST),"."
  • Line Location: CTRL+24
Function Call: WRITE
  • Prompt: !!,"Loading most recent date..."
  • Line Location: CTRL+25
Function Call: WRITE
  • Prompt: @IOF,$$CJ^XLFSTR(TXT,IOM),!,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: CTRL+37
Function Call: WRITE
  • Prompt: !,^TMP($J,"HLMAP","S","D",DATE,NO)
  • Line Location: CTRL+40
Function Call: WRITE
  • Prompt: !!,"You just viewed the ",IOINHI,"earliest",IOINORM
  • Line Location: CTRL+45
Function Call: WRITE
  • Prompt: " day on record. (You must manually enter the"
  • Line Location: CTRL+46
Function Call: WRITE
  • Prompt: !,"next date to view.)"
  • Line Location: CTRL+47
Function Call: WRITE
  • Prompt: !
  • Line Location: CTRL+48
Function Call: WRITE
  • Prompt: !!,$$FMTE^XLFDT(DATENXT)," is the earliest date on record."
  • Line Location: CTRL+51
Function Call: WRITE
  • Prompt: !
  • Line Location: CTRL+52
Function Call: WRITE
  • Prompt: !!,"The next earlier date is prompted below."
  • Line Location: CTRL+53
Function Call: WRITE
  • Prompt: !
  • Line Location: CTRL+54
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR(" Event Monitor Information - "_$$FMTE^XLFDT(DAY)_" ",IOM,"=")
  • Line Location: MAPDEVCE+4
Function Call: WRITE
  • Prompt: !,^TMP($J,"HLMAP","S","D",DAY,NO)
  • Line Location: MAPDEVCE+9
Function Call: READ
  • Timeout: 999
  • Variable: X
  • Line Location: MAPDEVCE+11
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("--- Data before NOW-"_PURGEHR_" hours has been deleted ---",IOM)
  • Line Location: PURGING+4
Function Call: WRITE
  • Prompt: @IOF,$$CJ^XLFSTR(TXT,IOM)
  • Line Location: HD+0
Function Call: WRITE
  • Prompt: !,$$REPEAT^XLFSTR("=",IOM)
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !,$P(T,";;",2,99)
  • Line Location: EX+0
Routine Call
  • DIR
  • Line Location:
    • MAPDATE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLEV(776 - [#776] MAPCOLLE+3, MAPCOLLE+4
^HLEV(776.1 - [#776.1] MAPCOLLE+9
^HLEV(776.2 - [#776.2] MAPCOLLM+3, MAPCOLLM+4
^HLEV(776.999 - [#776.999] PURGING+2
^TMP($J CTRL+6!, CTRL+16, CTRL+19, CTRL+20, CTRL+35, CTRL+39, CTRL+40, MAPDEVCE+3, MAPDEVCE+7, MAPDEVCE+9
, MAPALL+1!, MAPCOLLM+7*, MAPCOLLM+8*, MAPCOLLM+9*, MAPCOLLM+10*, MAPCOLLE+12*, MAPCOLLE+13*, MAPCOLLE+14*, MAPCOLLE+15*, MAPCOLLE+16*
, MAPCOLLE+18*, MAPBUILD+2, MAPHOUR+1*, MAPSCRN+4, MAPSCRN+6, MAPSCRN+9, MAPSCRN+11*, MAPSCRN+14, MAPSCRN+16, MAPSCRN+17
, MAPSCRN+19, MAPSCRN+21, ADDLINE+2*, ADDLINE+3, ADDLINE+5*, ADDLINE+6*, ADDLINE+7*, ADDLINE+8*, ADDLINE+10*

Label References

Name Line Occurrences
$$EVNM MAPSCRN+7
$$MAPDATE CTRL+32
$$ROUNDHR MAPCOLLM+6, MAPCOLLE+6
ADDHDR MAPSCRN+15
ADDLINE MAPSCRN+17, MAPSCRN+21, ADDHDR+1, ADDHDR+2, ADDHDR+3, ADDHDR+4
EX CTRL+8
HD CTRL+7
MAPALL CTRL+13
MAPBUILD MAPALL+4
MAPCOLLE MAPALL+2
MAPCOLLM MAPALL+3
MAPDEVCE MAPDATE+8
MAPHOUR MAPBUILD+5, MAPBUILD+8
MAPSCRN MAPALL+5
PURGING CTRL+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABRT MAPDEVCE+1~, MAPDEVCE+2*, MAPDEVCE+3
ANS MAPDATE+1~, MAPDATE+7*
CT CTRL+1~, CTRL+29*, CTRL+31*, CTRL+32, MAPDEVCE+1~, MAPDEVCE+2*, MAPDEVCE+5*, MAPDEVCE+8*, MAPDEVCE+10, MAPDEVCE+11*
, MAPDEVCE+12
DATA PURGING+1~, MAPCOLLM+1~, MAPCOLLM+4*, MAPCOLLM+5, MAPCOLLM+6, MAPCOLLE+1~, MAPCOLLE+4*, MAPCOLLE+5, MAPCOLLE+6, MAPCOLLE+7
, MAPCOLLE+11, MAPSCRN+1~, MAPSCRN+9*, MAPSCRN+10
DATE CTRL+1~, CTRL+30, CTRL+32*, CTRL+33, CTRL+34, CTRL+35, CTRL+39, CTRL+40, CTRL+42
DATEFRST CTRL+1~, CTRL+19*, CTRL+22, CTRL+23, CTRL+24, CTRL+44, CTRL+50, MAPDATE+2
DATELAST CTRL+1~, CTRL+20*, CTRL+23, CTRL+24, CTRL+32, MAPDATE+2
DATENXT CTRL+1~, CTRL+20*, CTRL+32, CTRL+33*, CTRL+44, CTRL+49*, CTRL+50, CTRL+51
DATEPMT MAPDATE~, MAPDATE+4
DATESEL CTRL+1~, CTRL+32*
DAY MAPDEVCE+1~, MAPDEVCE+2*, MAPDEVCE+3*, MAPDEVCE+4, MAPDEVCE+7, MAPDEVCE+9, MAPSCRN+1~, MAPSCRN+5*, MAPSCRN+6*, MAPSCRN+9
, MAPSCRN+11, MAPSCRN+13*, MAPSCRN+14*, MAPSCRN+15, MAPSCRN+16, MAPSCRN+17, MAPSCRN+19, MAPSCRN+21, ADDHDR~, ADDHDR+1
, ADDHDR+2, ADDHDR+3, ADDHDR+4, ADDLINE~, ADDLINE+2, ADDLINE+3, ADDLINE+5, ADDLINE+6, ADDLINE+7, ADDLINE+8
, ADDLINE+10
DIR MAPDATE+1~
DIR("?" MAPDATE+3*
DIR("A" MAPDATE+3*
DIR("B" MAPDATE+4*
DIR(0 MAPDATE+2*
DIRUT MAPDATE+1~
DTOUT MAPDATE+1~
DUOUT MAPDATE+1~
EVNM MAPBUILD+1~, MAPBUILD+6*, MAPBUILD+7*, MAPBUILD+8, MAPHOUR~, MAPHOUR+1, MAPSCRN+1~, MAPSCRN+3*, MAPSCRN+4*, MAPSCRN+6
, MAPSCRN+7, MAPSCRN+9, MAPSCRN+11, MAPSCRN+18*, MAPSCRN+19*, MAPSCRN+20, MAPSCRN+21, EVNM~, EVNM+2, EVNM+3
FM ROUNDHR~, ROUNDHR+2*, ROUNDHR+3, ROUNDHR+4*, ROUNDHR+5, ROUNDHR+6*, ROUNDHR+7
GBL MAPBUILD+1~, MAPBUILD+2*, MAPBUILD+4, MAPBUILD+5, MAPBUILD+7
HOUR MAPBUILD+1~, MAPBUILD+3*, MAPBUILD+4*, MAPBUILD+5, MAPBUILD+7, MAPBUILD+8, MAPHOUR~, MAPHOUR+1, MAPSCRN+1~, MAPSCRN+8*
, MAPSCRN+9
HR MAPSCRN+1~, ROUNDHR+1~, ROUNDHR+5*, ROUNDHR+6
I EX~*
IEN EVNM+1~, EVNM+3*, EVNM+4, EVNM+6
IENM MAPCOLLM+1~, MAPCOLLM+2*, MAPCOLLM+3*, MAPCOLLM+4, MAPCOLLM+10, MAPCOLLE+1~, MAPCOLLE+2*, MAPCOLLE+3*, MAPCOLLE+4, MAPCOLLE+16
, MAPCOLLE+18
IENMST MAPCOLLE+1~, MAPCOLLE+11*, MAPCOLLE+16
IOF CTRL+37, HD
IOINHI CTRL+1~, CTRL+45, ADDHDR+2, ADDHDR+3
IOINORM CTRL+1~, CTRL+45, ADDHDR+2, ADDHDR+3
IOM CTRL+37, MAPDEVCE+4, PURGING+4, HD, HD+1, ADDHDR+1, ADDHDR+4, ADDLINE+5, ADDLINE+8
LEN EVNM~, EVNM+2, EVNM+4, EVNM+7
LINE CTRL+2~, CTRL+35*, CTRL+36, CTRL+41
MONIEN MAPCOLLE+1~, MAPCOLLE+7*, MAPCOLLE+8*, MAPCOLLE+9, MAPCOLLE+10, MAPCOLLE+18
MONM MAPCOLLM+1~, MAPCOLLE+1~, MAPCOLLE+9*, MAPCOLLE+10*, MAPCOLLE+15, MAPCOLLE+16, MAPCOLLE+17*, MAPCOLLE+18
NM EVNM+1~, EVNM+3*, EVNM+4, EVNM+5, EVNM+6*, EVNM+7*, EVNM+8
NM(1 EVNM+4*, EVNM+5*, EVNM+6
NO CTRL+2~, CTRL+38*, CTRL+39*, CTRL+40, MAPDEVCE+1~, MAPDEVCE+6*, MAPDEVCE+7*, MAPDEVCE+9, ADDLINE+1~, ADDLINE+3*
, ADDLINE+4, ADDLINE+5, ADDLINE+6*, ADDLINE+7*, ADDLINE+8*, ADDLINE+9*, ADDLINE+10
PURGEHR PURGING+1~, PURGING+2*, PURGING+3*, PURGING+4
STAT MAPCOLLM+1~, MAPCOLLM+5*, MAPCOLLE+1~, MAPCOLLE+5*
T EX~*
TIME MAPCOLLM+1~, MAPCOLLM+6*, MAPCOLLM+9, MAPCOLLM+10, MAPCOLLE+1~, MAPCOLLE+6*, MAPCOLLE+14, MAPCOLLE+15, MAPCOLLE+16, MAPCOLLE+18
TXT CTRL+2~, CTRL+34*, CTRL+37, CTRL+42, HD~, MAPSCRN+1~, MAPSCRN+7*, MAPSCRN+10*, MAPSCRN+11, ADDLINE~
, ADDLINE+10
U PURGING+2, MAPCOLLM+4, MAPCOLLM+5, MAPCOLLM+6, MAPCOLLE+4, MAPCOLLE+5, MAPCOLLE+7, MAPCOLLE+9, MAPCOLLE+11
X CTRL+2~, CTRL+4*, MAPDEVCE+1~, MAPDEVCE+11*, MAPDEVCE+12*, MAPDATE+1~, MAPDATE+8, MAPSCRN+1~, EVNM+1~
Y CTRL+2~, MAPDATE+1~, MAPDATE+6, MAPDATE+7

Marked Items

Name Field # of Occurrence
$T(EX+I EX
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All