XQALSUR1 ;ISC-SF.SEA/JLI - SURROGATES FOR ALERTS ; Jul 13, 2021@11:01
Source file <XQALSUR1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| RETURN(XQAUSER) | ; P366 - return alerts to the user
 | 
|
| PUSHBACK(XQAUSER,XQASTRT,XQAEND) | ; P366 - identify alerts in alert tracking file for return and return them
 | 
|
| SUROLIST(XQAUSER,XQALIST) | ; returns for XQAUSER a list of current and/or future surrogates in XQALIST
 ; usage D SUROLIST^XQALSUR1(DUZ,.XQALIST)  | 
|
| DCYCLIC(XQALSURO,XQAUSER,XQALSTRT,XQALEND) | ; code added to prevent cyclical surrogates - use dates for surrogacy
 | 
|
| DCYCLIC2(XQALSURO,XQAUSER,XQALSTRT,XQALEND) | ; p754 uses overlapped dates for surrogacy
 ; XQALSURO is intended surrogate for XQAUSER but cannot be the same ; returns last actual surrogate (good) or the error string (cyclic)  | 
|
| OVERLAP(STR1,END1,STR2,END2) | ; returns time intersection (overlap) p754
 ; STR1---------END1 ; STR2----------END2 ; STR END  | 
|
| DATESURO(XQAUSER,XQALSTRT,XQALEND) | ; returns surrogate(s) for XQAUSER in date range XQALSTRT to XQALEND, may be multiple values ^-separated
 | 
|
| SURRO1(XQAUSER) | ;
 | 
|
| SURRO11 | ;
 | 
|
| REMVSURO(XQAUSER,XQALSURO,XQALSTRT) | ; SR - ends the currently active surrogate relationship
 | 
|
| DELETENT(XQAUSER,XQALXREF,XQALSURO,XQALSTRT,XQALSUR1,XQALSTR1,XQALEND) | ;
 | 
|
| NEWDLG() | ; new surrogate dialog
 | 
|
| STRTDLG() | ; new surrogate start date/time dialog
 | 
|
| ENDDLG() | ; new surrogate end date/time dialog
 | 
|
| ASKDIR(DIR) | ;
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |