CREATE OR REPLACE PROCEDURE db2admin.temp(OUT p_xml XML)
BEGIN
  DECLARE d1, d2 DATE;

  SET d1 = DATE('21.04.2010');
  SET d2 = DATE('21.04.2010');

  SET p_xml = XMLQUERY('<HEADER>
    <MY_DATE>{$d1}</MY_DATE>
    <DATE_UNLOAD>{$d2}</DATE_UNLOAD>
    </HEADER>' PASSING d1 AS "d1", d2 AS "d2");

  SELECT XMLELEMENT(NAME "HEADER",
    XMLELEMENT(NAME "MY_DATE", t.date1),
    XMLELEMENT(NAME "DATE_UNLOAD", t.date2))
  INTO p_xml
  FROM TABLE(VALUES(DATE('21.04.2010'), DATE('21.04.2010'))) T(date1, date2);

  RETURN  0 ;
END