Routine: HLEVREP2

Information

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

Name	Comments	DBIA/ICR reference
CTRL	; Called by 'Display monitor details [HLEV MONITOR DETAILS]'
SHOWF(MONM)	; Show monitors from oldest to newest
SHOWR(MONM)	; Show monitors from newest to oldest
NEXT()	; Show next entry?
SHOW(HLEVIENJ)	; Ask if want to view...
ORDER()	; $ORDER direction...
ASKMON()	; Ask user to select a monitor...
HD
EX
MONLIST	; Create and print list of monitors...
MONVALL	; Collect and build screens for all HLEVIENJs...
MONALL(HLEVIENJ)	; Build screen for one entry...
MONHHDR(HLEVIENJ)	; Build header... ; ^TMP($J,"HLMON",+HLEVIENJ) -- req
MONVVAR(HLEVIENJ)	; Create screens in ^TMP ; GBL,^TMP($J,"HLMON",+HLEVIENJ) -- req
MVSCRNV	; Create variable screen VERTICALly... ; Called by MONVSCRN - GBL,HLEVIENJ -- req
MVSCRNH	; Create variable screen HORIZONTALly... (Only called if PAGE=1) ; Called by MONVSCRN - GBL,HLEVIENJ -- req
MONRRD(HLEVIENJ)	; Build RUN DIARY... ; GBL,^TMP($J,"HLMON",+HLEVIENJ) -- req
MONMMT(HLEVIENJ)	; Build MSG TEXT... ; ^TMP($J,"HLMON",+HLEVIENJ) -- req
PAD(VAR,COL)	; Make " var: "
ADDLINE(TXT)	; Add line of text...
ADD(VAR,COL)	; Add to TXT...
EOR	;HLEVREP2 - Event Monitor REPORTS ;5/16/03 14:42

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CTRL+7
Function Call: WRITE	Prompt: ! Line Location: CTRL+13
Function Call: WRITE	Prompt: ! Line Location: SHOWF+2
Function Call: WRITE	Prompt: ! Line Location: SHOWF+6
Function Call: WRITE	Prompt: ! Line Location: SHOWR+2
Function Call: WRITE	Prompt: ! Line Location: SHOWR+6
Function Call: WRITE	Prompt: @IOF,$$CJ^XLFSTR(MONM,IOM),!,$$REPEAT^XLFSTR("=",IOM) Line Location: SHOW+11
Function Call: WRITE	Prompt: !,^TMP($J,"HLMON",+HLEVIENJ,"VIEW",NO) Line Location: SHOW+14
Function Call: WRITE	Prompt: @IOF,$$CJ^XLFSTR("Display Monitor Details",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
Function Call: WRITE	Prompt: !!,"""Runs"" for the following monitors have been found..." Line Location: MONLIST+10
Function Call: WRITE	Prompt: !! Line Location: MONLIST+11
Function Call: WRITE	Prompt: MONM(1) Line Location: MONLIST+17