admin/gateway-mnp-dbc
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

First Commit - Source Code from Reply

Browse Source
This commit is contained in:
vincenzofariello
2024-05-13 12:54:14 +02:00
parent 73e32a5020
commit a15aee1f08
11184 changed files with 1065913 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

75
dbcmnpsrc/FE/mnpapp/script/governance/sql/SACKOU001.sql Normal file
View File

@@ -0,0 +1,75 @@
/* Formatted on 2006/01/12 18:11 (Formatter Plus v4.8.0) */
--L’indicatore deve riportare il numero totale di file ACK del giorno ancora non inviati da TIM verso AOM
--(senza alcuna aggregazione).
SET serveroutput on
DECLARE
valore VARCHAR2 (255);
data_val DATE;
file1 UTL_FILE.file_type;
freq VARCHAR2 (255) := '&1';
CURSOR cur_valore
IS
SELECT COUNT (nome_file), SYSDATE
FROM mnp_xml_out PARTITION (&2)
WHERE tipo_file = 8
AND TRUNC (data_eff) = TRUNC (SYSDATE)
AND data_invio IS NULL;
BEGIN
DBMS_OUTPUT.put_line ( 'apro il file '
|| 'MNP'
|| '.'
|| TO_CHAR (SYSDATE, 'yyyyMMdd')
);
file1 :=
UTL_FILE.fopen ('&3', 'MNP' || '.' || TO_CHAR (SYSDATE, 'yyyyMMdd'),
'a');
OPEN cur_valore;
LOOP
FETCH cur_valore
INTO valore, data_val;
EXIT WHEN cur_valore%NOTFOUND;
UTL_FILE.put_line (file1,
'SACKOU001'
|| ';;'
|| valore
|| ';'
|| freq
|| ';'
|| '&4'
|| ';'
|| TO_CHAR (data_val, 'yyyymmdd')
|| ';'
|| TO_CHAR (data_val, 'hh24:mi:ss')
|| ';'
|| TO_CHAR (SYSDATE, 'yyyymmdd')
|| ';'
|| TO_CHAR (SYSDATE, 'hh24:mi:ss')
|| ';'
|| '0'
|| ';;;'
);
END LOOP;
CLOSE cur_valore;
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