HLEVAPI2 ;O-OIFO/LJA - Event Monitor APIs ;02/04/2004 14:42
Source file <HLEVAPI2.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 3 | ($$ADDNOTE,$$EVENT,$$STOREVAR)^HLEME ($$LOGGED,$$NEWINDEX)^HLEME1 (ADD,RUNDIARY)^HLEVAPI1 |
Kernel | 3 | DOLRO^%ZOSV ($$FMADD,$$FMTE,$$NOW)^XLFDT ($$REPEAT,$$UP)^XLFSTR |
VA Fileman | 1 | ^DIR |
Name | Comments | DBIA/ICR reference |
---|---|---|
VARLIST(HLEVIENJ,SUB) | ; Return event variable information in ^TMP($J,SUB)...
|
|
DSET1 | ;
|
|
LOGQUERY(IEN,QUERYBEG,QUERYEND) | ; Store ARR() in 776.4...
|
|
LOADDGBL(HLEVIENJ,SUBDD,SVSUB) | ; Load event text into global to mail...
|
|
SV(VAR,VAL) | ; Store individual variable... (Increments CT, updates ZERO,
; and creates MIEN.) ; CT,IEN,ZERO -- req --> CT,MIEN,ZERO |
|
DEBUGSET | ; Set debugging on/off for a tag...
|
|
ADDXMYS(HLEVIENE,XTMP) | ; Set up XMY()s...
|
|
PREVENT(HLEVIENE,SUB,STATUS) | ; Return <PR>evious <event> runs in ^TMP($J,SUB)
|
|
MGRP(HLEVIENE) | ; Return G.MAIL-GROUP...
|
|
LOG(ETYPE,STORE) | ; Log event type, record variables, create index...
|
|
DEBUG(TAG,TMPSUB) | ; Conditionally store ^XTMP debug data...
; Pass-by-reference references to save by merging... ; TMPSUB(SAVESUB)=REFERENCE ; (E.g., TMPSUB("HLEVREP")=$NA(^TMP($J,"HLEVREP"))) |
|
LOADBODY(HLEVIENJ,SVSUB) | ; Load body into global to mail...
|
|
EVCHKD(HLEVIENM,HLEVIENE,HLEVIENJ,STATUS) | ; Event code finished. Mark event check multiple in 776.2 done...
; ZTSK -- req |
|
ASKDATE(DATEPMT,PARM,DEFAULT) | ; Select date...
|
|
DSET2(TAG,CUT) | ;
|
|
LOGVAR(IEN,VAR) | ; Store variable in 776.4...
|
|
EOR | ;HLEVAPI2 - Event Monitor APIs ;5/16/03 14:42
|
Name | Field # of Occurrence |
---|---|
DOLRO^%ZOSV | DEBUG+15 |
^DIR | ASKDATE+5 |
$$ADDNOTE^HLEME | LOG+36 |
$$EVENT^HLEME | LOG+28 |
$$STOREVAR^HLEME | LOG+56 |
$$LOGGED^HLEME1 | LOG+25 |
$$NEWINDEX^HLEME1 | LOG+45, LOG+48, LOG+60 |
ADD^HLEVAPI1 | LOADBODY+12, LOADBODY+18, LOADDGBL+5, LOADDGBL+6, LOADDGBL+9 |
RUNDIARY^HLEVAPI1 | LOG+40 |
$$FMADD^XLFDT | DSET2+1 |
$$FMTE^XLFDT | LOADBODY+9 |
$$NOW^XLFDT | EVCHKD+10, DSET2+1, DEBUG+7, DEBUG+14 |
$$REPEAT^XLFSTR | LOADBODY+10, LOADBODY+16, LOADDGBL+6 |
$$UP^XLFSTR | PREVENT+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^HLEV(776 - [#776] | VARLIST+3, VARLIST+6, VARLIST+8, VARLIST+10, PREVENT+14, PREVENT+15, LOADBODY+5, LOADDGBL+4, LOADDGBL+8, LOADDGBL+9 |
^HLEV(776.1 - [#776.1] | PREVENT+10, ADDXMYS+6, ADDXMYS+7, ADDXMYS+13, MGRP+2 |
^HLEV(776.2 - [#776.2] | EVCHKD+8, EVCHKD+9, EVCHKD+11* |
^HLEV(776.4 - [#776.4] | LOGVAR+3, LOGVAR+4, LOGVAR+11*, LOGQUERY+3, LOGQUERY+4, LOGQUERY+12*, SV+4, SV+5* |
^TMP($J | VARLIST+11*, VARLIST+12*, PREVENT+19*, PREVENT+20*, LOG+38!, LOG+39*, LOG+40, LOG+41! |
^XMB(3.8 - [#3.8] | ADDXMYS+8, MGRP+3 |
^XTMP( | ADDXMYS+15 |
^XTMP("HLEV DEBUG" | DSET1+1, DSET1+2!, DSET1+4, DSET1+8, DSET1+9, DSET1+13, DSET1+18!, DSET1+20!, DSET2+1*, DSET2+2* , DEBUG+7, DEBUG+13, DEBUG+14*, DEBUG+21*, DEBUG+24! |
Name | Line Occurrences |
---|---|
DSET1 | DSET1+24 |
DSET2 | DSET1+22 |
SV | LOGVAR+9, LOGQUERY+8 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CT | VARLIST+1~, VARLIST+5*, VARLIST+7*, VARLIST+14, PREVENT+1~, PREVENT+13*, PREVENT+17*, PREVENT+22, LOGVAR+1~, LOGVAR+6* , LOGVAR+9, LOGQUERY+1~, LOGQUERY+6*, LOGQUERY+10, SV+3* |
CUT | DEBUGSET+1~, DSET1+9*, DSET1+10, DSET1+13*, DSET1+14, DSET1+15*, DSET1+17, DSET1+22, DSET2~, DSET2+2 |
DATA | VARLIST+1~, VARLIST+8*, VARLIST+9, PREVENT+1~, PREVENT+15*, PREVENT+16, PREVENT+18, PREVENT+19, EVCHKD+2~, EVCHKD+9* , EVCHKD+10*, EVCHKD+11, ADDXMYS+1~, ADDXMYS+7*, ADDXMYS+8*, ADDXMYS+9 |
DATE | DEBUG+4~, DEBUG+7* |
DATEPMT | ASKDATE~, ASKDATE+3 |
DEFAULT | ASKDATE~, ASKDATE+4 |
DIR | ASKDATE+1~ |
DIR("A" | ASKDATE+3* |
DIR("B" | ASKDATE+4* |
DIR(0 | ASKDATE+2* |
DIRUT | ASKDATE+1~ |
DTOUT | ASKDATE+1~ |
DUOUT | ASKDATE+1~ |
END | LOADBODY+1~, LOADBODY+9*, LOADBODY+11 |
ETYPE | LOG~, LOG+13, LOG+25, LOG+28, LOG+45, LOG+48, LOG+60 |
EXP | VARLIST+1~, VARLIST+9*, VARLIST+12 |
HDR | LOADDGBL+1~, LOADDGBL+2*, LOADDGBL+6 |
HLEVIENE | PREVENT~, PREVENT+3*, PREVENT+9, PREVENT+10*, PREVENT+14, EVCHKD~, EVCHKD+8, ADDXMYS~, ADDXMYS+6, ADDXMYS+7 , ADDXMYS+13, ADDXMYS+15, MGRP~, MGRP+2 |
HLEVIENJ | VARLIST~, VARLIST+3, VARLIST+6, VARLIST+8, VARLIST+10, EVCHKD~, EVCHKD+10, LOADBODY~, LOADBODY+5, LOADDGBL~ , LOADDGBL+4, LOADDGBL+8, LOADDGBL+9, LOG+31, LOG+36, LOG+44, LOG+47 |
HLEVIENM | EVCHKD~, EVCHKD+4, EVCHKD+8, EVCHKD+9, EVCHKD+11 |
IEN | PREVENT+1~, PREVENT+13*, PREVENT+14*, PREVENT+15, PREVENT+19, PREVENT+20, LOGVAR~, LOGVAR+3, LOGVAR+4, LOGVAR+11 , LOGQUERY~, LOGQUERY+3, LOGQUERY+4, LOGQUERY+12, SV+4, SV+5 |
IEN1 | LOG+10~ |
IEN2 | LOG+10~ |
LIEN | LOG+10~, LOG+28*, LOG+36, LOG+39, LOG+44, LOG+45, LOG+47, LOG+48, LOG+51, LOG+56 , LOG+60, LOG+62 |
LIST | LOG+10~, LOG+25, LOG+33~, LOG+45, LOG+48, LOG+60 |
LIST( | LOG+21*, LOG+57* |
LIST(1 | LOG+44*, LOG+47* |
LIST(2 | LOG+44*, LOG+47* |
LIST(3 | LOG+44*, LOG+47* |
LOG | LOG+10~, LOG+16*, LOG+24, LOG+25* |
MGRP | MGRP+1~, MGRP+2*, MGRP+3*, MGRP+4 |
MIEN | VARLIST+1~, VARLIST+5*, VARLIST+6*, VARLIST+8, VARLIST+10, EVCHKD+2~, EVCHKD+8*, EVCHKD+9, EVCHKD+11, ADDXMYS+1~ , ADDXMYS+5*, ADDXMYS+6*, ADDXMYS+7, LOADDGBL+1~, LOADDGBL+7*, LOADDGBL+8*, LOADDGBL+9, LOGVAR+1~, LOGQUERY+1~, SV+4* , SV+5, SV+6 |
MONM | ADDXMYS+1~, ADDXMYS+13* |
NO | DEBUG+4~, DEBUG+13*, DEBUG+14, DEBUG+15, DEBUG+21, DEBUG+24 |
NO(1 | DEBUG+24* |
NODE | ADDXMYS+1~, ADDXMYS+4*, ADDXMYS+6, ADDXMYS+7, ADDXMYS+8, LOADBODY+1~, LOADBODY+5*, LOADBODY+6 |
P1 | LOADBODY+1~, LOADBODY+9 |
P2 | LOADBODY+1~, LOADBODY+9 |
P3 | LOADBODY+1~ |
P4 | LOADBODY+1~, LOADBODY+15*, LOADBODY+16 |
P5 | LOADBODY+1~, LOADBODY+17 |
P6 | LOADBODY+1~ |
P7 | LOADBODY+1~ |
PARM | ASKDATE~, ASKDATE+2, ASKDATE+6 |
PCE | LOADBODY+1~, LOADBODY+6*, LOG+10~, LOG+19*, LOG+20, LOG+21, LOG+54*, LOG+55, LOG+57 |
QUERYBEG | LOGQUERY~, LOGQUERY+7*, LOGQUERY+8 |
QUERYEND | LOGQUERY~, LOGQUERY+7 |
RECIP | ADDXMYS+1~, ADDXMYS+14*, ADDXMYS+15*, ADDXMYS+16 |
REF | DEBUG+4~, DEBUG+20*, DEBUG+21 |
START | LOADBODY+1~, LOADBODY+9*, LOADBODY+10 |
STATUS | PREVENT~, PREVENT+6*, PREVENT+16, EVCHKD~, EVCHKD+6*, EVCHKD+10 |
STATUS(1 | PREVENT+18*, PREVENT+20 |
STORE | LOG~, LOG+16*, LOG+19, LOG+20, LOG+24, LOG+51, LOG+54, LOG+55 |
SUB | VARLIST~, VARLIST+11, VARLIST+12, PREVENT~, PREVENT+4, PREVENT+19, PREVENT+20, DEBUG+4~, DEBUG+18*, DEBUG+19* , DEBUG+20, DEBUG+21 |
SUBDD | LOADDGBL~, LOADDGBL+2, LOADDGBL+4, LOADDGBL+8, LOADDGBL+9 |
SVSUB | LOADBODY~, LOADBODY+3*, LOADDGBL~, LOADDGBL+3* |
TAG | DEBUGSET+1~, DSET1+7*, DSET1+8*, DSET1+9, DSET1+10, DSET1+12*, DSET1+13, DSET1+18, DSET1+22, DSET2~ , DSET2+2, DEBUG~, DEBUG+7, DEBUG+13, DEBUG+14, DEBUG+15, DEBUG+21, DEBUG+24 |
TMPSUB | DEBUG~ |
TMPSUB( | DEBUG+19, DEBUG+20 |
TXT | LOADBODY+1~ |
TXT(1 | LOADBODY+10*, LOADBODY+12, LOADBODY+16*, LOADBODY+18 |
TXT(2 | LOADBODY+11*, LOADBODY+12, LOADBODY+17*, LOADBODY+18 |
U | VARLIST+9, PREVENT+16, PREVENT+18, EVCHKD+9, EVCHKD+10, ADDXMYS+7, ADDXMYS+8, ADDXMYS+13, MGRP+2, MGRP+3 , LOADBODY+6, DSET2+1, LOG+19, LOG+20, LOG+24, LOG+51, LOG+54, LOG+55, LOG+62, LOGVAR+4 , LOGQUERY+4, SV+6 |
VAL | VARLIST+1~, VARLIST+10*, VARLIST+11, SV~, SV+5 |
VAR | VARLIST+1~, VARLIST+9*, VARLIST+11, VARLIST+12, LOG+10~, LOG+20*, LOG+21, LOG+55*, LOG+56, LOG+57 , LOGVAR~, LOGVAR+3, LOGVAR+9, SV~, SV+5 |
X | PREVENT+18*, DEBUG+4~, DEBUG+15*, ASKDATE+1~, LOG+10~, LOG+36*, LOG+45*, LOG+48*, LOG+56*, LOG+60* |
>> XMY( | ADDXMYS+9*, ADDXMYS+16* |
XRF | LOG+10~ |
XTMP | ADDXMYS~, ADDXMYS+12, ADDXMYS+15 |
Y | ASKDATE+1~, ASKDATE+6, ASKDATE+7 |
ZERO | LOGVAR+1~, LOGVAR+4*, LOGVAR+11, LOGQUERY+1~, LOGQUERY+4*, LOGQUERY+12, SV+6* |
ZTSK | EVCHKD+9, DEBUG+10~*, DEBUG+13, DEBUG+14, DEBUG+15, DEBUG+21, DEBUG+24 |