XQALERT ;ISF/JLI,ISD/HGW - ALERT HANDLER ;05/29/13 11:21
Source file <XQALERT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SORT | ;SR. Sort alerts
; ZEXCEPT: XQAUSER,XQACNT - global variable |
|
D | ;
; ZEXCEPT: XQA |
|
OLDDEL | ;OPT.
|
|
SETREV | ; Set on (XQ1ON) and off (XQ1OFF) variables for Reverse video ; P285
; ZEXCEPT: IOST,XQ1OFF,XQ1ON - global variables |
|
SETUP | ;SR.
|
|
USERDEL | ;OPT.
|
|
ACTION(ALERTID) | ;
|
|
DELETEA | ;
|
|
PATIENT(ROOT,PATIENT,FRSTDATE,LASTDATE) | ;
|
|
DOIT | ;OPT. Process Alerts [XQALERT]
|
|
GETACT(ALERTID) | ; Return to calling routine the information needed to act on the specified alert.
; On return the following variables are defined: ; XQAID = the full alert id ; XQADATA = Any data passed as XQADATA at the time the alert was generated ; XQAROU = Indicates routine to be run (includes tag if necessary) ; This value may have three meanings ; 1. A null value indicates no routine to be used (XQAOPT contains option name to be run) ; 2. A value of ^<space> indicates that the alert is information only (no routine or option action involved). ; 3. The name of the routine as ^ROUTINE or TAG^ROUTINE ; XQAOPT = Indicates the name of the option to be run if not null. |
|
DAT8(FMDAT,TFLG) | ;
|
|
USER(ROOT,XQAUSER,FRSTDATE,LASTDATE) | ; Returns current alerts for the user in an array located under root
|
|
DELETE | ;
|
|
DISPLAY | ;SR. Display recent new alerts
; ZEXCEPT: XQAUSER - global variable |
|
SETUP1() | ;SR.
|
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | SETREV+4, SETREV+5 |
^DIR | DISPLAY+8 |
$$NOW^XLFDT | DISPLAY+10 |
GETPAT^XQALDATA | PATIENT+2 |
GETUSER^XQALDATA | USER+3 |
COUNT^XQALDEL | DOIT+2 |
DELETE^XQALDEL | DELETE+1 |
DELETEA^XQALDEL | DELETEA+1 |
OLDDEL^XQALDEL | OLDDEL+1 |
USERDEL^XQALDEL | USERDEL+1 |
ACTION^XQALDOIT | ACTION+1, GETACT+14 |
DOIT^XQALERT1 | DOIT+2 |
$$SETUP1^XQALSET | SETUP1+1 |
SETUP^XQALSET | SETUP+1 |
RETURN^XQALSUR1 | DISPLAY+4, USER+2 |
$$CHKCRIT^XQALSUR2 | DISPLAY+12, SORT+8 |
$$ACTVSURO^XQALSURO | DISPLAY+4, USER+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XQ" | DISPLAY+8, SORT+4!, SORT+12* |
^VA(200 - [#200] | DISPLAY+15 |
^XTV(8992 - [#8992] | DISPLAY+5, DISPLAY+8, DISPLAY+13*, DISPLAY+17!, SORT+3, SORT+5, SORT+6, D+2! |
^XTV(8992.1 - [#8992.1] | DISPLAY+10*, DISPLAY+18* |
Name | Line Occurrences |
---|---|
$$DAT8 | DISPLAY+15 |
D | DISPLAY+17 |
SETREV | DISPLAY+12 |
SORT | DISPLAY+7 |
Name | Field # of Occurrence |
---|---|
^(2 | DISPLAY+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALERTID | ACTION~, ACTION+1, GETACT~, GETACT+14 |
DIR | DISPLAY+6~, DISPLAY+22! |
DIR(0 | DISPLAY+6* |
DUZ | DISPLAY+3, DISPLAY+5, D+2, DOIT+2, USER+1 |
FMDAT | DAT8~, DAT8+2, DAT8+3* |
FRSTDATE | USER~, USER+3, PATIENT~, PATIENT+2 |
I | SETUP1+1~*, SETUP1+2 |
IOST(0 | SETREV+3, SETREV+4, SETREV+5 |
LASTDATE | USER~, USER+3, PATIENT~, PATIENT+2 |
PATIENT | PATIENT~, PATIENT+1, PATIENT+2 |
ROOT | USER~, USER+3, PATIENT~, PATIENT+2 |
TFLG | DAT8~, DAT8+3 |
U | DISPLAY+8, DISPLAY+10, DISPLAY+13, DISPLAY+14, DISPLAY+15, DISPLAY+17, DISPLAY+18, GETACT+15, GETACT+16, GETACT+17 , GETACT+18 |
X | DISPLAY+6~, DISPLAY+8*, DISPLAY+10, DISPLAY+13*, DISPLAY+15, DISPLAY+17, DAT8+1~, DAT8+2*, DAT8+3*, DAT8+4 |
X1 | DISPLAY+2~, DISPLAY+13*, DISPLAY+14, DISPLAY+15* |
X2 | DISPLAY+2~, DISPLAY+14*, DISPLAY+16 |
XQ1OFF | DISPLAY+6~, DISPLAY+12, SETREV+3*, SETREV+5* |
XQ1OFF1 | SETREV+2~, SETREV+5* |
XQ1ON | DISPLAY+6~, DISPLAY+12, SETREV+3*, SETREV+4* |
XQ1ON1 | SETREV+2~, SETREV+4* |
XQA | DISPLAY+6~, DISPLAY+17*, DISPLAY+22!, D+2 |
XQACNT | DISPLAY+2~, DISPLAY+7*, SORT+5, SORT+7*, SORT+9, SORT+11 |
>> XQADATA | GETACT+16* |
XQAGETAC | GETACT+12~, GETACT+13* |
>> XQAID | GETACT+15* |
XQALAST | DOIT+1~ |
XQALFWD | DOIT+1~ |
>> XQAOPT | GETACT+18* |
>> XQAROU | GETACT+17* |
XQAUSER | DISPLAY+3*, DISPLAY+4, DISPLAY+8, DISPLAY+10, DISPLAY+13, DISPLAY+17, SORT+3, SORT+5, SORT+6, DOIT+1~ , DOIT+2*, USER~, USER+1*, USER+2, USER+3 |
XQI | DISPLAY+6~, DISPLAY+8*, DISPLAY+13, DISPLAY+17, DISPLAY+22!, SORT+2~, SORT+5*, SORT+6, SORT+12 |
XQJ | DISPLAY+2~, DISPLAY+8*, SORT+2~, SORT+9*, SORT+11*, SORT+12 |
XQOFF | DISPLAY+6~, DISPLAY+11*, DISPLAY+12*, DISPLAY+13 |
XQON | DISPLAY+6~, DISPLAY+11*, DISPLAY+12*, DISPLAY+13 |
XQX | DISPLAY+6~*, DISPLAY+8*, DISPLAY+17*, DISPLAY+20, DISPLAY+22!, SORT+2~, SORT+6*, SORT+8, GETACT+12~, GETACT+13* , GETACT+15, GETACT+16, GETACT+17, GETACT+18 |
XQX1 | DISPLAY+6~*, DISPLAY+8, DISPLAY+13*, DISPLAY+20, DISPLAY+21, DISPLAY+22! |
XQXDAT | DISPLAY+6~, DISPLAY+10*, DISPLAY+18 |
XQXX | DISPLAY+9~, DISPLAY+10*, DISPLAY+18, DISPLAY+19! |
XQXXX | DISPLAY+9~, DISPLAY+10*, DISPLAY+12, DISPLAY+13 |
XQXY | DISPLAY+9~, DISPLAY+10*, DISPLAY+18, DISPLAY+19! |
XQZ | GETACT+12~, GETACT+13*, GETACT+16 |
Y | DISPLAY+6~*, DISPLAY+8, DISPLAY+22! |