XMXGRP1 ;ISC-SF/GMB-Group creation/enrollment (cont.) ;04/17/2002 14:10
Source file <XMXGRP1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FAFMSGS(XMDUZ,XMGRP,XMTO,XMINSTR,ZTSK) | ; Create task to find and forward messages
; The following line can be deleted once we enable "A": |
|
| PROCESS | ;
|
|
| NOTIFY(XMG,XMNEWMBR) | ; If the group is restricted in any way,
; notify the organizer & coordinator of the new members. |
|
| SAVFWD(XMX) | ;
|
|
| INIT | ;
|
|
| CHKADD(XMX) | ;
|
|
| FAFTSK | ; Find and add/forward messages
|
|
| ADD(XMDUZ,XMZ,XMX) | ; Add user(s) to message.
; XMX("FWDBY") |
|
| FWD(XMDUZ,XMZ,XMX) | ; Forward the message to the user
|
|
| ADDFWD(XMDUZ,XMGROUP,XMWHAT,XMFDATE,XMTDATE,XMX) | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | FAFMSGS+7 |
| $$S^%ZTLOAD | ADDFWD+5 |
| $$EZBLD^DIALOG | FAFMSGS+4, INIT+3, CHKADD+1 |
| UPDATE^DIE | ADD+12 |
| $$NOW^XLFDT | CHKADD+1 |
| FWD^XMKP | FWD+12 |
| NEW^XMKP | ADD+8 |
| INITAPI^XMVVITAE | INIT+7 |
| $$GOTADDR^XMXADDR | INIT+10 |
| CHKADDR^XMXADDR | INIT+9 |
| CLEANUP^XMXADDR | FAFTSK+5 |
| INIT^XMXADDR | INIT+8 |
| TASKBULL^XMXBULL | NOTIFY+13 |
| $$ZCLOSED^XMXSEC | ADDFWD+7 |
| $$NAME^XMXUTIL | NOTIFY+9, NOTIFY+12 |
| $$MMDT^XMXUTIL1 | CHKADD+1 |
| $$ZPRI^XMXUTIL2 | ADD+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("XM" | FAFTSK+6!, PROCESS+6, PROCESS+9, SAVFWD+2*, FWD+5 |
| ^TMP("XMY" | PROCESS+4, PROCESS+6*, PROCESS+9*, PROCESS+10, PROCESS+16, SAVFWD+2, SAVFWD+3, SAVFWD+4, CHKADD+3, FWD+4 , FWD+5*, FWD+8, FWD+10!, ADD+6, ADD+8 |
| ^XMB(3.8 - [#3.8] | INIT+11, INIT+15, NOTIFY+3, NOTIFY+5, NOTIFY+12 |
| ^XMB(3.9 - [#3.9] | INIT+4, ADDFWD+4, ADDFWD+6, ADDFWD+9, FWD+3, FWD+9, ADD+7 |
| Name | Line Occurrences |
|---|---|
| ADD | ADDFWD+12 |
| ADDFWD | PROCESS+5, PROCESS+7, PROCESS+11, PROCESS+14, PROCESS+17 |
| CHKADD | PROCESS+4, PROCESS+10, PROCESS+16 |
| FWD | ADDFWD+11 |
| INIT | FAFTSK+3 |
| PROCESS | FAFTSK+4 |
| SAVFWD | PROCESS+2, PROCESS+13 |
| Name | Field # of Occurrence |
|---|---|
| ^( | CHKADD+3! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DT | PROCESS+8, PROCESS+11, INIT+6 |
| DUZ | CHKADD+1, NOTIFY+7, NOTIFY+12, NOTIFY+13 |
| I | FAFMSGS+3~, FAFMSGS+6*, NOTIFY+2~, NOTIFY+5*, NOTIFY+6*, NOTIFY+9*, NOTIFY+10* |
| J | NOTIFY+8~, NOTIFY+10* |
| U | INIT+15, ADDFWD+9, NOTIFY+4, NOTIFY+5, NOTIFY+6, NOTIFY+12 |
| XMABORT | FAFTSK+1~, FAFTSK+2*, FAFTSK+3, INIT+10* |
| XMCRE8 | ADDFWD+1~, ADDFWD+3*, ADDFWD+4*, ADDFWD+6 |
| XMDUZ | FAFMSGS~, PROCESS+5, PROCESS+7, PROCESS+11, PROCESS+14, PROCESS+17, INIT+9, CHKADD+1, ADDFWD~, ADDFWD+11 , ADDFWD+12, FWD~, FWD+12, ADD~, ADD+10 |
| XMFDA | ADD+2~, ADD+8 |
| XMFDA( | ADD+9*, ADD+10* |
| XMFDATE | FAFTSK+1~, PROCESS+3, PROCESS+5, PROCESS+7, PROCESS+14, PROCESS+17, INIT+5*, ADDFWD~, ADDFWD+3 |
| XMFIRST | FAFTSK+1~, PROCESS+3, PROCESS+5, INIT+4*, INIT+5 |
| XMG | NOTIFY~, NOTIFY+3, NOTIFY+5, NOTIFY+12 |
| XMGN | INIT+1~, INIT+12*, INIT+13*, INIT+14, INIT+15, ADDFWD+1~, ADDFWD+8*, ADDFWD+9*, ADDFWD+10 |
| XMGROUP | FAFTSK+1~, PROCESS+5, PROCESS+7, PROCESS+11, PROCESS+14, PROCESS+17, ADDFWD~ |
| XMGROUP( | ADDFWD+9 |
| XMGROUP("G." | INIT+15* |
| XMGRP | FAFMSGS~, INIT+11, INIT+16! |
| XMGRP( | INIT+11*, INIT+13, INIT+14 |
| XMI | INIT+1~, INIT+14*, INIT+15, CHKADD+2*, CHKADD+3*, FWD+6~, FWD+7*, FWD+8*, FWD+9, FWD+10 , ADD+2~, ADD+5*, ADD+6*, ADD+7, ADD+8 |
| XMIENS | ADD+2~, ADD+8, ADD+9, ADD+10 |
| XMINSTR | FAFMSGS~, FWD+1~, FWD+12, NOTIFY+8~, NOTIFY+13 |
| XMINSTR("FDATE" | INIT+5 |
| XMINSTR("FLAGS" | FAFMSGS+2*, PROCESS+1, PROCESS+12, PROCESS+15 |
| XMINSTR("FROM" | NOTIFY+11* |
| XMINSTR("SELF | BSKT" , INIT+17, FWD+2* |
| XMINSTR("TDATE" | INIT+6 |
| XMNAME | NOTIFY+8~ |
| XMNAME( | NOTIFY+9*, NOTIFY+10 |
| XMNEWMBR | NOTIFY~ |
| XMNEWMBR( | NOTIFY+9 |
| XMPARM | NOTIFY+8~, NOTIFY+13 |
| XMPARM(1 | NOTIFY+12* |
| XMPARM(2 | NOTIFY+12* |
| XMPRI | ADD+2~, ADD+3*, ADD+8 |
| XMPRIVAT | INIT+1~, INIT+3*, INIT+15 |
| XMREC | NOTIFY+2~, NOTIFY+3*, NOTIFY+4, NOTIFY+6 |
| XMTDATE | FAFTSK+1~, PROCESS+7, PROCESS+8, PROCESS+11, PROCESS+14, PROCESS+17, INIT+6*, ADDFWD~, ADDFWD+4 |
| XMTEXT | NOTIFY+8~ |
| XMTEXT( | NOTIFY+10* |
| XMTO | FAFMSGS~, INIT+9, NOTIFY+2~, NOTIFY+13 |
| XMTO( | NOTIFY+5*, NOTIFY+6*, NOTIFY+7 |
| >> XMV("DUZ NAME | " , CHKADD+1 |
| >> XMV("NAME" | CHKADD+1 |
| XMWHAT | ADDFWD~, ADDFWD+11 |
| XMX | FAFTSK+1~, PROCESS+2, PROCESS+4, PROCESS+5, PROCESS+7, PROCESS+10, PROCESS+11, PROCESS+13, PROCESS+14, PROCESS+16 , PROCESS+17, SAVFWD~, CHKADD~, ADDFWD~, ADDFWD+11, ADDFWD+12, FWD~, ADD~ |
| XMX("FWDBY" | CHKADD+1*, ADD+9 |
| XMX("ONE" | SAVFWD+3*, SAVFWD+4*, FWD+3, FWD+4 |
| XMX("RESTORE" | PROCESS+9*, SAVFWD+1*, FWD+5*, FWD+11* |
| XMX("SELF BSK | T" , INIT+17*, FWD+2 |
| XMZ | ADDFWD+1~, ADDFWD+2*, ADDFWD+6*, ADDFWD+7, ADDFWD+9, ADDFWD+11, ADDFWD+12, FWD~, FWD+3, FWD+9 , FWD+12, ADD~, ADD+3, ADD+7, ADD+8 |
| ZTDESC | FAFMSGS+3~, FAFMSGS+4* |
| ZTDTH | FAFMSGS+3~, FAFMSGS+5* |
| ZTIO | FAFMSGS+3~, FAFMSGS+5* |
| >> ZTREQ | INIT+2* |
| ZTRTN | FAFMSGS+3~, FAFMSGS+5* |
| ZTSAVE | FAFMSGS+3~ |
| ZTSAVE( | FAFMSGS+6* |
| ZTSK | FAFMSGS~ |
| >> ZTSTOP | ADDFWD+4, ADDFWD+5* |