68 lines
1.7 KiB
SQL
68 lines
1.7 KiB
SQL
--------------------------------------------------------
|
|
-- DDL for Procedure P_ELIMINAR_SOLICITUD
|
|
--------------------------------------------------------
|
|
set define off;
|
|
|
|
CREATE OR REPLACE EDITIONABLE PROCEDURE "ENVX_OPER"."P_ELIMINAR_SOLICITUD" (pi_id_request IN NUMBER)
|
|
AS
|
|
|
|
v_aux NUMBER := 0;
|
|
|
|
BEGIN
|
|
|
|
--Proceso para eliminar 1 solicitud de despliegue completa--
|
|
|
|
--Eliminar los objetos del request--
|
|
delete from deployment_req_object where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Eliminar los ambientes del request--
|
|
delete from deployment_req_env where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Eliminar los grupos del request--
|
|
delete from deployment_req_hgroup where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Eliminar los tickets del request--
|
|
delete from deployment_req_reference where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Eliminar los queue del request--
|
|
delete from deployment_request_queue where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Eliminar el historial de ejecucion del request--
|
|
FOR i IN (select * from request_exec_deploy ed where ed.id_request = pi_id_request) LOOP
|
|
delete from request_exec_deploy where id_control_deploy = i.id_control_deploy;
|
|
v_aux := v_aux + 1;
|
|
IF v_aux = 100 THEN
|
|
commit;
|
|
v_aux := 0;
|
|
END IF;
|
|
END LOOP;
|
|
v_aux := 0;
|
|
commit;
|
|
|
|
--Eliminar el historial de flow del request--
|
|
FOR h IN (select * from request_exec_flow ef where ef.id_request = pi_id_request) LOOP
|
|
delete from request_exec_flow where id_request = h.id_request;
|
|
v_aux := v_aux + 1;
|
|
IF v_aux = 100 THEN
|
|
commit;
|
|
v_aux := 0;
|
|
END IF;
|
|
END LOOP;
|
|
v_aux := 0;
|
|
commit;
|
|
|
|
--Eliminar los request--
|
|
delete from deployment_request where id_request = pi_id_request;
|
|
commit;
|
|
|
|
--Proceso para eliminar 1 solicitud de despliegue completa--
|
|
|
|
END;
|
|
|
|
/
|