[Home] [Help]
2810:
2811:
2812: if (PJI_UTILS.GET_PARAMETER('PJI_FPM_UPGRADE') = 'P') then
2813: FND_MESSAGE.SET_NAME('PJI', 'PJI_PJP_FPM_UPG_RUN');
2814: dbms_standard.raise_application_error(-20010, FND_MESSAGE.GET);
2815: end if;
2816: /*Check for from project and to project based on the run , idea is to recreate the same check which was done thru mandatory parameter*/
2817: if (p_operating_unit is null and p_project_type is null and p_project_organization_id is null and
2818: p_from_project is null and p_to_project is null and p_run_mode <> 'R') then
2816: /*Check for from project and to project based on the run , idea is to recreate the same check which was done thru mandatory parameter*/
2817: if (p_operating_unit is null and p_project_type is null and p_project_organization_id is null and
2818: p_from_project is null and p_to_project is null and p_run_mode <> 'R') then
2819: FND_MESSAGE.SET_NAME('PJI', 'PJI_NO_PARAMETER');
2820: dbms_standard.raise_application_error(-20090, FND_MESSAGE.GET);
2821: end if;
2822:
2823:
2824: if p_from_project > p_to_project then
2822:
2823:
2824: if p_from_project > p_to_project then
2825: FND_MESSAGE.SET_NAME('PJI', 'PJI_INVALID_RANGE');
2826: dbms_standard.raise_application_error(-20091, FND_MESSAGE.GET);
2827: end if;
2828:
2829: IF p_from_project is not null
2830: or p_to_project is not null then
2859: PJI_SYSTEM_SETTINGS;
2860:
2861: if (l_settings_proj_perf_flag = 'N') then
2862: FND_MESSAGE.SET_NAME('PJI', 'PJI_PJP_NOT_ENABLED');
2863: dbms_standard.raise_application_error(-20010, FND_MESSAGE.GET);
2864: end if;
2865:
2866: if p_from_project like 'UPP-BATCH-%' then -- Bug 14138486 Added if condition
2867: null;
2896:
2897:
2898: THEN
2899: FND_MESSAGE.SET_NAME('PJI', 'PJI_NO_PRC_AVAILABLE');
2900: dbms_standard.raise_application_error(-20010, FND_MESSAGE.GET);
2901: end if;
2902: end if;
2903: lock table PJI_PJP_PROJ_BATCH_MAP in exclusive mode;
2904: end if;
2915: elsif (p_run_mode = 'R') then
2916: l_extraction_type := 'RBS';
2917: else
2918: commit;
2919: dbms_standard.raise_application_error(-20010, 'Invalid run type');
2920: end if;
2921:
2922: p_worker_id := 0;
2923: l_type := 0;
3028: if (p_worker_id = 0) then
3029: rollback;
3030: OUTPUT_FAILED_RUNS;
3031: FND_MESSAGE.SET_NAME('PJI', 'PJI_NO_PRC_AVAILABLE');
3032: dbms_standard.raise_application_error(-20030, FND_MESSAGE.GET);
3033: end if;
3034:
3035: l_process := g_process || p_worker_id;
3036:
3433: p_to_project,
3434: l_extraction_type,
3435: p_project_status);
3436: FND_MESSAGE.SET_NAME('PJI', 'PJI_NO_WORK');
3437: dbms_standard.raise_application_error(-20041,FND_MESSAGE.GET);
3438:
3439: end if;
3440:
3441: elsif (l_extraction_type = 'RBS') then
3658: -- We may want to add, to the error message, the request
3659: -- ID that is causing the program to fail
3660: OUTPUT_FAILED_RUNS;
3661: FND_MESSAGE.SET_NAME('PJI', 'PJI_OVERLAPPING_WORK');
3662: dbms_standard.raise_application_error(-20040, FND_MESSAGE.GET);
3663:
3664: end if;
3665: end if;
3666: end loop;
3665: end if;
3666: end loop;
3667: -- IF l_rbs_exists ='Y' THEN
3668: -- FND_MESSAGE.SET_NAME('PJI', 'PJI_OVERLAPPING_WORK');
3669: -- dbms_standard.raise_application_error(-20040, FND_MESSAGE.GET);
3670: -- END IF;
3671: INIT_PROCESS(p_worker_id,
3672: p_run_mode,
3673: p_operating_unit,