416: End If;
417: -- convert the incoming date format.
418: t_date := to_date(purge_to_date, 'YYYY/MM/DD HH24:MI:SS');
419:
420: -- Update the csi object_dictionary table with the archived and purged date
421: Begin
422: Update CSI_OBJECT_DICTIONARY
423: Set last_archive_date = t_date;
424: End;
418: t_date := to_date(purge_to_date, 'YYYY/MM/DD HH24:MI:SS');
419:
420: -- Update the csi object_dictionary table with the archived and purged date
421: Begin
422: Update CSI_OBJECT_DICTIONARY
423: Set last_archive_date = t_date;
424: End;
425: Commit;
426: --
478: --
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;
1421: --
1422: Begin
1423: Select object_id
1424: Into l_table_id
1425: From csi_object_dictionary
1426: Where object_name = 'CSI_I_PARTIES_H';
1427: Exception
1428: When no_data_found Then
1429: l_table_id := 2;
1864: --
1865: Begin
1866: Select object_id
1867: Into l_table_id
1868: From csi_object_dictionary
1869: Where object_name = 'CSI_IP_ACCOUNTS_H';
1870: Exception
1871: When no_data_found Then
1872: l_table_id := 3;
2291: --
2292: Begin
2293: Select object_id
2294: Into l_table_id
2295: From csi_object_dictionary
2296: Where object_name = 'CSI_I_ORG_ASSIGNMENTS_H';
2297: Exception
2298: When no_data_found Then
2299: l_table_id := 4;
2694: --
2695: Begin
2696: Select object_id
2697: Into l_table_id
2698: From csi_object_dictionary
2699: Where object_name = 'CSI_IEA_VALUES_H';
2700: Exception
2701: When no_data_found Then
2702: l_table_id := 5;
3090: --
3091: Begin
3092: Select object_id
3093: Into l_table_id
3094: From csi_object_dictionary
3095: Where object_name = 'CSI_I_PRICING_ATTRIBS_H';
3096: Exception
3097: When no_data_found Then
3098: l_table_id := 6;
4285: --
4286: Begin
4287: Select object_id
4288: Into l_table_id
4289: From csi_object_dictionary
4290: Where object_name = 'CSI_I_ASSETS_H';
4291: Exception
4292: When no_data_found Then
4293: l_table_id := 7;
4588: --
4589: Begin
4590: Select object_id
4591: Into l_table_id
4592: From csi_object_dictionary
4593: Where object_name = 'CSI_I_VERSION_LABELS_H';
4594: Exception
4595: When no_data_found Then
4596: l_table_id := 8;
5000: --
5001: Begin
5002: Select object_id
5003: Into l_table_id
5004: From csi_object_dictionary
5005: Where object_name = 'CSI_II_RELATIONSHIPS_H';
5006: Exception
5007: When no_data_found Then
5008: l_table_id := 9;
5411: --
5412: Begin
5413: Select object_id
5414: Into l_table_id
5415: From csi_object_dictionary
5416: Where object_name = 'CSI_SYSTEMS_H';
5417: Exception
5418: When no_data_found Then
5419: l_table_id := 10;