Routine: HLEVAPI1

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Health Level Seven	9	$$DIFFDH^HLCSFMN1 $$BTE^HLCSMON $$YN^HLCSRPT4 $$Q1TIME^HLEVAPI0 ($$ASKDATE,DEBUG,LOADBODY,LOADDGBL)^HLEVAPI2 CHECKMST^HLEVMST TELL^HLEVMST0 $$ASKIEN^HLEVREP $$DHMSFM^HLEVUTIL
Kernel	2	($$FMTH,$$NOW)^XLFDT ($$CJ,$$REPEAT,$$UP)^XLFSTR
VA Fileman	2	^DIE ^DIM

Package	Total	Caller Graph
Health Level Seven	10	HLEV MENU MAIN HLEV MENU SETUP HLEV MENU SETUP-MASTER HLEV ONE-TIME MONITOR RUN HLEVAPI HLEVAPI2 HLEVAPI3 HLEVSTUP HLEVX000 HLEVX002

Package

Total

Caller Graph

Health Level Seven

HLEV MENU MAIN HLEV MENU SETUP HLEV MENU SETUP-MASTER HLEV ONE-TIME MONITOR RUN HLEVAPI HLEVAPI2 HLEVAPI3 HLEVSTUP
HLEVX000 HLEVX002

Entry Points

Name	Comments	DBIA/ICR reference
ONETIME	;Start a one-time run of event monitor (w/no master job)
QIT(QTIME)	; Queue it...
RUNDIARY(GBL)	; Move GBL data into RUN DIARY... ; HLEVIENJ -- req	ICR #4227 Status: Withdrawn Usage: Controlled Subscription
EOR	;HLEVAPI1 - Event Monitor APIs ;5/16/03 14:42
LOADDESC(HLEVIENJ,SVSUB)	; Load description if it exists...
ASKRUN(HLEVIENE)	; Ask if want to run a one-time...
SYSETUP	; Called by option's entry action...
APPSTAT(STATUS)	; Fill in application status... ; HLEVIENJ -- req	ICR #4227 Status: Withdrawn Usage: Controlled Subscription
GBLMOVE(HLEVIENJ,SUB,GBL)	; Move GBL data into entry's WP text...
MSGTEXT(GBL)	; Mark event job entry to NOTIFY MAIL GROUP... ; HLEVIENJ -- req	ICR #4227 Status: Withdrawn Usage: Controlled Subscription
CURR(IEN776)	; Is job running and current?
ADD(TXT)	; Add TXT to global to be mailed out... ; SVSUB -- req
LOADUSER(GBL,SVSUB)	; Load user data into Mailman message...
LOADCOMP(HLEVIENJ,SVSUB)	; Load generic event monitor info into XMTEXT...
LOADVAR(HLEVIENJ,SVSUB)	; Load variable names...
LAST7762()	; Return d/h/m/s since last master job run...
NEXT7762()	; Return d/h/m/s till next master job run...
DT7762(FIEN,NXT)	; Called by $$LAST7762 & NEXT7762...
LOADALL(HLEVIENJ,SVSUB)	; Load all sections into global for mailing...

External References

