Files
gateway-mnp-dbc/dbcmnpsrc/FE/mnpapp/script/governance/sql/SRCOVAL15.sql
2024-05-13 12:54:14 +02:00

68 lines
2.3 KiB
SQL

-- [ SRCOVAL15 ]
--L'indicatore riporta giornalmente il numero totale di notifiche validazione richieste
--Recipient di tipo Consumer inviate a SID da DBC, ovvero per le quali la 'data invio'
--da DBC a SID coincida con la data di sistema.
--I dati sono aggregati per:
--Operatore Donating e Tipo Contratto.
--Sono prodotti tanti record riportanti ognuno
--il totale per quante sono le possibili combinazioni dell'aggregazione:
--Operatore Donating - Tipo Contratto.
--Il record è prodotto anche nel caso il valore rilevato sia "zero".
set serveroutput on
declare
valore varchar2(255);
var_tipo_contratto varchar2(3);
data_val date;
file1 UTL_FILE.file_type;
freq varchar2(255):='&1';
operatore varchar2(4);
cursor cur_operatore is
select desc_olo from mnp_olo
where flag_terze_parti=1;
begin
dbms_output.put_line('apro il file ' || 'MNP' || '.' || to_char(sysdate,'yyyyMMdd'));
file1 := UTL_FILE.fopen('&2','MNP' || '.' || to_char(sysdate,'yyyyMMdd'),'a');
open cur_operatore;
loop
fetch cur_operatore into operatore;
exit when cur_operatore%NOTFOUND;
for i in 0..1
loop
if (i=0) then var_tipo_contratto:='PRP';
else var_tipo_contratto:='POP';
end if;
select count(*), sysdate into valore, data_val
from mnp_sid_out_rec a, mnp_gestione_richiesta_rec b
where a.id_richiesta = b.id_richiesta
and a.esito_validazione = '00'
and b.tipo_cliente = 'CO'
and b.codice_operatore_donating = operatore
and b.codice_pre_post_pagato = var_tipo_contratto
and trunc(a.data_invio) = trunc(sysdate);
UTL_FILE.put_line(file1,'SRCOVAL15'||';'||operatore||'-:-'||var_tipo_contratto||';'||valore||';'||freq||';'||'&3'|| ';'
||to_char(data_val,'yyyymmdd')||';'||to_char(data_val,'hh24:mi:ss') ||';'
||to_char(sysdate,'yyyymmdd')||';'||to_char(sysdate,'hh24:mi:ss') ||';'
||'0'||';'||operatore||'-:-'||var_tipo_contratto||';;');
end loop;
end loop;
close cur_operatore;
UTL_FILE.fflush(file1);
UTL_FILE.fclose(file1);
dbms_output.put_line('chiudo il file ' || 'MNP' || '.' || to_char(sysdate,'yyyyMMdd'));
exception
when others then
DBMS_OUTPUT.PUT_LINE(sqlerrm);
end;
/
exit