Print Page as PDF
DBIA2856 ICR (2856)

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
ID XMA32A
COMPONENT/ENTRY POINT
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