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! |