Primer Commit
This commit is contained in:
31
DB/PROCEDURES/MANAGE_REQ_OBJECT_ORDER.sql
Normal file
31
DB/PROCEDURES/MANAGE_REQ_OBJECT_ORDER.sql
Normal file
@@ -0,0 +1,31 @@
|
||||
--------------------------------------------------------
|
||||
-- DDL for Procedure MANAGE_REQ_OBJECT_ORDER
|
||||
--------------------------------------------------------
|
||||
set define off;
|
||||
|
||||
CREATE OR REPLACE EDITIONABLE PROCEDURE "ENVX_OPER"."MANAGE_REQ_OBJECT_ORDER" (pi_id_dep_req_object IN NUMBER,
|
||||
pi_id_req_hgroup IN VARCHAR2)
|
||||
AS
|
||||
v_aux NUMBER := 0;
|
||||
BEGIN
|
||||
|
||||
DELETE FROM DEPLOYMENT_REQ_OBJECT
|
||||
WHERE ID_DEP_REQ_OBJECT = pi_id_dep_req_object;
|
||||
commit;
|
||||
|
||||
FOR i in (select *
|
||||
from deployment_req_object
|
||||
where ID_REQ_HGROUP = pi_id_req_hgroup--:P300_ID
|
||||
ORDER BY OBJECT_ORDER
|
||||
)
|
||||
LOOP
|
||||
v_aux := v_aux + 1;
|
||||
update DEPLOYMENT_REQ_OBJECT
|
||||
set OBJECT_ORDER = v_aux
|
||||
where ID_DEP_REQ_OBJECT = i.ID_DEP_REQ_OBJECT;
|
||||
|
||||
END LOOP;
|
||||
END;
|
||||
|
||||
|
||||
/
|
||||
Reference in New Issue
Block a user