First Commit - Source Code from Reply

dbcmnpsrc/FE/mnpapp/script/dbUpDate/KitLuglio10/GETNOMEFILEESP.sql

@@ -0,0 +1,29 @@
+CREATE OR REPLACE FUNCTION Getnomefileesp(id_ric IN VARCHAR2, donating IN VARCHAR2, modo IN NUMBER) RETURN VARCHAR2
+-- dato l'id_richiesta ritorna una stringa con la lista dei nome_file espletamento 3° parti/espletamento donating
+AS
+nome_file_esp VARCHAR2(2000);
+CURSOR cur_esp (id_ric IN VARCHAR2) 
+IS SELECT nome_file FROM MNP_DWH_XML_IN WHERE id_richiesta=id_ric AND tipo_file=6;
+
+BEGIN
+nome_file_esp:='';
+
+FOR rec IN cur_esp(id_ric)  LOOP
+  IF modo =1  --espletamento terze parti
+    THEN
+      IF SUBSTR( rec.nome_file, 0 , 4) <> donating
+        THEN
+  	       nome_file_esp:=nome_file_esp || '  ' || rec.nome_file;
+  	    END IF;
+  	ELSE
+  	   IF SUBSTR( rec.nome_file, 0 , 4) = donating
+        THEN
+  	       nome_file_esp:=nome_file_esp || '  ' || rec.nome_file;
+  	    END IF;
+  	END IF;
+END LOOP;
+
+RETURN nome_file_esp;
+
+END;
+/