В нави 3.10А есть CU6229, в ней функция SendMailFromQueue, в которой объявлена переменная MapiHandler как 'CP Handler'.MAPIHandler. Она иниацилизируется и вызывается функция MapiHandler.SendXMLMail(XMLDomMail,FALSE). XMLDomMail, как я понял, это структура сообщения в формате XML. Но как она инициализируется, где передается адрес получателя и тема, не пойму.
Или этот кодеюнит в принципе не рабочий?
Подскажите, кто знает, пожалуйста.
Для тех, у кого более свежий нави, приеду код этой функции:
WITH EMailQueue DO BEGIN
IF ApplMgt.GetPrioritizeMail THEN
SETCURRENTKEY(Status,Priority)
ELSE
SETCURRENTKEY(Status);
SETRANGE(Status,Status::Unprocessed);
IF FIND('-') THEN BEGIN
LOCKTABLE;
REPEAT
CALCFIELDS(Body);
IF Body.HASVALUE THEN BEGIN
Body.CREATEOUTSTREAM(OutStream);
XMLDomMail.load(OutStream);
IF ISCLEAR(MapiHandler) THEN
CREATE(MapiHandler);
IF MapiHandler.SendXMLMail(XMLDomMail,FALSE) THEN
DELETE
ELSE BEGIN
Status := Status::Error;
MODIFY;
END;
END;
UNTIL NOT FIND('-');
END;
END;
|