55:
56:
57: Cursor C_Entity_Set is
58: Select entity_set_id
59: from psb_entity_set
60: where data_extract_id = p_data_extract_id;
61:
62: Cursor C_Entity is
63: Select entity_id
60: where data_extract_id = p_data_extract_id;
61:
62: Cursor C_Entity is
63: Select entity_id
64: from psb_entity
65: where data_extract_id = p_data_extract_id;
66:
67: Cursor C_Positions is
68: Select position_id
220:
221: For C_Entity_Set_Rec in C_Entity_Set
222: Loop
223: Begin
224: Delete psb_entity_assignment
225: where entity_set_id = C_Entity_Set_Rec.entity_set_id;
226: exception When NO_DATA_FOUND then
227: null;
228: End;
228: End;
229: End Loop;
230: commit work;
231: Begin
232: Delete psb_entity_set
233: where data_extract_id = p_data_extract_id;
234: exception When NO_DATA_FOUND then
235: null;
236: End;
238: commit work;
239: For C_Entity_Rec in C_Entity
240: Loop
241: Begin
242: Delete psb_entity_assignment
243: where entity_id = C_Entity_Rec.entity_id;
244: exception When NO_DATA_FOUND then
245: null;
246: End;
245: null;
246: End;
247: End Loop;
248: Begin
249: Delete psb_entity
250: where data_extract_id = p_data_extract_id;
251: exception When NO_DATA_FOUND then
252: null;
253: End;
314: null;
315: End;
316:
317: Begin
318: Delete Psb_Entity
319: where entity_id = C_Default_Rec.entity_id;
320:
321: Delete Psb_allocrule_percents
322: where allocation_rule_id = C_Default_Rec.entity_id;