463:
464: Cursor inst_hist_csr (p_from_trans IN NUMBER,
465: p_to_trans IN NUMBER) IS
466: Select csh.*
467: From CSI_ITEM_INSTANCES_H csh,
468: CSI_TRANSACTIONS csit
469: Where csit.transaction_id between From_trans and To_trans
470: And csit.creation_date < to_date(purge_to_date, 'YYYY/MM/DD HH24:MI:SS')
471: And csh.transaction_id = csit.transaction_id;
479: Begin
480: Select object_id
481: Into l_table_id
482: From csi_object_dictionary
483: Where object_name = 'CSI_ITEM_INSTANCES_H';
484: Exception
485: When no_data_found Then
486: l_table_id := 1;
487: When others Then
1336: -- Purge the corresonding Archive data from the Instance history tables
1337:
1338: FORALL i IN 1 .. l_cnt
1339:
1340: Delete From CSI_ITEM_INSTANCES_H
1341: Where instance_history_id = l_inst_hist_rec_tab.instance_history_id(i);
1342:
1343: -- Update csi_item instances table with the last transaction history purged date
1344:
1339:
1340: Delete From CSI_ITEM_INSTANCES_H
1341: Where instance_history_id = l_inst_hist_rec_tab.instance_history_id(i);
1342:
1343: -- Update csi_item instances table with the last transaction history purged date
1344:
1345: FORALL i IN 1 .. l_cnt
1346:
1347: Update CSI_ITEM_INSTANCES
1343: -- Update csi_item instances table with the last transaction history purged date
1344:
1345: FORALL i IN 1 .. l_cnt
1346:
1347: Update CSI_ITEM_INSTANCES
1348: Set last_purge_date = to_date(purge_to_date,'YYYY/MM/DD HH24:MI:SS')
1349: Where instance_id = l_inst_hist_rec_tab.instance_id(i);
1350:
1351: End If; -- if l_cnt > 0
5913: --
5914: Begin
5915: Select COUNT(*)
5916: Into l_temp
5917: From CSI_ITEM_INSTANCES_H csh,
5918: CSI_TRANSACTIONS csit
5919: Where csit.transaction_id between From_trans and To_trans
5920: And csit.creation_date < to_date(purge_to_date, 'YYYY/MM/DD HH24:MI:SS')
5921: And csh.transaction_id = csit.transaction_id;