Routine: HLEVMST

Package	Total	Call Graph
Health Level Seven	4	($$RUNEV,EVENTCHK)^HLEVAPI0 MARKERR^HLEVAPI3 $$SEC^HLEVMST0 (DELETE,PURGEALL,PURGEME,UNQ)^HLEVUTIL
VA FileMan	3	FILE^DICN ^DIE $$GET1^DIQ
Kernel	2	^%ZTLOAD ($$FMADD,$$FMTH,$$HTFM,$$NOW)^XLFDT

Package	Total	Caller Graph
Health Level Seven	5	HLCSLM HLEVAPI1 HLEVMST0 HLEVUTIL HLP109

Entry Points

Name	Comments	DBIA/ICR reference
MSTENV	; Display environment to user...
CHECKMST	; Called from outside Event Monitoring, from the Link Manager, ; to see if the master job needs to be started. (See ^HLCSLM.) ; When the Link Manager calls here, two actions potentially occur:
TIMECHK()	; Every loop in the Link Manager code in HLCSLM results in one ; call being made to CHECKMST^HLEVMST. The CHECKMST subroutine in turn ; calls here to ensure that the Event Monitor's master job is running ; properly. However, the CHECKMST subroutine should be run by HLCSLM ; only once every four hours. The code in this subroutine uses ; HLEVLCHK(#) variables to ensure that this every four hour rule is ; followed. (HLEVLCHK is newed at the top of HLCSLM.)
SHOWQUIT(TXT)
STARTJOB	; Start a new job with optional display to screen...
MASTER	; Whenever a master job starts, here's where it's queued... ; HLEVIENM - req
NEWMSTR(FUTURE,SILENT)	; Create a new master job... ; ; If FUTURE=0, then master job will be queued for NOW... ; If FUTURE=1, then master job will be q'd for CUTMIN in future...
UPDFLDM(HLEVIENM,FLD,VAL)	; Update a specific piece in 776.2...
STAMPM(HLEVIENM)	; Update TIMESTAMP field in event..
PURGEM(HLEVIENM)	; Purge master job entries...
CHKMLT(HLTSK,HLNWIEN)	;Check if multiple Master Jobs running; remove duplicate jobs - HL1.6173
EOR	;HLEVMST - Event Monitor MASTER JOB ;5/16/03 14:42

External References

