DBIA2856 ICR (2856)

Name

Value

NUMBER

2856

IA #

2856

DATE CREATED

1999/06/25

CUSTODIAL PACKAGE

MAILMAN

CUSTODIAL ISC

San Francisco

USAGE

Private

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

XMA32A

NAME

DBIA2856

GENERAL DESCRIPTION

AR $Orders thru ^XMB(3.9,"B",XMSUBJ,XMZ) to retrieve mail messages.
AR references a messages first line in global ^XMB(3.9,XMZ,2,1,0).
AR calls D KILL^XMA32A(XMZ,.XMKILL,XMABORT) to delete a message.

STATUS

Active

DURATION

Till Otherwise Agreed

XMA32A

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

KILL

This entry point purges a message and all of its
responses from the Message file 3.9, and also deletes the message from any
user mailboxes in the Mailbox fie 3.7.

S XMABORT=0,(XMKILL("MSG"),XMKILL("RESP"))=0,XMZ=msgien
D KILL^XMA32A(XMZ,.XMKILL,XMABORT)

VARIABLES	TYPE	VARIABLES DESCRIPTION
XMABORT	Input	Preset to ZERO.
XMKILL(MSG)	Both	Preset to ZERO. (MSG is the subscript) Every time KILL^XMA32A is called to delete a message, it is incremented by 1 by this entry point.
XMKILL(RESP)	Both	Preset to ZERO. (RESP is the subscript) Every time KILL^XMA32A is called, it is incremented by the number of responses purged.
XMZ	Input	Preset XMZ to the message number to be deleted. This message and all response to the message XMZ will be deleted.

SUBSCRIBING PACKAGE

SUBSCRIBING PACKAGE	ISC
ACCOUNTS RECEIVABLE	Albany