Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: XQALSET

Package: Kernel

Routine: XQALSET


Information

XQALSET ;ISC-SF.SEA/JLI - SETUP ALERTS ;10/19/18 14:06

Source Information

Source file <XQALSET.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 5 ($$FMADD,$$FMDIFF,$$NOW)^XLFDT  GETBKUP^XQALDEL  ($$CHEKUSER,CHEKACTV,GROUP)^XQALSET1  $$ACTVSURO^XQALSURO  $$ACTIVE^XUSER  
VA FileMan 3 $$FIND1^DIC  (FILE,UPDATE,WP)^DIE  $$GET1^DIQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 XQALERT  XQALFWD  

Entry Points

Name Comments DBIA/ICR reference
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.
NOW
REENT() ; Entry for forwarding, etc.
LOOP1
LOOP2 ; RE-ENTRY FOR FORWARDING IF ALL RECIPIENTS ARE UNDELIVERABLE
LOOP ;
REP
WRAP ;
SNDNACTV(XQAID) ; Determine if we go ahead and send alerts addressed only to inactive users to backup reviewers
SETIEN(XQA1,XQI) ; determine unique XQAID value for alert
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
CHEKUSER(XQAUSER) ; .SR Returns 0 if no valid user or surrogate, otherwise returns IEN of user or surrogate

External References

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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*

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All