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* |