UPDATE DB CFG FOR <DBNAME> USING SMTP_SERVER <your SMTP-server>;


CREATE PROCEDURE "DB2INST1"."MAIL_DIAGLOG_ALERTS"
 (IN @P_MIN INTEGER, 
  IN @P_MAIL_FROM VARCHAR(100), 
  IN @P_MAIL_TO VARCHAR(100)
 ) 
LANGUAGE SQL
BEGIN 
DECLARE V_INST_NAME VARCHAR(8);
DECLARE V_HOST_NAME VARCHAR(50);
DECLARE V_EMAIL_TITLE VARCHAR(100);

SET V_INST_NAME = (SELECT upper(INST_NAME) FROM SYSIBMADM.ENV_INST_INFO);
SET V_HOST_NAME = (SELECT upper(HOST_NAME) FROM SYSIBMADM.ENV_SYS_INFO);
SET V_EMAIL_TITLE = V_INST_NAME||'  instance '||'on host '||V_HOST_NAME||'  db2diag.log  alert!';

FOR STR AS
SELECT FULLREC AS TEXT FROM TABLE(SYSPROC.PD_GET_DIAG_HIST('MAIN','ALL',NULL, CURRENT_TIMESTAMP - @P_MIN MINUTES,CURRENT_TIMESTAMP)) AS MSGS 
WHERE LEVEL IN ('C','E','S') 
ORDER BY TIMESTAMP ASC 
DO 
IF (STR.TEXT <> '') THEN CALL UTL_MAIL.SEND(@P_MAIL_FROM,@P_MAIL_TO,NULL,NULL,V_EMAIL_TITLE,STR.TEXT);
END IF;
END FOR;

END;


CALL DB2INST1.MAIL_DIAGLOG_ALERTS(<минуты>, '<от кого>','<кому>')