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 |