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 |