XMXTO ;ISC-SF/GMB-Address a msg ;08/08/2000 14:38
Source file <XMXTO.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ITOWHOM(XMDUZ,XMZ,XMTYPE,XMINSTR) | ; Interactive
; XMDUZ DUZ of who is sending or forwarding the message ; XMZ The message number ; (need not be supplied if XMTYPE="S" and ; XMINSTR("ADDR FLAGS")["R") ; XMTYPE S='Send to:' ; F='Forward to:' ; XMINSTR("SELF BSKT") Basket to deliver to if sender is recipient ; XMINSTR("SHARE DATE") Delete date if recipient is "SHARED,MAIL" ; XMINSTR("SHARE BSKT") Basket if recipient is "SHARED,MAIL" ; XMINSTR("TO PROMPT") Initial prompt to whom to send the message (default=XMDUZ) ; XMINSTR("FLAGS") Any or all or none of the following: ; (Necessary only if XMTYPE="S" and XMINSTR("ADDR FLAGS")["R") ; X Closed msg (may not be forwarded) ; C Confidential msg (surrogates may not read) ; XMINSTR("ADDR FLAGS") Any or all of the following: ; I Do not Initialize (kill) the ^TMP addressee global ; R Do not Restrict addressees |
|
TOWHOM(XMDUZ,XMZ,XMTYPE,XMTO,XMINSTR,XMFULL) | ; Silent
; XMDUZ (in) DUZ of who is sending or forwarding the message ; XMZ (in) The message number ; (need not be supplied if XMTYPE="S" and ; XMINSTR("ADDR FLAGS")["R") ; XMTYPE (in) S='Send to:' ; F='Forward to:' ; XMTO (in) ONE addressee ; XMINSTR("SELF BSKT") (in) Basket to deliver to if sender is recipient ; XMINSTR("SHARE DATE") (in) Delete date if recipient is "SHARED,MAIL" ; XMINSTR("SHARE BSKT") (in) Basket if recipient is "SHARED,MAIL" ; XMINSTR("FLAGS") (in) Any or all or none of the following: ; (Necessary only if XMTYPE="S" and XMINSTR("ADDR FLAGS")["R") ; X Closed msg (may not be forwarded) ; C Confidential msg (surrogates may not read) ; XMINSTR("ADDR FLAGS") Any or all of the following: ; I Do not Initialize (kill) the ^TMP addressee global ; R Do not Restrict addressees ; XMFULL (out) the full address |
|
INIT(XMDUZ,XMZ,XMTYPE,XMINSTR,XMRESTR,XMPROMPT) | ;
|