30: l_table_name VARCHAR2(30);
31: l_conc_request_status BOOLEAN;
32:
33: BEGIN
34: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
35: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.begin', '<
36: END IF;
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
31: l_conc_request_status BOOLEAN;
32:
33: BEGIN
34: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
35: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.begin', '<
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
39: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Hierarchy : ' || p_hierarchy_id);
34: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
35: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.begin', '<
36: END IF;
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
39: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Hierarchy : ' || p_hierarchy_id);
40: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Consoliation Entity : ' || p_cal_period_id);
41: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Analysis Cycle ID: ' || p_analysis_cycle_id);
42: END IF;
35: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.begin', '<
36: END IF;
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
39: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Hierarchy : ' || p_hierarchy_id);
40: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Consoliation Entity : ' || p_cal_period_id);
41: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Analysis Cycle ID: ' || p_analysis_cycle_id);
42: END IF;
43:
36: END IF;
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
39: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Hierarchy : ' || p_hierarchy_id);
40: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Consoliation Entity : ' || p_cal_period_id);
41: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Analysis Cycle ID: ' || p_analysis_cycle_id);
42: END IF;
43:
44: -- Bugfix 5187689: Make sure the table has been selected before submitting the program
37:
38: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
39: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Hierarchy : ' || p_hierarchy_id);
40: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Consoliation Entity : ' || p_cal_period_id);
41: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.SUBMIT_EPB_DATA_TRANSFER', 'Analysis Cycle ID: ' || p_analysis_cycle_id);
42: END IF;
43:
44: -- Bugfix 5187689: Make sure the table has been selected before submitting the program
45: SELECT epb_table_name
59: argument4 => p_analysis_cycle_id);
60:
61: END IF;
62:
63: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
64: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.end', '<
65: END IF;
66:
67: COMMIT;
60:
61: END IF;
62:
63: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
64: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SUBMIT_EPB_DATA_TRANSFER.end', '<
66:
67: COMMIT;
68: EXCEPTION
134: AND p_cal_period_end_date BETWEEN gcr.start_date and NVL(end_date,to_date(p_cal_period_end_date,'DD-MM-RR'));
135:
136: BEGIN
137:
138: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
139: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.PREPARE_IMMEDIATE_CHILDREN.begin', '<
140: END IF;
141:
142: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
135:
136: BEGIN
137:
138: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
139: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.PREPARE_IMMEDIATE_CHILDREN.begin', '<
141:
142: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
143:
213: END LOOP;
214:
215: result := 'COMPLETE';
216:
217: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.PREPARE_IMMEDIATE_CHILDREN.end', '<
219: END IF;
220:
221: END prepare_immediate_children;
214:
215: result := 'COMPLETE';
216:
217: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
218: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.PREPARE_IMMEDIATE_CHILDREN.end', '<
220:
221: END prepare_immediate_children;
222:
267: AND gcer.run_name = gcerd.run_name
268: ANd gcer.run_entity_id = gcerd.consolidation_entity_id;
269:
270: BEGIN
271: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
272: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_OPER_ENTITY_PROCESS', '<
273: END IF;
274:
275: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
268: ANd gcer.run_entity_id = gcerd.consolidation_entity_id;
269:
270: BEGIN
271: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
272: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_OPER_ENTITY_PROCESS', '<
274:
275: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
276:
307: ELSE
308: result := 'COMPLETE:F';
309: END IF;
310:
311: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
312: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_OPER_ENTITY_PROCESS.end', '<
313: END IF;
314:
315: END spawn_oper_entity_process;
308: result := 'COMPLETE:F';
309: END IF;
310:
311: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
312: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_OPER_ENTITY_PROCESS.end', '<
314:
315: END spawn_oper_entity_process;
316:
333: l_request_error_code VARCHAR2(2000);
334:
335: BEGIN
336:
337: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
338: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_DATA_PREPARATION', '<
339: END IF;
340:
341:
334:
335: BEGIN
336:
337: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
338: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_DATA_PREPARATION', '<
340:
341:
342: l_execution_mode := WF_ENGINE.GetActivityAttrText(itemtype, itemkey, actid, 'EXECUTION_MODE', FALSE);
431: END;
432:
433: END IF;
434:
435: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
436: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_DATA_PREPARATION.end', '<
437: END IF;
438:
439: END execute_data_preparation;
432:
433: END IF;
434:
435: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
436: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_DATA_PREPARATION.end', '<
438:
439: END execute_data_preparation;
440:
457: l_request_error_code VARCHAR2(200);
458:
459: BEGIN
460:
461: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
462: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INIT_OPER_ENTITY_PROCESS.end', '<
463: END IF;
464:
465: gcs_cons_eng_utility_pkg.get_oper_entity_wf_info (itemtype,
458:
459: BEGIN
460:
461: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
462: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INIT_OPER_ENTITY_PROCESS.end', '<
464:
465: gcs_cons_eng_utility_pkg.get_oper_entity_wf_info (itemtype,
466: itemkey,
519: ELSE
520: result := 'COMPLETE:FULL';
521: END IF;
522:
523: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INIT_OPER_ENTITY_PROCESS', '<
525: END IF;
526:
527: END init_oper_entity_process;
520: result := 'COMPLETE:FULL';
521: END IF;
522:
523: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
524: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INIT_OPER_ENTITY_PROCESS', '<
526:
527: END init_oper_entity_process;
528:
543: l_run_detail_id NUMBER(15);
544:
545: BEGIN
546:
547: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
548: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_AGGREGATION_REQUIRED', '<
549: END IF;
550:
551: l_entity_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'CONS_ENTITY', FALSE);
544:
545: BEGIN
546:
547: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
548: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_AGGREGATION_REQUIRED', '<
550:
551: l_entity_id := WF_ENGINE.GetItemAttrNumber(itemtype, itemkey, 'CONS_ENTITY', FALSE);
552: l_run_identifier := WF_ENGINE.GetItemAttrText(itemtype, itemkey, 'RUN_IDENTIFIER', FALSE);
578: WF_ENGINE.SetItemAttrNumber(itemtype, itemkey, 'RUN_DETAIL_ID', l_run_detail_id);
579:
580: END IF;
581:
582: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
583: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_AGGREGATION_REQUIRED', '<
584: END IF;
585:
586: END check_aggregation_required;
579:
580: END IF;
581:
582: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
583: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_AGGREGATION_REQUIRED', '<
585:
586: END check_aggregation_required;
587:
603: l_parameter_list gcs_cons_eng_utility_pkg.r_module_parameters;
604:
605: BEGIN
606:
607: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_AGGREGATION', '<
609: END IF;
610:
611:
604:
605: BEGIN
606:
607: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_AGGREGATION', '<
610:
611:
612: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
664: -- p_run_detail_id => l_run_detail_id);
665:
666: result := 'COMPLETE';
667:
668: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
669: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_AGGREGATION', '<
670: END IF;
671:
672: END execute_aggregation;
665:
666: result := 'COMPLETE';
667:
668: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
669: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.EXECUTE_AGGREGATION', '<
671:
672: END execute_aggregation;
673:
676: IS PRAGMA AUTONOMOUS_TRANSACTION;
677:
678: BEGIN
679:
680: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
681: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.DELETE_FLATTENED_RELNS', '<
682: END IF;
683:
684: --Bugfix 4928211: For performance purposes deleting from gcs_flattened relations when parent node is fully complete with consolidation
677:
678: BEGIN
679:
680: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
681: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.DELETE_FLATTENED_RELNS', '<
683:
684: --Bugfix 4928211: For performance purposes deleting from gcs_flattened relations when parent node is fully complete with consolidation
685: DELETE FROM gcs_flattened_relns
686: WHERE run_name = cons_entity_wf_info.run_identifier;
687:
688: COMMIT;
689:
690: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.DELETE_FLATTENED_RELNS', '<
692: END IF;
693:
694: END;
687:
688: COMMIT;
689:
690: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
691: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.DELETE_FLATTENED_RELNS', '<
693:
694: END;
695:
716: l_run_detail_id NUMBER(15);
717: l_top_entity_id NUMBER;
718:
719: BEGIN
720: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
721: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
722: END IF;
723:
724: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
717: l_top_entity_id NUMBER;
718:
719: BEGIN
720: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
721: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
723:
724: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
725:
826: p_bp_request_error_code => l_status_code);
827:
828: result := 'COMPLETE';
829:
830: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
831: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
832: END IF;
833:
834: EXCEPTION
827:
828: result := 'COMPLETE';
829:
830: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
831: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
833:
834: EXCEPTION
835: WHEN OTHERS THEN
833:
834: EXCEPTION
835: WHEN OTHERS THEN
836: result := 'COMPLETE';
837: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
838: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENt', SQLERRM);
839: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
840: END IF;
841:
834: EXCEPTION
835: WHEN OTHERS THEN
836: result := 'COMPLETE';
837: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
838: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENt', SQLERRM);
839: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
840: END IF;
841:
842: END raise_completion_event;
835: WHEN OTHERS THEN
836: result := 'COMPLETE';
837: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
838: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENt', SQLERRM);
839: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RAISE_COMPLETION_EVENT', '<
841:
842: END raise_completion_event;
843:
847: IS PRAGMA AUTONOMOUS_TRANSACTION;
848:
849: BEGIN
850:
851: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
852: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CREATE_FLATTENED_RELNS', '<
853: END IF;
854:
855: --Bugfix 4928211: For performance benefit store all children of consolidation hierarchy into gcs_flattened_relns
848:
849: BEGIN
850:
851: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
852: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CREATE_FLATTENED_RELNS', '<
854:
855: --Bugfix 4928211: For performance benefit store all children of consolidation hierarchy into gcs_flattened_relns
856:
894: BETWEEN gcr.start_date AND NVL(gcr.end_date, cons_entity_wf_info.cal_period_end_date);
895:
896: COMMIT;
897:
898: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CREATE_FLATTENED_RELNS', '<
900: END IF;
901:
902: END;
895:
896: COMMIT;
897:
898: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
899: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CREATE_FLATTENED_RELNS', '<
901:
902: END;
903:
947:
948:
949: BEGIN
950:
951: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
952: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_CONS_ENTITY_PROCESS', '<
953: END IF;
954:
955:
948:
949: BEGIN
950:
951: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
952: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_CONS_ENTITY_PROCESS', '<
954:
955:
956: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1017: ELSE
1018: result := 'COMPLETE:F';
1019: END IF;
1020:
1021: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1022: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_CONS_ENTITY_PROCESS', '<
1023: END IF;
1024:
1025: END spawn_cons_entity_process;
1018: result := 'COMPLETE:F';
1019: END IF;
1020:
1021: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1022: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.SPAWN_CONS_ENTITY_PROCESS', '<
1024:
1025: END spawn_cons_entity_process;
1026:
1044: AND enabled_flag = 'Y';
1045:
1046: BEGIN
1047:
1048: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1049: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INITIALIZE_CONS_PROCESS', '<
1050: END IF;
1051:
1052: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1045:
1046: BEGIN
1047:
1048: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1049: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INITIALIZE_CONS_PROCESS', '<
1051:
1052: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1053:
1061: END LOOP;
1062:
1063: result := 'COMPLETE';
1064:
1065: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1066: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INITIALIZE_CONS_PROCESS', '<
1067: END IF;
1068:
1069: END initialize_cons_process;
1062:
1063: result := 'COMPLETE';
1064:
1065: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1066: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INITIALIZE_CONS_PROCESS', '<
1068:
1069: END initialize_cons_process;
1070:
1083: l_impacted_flag VARCHAr2(1);
1084:
1085: BEGIN
1086:
1087: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1088: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_CONS_ENTITY_STATUS', '<
1089: END IF;
1090:
1091: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1084:
1085: BEGIN
1086:
1087: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1088: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_CONS_ENTITY_STATUS', '<
1090:
1091: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1092:
1124: result := 'COMPLETE:T';
1125: END IF;
1126:
1127:
1128: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_CONS_ENTITY_STATUS', '<
1130: END IF;
1131:
1132: EXCEPTION
1125: END IF;
1126:
1127:
1128: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1129: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.CHECK_CONS_ENTITY_STATUS', '<
1131:
1132: EXCEPTION
1133: WHEN NO_DATA_FOUND THEN
1150: l_locked_flag VARCHAR2(1);
1151:
1152: BEGIN
1153:
1154: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1155: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_RUN_INFORMATION.begin', '<
1156: END IF;
1157:
1158: UPDATE gcs_cons_eng_runs
1151:
1152: BEGIN
1153:
1154: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1155: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_RUN_INFORMATION.begin', '<
1157:
1158: UPDATE gcs_cons_eng_runs
1159: SET most_recent_flag = 'Y'
1217: RETURN run_detail_id INTO p_run_detail_id;
1218:
1219: COMMIT;
1220:
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1222: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_RUN_INFORMATION.end', '<
1223: END IF;
1224: END;
1225:
1218:
1219: COMMIT;
1220:
1221: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1222: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_RUN_INFORMATION.end', '<
1224: END;
1225:
1226: PROCEDURE retrieve_prior_runs( itemtype IN VARCHAR2,
1237: l_run_detail_id NUMBER(15);
1238:
1239: BEGIN
1240:
1241: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_PRIOR_RUNS', '<
1243: END IF;
1244:
1245:
1238:
1239: BEGIN
1240:
1241: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1242: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_PRIOR_RUNS', '<
1244:
1245:
1246: gcs_cons_eng_utility_pkg.get_cons_entity_wf_info(itemtype, itemkey, cons_entity_wf_info);
1251: WF_ENGINE.SetItemAttrNumber(itemtype, itemkey, 'RUN_DETAIL_ID', l_run_detail_id);
1252:
1253: result := 'COMPLETE';
1254:
1255: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1256: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_PRIOR_RUNS', '<
1257: END IF;
1258:
1259: END retrieve_prior_runs;
1252:
1253: result := 'COMPLETE';
1254:
1255: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
1256: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_PRIOR_RUNS', '<
1258:
1259: END retrieve_prior_runs;
1260: