Routine: HLEVAPI0

Package	Total	Call Graph
Health Level Seven	7	$$BTE^HLCSMON $$YN^HLCSRPT4 $$NEWEVENT^HLEVAPI DEBUG^HLEVAPI2 EVENTONE^HLEVAPI3 ($$ASKIEN,HDR,RUNS7761,VIEW7769)^HLEVREP ($$SDT,$$STAT2M)^HLEVX001
Kernel	3	^%ZTLOAD ($$FMADD,$$FMTH,$$NOW)^XLFDT ($$CJ,$$REPEAT,$$UP)^XLFSTR
VA FileMan	1	^DIE

Package	Total	Caller Graph
Health Level Seven	6	HLEV EDIT MASTER ON-OFF HLEV EDIT MONITOR ON-OFF HLEVAPI1 HLEVAPI3 HLEVMST HLEVSRV2

Entry Points

Name	Comments	DBIA/ICR reference
ONOFFM(HLEVIENE,STATUS)	;Turn on/off event monitor...	ICR #4226 Status: Withdrawn Usage: Controlled Subscription
ONOFFS(HLEVIEN,STATUS)	; Turn on/off system...
ONOFF(FILE,HLEVIENE,STATUS)	; Turn on/off event monitor or system... ; FILE can = 776.1 or 776.999 ; Actually, HLEVIENE can be the IEN of the monitor, or the system. ; If STATUS="A", sets status to ACTIVE. ; If STATUS="I", sets status to INACTIVE. ; If STATUS=null or undefined (not passed), present status returned...
ONOFFEV	; Turn on/off event monitor
S7761
VIEW7761(IEN)	; Actual display code for entry...
SH7761(TAG,VAL)	;
ONOFFPAR	; Turn on/off parameters...
ACTINACT(FILE,IEN,FLD,TAG)	; Turn on/off status fields...
EVENTCHK(HLEVIENM)	; Loop thru all MONITORs... ; NOEVCHK,ZTSKMST -- req
EVRES(HLEVIENM,HLEVIENE,RES,HLEVIENJ)	; Record result of queued task... ; ZTSK -- req
RUNEV(LASTRUN,LAPSE)	; Is LASTRUN (FM) LAPSE(min) before NOW?
OKMCODE(MREF)	; Is this a valid M subrtn^rtn reference?
Q1TIME(HLEVIENE,OVERRIDE,QTIME,XTMP)	; Start a one-time run of event monitor (w/no master job)
EOR	;HLEVAPI0 - Event Monitor APIs ;5/16/03 14:42

External References