Name	Field # of Occurrence
^DIE	APPSTAT+12
^DIM	LOADALL+13
$$DIFFDH^HLCSFMN1	CURR+6
$$BTE^HLCSMON	QIT+7
$$YN^HLCSRPT4	ASKRUN+7
$$Q1TIME^HLEVAPI0	QIT+2
$$ASKDATE^HLEVAPI2	ASKRUN+14
DEBUG^HLEVAPI2	APPSTAT+4, RUNDIARY+3, MSGTEXT+3
LOADBODY^HLEVAPI2	LOADALL+5
LOADDGBL^HLEVAPI2	LOADALL+10, LOADALL+11
CHECKMST^HLEVMST	SYSETUP+4
TELL^HLEVMST0	ASKRUN+5
$$ASKIEN^HLEVREP	ONETIME+11
$$DHMSFM^HLEVUTIL	DT7762+4
$$FMTH^XLFDT	CURR+5
$$NOW^XLFDT	DT7762+4, ASKRUN+8, ASKRUN+16
$$CJ^XLFSTR	SYSETUP+10, SYSETUP+11, SYSETUP+12, SYSETUP+15, ONETIME+2
$$REPEAT^XLFSTR	ONETIME+3
$$UP^XLFSTR	LOADALL+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,$$CJ^XLFSTR(STAT,IOM) Line Location: SYSETUP+10
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(X,IOM) Line Location: SYSETUP+11
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(X,IOM) Line Location: SYSETUP+12
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("-------- Event monitoring status is "_$S(STAT="A":"ACTIVE",STAT="I":"INACTIVE",1:"NOT SET YET")_" --------",IOM) Line Location: SYSETUP+15
Function Call: WRITE	Prompt: @IOF,$$CJ^XLFSTR("One-time Queueing of Event Monitor",IOM) Line Location: ONETIME+2
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",IOM) Line Location: ONETIME+3
Function Call: WRITE	Prompt: !,"Normally, the master job evaluates every event monitor and queues a background" Line Location: ONETIME+4
Function Call: WRITE	Prompt: !,"job for those events ready for a new ""run."" This option allows the running" Line Location: ONETIME+5
Function Call: WRITE	Prompt: !,"of an event monitor between ""normal"" runs." Line Location: ONETIME+6
Function Call: WRITE	Prompt: !!,"Do you want to start a new ""in-between"" run of a monitor? If so, select" Line Location: ONETIME+7
Function Call: WRITE	Prompt: !,"it now. If not, press RETURN to exit..." Line Location: ONETIME+8
Function Call: WRITE	Prompt: ! Line Location: ONETIME+9
Function Call: WRITE	Prompt: " exiting..." Line Location: ONETIME+12
Function Call: WRITE	Prompt: ! Line Location: ONETIME+14
Function Call: WRITE	Prompt: " exiting..." Line Location: ASKRUN+8
Function Call: WRITE	Prompt: !!,"You may queue this monitor to run ""one-time"" in the future. If so, enter a" Line Location: ASKRUN+10
Function Call: WRITE	Prompt: !,"future date/time now..." Line Location: ASKRUN+11
Function Call: WRITE	Prompt: ! Line Location: ASKRUN+12
Function Call: WRITE	Prompt: " enter a future time..." Line Location: ASKRUN+18
Function Call: WRITE	Prompt: !!," Queued task# ",+QTASK," [#",$P(QTASK,U,2),"]..." Line Location: QIT+3
Function Call: WRITE	Prompt: !!," Error occurred. No monitor ""run"" started..." Line Location: QIT+4
Function Call: WRITE	Prompt: ! Line Location: QIT+5
Function Call: WRITE	Prompt: ! Line Location: QIT+6
Routine Call	DIE Line Location: APPSTAT+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HLEV(776 - [#776]	LOADDESC+3, LOADDESC+4, LOADCOMP+3, LOADVAR+3, LOADVAR+8, LOADVAR+10, LOADVAR+11, LOADVAR+13, CURR+2, APPSTAT+10 , GBLMOVE+4, GBLMOVE+9, GBLMOVE+10, GBLMOVE+11, GBLMOVE+13
^HLEV(776.1 - [#776.1]	LOADCOMP+4, ASKRUN+3, ASKRUN+4
^HLEV(776.2 - [#776.2]	LAST7762+4, LAST7762+6, LAST7762+7, NEXT7762+4, NEXT7762+6, NEXT7762+7, DT7762+2
^HLEV(776.999 - [#776.999]	SYSETUP+6
^TMP("HLEVFLAG"	APPSTAT+7, RUNDIARY+6, MSGTEXT+6
^TMP($J	ADD+3, ADD+4*

Label References

Name	Line Occurrences
$$DT7762	LAST7762+12, NEXT7762+12
$$LAST7762	SYSETUP+6, SYSETUP+11
$$NEXT7762	SYSETUP+6, SYSETUP+12
ADD	LOADUSER+9, LOADDESC+6, LOADDESC+7, LOADCOMP+6, LOADCOMP+7, LOADVAR+5, LOADVAR+19
ASKRUN	ONETIME+15
GBLMOVE	RUNDIARY+8, MSGTEXT+8
LOADCOMP	LOADALL+4
LOADDESC	LOADALL+3
LOADUSER	LOADALL+14
LOADVAR	LOADALL+12
QIT	ASKRUN+8, ASKRUN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CT	GBLMOVE+1~, GBLMOVE+9, GBLMOVE+10, GBLMOVE+11, GBLMOVE+12
CUT	LOADVAR+1~, LOADVAR+16*, LOADVAR+17
CUT(1	LOADVAR+16*
CUT(2	LOADVAR+16*
DA	APPSTAT+2~, APPSTAT+11*
DATA	SYSETUP+1~, SYSETUP+6, SYSETUP+8, SYSETUP+14, LAST7762+1~, LAST7762+7, NEXT7762+1~, NEXT7762+7, DT7762+1~, DT7762+2 , DT7762+3, DT7762+10, CURR+1~, CURR+2*, CURR+3, CURR+4, ASKRUN+1~
DATE	DT7762+1~, DT7762+3, DT7762+4, DT7762+5, DT7762+6, DT7762+7, DT7762+8, DT7762+9, DT7762+10
DESC	LOADDESC+1~, LOADDESC+4*, LOADDESC+6
DIE	APPSTAT+2~, APPSTAT+11*
DIFF	CURR+1~, CURR+6, CURR+7, CURR+8, CURR+9, CURR+11
DR	APPSTAT+2~, APPSTAT+11*
FIEN	LAST7762+1~, LAST7762+3, LAST7762+4, LAST7762+6, LAST7762+8, LAST7762+10, LAST7762+12, NEXT7762+1~, NEXT7762+3, NEXT7762+4 , NEXT7762+6, NEXT7762+8, NEXT7762+10, NEXT7762+12, DT7762~, DT7762+2
GBL	LOADUSER~, LOADUSER+3, LOADUSER+6, LOADUSER+7, RUNDIARY~, RUNDIARY+8, MSGTEXT~, MSGTEXT+8, GBLMOVE~, GBLMOVE+8 , GBLMOVE+10
HLEVIENE	LOADDESC+1~, LOADDESC+3, LOADDESC+4, LOADCOMP+1~, LOADCOMP+3, LOADCOMP+4, ONETIME+1~, ONETIME+11*, ONETIME+15, ASKRUN~ , ASKRUN+3, ASKRUN+4, QIT+2
HLEVIENJ	LOADALL~, LOADALL+3, LOADALL+4, LOADALL+5, LOADALL+10, LOADALL+11, LOADALL+12, LOADDESC~, LOADDESC+3, LOADCOMP~ , LOADCOMP+3, LOADVAR~, LOADVAR+3, LOADVAR+8, LOADVAR+10, LOADVAR+11, LOADVAR+13, APPSTAT+10, APPSTAT+11, RUNDIARY+8 , MSGTEXT+8, GBLMOVE~, GBLMOVE+4, GBLMOVE+9, GBLMOVE+10, GBLMOVE+11, GBLMOVE+13
HLEVNM	LOADCOMP+1~, LOADCOMP+4*, LOADCOMP+6
>> HLEVTXT(	LOADALL+7, LOADALL+8
IEN	LAST7762+1~, LAST7762+5, LAST7762+6, LAST7762+7, LAST7762+8, NEXT7762+1~, NEXT7762+5, NEXT7762+6, NEXT7762+7, NEXT7762+8
IEN776	CURR~, CURR+2
IOF	ONETIME+2
IOM	SYSETUP+10, SYSETUP+11, SYSETUP+12, SYSETUP+15, ONETIME+2, ONETIME+3
IOSL	QIT+6
LAST	SYSETUP+1~, SYSETUP+6*
LASTDT	LAST7762+1~, LAST7762+3, LAST7762+4, LAST7762+6, NEXT7762+1~, NEXT7762+3, NEXT7762+4, NEXT7762+6
MIEN	LOADVAR+1~, LOADVAR+9, LOADVAR+10, LOADVAR+11, LOADVAR+13
NEXT	SYSETUP+1~, SYSETUP+6*
NO	LOADALL+1~, LOADALL+6, LOADALL+7, LOADALL+8, LOADUSER+1~, LOADUSER+5, LOADUSER+6, LOADUSER+7, ADD+2~, ADD+3* , ADD+4, GBLMOVE+1~, GBLMOVE+7, GBLMOVE+8, GBLMOVE+10
NODE	GBLMOVE+1~, GBLMOVE+7, GBLMOVE+12, GBLMOVE+13
NXT	DT7762~, DT7762+3, DT7762+5, DT7762+8
QTASK	ONETIME+1~, ASKRUN+1~, QIT+1~, QIT+2*, QIT+3, QIT+4
QTIME	ASKRUN+1~, ASKRUN+14, ASKRUN+15, ASKRUN+16, ASKRUN+17, QIT~, QIT+2
STAT	SYSETUP+1~, SYSETUP+8, SYSETUP+9, SYSETUP+10, SYSETUP+14, SYSETUP+15, CURR+1~, CURR+3
STATUS	APPSTAT~, APPSTAT+9, APPSTAT+11
SUB	GBLMOVE~, GBLMOVE+3*, GBLMOVE+9, GBLMOVE+10, GBLMOVE+11, GBLMOVE+13
SVSUB	LOADALL~, LOADALL+2, LOADALL+3, LOADALL+4, LOADALL+5, LOADALL+10, LOADALL+11, LOADALL+12, LOADALL+14, LOADUSER~ , LOADDESC~, LOADDESC+2, LOADCOMP~, LOADCOMP+2*, LOADVAR~, ADD+3, ADD+4
TSTAMP	CURR+1~, CURR+4, CURR+5, CURR+6
TXT	LOADALL+1~, LOADALL+8, LOADALL+9, LOADALL+10, LOADALL+11, LOADALL+12, LOADALL+13, LOADALL+14, LOADUSER+1~, LOADUSER+7* , LOADUSER+8, LOADUSER+9, LOADUSER+10, LOADUSER+11, LOADVAR+1~, LOADVAR+11, LOADVAR+12, LOADVAR+14, LOADVAR+16, LOADVAR+17 , LOADVAR+18, LOADVAR+19, LOADVAR+20, LOADVAR+21, ADD~, ADD+4
TXT(1	LOADVAR+13, LOADVAR+14, LOADVAR+15, LOADVAR+16, LOADVAR+17*, LOADVAR+22
U	SYSETUP+8, SYSETUP+14, LAST7762+7, NEXT7762+7, DT7762+3, DT7762+10, LOADDESC+3, LOADDESC+4, LOADCOMP+3, LOADCOMP+4 , LOADVAR+12, CURR+3, CURR+4, CURR+9, GBLMOVE+12, ASKRUN+3, QIT+3
VAR	LOADVAR+1~, LOADVAR+7, LOADVAR+8, LOADVAR+10
X	SYSETUP+11, SYSETUP+12, LOADALL+13!, QIT+7

Customize PDF page

Package: Health Level Seven

Routine: HLEVAPI1

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 10

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: