1: PACKAGE BODY PA_REP_UTILS_SUMM_PKG as
2: /* $Header: PARRSUMB.pls 120.0 2005/05/30 18:35:09 appldev noship $ */
3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
5:
6: /*
7: * This variable is populated by the public procedure of this
8: * package.
152: IS
153: i PLS_INTEGER;
154: BEGIN
155:
156: PA_DEBUG.set_curr_function('summarize_by_period');
157: /*
158: * Step 1 - Populate the global temporary table from individual PL/SQL Table
159: * in bulk.
160: */
171: /*
172: * Populate pa_rep_util_summ_tmp for Total Hours.
173: */
174: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
175: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Hours ';
176: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
177: END IF;
178: INSERT INTO pa_rep_util_summ_tmp
179: ( RECORD_TYPE
172: * Populate pa_rep_util_summ_tmp for Total Hours.
173: */
174: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
175: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Hours ';
176: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
177: END IF;
178: INSERT INTO pa_rep_util_summ_tmp
179: ( RECORD_TYPE
180: ,EXPENDITURE_ORGANIZATION_ID
259: /*
260: * Populate pa_rep_util_summ_tmp for Total Provisional Hours.
261: */
262: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
263: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Hours';
264: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
265: END IF;
266:
267: INSERT INTO pa_rep_util_summ_tmp
260: * Populate pa_rep_util_summ_tmp for Total Provisional Hours.
261: */
262: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
263: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Hours';
264: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
265: END IF;
266:
267: INSERT INTO pa_rep_util_summ_tmp
268: ( RECORD_TYPE
345: /*
346: * Populate pa_rep_util_summ_tmp for Total Weighted Hours - People.
347: */
348: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
349: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-People';
350: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
351: END IF;
352:
353: INSERT INTO pa_rep_util_summ_tmp
346: * Populate pa_rep_util_summ_tmp for Total Weighted Hours - People.
347: */
348: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
349: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-People';
350: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
351: END IF;
352:
353: INSERT INTO pa_rep_util_summ_tmp
354: ( RECORD_TYPE
430: /*
431: * Populate pa_rep_util_summ_tmp for Total Weighted Hours -Organization.
432: */
433: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
434: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-Org';
435: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
436: END IF;
437:
438: INSERT INTO pa_rep_util_summ_tmp
431: * Populate pa_rep_util_summ_tmp for Total Weighted Hours -Organization.
432: */
433: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
434: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-Org';
435: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
436: END IF;
437:
438: INSERT INTO pa_rep_util_summ_tmp
439: ( RECORD_TYPE
516: /*
517: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -People.
518: */
519: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
520: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-People';
521: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
522: END IF;
523:
524: INSERT INTO pa_rep_util_summ_tmp
517: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -People.
518: */
519: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
520: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-People';
521: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
522: END IF;
523:
524: INSERT INTO pa_rep_util_summ_tmp
525: ( RECORD_TYPE
601: /*
602: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -Organization.
603: */
604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
605: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-Org';
606: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
607: END IF;
608:
609: INSERT INTO pa_rep_util_summ_tmp
602: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -Organization.
603: */
604: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
605: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-Org';
606: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
607: END IF;
608:
609: INSERT INTO pa_rep_util_summ_tmp
610: ( RECORD_TYPE
687: /*
688: * Populate pa_rep_util_summ_tmp for Reduce Capacity.
689: */
690: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
691: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Reduce Capacity';
692: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
693: END IF;
694:
695: INSERT INTO pa_rep_util_summ_tmp
688: * Populate pa_rep_util_summ_tmp for Reduce Capacity.
689: */
690: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
691: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Reduce Capacity';
692: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
693: END IF;
694:
695: INSERT INTO pa_rep_util_summ_tmp
696: ( RECORD_TYPE
778: * Populate pa_rep_util_summ_tmp for Total Hours.
779: */
780:
781: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
782: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Hours ';
783: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
784: END IF;
785:
786: INSERT INTO pa_rep_util_summ_tmp
779: */
780:
781: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
782: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Hours ';
783: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
784: END IF;
785:
786: INSERT INTO pa_rep_util_summ_tmp
787: ( RECORD_TYPE
865: /*
866: * Populate pa_rep_util_summ_tmp for Total Provisional Hours.
867: */
868: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
869: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Hours';
870: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
871: END IF;
872:
873: INSERT INTO pa_rep_util_summ_tmp
866: * Populate pa_rep_util_summ_tmp for Total Provisional Hours.
867: */
868: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
869: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Hours';
870: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
871: END IF;
872:
873: INSERT INTO pa_rep_util_summ_tmp
874: ( RECORD_TYPE
951: /*
952: * Populate pa_rep_util_summ_tmp for Total Weighted Hours - People.
953: */
954: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
955: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-People';
956: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
957: END IF;
958:
959: INSERT INTO pa_rep_util_summ_tmp
952: * Populate pa_rep_util_summ_tmp for Total Weighted Hours - People.
953: */
954: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
955: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-People';
956: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
957: END IF;
958:
959: INSERT INTO pa_rep_util_summ_tmp
960: ( RECORD_TYPE
1035: /*
1036: * Populate pa_rep_util_summ_tmp for Total Weighted Hours -Organization.
1037: */
1038: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1039: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-Org';
1040: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1041: END IF;
1042: INSERT INTO pa_rep_util_summ_tmp
1043: ( RECORD_TYPE
1036: * Populate pa_rep_util_summ_tmp for Total Weighted Hours -Organization.
1037: */
1038: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1039: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Weighted Hours-Org';
1040: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1041: END IF;
1042: INSERT INTO pa_rep_util_summ_tmp
1043: ( RECORD_TYPE
1044: ,EXPENDITURE_ORGANIZATION_ID
1120: /*
1121: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -People.
1122: */
1123: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1124: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-People';
1125: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1126: END IF;
1127:
1128: INSERT INTO pa_rep_util_summ_tmp
1121: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -People.
1122: */
1123: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1124: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-People';
1125: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1126: END IF;
1127:
1128: INSERT INTO pa_rep_util_summ_tmp
1129: ( RECORD_TYPE
1204: /*
1205: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -Organization.
1206: */
1207: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1208: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-Org';
1209: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1210: END IF;
1211:
1212: INSERT INTO pa_rep_util_summ_tmp
1205: * Populate pa_rep_util_summ_tmp for Prov Weighted Hours -Organization.
1206: */
1207: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1208: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp for Prov Weighted Hours-Org';
1209: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1210: END IF;
1211:
1212: INSERT INTO pa_rep_util_summ_tmp
1213: ( RECORD_TYPE
1290: /*
1291: * Populate pa_rep_util_summ_tmp for Reduce Capacity.
1292: */
1293: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1294: PA_DEBUG.g_err_stage:='Populate pa_rep_util_summ_tmp for Reduce Capacity';
1295: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1296: END IF;
1297:
1298: INSERT INTO pa_rep_util_summ_tmp
1291: * Populate pa_rep_util_summ_tmp for Reduce Capacity.
1292: */
1293: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1294: PA_DEBUG.g_err_stage:='Populate pa_rep_util_summ_tmp for Reduce Capacity';
1295: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1296: END IF;
1297:
1298: INSERT INTO pa_rep_util_summ_tmp
1299: ( RECORD_TYPE
1384:
1385: IF ( PA_REP_UTIL_GLOB.G_util_option_details.G_pa_period_flag = 'Y')
1386: THEN
1387: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1388: PA_DEBUG.g_err_stage:='Summarization By PA Period';
1389: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1390: END IF;
1391:
1392: INSERT INTO pa_rep_util_summ_tmp
1385: IF ( PA_REP_UTIL_GLOB.G_util_option_details.G_pa_period_flag = 'Y')
1386: THEN
1387: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1388: PA_DEBUG.g_err_stage:='Summarization By PA Period';
1389: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1390: END IF;
1391:
1392: INSERT INTO pa_rep_util_summ_tmp
1393: ( record_type,
1480:
1481: IF ( PA_REP_UTIL_GLOB.G_util_option_details.G_gl_period_flag = 'Y')
1482: THEN
1483: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1484: PA_DEBUG.g_err_stage:='Summarization By GL Period';
1485: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1486: END IF;
1487:
1488: INSERT INTO pa_rep_util_summ_tmp
1481: IF ( PA_REP_UTIL_GLOB.G_util_option_details.G_gl_period_flag = 'Y')
1482: THEN
1483: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1484: PA_DEBUG.g_err_stage:='Summarization By GL Period';
1485: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1486: END IF;
1487:
1488: INSERT INTO pa_rep_util_summ_tmp
1489: ( record_type,
1575:
1576: IF (PA_REP_UTIL_GLOB.G_util_option_details.G_ge_period_flag = 'Y')
1577: THEN
1578: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1579: PA_DEBUG.g_err_stage:='Summarization By GE Period';
1580: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1581: END IF;
1582:
1583:
1576: IF (PA_REP_UTIL_GLOB.G_util_option_details.G_ge_period_flag = 'Y')
1577: THEN
1578: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1579: PA_DEBUG.g_err_stage:='Summarization By GE Period';
1580: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1581: END IF;
1582:
1583:
1584: INSERT INTO pa_rep_util_summ_tmp
1663: PERSON_ID,ASSIGNMENT_ID,WORK_TYPE_ID,ORG_UTIL_CATEGORY_ID,
1664: RES_UTIL_CATEGORY_ID,EXPENDITURE_TYPE,EXPENDITURE_TYPE_CLASS;
1665: END IF;
1666:
1667: PA_DEBUG.Reset_curr_function;
1668:
1669: EXCEPTION
1670: WHEN OTHERS
1671: THEN
1669: EXCEPTION
1670: WHEN OTHERS
1671: THEN
1672: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1673: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1674: PA_DEBUG.log_message(SQLERRM);
1675: END IF;
1676: raise;
1677:
1670: WHEN OTHERS
1671: THEN
1672: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1673: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1674: PA_DEBUG.log_message(SQLERRM);
1675: END IF;
1676: raise;
1677:
1678: END summarize_by_period;
1682: BEGIN
1683: /*
1684: * Summarize the lowlevel records to Resource level.
1685: */
1686: PA_DEBUG.set_curr_function('summarize_temp_data_by_res');
1687: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1688: PA_DEBUG.g_err_stage := 'Summarization at resource level';
1689: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1690: END IF;
1684: * Summarize the lowlevel records to Resource level.
1685: */
1686: PA_DEBUG.set_curr_function('summarize_temp_data_by_res');
1687: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1688: PA_DEBUG.g_err_stage := 'Summarization at resource level';
1689: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1690: END IF;
1691:
1692: INSERT INTO pa_rep_util_summ_tmp
1685: */
1686: PA_DEBUG.set_curr_function('summarize_temp_data_by_res');
1687: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1688: PA_DEBUG.g_err_stage := 'Summarization at resource level';
1689: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1690: END IF;
1691:
1692: INSERT INTO pa_rep_util_summ_tmp
1693: ( record_type,
1779: to_char(grouping(res_util_category_id))||
1780: to_char(grouping(work_type_id)))
1781: in ( '111','011', '101', '000');
1782:
1783: PA_DEBUG.Reset_curr_function;
1784:
1785: EXCEPTION
1786: WHEN OTHERS
1787: THEN
1785: EXCEPTION
1786: WHEN OTHERS
1787: THEN
1788: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1789: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1790: PA_DEBUG.log_message(SQLERRM);
1791: END IF;
1792: raise;
1793: END summarize_temp_data_by_res;
1786: WHEN OTHERS
1787: THEN
1788: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1789: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1790: PA_DEBUG.log_message(SQLERRM);
1791: END IF;
1792: raise;
1793: END summarize_temp_data_by_res;
1794:
1856:
1857: BEGIN
1858:
1859:
1860: PA_DEBUG.set_curr_function('populate_tmp_for_capacity');
1861: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1862: PA_DEBUG.g_err_stage := 'Setting the start and end dates of the run';
1863: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1864: END IF;
1858:
1859:
1860: PA_DEBUG.set_curr_function('populate_tmp_for_capacity');
1861: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1862: PA_DEBUG.g_err_stage := 'Setting the start and end dates of the run';
1863: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1864: END IF;
1865: /*
1866: * First figure out which balance_type is the current call for so as
1859:
1860: PA_DEBUG.set_curr_function('populate_tmp_for_capacity');
1861: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1862: PA_DEBUG.g_err_stage := 'Setting the start and end dates of the run';
1863: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1864: END IF;
1865: /*
1866: * First figure out which balance_type is the current call for so as
1867: * to set the appropriate start and end dates for the run
1874: l_run_end_date := PA_REP_UTIL_GLOB.G_input_parameters.G_fc_end_date;
1875: END IF;
1876:
1877: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1878: PA_DEBUG.g_err_stage := 'Opening the Cursor';
1879: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1880: END IF;
1881:
1882: OPEN capacity_api_input_cur(l_run_start_date,l_run_end_date);
1875: END IF;
1876:
1877: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1878: PA_DEBUG.g_err_stage := 'Opening the Cursor';
1879: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1880: END IF;
1881:
1882: OPEN capacity_api_input_cur(l_run_start_date,l_run_end_date);
1883:
1886: /*
1887: * Clear all PL/SQL table.
1888: */
1889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1890: PA_DEBUG.g_err_stage := 'Clearing PL/SQL Table';
1891: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1892: END IF;
1893:
1894: l_in_exp_orgz_tab.delete;
1887: * Clear all PL/SQL table.
1888: */
1889: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1890: PA_DEBUG.g_err_stage := 'Clearing PL/SQL Table';
1891: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1892: END IF;
1893:
1894: l_in_exp_orgz_tab.delete;
1895: l_in_person_id_tab.delete;
1909: /*
1910: * Fetch 100 records at a time.
1911: */
1912: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1913: PA_DEBUG.g_err_stage := 'Fetching 100 records at a time in PL/SQL Table';
1914: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1915: END IF;
1916:
1917: FETCH capacity_api_input_cur BULK COLLECT
1910: * Fetch 100 records at a time.
1911: */
1912: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1913: PA_DEBUG.g_err_stage := 'Fetching 100 records at a time in PL/SQL Table';
1914: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1915: END IF;
1916:
1917: FETCH capacity_api_input_cur BULK COLLECT
1918: INTO l_in_exp_orgz_tab
1953: /*
1954: * Call CV's API in loop get value.
1955: */
1956: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1957: PA_DEBUG.g_err_stage := 'Calling Capacity API for 100 records at a time';
1958: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1959: END IF;
1960:
1961: PA_FORECAST_GRC_PVT.Get_Capacity_Vector(
1954: * Call CV's API in loop get value.
1955: */
1956: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1957: PA_DEBUG.g_err_stage := 'Calling Capacity API for 100 records at a time';
1958: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1959: END IF;
1960:
1961: PA_FORECAST_GRC_PVT.Get_Capacity_Vector(
1962: p_OU_id => l_exp_org_id
1981: , x_msg_count => l_msg_count
1982: , x_msg_data => l_msg_data);
1983:
1984: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1985: PA_DEBUG.g_err_stage := 'Inserting Records into pa_rep_util_summ_tmp for capacity';
1986: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1987: END IF;
1988:
1989: FORALL I in l_out_person_id_tab.FIRST..l_out_person_id_tab.LAST
1982: , x_msg_data => l_msg_data);
1983:
1984: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1985: PA_DEBUG.g_err_stage := 'Inserting Records into pa_rep_util_summ_tmp for capacity';
1986: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
1987: END IF;
1988:
1989: FORALL I in l_out_person_id_tab.FIRST..l_out_person_id_tab.LAST
1990: INSERT INTO pa_rep_util_summ_tmp
2056: END IF;
2057:
2058: END LOOP;
2059: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2060: PA_DEBUG.g_err_stage := 'Closing the cursor';
2061: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2062: END IF;
2063:
2064: CLOSE capacity_api_input_cur;
2057:
2058: END LOOP;
2059: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2060: PA_DEBUG.g_err_stage := 'Closing the cursor';
2061: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2062: END IF;
2063:
2064: CLOSE capacity_api_input_cur;
2065:
2062: END IF;
2063:
2064: CLOSE capacity_api_input_cur;
2065:
2066: PA_DEBUG.Reset_curr_function;
2067:
2068: EXCEPTION
2069: WHEN OTHERS
2070: THEN
2068: EXCEPTION
2069: WHEN OTHERS
2070: THEN
2071: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2072: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2073: PA_DEBUG.log_message(SQLERRM);
2074: END IF;
2075: raise;
2076: END populate_tmp_for_capacity;
2069: WHEN OTHERS
2070: THEN
2071: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2072: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2073: PA_DEBUG.log_message(SQLERRM);
2074: END IF;
2075: raise;
2076: END populate_tmp_for_capacity;
2077:
2081: */
2082: PROCEDURE summarize_temp_data_by_org
2083: IS
2084: BEGIN
2085: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.summarize_temp_data_by_org');
2086: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2087: PA_DEBUG.g_err_stage := 'Summarizing at Organization level';
2088: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2089: END IF;
2083: IS
2084: BEGIN
2085: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.summarize_temp_data_by_org');
2086: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2087: PA_DEBUG.g_err_stage := 'Summarizing at Organization level';
2088: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2089: END IF;
2090:
2091: INSERT INTO pa_rep_util_summ_tmp
2084: BEGIN
2085: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.summarize_temp_data_by_org');
2086: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2087: PA_DEBUG.g_err_stage := 'Summarizing at Organization level';
2088: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2089: END IF;
2090:
2091: INSERT INTO pa_rep_util_summ_tmp
2092: ( record_type,
2175: having ((summ_level_flag = 'S'
2176: and grouping(org_util_category_id)||grouping(work_type_id) = '11')
2177: or ( summ_level_flag = 'R'));
2178:
2179: PA_DEBUG.Reset_curr_function;
2180:
2181: EXCEPTION
2182: WHEN OTHERS
2183: THEN
2181: EXCEPTION
2182: WHEN OTHERS
2183: THEN
2184: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2185: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2186: PA_DEBUG.log_message(SQLERRM);
2187: END IF;
2188: raise;
2189: END summarize_temp_data_by_org;
2182: WHEN OTHERS
2183: THEN
2184: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2185: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2186: PA_DEBUG.log_message(SQLERRM);
2187: END IF;
2188: raise;
2189: END summarize_temp_data_by_org;
2190:
2196: PROCEDURE populate_object_entity IS
2197:
2198: BEGIN
2199:
2200: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.summarize_temp_data_by_org');
2201:
2202: /*
2203: * Update the pa_rep_util_summ_tmp with matching object Id.
2204: */
2202: /*
2203: * Update the pa_rep_util_summ_tmp with matching object Id.
2204: */
2205: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2206: PA_DEBUG.g_err_stage := 'Update pa_rep_util_summ_tmp with matching object Id';
2207: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2208: END IF;
2209:
2210: UPDATE pa_rep_util_summ_tmp T
2203: * Update the pa_rep_util_summ_tmp with matching object Id.
2204: */
2205: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2206: PA_DEBUG.g_err_stage := 'Update pa_rep_util_summ_tmp with matching object Id';
2207: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2208: END IF;
2209:
2210: UPDATE pa_rep_util_summ_tmp T
2211: SET (T.object_id,T.process_mode_flag)
2239: /*
2240: * Populate pa_rep_util_summ_tmp with unique key for pa_objects.
2241: */
2242: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2243: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp with unique key for pa_objects';
2244: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2245: END IF;
2246:
2247: INSERT INTO pa_rep_util_summ_tmp
2240: * Populate pa_rep_util_summ_tmp with unique key for pa_objects.
2241: */
2242: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2243: PA_DEBUG.g_err_stage := 'Populate pa_rep_util_summ_tmp with unique key for pa_objects';
2244: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2245: END IF;
2246:
2247: INSERT INTO pa_rep_util_summ_tmp
2248: ( record_type,
2325: * Populate the other records of pa_rep_util_summ_tmp with
2326: * record type = 'TMP2' and null object Id.
2327: */
2328: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2329: PA_DEBUG.g_err_stage := 'Populate the other records of pa_rep_util_summ_tmp with record type =TMP2 and null object Id';
2330: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2331: END IF;
2332:
2333: UPDATE pa_rep_util_summ_tmp T1
2326: * record type = 'TMP2' and null object Id.
2327: */
2328: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2329: PA_DEBUG.g_err_stage := 'Populate the other records of pa_rep_util_summ_tmp with record type =TMP2 and null object Id';
2330: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2331: END IF;
2332:
2333: UPDATE pa_rep_util_summ_tmp T1
2334: SET (T1.object_id ,
2363: /*
2364: * Insert New Objects in PA_OBJECTS.
2365: */
2366: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2367: PA_DEBUG.g_err_stage := 'Insert New Objects in PA_OBJECTS';
2368: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2369: END IF;
2370:
2371: INSERT INTO PA_OBJECTS
2364: * Insert New Objects in PA_OBJECTS.
2365: */
2366: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2367: PA_DEBUG.g_err_stage := 'Insert New Objects in PA_OBJECTS';
2368: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2369: END IF;
2370:
2371: INSERT INTO PA_OBJECTS
2372: ( OBJECT_ID,
2425: AND process_mode_flag = 'HH'
2426: AND object_type_code <> l_utildet_c
2427: ;
2428:
2429: PA_DEBUG.Reset_curr_function;
2430:
2431: EXCEPTION
2432: WHEN OTHERS
2433: THEN
2431: EXCEPTION
2432: WHEN OTHERS
2433: THEN
2434: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2435: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2436: PA_DEBUG.log_message(SQLERRM);
2437: END IF;
2438: raise;
2439: END populate_object_entity;
2432: WHEN OTHERS
2433: THEN
2434: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2435: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2436: PA_DEBUG.log_message(SQLERRM);
2437: END IF;
2438: raise;
2439: END populate_object_entity;
2440:
2507: rec_update_bal cur_update_bal%ROWTYPE;
2508:
2509: BEGIN
2510:
2511: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.populate_balance_entity');
2512:
2513: /*
2514: * Update the global temporary table for successful update.
2515: */
2513: /*
2514: * Update the global temporary table for successful update.
2515: */
2516: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2517: PA_DEBUG.g_err_stage := 'Update the global temporary table for successful update1';
2518: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2519: END IF;
2520:
2521: UPDATE pa_rep_util_summ_tmp B
2514: * Update the global temporary table for successful update.
2515: */
2516: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2517: PA_DEBUG.g_err_stage := 'Update the global temporary table for successful update1';
2518: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2519: END IF;
2520:
2521: UPDATE pa_rep_util_summ_tmp B
2522: SET B.process_mode_flag = 'U'
2543: /*
2544: * Clear all PL/SQL table.
2545: */
2546: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2547: PA_DEBUG.g_err_stage := 'Clearing PL/SQL Table';
2548: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2549: END IF;
2550:
2551: L_PERIOD_BALANCE_TAB.delete;
2544: * Clear all PL/SQL table.
2545: */
2546: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2547: PA_DEBUG.g_err_stage := 'Clearing PL/SQL Table';
2548: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2549: END IF;
2550:
2551: L_PERIOD_BALANCE_TAB.delete;
2552: L_OBJECT_ID_TAB.delete;
2564: * Update the balance entity for existing records of pa_rep_util_summ_tmp
2565: * marked for update.
2566: */
2567: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2568: PA_DEBUG.g_err_stage := 'Update the balance entity for existing records of pa_rep_util_summ_tmp marked for update';
2569: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2570: END IF;
2571:
2572: IF cur_update_bal%ISOPEN then
2565: * marked for update.
2566: */
2567: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2568: PA_DEBUG.g_err_stage := 'Update the balance entity for existing records of pa_rep_util_summ_tmp marked for update';
2569: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2570: END IF;
2571:
2572: IF cur_update_bal%ISOPEN then
2573: CLOSE cur_update_bal;
2590: , L_AMOUNT_TYPE_ID_TAB
2591: ;
2592: l_totally_fetched := cur_update_bal%ROWCOUNT;
2593: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2594: PA_DEBUG.g_err_stage := 'Records totally fetched from cur_update_bal'||l_totally_fetched||L_PERIOD_BALANCE_TAB.COUNT;
2595: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2596: PA_DEBUG.g_err_stage := 'Before updating PA_SUMM_BALANCES from cur_update_bal';
2597: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2598: END IF;
2591: ;
2592: l_totally_fetched := cur_update_bal%ROWCOUNT;
2593: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2594: PA_DEBUG.g_err_stage := 'Records totally fetched from cur_update_bal'||l_totally_fetched||L_PERIOD_BALANCE_TAB.COUNT;
2595: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2596: PA_DEBUG.g_err_stage := 'Before updating PA_SUMM_BALANCES from cur_update_bal';
2597: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2598: END IF;
2599:
2592: l_totally_fetched := cur_update_bal%ROWCOUNT;
2593: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2594: PA_DEBUG.g_err_stage := 'Records totally fetched from cur_update_bal'||l_totally_fetched||L_PERIOD_BALANCE_TAB.COUNT;
2595: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2596: PA_DEBUG.g_err_stage := 'Before updating PA_SUMM_BALANCES from cur_update_bal';
2597: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2598: END IF;
2599:
2600:
2593: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2594: PA_DEBUG.g_err_stage := 'Records totally fetched from cur_update_bal'||l_totally_fetched||L_PERIOD_BALANCE_TAB.COUNT;
2595: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2596: PA_DEBUG.g_err_stage := 'Before updating PA_SUMM_BALANCES from cur_update_bal';
2597: PA_DEBUG.Log_Message( p_message => PA_DEBUG.g_err_stage);
2598: END IF;
2599:
2600:
2601: IF L_PERIOD_BALANCE_TAB.COUNT > 0 then
2627: /*
2628: * Insert new balance records from pa_rep_util_summ_tmp if needed.
2629: */
2630: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2631: PA_DEBUG.g_err_stage := 'Insert new balance records from pa_rep_util_summ_tmp if needed.';
2632: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2633: END IF;
2634:
2635: INSERT INTO pa_summ_balances
2628: * Insert new balance records from pa_rep_util_summ_tmp if needed.
2629: */
2630: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2631: PA_DEBUG.g_err_stage := 'Insert new balance records from pa_rep_util_summ_tmp if needed.';
2632: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2633: END IF;
2634:
2635: INSERT INTO pa_summ_balances
2636: ( OBJECT_ID,
2670: AND object_type_code <> l_utildet_c
2671: GROUP BY OBJECT_ID, PERIOD_TYPE, PERIOD_NAME,
2672: GLOBAL_EXP_PERIOD_END_DATE, AMOUNT_TYPE_ID;
2673:
2674: PA_DEBUG.Reset_curr_function;
2675:
2676: EXCEPTION
2677: WHEN OTHERS
2678: THEN
2676: EXCEPTION
2677: WHEN OTHERS
2678: THEN
2679: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2680: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2681: PA_DEBUG.log_message(SQLERRM);
2682: END IF;
2683: raise;
2684: END populate_balance_entity;
2677: WHEN OTHERS
2678: THEN
2679: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2680: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2681: PA_DEBUG.log_message(SQLERRM);
2682: END IF;
2683: raise;
2684: END populate_balance_entity;
2685:
2720:
2721:
2722: BEGIN
2723:
2724: PA_DEBUG.set_curr_function('PA_REP_UTILS_SUMM_PKG.populate_incremental_rollup');
2725:
2726: /*
2727: * populate PA_REP_UTIL_SUMM_TMP for total hours.
2728: */
2726: /*
2727: * populate PA_REP_UTIL_SUMM_TMP for total hours.
2728: */
2729: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2730: PA_DEBUG.g_err_stage := 'populate PA_REP_UTIL_SUMM_TMP for total hours';
2731: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2732: END IF;
2733:
2734: INSERT INTO pa_rep_util_summ_tmp
2727: * populate PA_REP_UTIL_SUMM_TMP for total hours.
2728: */
2729: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2730: PA_DEBUG.g_err_stage := 'populate PA_REP_UTIL_SUMM_TMP for total hours';
2731: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2732: END IF;
2733:
2734: INSERT INTO pa_rep_util_summ_tmp
2735: ( record_type,
2811: and ((dummytab.dummy_col = 'S'
2812: and org.child_organization_id <> org.parent_organization_id)
2813: or (dummytab.dummy_col = 'T'));
2814:
2815: PA_DEBUG.Reset_curr_function;
2816:
2817: EXCEPTION
2818: WHEN OTHERS
2819: THEN
2817: EXCEPTION
2818: WHEN OTHERS
2819: THEN
2820: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2821: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2822: PA_DEBUG.log_message(SQLERRM);
2823: END IF;
2824: raise;
2825: END populate_incremental_rollup;
2818: WHEN OTHERS
2819: THEN
2820: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2821: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2822: PA_DEBUG.log_message(SQLERRM);
2823: END IF;
2824: raise;
2825: END populate_incremental_rollup;
2826:
2829: IS
2830:
2831: BEGIN
2832:
2833: PA_DEBUG.set_curr_function('populate_summ_entity');
2834:
2835: /*
2836: * Assign P_Balance_Type_Code to package variable for future use.
2837: */
2841: * Assign p_process_method to package variable for future use.
2842: */
2843: l_delete_flag := p_process_method;
2844: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2845: PA_DEBUG.g_err_stage := 'Summarize the Data by Period ';
2846: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2847: END IF;
2848: /*
2849: * Summarize the data period wise from Global PL/SQL Table and
2842: */
2843: l_delete_flag := p_process_method;
2844: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2845: PA_DEBUG.g_err_stage := 'Summarize the Data by Period ';
2846: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2847: END IF;
2848: /*
2849: * Summarize the data period wise from Global PL/SQL Table and
2850: * populate global temprary table with periodwise summarized data.
2858: * Call the actual procedure to summarize data from global temporary
2859: * table.
2860: */
2861: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2862: PA_DEBUG.g_err_stage := 'Summarize the Data by Object Type ';
2863: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2864: END IF;
2865:
2866: summarize_temp_data_by_res;
2859: * table.
2860: */
2861: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2862: PA_DEBUG.g_err_stage := 'Summarize the Data by Object Type ';
2863: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2864: END IF;
2865:
2866: summarize_temp_data_by_res;
2867:
2877: */
2878: IF (l_org_rollup_method = 'I')
2879: THEN
2880: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2881: PA_DEBUG.g_err_stage := 'Processing Incremental Rollup';
2882: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2883: END IF;
2884: populate_incremental_rollup;
2885: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2878: IF (l_org_rollup_method = 'I')
2879: THEN
2880: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2881: PA_DEBUG.g_err_stage := 'Processing Incremental Rollup';
2882: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2883: END IF;
2884: populate_incremental_rollup;
2885: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2886: PA_DEBUG.g_err_stage := 'After Processing Incremental Rollup';
2882: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2883: END IF;
2884: populate_incremental_rollup;
2885: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2886: PA_DEBUG.g_err_stage := 'After Processing Incremental Rollup';
2887: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2888: END IF;
2889:
2890: END IF;
2883: END IF;
2884: populate_incremental_rollup;
2885: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2886: PA_DEBUG.g_err_stage := 'After Processing Incremental Rollup';
2887: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2888: END IF;
2889:
2890: END IF;
2891:
2893: * Populate the object entity from pa_rep_util_summ_tmp
2894: * for record_type='TMP2'.
2895: */
2896: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2897: PA_DEBUG.g_err_stage := 'Before calling populate_object_entity';
2898: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2899: END IF;
2900:
2901: populate_object_entity;
2894: * for record_type='TMP2'.
2895: */
2896: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2897: PA_DEBUG.g_err_stage := 'Before calling populate_object_entity';
2898: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2899: END IF;
2900:
2901: populate_object_entity;
2902:
2904: * Populate the balance entity from pa_rep_util_summ_tmp
2905: * for record_type='TMP2'.
2906: */
2907: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2908: PA_DEBUG.g_err_stage := 'Before calling populate_balance_entity';
2909: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2910: END IF;
2911:
2912: populate_balance_entity;
2905: * for record_type='TMP2'.
2906: */
2907: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2908: PA_DEBUG.g_err_stage := 'Before calling populate_balance_entity';
2909: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2910: END IF;
2911:
2912: populate_balance_entity;
2913:
2911:
2912: populate_balance_entity;
2913:
2914: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2915: PA_DEBUG.g_err_stage := 'After calling populate_balance_entity';
2916: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2917: END IF;
2918:
2919: PA_DEBUG.Reset_curr_function;
2912: populate_balance_entity;
2913:
2914: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2915: PA_DEBUG.g_err_stage := 'After calling populate_balance_entity';
2916: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2917: END IF;
2918:
2919: PA_DEBUG.Reset_curr_function;
2920:
2915: PA_DEBUG.g_err_stage := 'After calling populate_balance_entity';
2916: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2917: END IF;
2918:
2919: PA_DEBUG.Reset_curr_function;
2920:
2921: EXCEPTION
2922: WHEN OTHERS
2923: THEN
2921: EXCEPTION
2922: WHEN OTHERS
2923: THEN
2924: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2925: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2926: PA_DEBUG.log_message(SQLERRM);
2927: END IF;
2928: raise;
2929:
2922: WHEN OTHERS
2923: THEN
2924: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2925: PA_DEBUG.log_message(PA_DEBUG.g_err_stage);
2926: PA_DEBUG.log_message(SQLERRM);
2927: END IF;
2928: raise;
2929:
2930: END populate_summ_entity;