Name	Field # of Occurrence
^%ZTLOAD	Q1TIME+28
^DIE	ONOFF+37, ONOFF+50, ACTINACT+6, Q1TIME+33
$$BTE^HLCSMON	ONOFFPAR+15
$$YN^HLCSRPT4	ACTINACT+3
$$NEWEVENT^HLEVAPI	Q1TIME+18
DEBUG^HLEVAPI2	ONOFFM+1
EVENTONE^HLEVAPI3	EVENTCHK+11
$$ASKIEN^HLEVREP	S7761+2
HDR^HLEVREP	ONOFFEV+4, S7761+3, S7761+18
RUNS7761^HLEVREP	S7761+5
VIEW7769^HLEVREP	ONOFFPAR+3, ONOFFPAR+11
$$SDT^HLEVX001	S7761+14
$$STAT2M^HLEVX001	S7761+14
$$FMADD^XLFDT	RUNEV+3
$$FMTH^XLFDT	Q1TIME+22
$$NOW^XLFDT	EVRES+20, RUNEV+3
$$CJ^XLFSTR	VIEW7761+14
$$REPEAT^XLFSTR	S7761+8, S7761+10
$$UP^XLFSTR	ONOFF+14, ONOFF+22, EVRES+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: S7761+1
Function Call: WRITE	Prompt: !!,"Recent Checks of the Monitor by Master Job" Line Location: S7761+7
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",IOM) Line Location: S7761+8
Function Call: WRITE	Prompt: !,"Check-time",?18,"Results" Line Location: S7761+9
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",IOM) Line Location: S7761+10
Function Call: WRITE	Prompt: !,$$SDT^HLEVX001($P(DATA,U,2)),?18,$$STAT2M^HLEVX001($P(DATA,U)) Line Location: S7761+14
Function Call: WRITE	Prompt: ! Line Location: S7761+15
Function Call: WRITE	Prompt: ! Line Location: S7761+20
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR(" Parameter ""Variable"" Descriptors ",IOM,"-") Line Location: VIEW7761+14
Function Call: WRITE	Prompt: !,?25,"Parameter - "_PCE_" = ",PAR(PCE) Line Location: VIEW7761+16
Function Call: WRITE	Prompt: !,?(35-$L(TAG)-2),TAG,":",?45,VAL Line Location: SH7761+1
Function Call: WRITE	Prompt: ! Line Location: ONOFFPAR+5
Function Call: WRITE	Prompt: ! Line Location: ONOFFPAR+13
Function Call: WRITE	Prompt: ! Line Location: ONOFFPAR+14
Function Call: WRITE	Prompt: " ... nothing changed ..." Line Location: ACTINACT+4
Function Call: WRITE	Prompt: " changed!" Line Location: ACTINACT+7
Routine Call	DIE Line Location: ONOFF+37 ONOFF+50 ACTINACT+6 Q1TIME+33

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HLEV(	ONOFF+20, ONOFF+22, ONOFF+26, ACTINACT+2
^HLEV(776 - [#776]	EVRES+5, EVRES+9, EVRES+11*, Q1TIME+30
^HLEV(776.1 - [#776.1]	VIEW7761+3, VIEW7761+7, EVENTCHK+8, EVENTCHK+10, Q1TIME+10
^HLEV(776.2 - [#776.2]	EVRES+17, EVRES+18, EVRES+21*
^HLEV(776.999 - [#776.999]	EVENTCHK+5
^TMP("HLEVFLAG"	ONOFFM+4
^TMP($J	S7761+6, S7761+12, S7761+13
^XMB(3.8 - [#3.8]	VIEW7761+12

Label References

Name	Line Occurrences
$$ACTINACT	S7761+16, ONOFFPAR+8, ONOFFPAR+9
$$ONOFF	ONOFFM+6, ONOFFS+1
S7761	S7761+22
SH7761	VIEW7761+9, VIEW7761+10, VIEW7761+11, VIEW7761+12, VIEW7761+13
VIEW7761	S7761+4, S7761+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CHG	ONOFFEV+1~, S7761+16, S7761+17, ONOFFPAR+1~, ONOFFPAR+7, ONOFFPAR+8, ONOFFPAR+9, ONOFFPAR+11
DA	ONOFF+7~, ONOFF+36, ONOFF+49, ACTINACT+1~, ACTINACT+5, Q1TIME+31~, Q1TIME+32
DATA	ONOFF+7~, ONOFF+26, ONOFF+29, ONOFFEV+3~, S7761!, S7761+13, S7761+14, Q1TIME+1~, Q1TIME+10*, Q1TIME+11 , Q1TIME+14
DIC	ONOFFEV+3~, S7761!
DIE	ONOFF+7~, ONOFF+36, ONOFF+49, ACTINACT+1~, ACTINACT+5, Q1TIME+31~, Q1TIME+32
DR	ONOFF+7~, ONOFF+36, ONOFF+49, ACTINACT+1~, ACTINACT+5, Q1TIME+31~, Q1TIME+32
FILE	ONOFF~, ONOFF+10*, ONOFF+12, ONOFF+20, ONOFF+22, ONOFF+26, ONOFF+36, ONOFF+49, ACTINACT~, ACTINACT+2 , ACTINACT+5
FLD	ACTINACT~, ACTINACT+2, ACTINACT+5
HLEVIEN	ONOFFS~, ONOFFS+1
HLEVIENE	ONOFFM~, ONOFFM+6, ONOFF~, ONOFF+11, ONOFF+12, ONOFF+18, ONOFF+19, ONOFF+20, ONOFF+22, ONOFF+23* , ONOFF+26, ONOFF+36, ONOFF+49, EVENTCHK+2~, EVENTCHK+9, EVENTCHK+10, EVENTCHK+11, EVRES~, EVRES+17, Q1TIME~ , Q1TIME+10, Q1TIME+18, Q1TIME+23
HLEVIENE(1	ONOFF+20, ONOFF+21, ONOFF+22, ONOFF+23
HLEVIENJ	EVRES~, EVRES+5, EVRES+9, EVRES+11, Q1TIME+1~, Q1TIME+18*, Q1TIME+19, Q1TIME+30, Q1TIME+32, Q1TIME+35
HLEVIENM	EVENTCHK~, EVENTCHK+11, EVRES~, EVRES+14, EVRES+17, EVRES+18, EVRES+21, Q1TIME+15*
HLEVNM	EVENTCHK+2~, EVENTCHK+7, EVENTCHK+8, EVENTCHK+10, EVENTCHK+11, Q1TIME+1~, Q1TIME+14*
IEN	ONOFFEV+3~, S7761!, S7761+2*, S7761+3, S7761+4, S7761+5, S7761+16, S7761+18, S7761+19, VIEW7761~ , VIEW7761+3, VIEW7761+7, ACTINACT~, ACTINACT+2, ACTINACT+5
IENR	ONOFFEV+3~, S7761!, S7761+11, S7761+12, S7761+13
IOM	S7761+8, S7761+10, VIEW7761+14
IOSL	S7761+20, ONOFFPAR+14
LAPSE	RUNEV~, RUNEV+3
LASTRUN	RUNEV~, RUNEV+2, RUNEV+4
MIEN	EVRES+2~, EVRES+17*, EVRES+18, EVRES+21
MREF	OKMCODE~, OKMCODE+2
>> NO	EVENTCHK+5*
NODE	VIEW7761+1~, VIEW7761+3, VIEW7761+4, EVRES+2~, EVRES+18, EVRES+20*, EVRES+21
>> NOEVCHK	EVENTCHK+12*
OVERRIDE	Q1TIME~, Q1TIME+4*, Q1TIME+11
P1	VIEW7761+1~
P2	VIEW7761+1~, VIEW7761+10
P3	VIEW7761+1~, VIEW7761+9
P4	VIEW7761+1~, VIEW7761+11
P5	VIEW7761+1~, VIEW7761+12
P6	VIEW7761+1~, VIEW7761+13
PAR	VIEW7761+1~
PAR(	VIEW7761+7*, VIEW7761+15, VIEW7761+16
PCE	VIEW7761+1~, VIEW7761+4, VIEW7761+7, VIEW7761+15*, VIEW7761+16
QTIME	Q1TIME~, Q1TIME+7*, Q1TIME+18, Q1TIME+22
RES	EVRES~, EVRES+6*, EVRES+11, EVRES+14, EVRES+20
STAT	ONOFF+7~, ONOFF+29, ONOFF+32, ONOFF+34, ONOFF+38, ONOFF+41, ONOFF+46, ACTINACT+1~, ACTINACT+2, ACTINACT+3 , ACTINACT+5
STATUS	ONOFFM~, ONOFFM+6, ONOFFS~, ONOFFS+1, ONOFF~, ONOFF+13, ONOFF+14, ONOFF+15, ONOFF+34, ONOFF+36 , ONOFF+38, ONOFF+41, ONOFF+46, ONOFF+49, ONOFF+52, EVRES+2~, EVRES+5, EVRES+11
TAG	SH7761~, SH7761+1, ACTINACT~, ACTINACT+3
TXT	OKMCODE+1~, OKMCODE+3*, OKMCODE+4
U	ONOFF+29, S7761+14, VIEW7761+4, VIEW7761+7, VIEW7761+12, ACTINACT+2, EVENTCHK+5, EVRES+5, EVRES+11, EVRES+20 , Q1TIME+11, Q1TIME+14, Q1TIME+35
VAL	SH7761~, SH7761+1
WHENRUN	RUNEV+1~, RUNEV+3*, RUNEV+4
X	ONOFF+7~, ONOFFPAR+8, ONOFFPAR+9, ONOFFPAR+15, ACTINACT+1~, ACTINACT+3
XTMP	Q1TIME~, Q1TIME+27
Y	ONOFF+7~, ACTINACT+1~
ZTDESC	Q1TIME+1~, Q1TIME+23*
ZTDTH	Q1TIME+1~, Q1TIME+22*
ZTIO	Q1TIME+1~, Q1TIME+22*
ZTRTN	Q1TIME+1~, Q1TIME+24*
ZTSAVE	Q1TIME+1~
ZTSAVE("HLEVIENE"	Q1TIME+25*
ZTSAVE("HLEVIENJ"	Q1TIME+25*
ZTSAVE("HLEVIENM"	Q1TIME+26*
ZTSAVE("HLEVNM"	Q1TIME+26*
ZTSAVE("XTMP"	Q1TIME+27*
ZTSK	Q1TIME+1~, Q1TIME+30, Q1TIME+32, Q1TIME+35

Marked Items

Name	Field # of Occurrence
$T(@MREF	OKMCODE+3

Customize PDF page

Package: Health Level Seven

Routine: HLEVAPI0

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items