[Home] [Help]
3:
4:
5: g_package_name VARCHAR2(100) := 'PJI_FM_PLAN_CAL_RLPS';
6:
7: g_worker_id NUMBER := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
8: g_default_prg_level NUMBER := 0;
9:
10:
11: PROCEDURE PRINT_TIME(p_tag IN VARCHAR2);
53: PJI_PJP_PRG_PERF_ALL.CREATE_FP_ENT_ROLLUP;
54:
55: else
56:
57: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
58:
59: INSERT INTO PJI_FP_AGGR_PJP1
60: (
61: WORKER_ID
282: PJI_PJP_PRG_PERF_ALL.CREATE_FP_PA_PRI_ROLLUP;
283:
284: else
285:
286: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
287:
288: INSERT INTO pji_fp_aggr_pjp1
289: (
290: WORKER_ID
510: PJI_PJP_PRG_PERF_ALL.CREATE_FP_GL_PRI_ROLLUP;
511:
512: else
513:
514: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
515:
516: INSERT INTO pji_fp_aggr_pjp1
517: (
518: WORKER_ID
739: PJI_PJP_PRG_PERF_ALL.CREATE_FP_ALL_T_PRI_ROLLUP;
740:
741: else
742:
743: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
744:
745: /* Added calendar type 'C' for bug 6381284 */
746: IF (p_calendar_type NOT IN ('P', 'G', 'C') ) THEN
747: RETURN;
1322:
1323: PROCEDURE CREATE_AC_PA_ROLLUP IS
1324: BEGIN
1325:
1326: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
1327:
1328: INSERT INTO PJI_AC_AGGR_PJP1
1329: (
1330: WORKER_ID
1505:
1506: PROCEDURE CREATE_AC_GL_ROLLUP IS
1507: BEGIN
1508:
1509: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
1510:
1511: INSERT INTO PJI_AC_AGGR_PJP1
1512: (
1513: worker_id
1687:
1688: PROCEDURE CREATE_AC_ENT_ROLLUP IS
1689: BEGIN
1690:
1691: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
1692:
1693: INSERT INTO PJI_AC_AGGR_PJP1
1694: (
1695: worker_id
1878: l_line_type VARCHAR2(15);
1879:
1880: BEGIN
1881:
1882: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
1883:
1884: IF (p_calendar_type NOT IN ('P', 'G') ) THEN
1885: RETURN;
1886: ELSE
1890: l_line_type := 'GLR';
1891: END IF;
1892: END IF;
1893:
1894: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
1895:
1896: INSERT INTO PJI_AC_AGGR_PJP1
1897: (
1898: worker_id
2084: PJI_PJP_PRG_PERF_ALL.PRORATE_TO_ENT_PG_PJP1_D;
2085:
2086: else
2087:
2088: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
2089:
2090: /* Commented for bug 4005006
2091: INSERT INTO pji_fp_aggr_pjp1
2092: (
3526:
3527: PROCEDURE PRORATE_TO_ENT_PG_FPRL_D IS
3528: BEGIN
3529:
3530: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
3531:
3532: EXCEPTION
3533: WHEN OTHERS THEN
3534: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
3546: PJI_PJP_PRG_PERF_ALL.PRORATE_TO_ENT_N_PJP1_D;
3547:
3548: else
3549:
3550: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
3551:
3552: INSERT INTO pji_fp_aggr_pjp1 -- Non time phased entries in pjp1 table.
3553: (
3554: WORKER_ID
3844:
3845: PROCEDURE PRORATE_TO_ENT_PG_PJP1_SE(p_prorating_format IN VARCHAR2) IS
3846: BEGIN
3847:
3848: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
3849:
3850: /* Commented for bug 4005006
3851:
3852: INSERT INTO pji_fp_aggr_pjp1 -- PA, GL calendar entries.
4255:
4256: PROCEDURE PRORATE_TO_ENT_PG_FPRL_SE IS
4257: BEGIN
4258:
4259: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
4260:
4261: EXCEPTION
4262: WHEN OTHERS THEN
4263: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
4268:
4269: PROCEDURE PRORATE_TO_ENT_N_PJP1_SE(p_prorating_format varchar2) IS
4270: BEGIN
4271:
4272: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
4273:
4274: INSERT INTO pji_fp_aggr_pjp1 -- Non time phased entries.
4275: (
4276: WORKER_ID
4486: PJI_PJP_PRG_PERF_ALL.PRORATE_TO_PAGL_PGE_PJP1_D;
4487:
4488: else
4489:
4490: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
4491:
4492: INSERT INTO pji_fp_aggr_pjp1
4493: (
4494: worker_id
4805:
4806: PROCEDURE PRORATE_TO_PAGL_PGE_FPRL_D (p_calendar_type IN VARCHAR2 := NULL) IS
4807: BEGIN
4808:
4809: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
4810:
4811: EXCEPTION
4812: WHEN OTHERS THEN
4813: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
4829: IF (p_calendar_type NOT IN ('P', 'G')) THEN
4830: RETURN;
4831: END IF;
4832:
4833: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
4834:
4835: INSERT INTO pji_fp_aggr_pjp1 -- Non time phased entries..
4836: (
4837: worker_id
5134: PROCEDURE PRORATE_TO_PAGL_PGE_PJP1_SE (p_calendar_type IN VARCHAR2 := NULL,
5135: p_prorating_format IN VARCHAR2) IS
5136: BEGIN
5137:
5138: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
5139:
5140: INSERT INTO pji_fp_aggr_pjp1 -- For PA/GL entries.
5141: (
5142: worker_id
5346:
5347: PROCEDURE PRORATE_TO_PAGL_PGE_FPRL_SE (p_calendar_type IN VARCHAR2 := NULL) IS
5348: BEGIN
5349:
5350: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
5351:
5352: EXCEPTION
5353: WHEN OTHERS THEN
5354: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
5360: PROCEDURE PRORATE_TO_PAGL_N_PJP1_SE (p_calendar_type IN VARCHAR2 := NULL,
5361: p_prorating_format IN VARCHAR2) IS
5362: BEGIN
5363:
5364: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
5365:
5366: INSERT INTO pji_fp_aggr_pjp1 -- For non time phased entries.
5367: (
5368: worker_id
5586: -- Print time API to measure time taken by each api. Also useful for debugging.
5587: ----------
5588: PROCEDURE PRINT_TIME(p_tag IN VARCHAR2) IS
5589: BEGIN
5590: PJI_PJP_FP_CURR_WRAP.print_time(p_tag);
5591: EXCEPTION
5592: WHEN OTHERS THEN
5593: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
5594: p_procedure_name => 'PRINT_TIME');