DECLARE
 l_sql        VARCHAR2(500);
 l_sql_tune_task_id VARCHAR2(100);
BEGIN
 l_sql := 'select RUBRO, MEN.NDOCTIPO, MEN.NDOCNRO, MEN.NDOCPROV, MEN.FECHA, sum(MEN.SALDO) VALOR  ' ||
      'from MAD.BPM_RCP_SALDOS_6M MEN where (MEN.NDOCTIPO = 1 and MEN.NDOCNRO = 29413271 and MEN.NDOCPROV = 0) ' ||
      'group by MEN.NDOCTIPO, MEN.NDOCNRO, MEN.NDOCPROV, RUBRO, FECHA having RUBRO IN (10, 30, 40) ' ||
      'order by MEN.NDOCTIPO, MEN.NDOCNRO, MEN.NDOCPROV, RUBRO, FECHA desc;' ;
 l_sql_tune_task_id := DBMS_SQLTUNE.create_tuning_task (
             sql_text  => l_sql,
             user_name  => 'HR',
             scope    => DBMS_SQLTUNE.scope_comprehensive,
             time_limit => 60,
             task_name  => 'emp_dept_tuning_task',
             description => 'Tuning task for an EMP to DEPARTMENT join query.');
 DBMS_OUTPUT.put_line('l_sql_tune_task_id: ' || l_sql_tune_task_id);
END;
/