17:
18:
19: PROCEDURE delete_defunct_middlewares
20: IS
21: l_config_id cct_middlewares.middleware_id%type;
22:
23: CURSOR c_configs IS
24: select a.middleware_id
25: from cct_middlewares a
21: l_config_id cct_middlewares.middleware_id%type;
22:
23: CURSOR c_configs IS
24: select a.middleware_id
25: from cct_middlewares a
26: where f_deletedflag <> 'D'
27: OR f_deletedflag is null
28: and not exists
29: (select server_group_id from ieo_svr_groups b where b.server_group_id = a.server_group_id );
54: END;
55:
56: PROCEDURE delete_deleted_middlewares
57: IS
58: l_config_id cct_middlewares.middleware_id%type;
59:
60: CURSOR c_configs IS
61: select distinct a.server_group_id
62: from cct_middlewares a
58: l_config_id cct_middlewares.middleware_id%type;
59:
60: CURSOR c_configs IS
61: select distinct a.server_group_id
62: from cct_middlewares a
63: where f_deletedflag <> 'D'
64: OR f_deletedflag is null
65: and not exists
66: (select server_group_id from ieo_svr_groups b where b.server_group_id = a.server_group_id );
89: PROCEDURE delete_middleware
90: ( p_server_group_id IN NUMBER
91: , p_commit_flag IN VARCHAR2)
92: IS
93: l_config_id cct_middlewares.middleware_id%type;
94:
95: CURSOR c_configs IS
96: select middleware_id
97: from cct_middlewares
93: l_config_id cct_middlewares.middleware_id%type;
94:
95: CURSOR c_configs IS
96: select middleware_id
97: from cct_middlewares
98: where server_group_id = p_server_group_id;
99:
100: BEGIN
101: IF p_server_group_id is not null
200: --END LOOP;
201:
202: END;
203:
204: delete cct_middlewares
205: where middleware_id = p_middleware_id;
206: END IF;
207: IF p_commit_flag = 'Y' THEN
208: commit;