XMXSEC2 ;ISC-SF/GMB - Message security and restrictions (cont.) ;04/18/2002 08:01
Source file <XMXSEC2.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EDIT(XMDUZ,XMZ,XMZREC) | ; May the user edit the message? (1=may, 0=may not)
 | 
 
  | 
| OPTEDIT(XMINSTR,XMOPT,XMOX,XMQDNUM) | ; We know the user may edit the message.
 ; Now, what, exactly, may be edited?  | 
 
  | 
| SET(XMCD,XMDN,XMOPT,XMOX) | ;
 | 
|
| Q(XMCD,XMDN) | ;
 | 
|
| OPTMSG(XMDUZ,XMK,XMZ,XMIM,XMINSTR,XMIU,XMOPT,XMOX,XMQDNUM) | ; The user has access to the message.  Now what may the user do with it?
 ; in: ; XMDUZ = the user ; XMK = basket IEN if message is in a basket ; = ! if super search (option XM SUPER SEARCH) ; = 0 otherwise ; XMZ = the message IEN ; The following are set by INMSG1 and INMSG2^XMXUTIL2 ; XMIM("FROM") = piece 2 of the message's zero node ; XMINSTR = special instructions ; XMIU("ORIGN8")= ; XMIU("IEN") = the user's IEN in the message's recipient multiple ; XMQDNUM = 0 - set XMOPT(<opt>,"?")=dialog text (default) ; 1 - set XMOPT(<opt>,"?")=dialog number (all are TYPE: ERROR) ; FYI, XMOPT(<opt>,"?") is displayed in SHOWERR^XMJDIR. ; out: ; XMOPT(<opt>) Possible options ; '$D(XMOPT(<opt>,"?")) User may do these things. ; $D(XMOPT(<opt>,"?")) User may NOT do these things.  | 
 
  | 
| OPTW(XMDUZ,XMZ,XMFROM,XMORIGN8,XMSECPAK,XMINSTR) | ; User must be self or have 'write' privilege as surrogate.
 | 
|
| OPTR(XMDUZ,XMK,XMZ,XMIU,XMSECPAK,XMINSTR) | ; User must be self or have 'read' privilege as surrogate.
 |