Name	Field # of Occurrence
^%ZTLOAD	NEWMSTR+33
FILE^DICN	NEWMSTR+18
^DIE	NEWMSTR+38, UPDFLDM+20, STAMPM+4
$$GET1^DIQ	CHKMLT+5, CHKMLT+6, CHKMLT+7, CHKMLT+8
$$RUNEV^HLEVAPI0	CHECKMST+34
EVENTCHK^HLEVAPI0	MASTER+35
MARKERR^HLEVAPI3	MASTER+41
$$SEC^HLEVMST0	CHECKMST+16, TIMECHK+9
DELETE^HLEVUTIL	PURGEM+23
PURGEALL^HLEVUTIL	MASTER+38
PURGEME^HLEVUTIL	PURGEM+22
UNQ^HLEVUTIL	CHKMLT+9
$$FMADD^XLFDT	NEWMSTR+29, PURGEM+12, PURGEM+15
$$FMTH^XLFDT	NEWMSTR+29
$$HTFM^XLFDT	NEWMSTR+37
$$NOW^XLFDT	MASTER+5, MASTER+30, MASTER+44, MASTER+46, NEWMSTR+17, NEWMSTR+29, STAMPM+3, PURGEM+12, PURGEM+15, CHKMLT+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,TXT,! Line Location: SHOWQUIT+1
Function Call: WRITE	Prompt: !!,"New master job queued to task# ",+JOBS,"..." Line Location: STARTJOB+3
Function Call: WRITE	Prompt: !,"Entry #",$P(JOBS,U,2)," created in HL7 Monitor Master Job file..." Line Location: STARTJOB+4
Function Call: WRITE	Prompt: !!,"Exiting! Master job not started. Parameter turned off..." Line Location: NEWMSTR+13
Function Call: WRITE	Prompt: !!,"Exiting! Master job not started. Stub record creation failed..." Line Location: NEWMSTR+21
Function Call: WRITE	Prompt: !!,"Master job created. Task# ",ZTSK,", and Event# ",HLEVIENM,"..." Line Location: NEWMSTR+41
Routine Call	DIE Line Location: NEWMSTR+38 UPDFLDM+20 STAMPM+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^HLEV(776.2 - [#776.2]	Classic Fileman Calls, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HLEV(776.2 - [#776.2]	CHECKMST+27, CHECKMST+28, CHECKMST+31, MASTER+9, MASTER+23, UPDFLDM+3, UPDFLDM+9, UPDFLDM+11, UPDFLDM+13, UPDFLDM+14 , STAMPM+2, PURGEM+17, PURGEM+19, CHKMLT+4
^HLEV(776.999 - [#776.999]	CHECKMST+19, MASTER+12, NEWMSTR+11, NEWMSTR+27, PURGEM+4, PURGEM+9, PURGEM+10

Label References

Name	Line Occurrences
$$NEWMSTR	STARTJOB+2, MASTER+20
$$TIMECHK	CHECKMST+13
CHKMLT	NEWMSTR+44
SHOWQUIT	CHECKMST+21, CHECKMST+25, CHECKMST+36
STARTJOB	CHECKMST+30, CHECKMST+32, CHECKMST+35
UPDFLDM	MASTER+13, MASTER+14, MASTER+24, MASTER+25, MASTER+28, MASTER+29, MASTER+30, MASTER+44, MASTER+45, MASTER+46 , MASTER+47, MASTER+53

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CT	UPDFLDM+11*, UPDFLDM+12, UPDFLDM+14
CUTIME	PURGEM+1~, PURGEM+15, PURGEM+17, PURGEM+19
CUTMIN	NEWMSTR+5~, NEWMSTR+25, NEWMSTR+27, NEWMSTR+28, NEWMSTR+29, NEWMSTR+30, NEWMSTR+37
D	MASTER+3~, UPDFLDM+1~, STAMPM+1~
D0	MASTER+3~, UPDFLDM+1~, STAMPM+1~
DA	MASTER+3~, NEWMSTR+5~, NEWMSTR+36!, NEWMSTR+37, UPDFLDM+1~, UPDFLDM+19, STAMPM+1~, STAMPM+3*
DD	NEWMSTR+5~, NEWMSTR+36!
DI	UPDFLDM+1~, STAMPM+1~
DIC	NEWMSTR+5~, NEWMSTR+17*, NEWMSTR+36!
DIC(0	NEWMSTR+17*
DIE	MASTER+3~, NEWMSTR+5~, NEWMSTR+37, UPDFLDM+1~, UPDFLDM+19, STAMPM+1~, STAMPM+3*
DO	NEWMSTR+5~, NEWMSTR+36!
DR	MASTER+3~, NEWMSTR+5~, NEWMSTR+37, UPDFLDM+1~, UPDFLDM+19, STAMPM+1~, STAMPM+3*
DUZ	NEWMSTR+37
FLD	MASTER+3~, MASTER+13, MASTER+24, MASTER+29*, UPDFLDM~, UPDFLDM+8, UPDFLDM+16, UPDFLDM+19
FUTURE	NEWMSTR~, NEWMSTR+26
HLCNT	NEWMSTR+5~
HLEN	NEWMSTR+5~
HLEVIENM	MASTER+9, MASTER+13, MASTER+14, MASTER+23, MASTER+24, MASTER+25, MASTER+28, MASTER+29, MASTER+30, MASTER+35 , MASTER+38, MASTER+44, MASTER+45, MASTER+46, MASTER+47, MASTER+53, NEWMSTR+5~, NEWMSTR+19*, NEWMSTR+37, NEWMSTR+41 , NEWMSTR+44, NEWMSTR+45, UPDFLDM~, UPDFLDM+3, UPDFLDM+9, UPDFLDM+11, UPDFLDM+13, UPDFLDM+14, UPDFLDM+19, STAMPM~ , STAMPM+2, STAMPM+3, PURGEM~, PURGEM+20
>> HLEVLCHK(0	TIMECHK+9*, TIMECHK+18
>> HLEVLCHK(1	CHECKMST+16, TIMECHK+12, TIMECHK+15, TIMECHK+18
>> HLEVLCHK(3	TIMECHK+18*, TIMECHK+21
HLIEN	CHKMLT+1~, CHKMLT+4*, CHKMLT+5, CHKMLT+9
HLIENS	CHKMLT+1~, CHKMLT+5*, CHKMLT+6, CHKMLT+7, CHKMLT+8
HLNOW	NEWMSTR+5~, CHKMLT+4*, CHKMLT+5
HLNWIEN	CHKMLT~, CHKMLT+2, CHKMLT+3
HLNWIENS	CHKMLT+1~, CHKMLT+3*, CHKMLT+8
HLNWQTM	CHKMLT+1~, CHKMLT+8*
HLPRGTM	PURGEM+1~, PURGEM+12*
HLQTM	CHKMLT+1~, CHKMLT+8*
HLRSN	CHKMLT+1~, CHKMLT+3*, CHKMLT+9
HLSTSK	CHKMLT+1~, CHKMLT+7*, CHKMLT+9
HLTSK	CHKMLT~, CHKMLT+2, CHKMLT+7
>> IEN	PURGEM+18, PURGEM+19, PURGEM+20, PURGEM+22, PURGEM+23
IENM	PURGEM+1~
JOBS	STARTJOB+1~, STARTJOB+2*, STARTJOB+3, STARTJOB+4
LAPSE	CHECKMST+11~, CHECKMST+24*, CHECKMST+34
LASTDT	CHECKMST+11~, CHECKMST+27*, CHECKMST+28
LASTIEN	CHECKMST+11~, CHECKMST+28*, CHECKMST+30, CHECKMST+31
LOOPTM	PURGEM+1~
>> NEWJOB	MASTER+20*
NODE	CHECKMST+11~, CHECKMST+31, CHECKMST+32, CHECKMST+33, UPDFLDM+9, UPDFLDM+10, UPDFLDM+12, UPDFLDM+13
NOEVCHK	MASTER+3~, MASTER+33!, MASTER+34*, MASTER+47
NOEVCHK(	MASTER+49, MASTER+52
NOPURG	MASTER+3~, PURGEM+1~, PURGEM+6, PURGEM+21, PURGEM+25
NOW	MASTER+3~, MASTER+5*, MASTER+13, MASTER+24, MASTER+29
PAR0	CHECKMST+11~, CHECKMST+19*, CHECKMST+20, CHECKMST+24
RES	MASTER+3~, MASTER+48, MASTER+49, MASTER+50, MASTER+51, MASTER+52
RES(1	MASTER+50, MASTER+51, MASTER+52*, MASTER+53
RETHRM	PURGEM+1~, PURGEM+9, PURGEM+10, PURGEM+11*, PURGEM+12, PURGEM+15
RUNOW	CHECKMST+11~, CHECKMST+34*, CHECKMST+35
RUNTIME	CHECKMST+11~, CHECKMST+33*, CHECKMST+34
SILENT	NEWMSTR~, NEWMSTR+8*, NEWMSTR+12, NEWMSTR+20, NEWMSTR+40
TXT	SHOWQUIT~, SHOWQUIT+1
U	CHECKMST+20, CHECKMST+24, CHECKMST+32, CHECKMST+33, STARTJOB+4, MASTER+12, MASTER+23, NEWMSTR+11, NEWMSTR+27, NEWMSTR+45 , UPDFLDM+12, PURGEM+4, PURGEM+10
VAL	UPDFLDM~, UPDFLDM+3, UPDFLDM+14, UPDFLDM+19
X	CHECKMST+11~, CHECKMST+32, NEWMSTR+5~, NEWMSTR+17, NEWMSTR+36!
Y	NEWMSTR+5~, NEWMSTR+19, NEWMSTR+36!
ZTDESC	NEWMSTR+5~, NEWMSTR+30*
ZTDTH	NEWMSTR+5~, NEWMSTR+30*
ZTIO	NEWMSTR+5~, NEWMSTR+30*
>> ZTQUEUED	SHOWQUIT, STARTJOB+2, NEWMSTR+12, NEWMSTR+20, NEWMSTR+40
>> ZTREQ	MASTER+5*
ZTRTN	NEWMSTR+5~, NEWMSTR+31*
>> ZTSAVE("HLEVIENM"	NEWMSTR+32*
ZTSK	MASTER+7, NEWMSTR+5~, NEWMSTR+37, NEWMSTR+41, NEWMSTR+44, NEWMSTR+45
ZTSKMST	MASTER+3~, MASTER+7*, CHKMLT+7

Customize PDF page

Package: Health Level Seven

Routine: HLEVMST

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: