--L'indicatore riporta il numero totale di notifiche di esito espletamento ancora da produrre per CIRCE. --I dati sono aggregati per: OLO Recipient (WIND-H3GI-OPIV, etc.). --Sono prodotti tanti record riportanti ognuno il totale per quanti sono i possibili OLO Recipient. --Il record è prodotto anche nel caso il valore rilevato sia "zero". set serveroutput on declare operatore varchar2(4); valore varchar2(255); data_val date; file1 UTL_FILE.file_type; freq varchar2(255):='&1'; cursor cur_operatore is select a.desc_olo from mnp_olo a where flag_terze_parti=1; cursor cur_valore is SELECT COUNT (*), SYSDATE FROM mnp_mss_cessazione_in a, mnp_gestione_richiesta b WHERE a.da_processare = 0 AND a.id_richiesta = b.id_richiesta AND b.codice_operatore_recipient = operatore AND b.stato = 16 AND a.id_richiesta IN (SELECT b.id_richiesta FROM mnp_mss_cessazione_in a, mnp_gestione_richiesta b WHERE a.da_processare = 0 AND a.id_richiesta = b.id_richiesta AND b.codice_operatore_recipient = operatore AND b.stato = 16 MINUS SELECT c.id_richiesta FROM mnp_circe_out c WHERE c.stato = '05' AND c.da_inviare = 0 AND c.codice_operatore_recipient = operatore); 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; open cur_valore; fetch cur_valore into valore, data_val; UTL_FILE.put_line(file1,'SDNRESP57'||';'||operatore||';'||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||';;'); close cur_valore; 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