XMUPIN ;ISC-SF/GMB-IN Basket Purge ;04/11/2002 08:33
Source file <XMUPIN.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INIT(XMDUZ,XMTEST,XMDDAYS,XMIDAYS,XMKALL,XMABORT) | ;
|
|
BASKET(XMTEST,XMK,XMKN,XMIDATE,XMDDATE,XMLEN,XMHDR,XMI) | ; Process Basket
|
|
ENTER | ;
; XMIDAYS If msg hasn't been read for this many days, flag for deletion ; XMDDAYS If flagged msg hasn't been read after this many days, delete it |
|
TEST | ;
|
|
PROCESS(XMTEST,XMDDAYS,XMIDAYS,XMKALL,XMEXEMPT) | ;
; XMDDATE Deletion date for inactive messages (FM format) ; XMDDATEX Deletion date for inactive messages (external format) ; XMIDATE Date beyond which message has had no activity (and thus ; becomes candidate for deletion). ; XMKALL 1=all baskets; 0=IN basket only ; XMEXEMPT Users exempt from purge (":duz1:duz2:...:duzn:") |
|
SENDMSG(XMTEST,XMKALL,XMIDAYS,XMDDATEX,XMTO) | ; Send a message to the user
|
Name | Field # of Occurrence |
---|---|
$$EZBLD^DIALOG | INIT+1, INIT+37, PROCESS+14, PROCESS+15, PROCESS+28, BASKET+19 |
BLD^DIALOG | INIT+33, INIT+36, INIT+41 |
MSG^DIALOG | INIT+34, INIT+42 |
DT^DICRW | INIT+3 |
FILE^DIE | BASKET+15 |
^DIR | INIT+39 |
$$FMADD^XLFDT | PROCESS+17, PROCESS+19 |
$$LJ^XLFSTR | PROCESS+14, PROCESS+15, BASKET+23, BASKET+24 |
$$REPEAT^XLFSTR | PROCESS+16 |
TASKBULL^XMXBULL | SENDMSG+6 |
$$NAME^XMXUTIL | BASKET+24 |
$$CONVERT^XMXUTIL1 | BASKET+9 |
$$MMDT^XMXUTIL1 | PROCESS+10, PROCESS+18, BASKET+23, BASKET+24 |
$$SUBJ^XMXUTIL2 | BASKET+23 |
H^XUS | INIT+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP("XM" | PROCESS+21!, PROCESS+29, PROCESS+31!, BASKET+18*, BASKET+19*, BASKET+20*, BASKET+21*, BASKET+22*, BASKET+25* |
^XMB(1 - [#4.3] | INIT+6, INIT+8 |
^XMB(3.7 - [#3.7] | PROCESS+22, PROCESS+27, BASKET+3 |
^XMB(3.9 - [#3.9] | PROCESS+9, BASKET+7 |
Name | Line Occurrences |
---|---|
BASKET | PROCESS+27, PROCESS+28 |
INIT | ENTER+4, TEST+3 |
PROCESS | ENTER+5, TEST+4 |
SENDMSG | PROCESS+30 |
Name | Field # of Occurrence |
---|---|
^( | PROCESS+27, BASKET+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIR | INIT+10~ |
DIR("??" | INIT+38* |
DIR("B" | INIT+37* |
DIR(0 | INIT+37* |
DIRUT | INIT+10~ |
DT | PROCESS+10, PROCESS+17, PROCESS+19 |
DUZ | INIT+1 |
U | INIT+6, INIT+8, PROCESS+27, BASKET+6, BASKET+8, BASKET+10, BASKET+24 |
XMABORT | ENTER+3~, ENTER+4, TEST+1~, TEST+3, INIT~, INIT+5*, INIT+39* |
XMBULL | SENDMSG+1~, SENDMSG+5*, SENDMSG+6 |
XMDDATE | PROCESS+7~, PROCESS+17*, PROCESS+18, PROCESS+27, PROCESS+28, BASKET~, BASKET+13 |
XMDDATEX | PROCESS+7~, PROCESS+18*, PROCESS+30, SENDMSG~, SENDMSG+4 |
XMDDAYS | ENTER+3~, ENTER+4, ENTER+5, TEST+1~, TEST+3, TEST+4, INIT~, INIT+5*, INIT+12, INIT+41 , PROCESS~ |
XMDUZ | ENTER+4, TEST+3, INIT~, INIT+2* |
XMEXEMPT | ENTER+3~, ENTER+5, TEST+1~, TEST+4, PROCESS~, PROCESS+23 |
XMFDA | BASKET+1~ |
XMFDA( | BASKET+13*, BASKET+14* |
XMFIRST | BASKET+1~, BASKET+2*, BASKET+16, BASKET+17* |
XMHDR | PROCESS+7~, PROCESS+27, PROCESS+28, BASKET~ |
XMHDR(1 | PROCESS+14*, PROCESS+15*, BASKET+21 |
XMHDR(2 | PROCESS+16*, BASKET+22 |
XMI | PROCESS+7~, PROCESS+24*, PROCESS+27, PROCESS+28, BASKET~, BASKET+18*, BASKET+19*, BASKET+20*, BASKET+21*, BASKET+22* , BASKET+25* |
XMIDATE | PROCESS+7~, PROCESS+19*, PROCESS+27, PROCESS+28, BASKET~, BASKET+6, BASKET+10 |
XMIDAYS | ENTER+3~, ENTER+4, ENTER+5, TEST+1~, TEST+3, TEST+4, INIT~, INIT+6*, INIT+7*, INIT+12 , PROCESS~, PROCESS+19, PROCESS+30, SENDMSG~, SENDMSG+4 |
XMIENS | BASKET+1~, BASKET+12*, BASKET+13, BASKET+14 |
XMINSTR | SENDMSG+1~, SENDMSG+6 |
XMINSTR("FLAGS" | SENDMSG+2* |
XMINSTR("FROM" | SENDMSG+3* |
XMIREC | BASKET+1~, BASKET+23*, BASKET+24*, BASKET+25 |
XMK | PROCESS+7~, PROCESS+26*, PROCESS+27*, BASKET~, BASKET+3, BASKET+12 |
XMKALL | ENTER+3~, ENTER+4, ENTER+5, TEST+1~, TEST+3, TEST+4, INIT~, INIT+8*, INIT+41, PROCESS~ , PROCESS+25, PROCESS+30, SENDMSG~ |
XMKN | BASKET~, BASKET+19 |
XMLEFT | PROCESS+7~, PROCESS+8*, PROCESS+11*, PROCESS+12, PROCESS+13 |
XMLEN | PROCESS+7~, PROCESS+27, PROCESS+28, BASKET~ |
XMLEN("DATE" | PROCESS+10*, PROCESS+11, PROCESS+14, PROCESS+16, BASKET+23 |
XMLEN("FROM" | PROCESS+13*, PROCESS+15, PROCESS+16, BASKET+24 |
XMLEN("SUBJ" | PROCESS+12*, PROCESS+13, PROCESS+14, PROCESS+16, BASKET+23 |
XMLEN("XMZ" | PROCESS+9*, PROCESS+11, PROCESS+14, PROCESS+16, BASKET+23 |
XMPARM | INIT+10~, INIT+33, SENDMSG+1~, SENDMSG+6 |
XMPARM(1 | INIT+12*, SENDMSG+4* |
XMPARM(2 | INIT+12*, SENDMSG+4* |
XMREC | BASKET+1~, BASKET+3*, BASKET+6, BASKET+10, BASKET+24 |
XMTEST | ENTER+3~, ENTER+4, ENTER+5, TEST+1~, TEST+2*, TEST+3, TEST+4, INIT~, INIT+4*, PROCESS~ , PROCESS+27, PROCESS+28, PROCESS+30, BASKET~, BASKET+11, SENDMSG~, SENDMSG+5 |
XMTO | SENDMSG~, SENDMSG+6 |
XMUSER | PROCESS+7~, PROCESS+20*, PROCESS+22*, PROCESS+23, PROCESS+27, PROCESS+30, BASKET+3, BASKET+12 |
XMZ | BASKET+1~, BASKET+2*, BASKET+3*, BASKET+7, BASKET+12, BASKET+23 |
XMZDATE | BASKET+1~, BASKET+8*, BASKET+9*, BASKET+10, BASKET+23 |
XMZREC | BASKET+1~, BASKET+7*, BASKET+8, BASKET+23, BASKET+24 |
Y | INIT+10~, INIT+39 |
>> ZTQUEUED | INIT+9 |