Routine: XMGAPI3

Information

XMGAPI3 ;WASH ISC/REW/LH-Deliver Broadcast Msg & Mark for Vaporization ;04/17/2002 08:59

Source file <XMGAPI3.m>

Package	Total	Call Graph
MailMan	4	SEND^XMKP (CHKADDR,CLEANUP,INIT)^XMXADDR ZAPSERV^XMXMSGS1 SENDMSG^XMXSEND
Kernel	1	$$FMADD^XLFDT
VA FileMan	1	^DIE

Name	Comments	DBIA/ICR reference
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.EXT. ; 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
SEND(XMDUZ,XMKN,XMZ,XMTO,XMFROM)	;
FORCE(DA,XMDAYS)	; Set Info Only, Closed statuses, and Purge date
CLEANUP(XMKN,XMZ)	; Successfully delivered message, so remove from Postmaster Server Basket
ERR1(XMDUZ,XMKN,XMFROM)	; Send message back to sender if not POSTMASTER@FORUM
ERR2(XMDUZ,XMKN,XMTO,XMFROM)	; Send a message back to sender if single recipient is invalid

Name	Line Occurrences (* Changed, ! Killed)
^TMP("XMERR"	SEND+1!, SEND+6!, ERR1+5!, ERR2+6, ERR2+8!

Name	Field # of Occurrence
^(	ERR2+6

Name	Field # of Occurrence
A	ERR1+1~, ERR2+1~
A(	ERR2+6*
A(1	ERR1+2, ERR2+2
A(2	ERR1+3, ERR2+3
A(3	ERR2+4*
DA	FORCE~
DIE	FORCE+1~, FORCE+2*
DR	FORCE+1~, FORCE+2*
DT	FORCE+2
DUZ	ENT+13*
I	ERR2+1~, ERR2+5, ERR2+6
J	ERR2+1~, ERR2+5, ERR2+6
XMDAYS	FORCE~, FORCE+2
XMDUZ	ENT+12~, ENT+13*, ENT+16, ENT+18, SEND~, SEND+3, SEND+5, SEND+8, ERR1~, ERR1+4 , ERR2~, ERR2+7
XMERR	SEND+1!, SEND+4, SEND+6!, ERR1+5!, ERR2+6, ERR2+8!
XMFROM	ENT+15, ENT+16, ENT+18, SEND~, SEND+5, ERR1~, ERR1+4, ERR2~, ERR2+7
XMKN	ENT+12~, ENT+14*, ENT+16, ENT+18, ENT+19, SEND~, SEND+5, CLEANUP~, CLEANUP+2, ERR1~ , ERR1+2, ERR2~, ERR2+2
XMTO	ENT~, ENT+18, SEND~, SEND+3, SEND+5, SEND+7, ERR2~, ERR2+3
XMZ	SEND~, SEND+7, SEND+8, CLEANUP~, CLEANUP+2
>> XQMSG	ENT+18, ENT+19
>> XQSOP	ENT+14