XQALSET ;ISC-SF.SEA/JLI - SETUP ALERTS ;4/10/07 14:06
Source file <XQALSET.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SETTRACK | ; Setup entry in Alert Tracking file
; Note: if there are error messages or we can't create an entry for some reason, it simply returns and continues |
|
SNDNACTV(XQAID) | ; Determine if we go ahead and send alerts addressed only to inactive users to backup reviewers
|
|
CHEKUSER(XQAUSER) | ; .SR Returns 0 if no valid user or surrogate, otherwise returns IEN of user or surrogate
|
|
SETUP | ;
|
|
SETUP1() | ; .SR Returns a string beginning with 1 if successful, 0 if not successful, the second piece is the IEN in the Alert Tracking File and the third piece is the value of XQAID.
; If not successful XQALERR is defined and contains reason for failure. |
|
SETIEN(XQA1,XQI) | ; determine unique XQAID value for alert
|
|
WRAP | ;
|
|
LOOP2 | ; RE-ENTRY FOR FORWARDING IF ALL RECIPIENTS ARE UNDELIVERABLE
|
|
LOOP1 | ||
NOW | ||
REENT() | ; Entry for forwarding, etc.
|
|
REP | ||
LOOP | ;
|
Name | Field # of Occurrence |
---|---|
$$FIND1^DIC | WRAP+19, WRAP+22, WRAP+33 |
FILE^DIE | SETTRACK+23 |
UPDATE^DIE | LOOP+11, WRAP+23, WRAP+34, WRAP+39, SETTRACK+8 |
WP^DIE | REP+2, SETTRACK+24 |
$$GET1^DIQ | SNDNACTV+2 |
$$FMADD^XLFDT | SETTRACK+14 |
$$FMDIFF^XLFDT | SNDNACTV+2 |
$$NOW^XLFDT | NOW, REENT+3 |
GETBKUP^XQALDEL | WRAP+4 |
$$CHEKUSER^XQALSET1 | CHEKUSER+1 |
CHEKACTV^XQALSET1 | WRAP+5 |
GROUP^XQALSET1 | LOOP1, WRAP+6, WRAP+7, WRAP+8 |
$$ACTVSURO^XQALSURO | LOOP2+4 |
$$ACTIVE^XUSER | LOOP+3 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("DIERR" | LOOP+7, LOOP+8!, SETTRACK+5, SETTRACK+6! |
^TMP("XQAGROUP" | REENT+2!, WRAP+45! |
^TMP($J | LOOP+9, WRAP+20, WRAP+23, WRAP+34, SETTRACK+7 |
^XTV(8992 - [#8992] | LOOP+5, LOOP+14, REP, REP+1*, REP+3, REP+4*, WRAP+44!, SETIEN+2, SETIEN+3, SETIEN+4* |
^XTV(8992.1 - [#8992.1] | WRAP+16 |
Name | Line Occurrences |
---|---|
$$REENT | NOW+3 |
$$SETIEN | NOW+2 |
$$SETUP1 | SETUP+1 |
$$SNDNACTV | WRAP+2 |
LOOP | LOOP+3, REP+6 |
LOOP1 | LOOP1 |
LOOP2 | WRAP+3 |
REP | REP |
SETTRACK | WRAP+14 |
WRAP | LOOP+1 |
Name | Field # of Occurrence |
---|---|
^( | SETTRACK+13* |
^(0 | LOOP+5*, LOOP+14*, REP+1* |
^(1 | REP+1* |
^(1.01 | SETTRACK+13* |
^(2 | REP+1* |
^(3 | REP+1* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | SETUP1+5~, SETTRACK+12* |
DIERR | LOOP+7, LOOP+8!, SETTRACK+2~, SETTRACK+5, SETTRACK+6!, SETTRACK+11 |
DT | SNDNACTV+2, SETTRACK+14 |
DUZ | SETIEN+2, SETTRACK+13 |
FDA | LOOP+6~, LOOP+9*, LOOP+11, WRAP+20*, WRAP+25, WRAP+27, WRAP+29, WRAP+30, WRAP+36, WRAP+37 , WRAP+39, SETTRACK+2~, SETTRACK+7*, SETTRACK+8, SETTRACK+9, SETTRACK+13, SETTRACK+14, SETTRACK+15, SETTRACK+16, SETTRACK+17 , SETTRACK+18, SETTRACK+19, SETTRACK+20, SETTRACK+21, SETTRACK+22, SETTRACK+23 |
FDA1 | WRAP+23~*, WRAP+34~* |
I | SETUP+1~*, LOOP2+1* |
IENROOT | WRAP+23~, WRAP+34~ |
IENROOT(1 | WRAP+23, WRAP+34 |
IENS | LOOP+6~, SETTRACK+2~, SETTRACK+13*, SETTRACK+14, SETTRACK+15, SETTRACK+16, SETTRACK+17, SETTRACK+18, SETTRACK+19, SETTRACK+20 , SETTRACK+21, SETTRACK+22, SETTRACK+24 |
IENS(1 | LOOP+10*, SETTRACK+12, SETTRACK+13 |
IENSTR | WRAP+39~ |
IENVAL | WRAP+18~, WRAP+19*, WRAP+20, WRAP+21*, WRAP+25, WRAP+27, WRAP+29, WRAP+30, WRAP+36, WRAP+37 |
KCNT | WRAP+18~, WRAP+19*, WRAP+20*, WRAP+21 |
NCOUNT | WRAP+18~, WRAP+21*, WRAP+25*, WRAP+27, WRAP+29, WRAP+30*, WRAP+36*, WRAP+37 |
RETVAL | REENT+1~*, WRAP+2*, WRAP+9*, WRAP+14, WRAP+16, WRAP+43*, WRAP+47 |
SUBSCRPN | WRAP+18~, WRAP+22*, WRAP+23*, WRAP+25, WRAP+33*, WRAP+34*, WRAP+36 |
SUBSCRPT | WRAP+18~, WRAP+21*, WRAP+22, WRAP+23, WRAP+32*, WRAP+33, WRAP+34 |
U | SETUP1+7, REENT+4, REENT+5, REENT+6, REP+1, WRAP+43, SETTRACK+18 |
X | SETUP1+5~, LOOP2+4~*, LOOP2+5, LOOP2+6, LOOP2+7, LOOP2+8, SETTRACK+14* |
XQA | LOOP2+1, WRAP+3, WRAP+5, WRAP+6, WRAP+7, WRAP+8, WRAP+9, WRAP+46! |
XQA( | LOOP1!, LOOP2+3, LOOP2+5*!, LOOP+1, LOOP+3!, REP+4!, WRAP+4* |
XQA(" " | LOOP1 |
XQA(0 | SETUP1+3 |
XQA1 | NOW+1*, NOW+2, REP+4, WRAP+46!, SETIEN~, SETIEN+2*, SETTRACK+4, SETTRACK+15 |
XQA2 | SETTRACK+2~, SETTRACK+4*, SETTRACK+13 |
XQAA | WRAP+4~ |
XQAA( | WRAP+4 |
XQAARCH | WRAP+46!, SETTRACK+14 |
XQACNDEL | REENT+5, WRAP+46! |
XQACOMNT | SETUP1+5~, REP+1, WRAP+3*, WRAP+36 |
XQACTMSG | REENT+4, WRAP+46!, SETTRACK+19 |
XQADA | SETUP1+5~, NOW+2*, WRAP+14, WRAP+16, WRAP+19, WRAP+43, SETTRACK+3*, SETTRACK+12* |
XQADATA | REENT+7, WRAP+46!, SETTRACK+20 |
XQADATIM | REENT+3~*, WRAP+25, WRAP+30, WRAP+36 |
>> XQADFN | REP+1, SETTRACK+22 |
XQAFLG | WRAP+46! |
>> XQAGUID | REP+1, SETTRACK+21 |
XQAID | NOW+1*, NOW+2*, REENT+4, REP+4, WRAP+2, WRAP+14, WRAP+43, WRAP+44, WRAP+46!, SNDNACTV~ , SNDNACTV+2, SETIEN+1~, SETIEN+2*, SETIEN+3, SETIEN+4, SETIEN+6, SETTRACK+8 |
XQALERR | SETUP+1!, SETUP1+2!, SETUP1+3*, SETUP1+4*, WRAP+2*, WRAP+9* |
XQALIN | REENT+6*, REP+1, WRAP+46! |
XQALIN1 | REENT+4*, REENT+5*, REENT+6, REENT+7!*, REP+1, WRAP+46! |
XQALIST | REENT+3~, LOOP2+1*, WRAP+1, WRAP+3! |
XQALIST( | LOOP2+1*, LOOP2+6*, LOOP2+7*, LOOP2+8*, LOOP+3!*, WRAP+4 |
XQALIST1 | REENT+3~, WRAP+1* |
XQALIST1( | WRAP+17, WRAP+21, WRAP+27, WRAP+28, WRAP+30, WRAP+32 |
XQALTYPE | SETUP1+5~, SETUP1+6*, LOOP2+1, WRAP+4*, WRAP+6*, WRAP+7*, WRAP+8* |
XQAMSG | SETUP1+4, REENT+4, WRAP+46!, SETTRACK+13 |
XQAOPT | SETUP1+7, WRAP+46!, SETTRACK+17 |
XQAOPT1 | SETUP1+7*, REENT+4, WRAP+46! |
XQARESET | SETUP1+5~, REP+1, WRAP+3* |
XQAREVUE | REENT+5, WRAP+46! |
XQAROU | SETUP1+7, WRAP+46!, SETTRACK+18 |
XQASUPV | REENT+5, WRAP+46! |
XQASURO | REENT+5, WRAP+46! |
XQATEXT | REP+2, WRAP+46!, SETTRACK+24 |
XQATEXT( | REP+2* |
XQAUSER | LOOP2+1~*, REP+1, WRAP+37, CHEKUSER~, CHEKUSER+1 |
XQAXX | SETTRACK+18~* |
XQI | SETUP1+5~, NOW+1*, WRAP+4*, WRAP+46!, SETIEN~, SETIEN+2*, SETIEN+4* |
XQJ | SETUP1+5~, REENT+6*, LOOP1*, LOOP2+3*, LOOP2+4, LOOP2+5, LOOP2+6, LOOP2+7, LOOP2+8, LOOP2+12* , LOOP+1*, LOOP+3, LOOP+5, LOOP+9, LOOP+10, LOOP+14, REP, REP+1, REP+2, REP+3 , REP+4, WRAP+4~*, WRAP+6*, WRAP+7*, WRAP+8*, WRAP+17*, WRAP+19, WRAP+20, WRAP+21, WRAP+27 , WRAP+28, WRAP+30, WRAP+32, WRAP+46! |
XQK | SETUP1+5~, WRAP+30~*, WRAP+46! |
XQNRECIP | REENT+3~*, REP+5*, WRAP+2, WRAP+3* |
XQX | SETUP1+5~, NOW*, NOW+1, NOW+2, REENT+6, LOOP+14, REP+1, WRAP+46!, SETTRACK+13 |
XQXI | LOOP+14*, REP*, REP+1, REP+2, REP+4, WRAP+46! |
XVAL | SNDNACTV+1~, SNDNACTV+2* |
XX | LOOP+3~* |
>> ZTQUEUED | SETTRACK+16 |