©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
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) | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("XMERR" | ITOWHOM+19!, TOWHOM+20! |
| ^XMB(3.9 - [#3.9] | INIT+6 |
| Name | Line Occurrences |
|---|---|
| INIT | ITOWHOM+20, TOWHOM+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| XMABORT | ITOWHOM+18~, ITOWHOM+21*, ITOWHOM+22, ITOWHOM+23, ITOWHOM+24 |
| XMDUZ | ITOWHOM~, ITOWHOM+20, ITOWHOM+22, TOWHOM~, TOWHOM+21, TOWHOM+22, INIT~, INIT+3, INIT+8, INIT+9 |
| XMERR | ITOWHOM+19!, ITOWHOM+20, TOWHOM+20!, TOWHOM+21 |
| XMFULL | TOWHOM~, TOWHOM+22 |
| XMINSTR | ITOWHOM~, ITOWHOM+20, ITOWHOM+22, TOWHOM~, TOWHOM+21, TOWHOM+22, INIT~, INIT+9 |
| XMINSTR("ADDR | FLAGS" , INIT+3, INIT+9, INIT+10 |
| XMPROMPT | ITOWHOM+20, ITOWHOM+22, INIT~, INIT+2*, INIT+7* |
| XMRESTR | ITOWHOM+18~, ITOWHOM+20, ITOWHOM+22, TOWHOM+19~, TOWHOM+21, TOWHOM+22, INIT~, INIT+3, INIT+9 |
| XMTO | TOWHOM~, TOWHOM+22 |
| XMTYPE | ITOWHOM~, ITOWHOM+20, TOWHOM~, TOWHOM+21, INIT~, INIT+1 |
| XMZ | ITOWHOM~, ITOWHOM+20, TOWHOM~, TOWHOM+21, INIT~, INIT+3, INIT+6, INIT+8, INIT+9 |
| XMZREC | INIT+5~, INIT+6*, INIT+8, INIT+9 |