; Send a message back to sender if single recipient is invalid
SEND(XMDUZ,XMKN,XMZ,XMTO,XMFROM)
;
ERR1(XMDUZ,XMKN,XMFROM)
; Send message back to sender if not POSTMASTER@DOMAIN.NAME
ENT(XMTO)
; Meant to be invoked by a server. Delivers a message
; either to all users or to a specific user.
; The message must have been sent by the POSTMASTER@DOMAIN.NAME.
; The AUTOMATIC DELETE DATE for this message is set for each user
; to be in 7 days; 30 days if sent to a specific user.
; The message is made 'information only' and 'closed'.
; XMTO *=to all users
; DUZ=to only one person -- typically .6 to route to SHARED,MAIL
; Variables set in the server invoker:
; XQSOP Server basket name
; XQMSG Message number
; XMFROM Who sent the message
CLEANUP(XMKN,XMZ)
; Successfully delivered message, so remove from Postmaster Server Basket