110:
111: select PJI_PROCESS_UTIL.GET_PROCESS_PARAMETER (l_e_process,l_e_process),
112: DECODE(l_e_extraction_type,'PARTIAL',g_prtl_disp_name,'RBS',g_rbs_disp_name,NULL,NULL,g_incr_disp_name)
113: into p_request_id,p_prog_name
114: from dual;
115:
116: else
117:
118: -- Need to submit the existing failed worker request
168: l_e_rbs_header_id,
169: l_e_transaction_type,
170: l_e_plan_versions
171: FROM
172: DUAL;
173:
174:
175: IF l_e_program is not null then
176: p_request_id := FND_REQUEST.SUBMIT_REQUEST(
1109: , bv.SECONDARY_RBS_FLAG
1110: , bv.lp_flag
1111: FROM PJI_FM_EXTR_PLNVER4 bv
1112: , pji_xbs_denorm den
1113: , ( SELECT -3 plan_version_id FROM DUAL
1114: UNION ALL
1115: SELECT -4 FROM DUAL ) cbco
1116: WHERE 1=1
1117: AND bv.plan_version_id > 0
1111: FROM PJI_FM_EXTR_PLNVER4 bv
1112: , pji_xbs_denorm den
1113: , ( SELECT -3 plan_version_id FROM DUAL
1114: UNION ALL
1115: SELECT -4 FROM DUAL ) cbco
1116: WHERE 1=1
1117: AND bv.plan_version_id > 0
1118: AND bv.wp_flag = 'N'
1119: AND bv.baselined_flag = 'Y'
2064: PA_XBS_DENORM wbs,
2065: PJI_XBS_DENORM prg,
2066: (
2067: select 'Y' CB, 'N' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2068: from DUAL union all
2069: select 'Y' CB, 'N' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2070: from DUAL union all
2071: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2072: from DUAL union all
2066: (
2067: select 'Y' CB, 'N' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2068: from DUAL union all
2069: select 'Y' CB, 'N' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2070: from DUAL union all
2071: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2072: from DUAL union all
2073: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2074: from DUAL union all
2068: from DUAL union all
2069: select 'Y' CB, 'N' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2070: from DUAL union all
2071: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2072: from DUAL union all
2073: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2074: from DUAL union all
2075: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2076: from DUAL union all
2070: from DUAL union all
2071: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2072: from DUAL union all
2073: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2074: from DUAL union all
2075: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2076: from DUAL union all
2077: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2078: from DUAL union all
2072: from DUAL union all
2073: select 'N' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2074: from DUAL union all
2075: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2076: from DUAL union all
2077: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2078: from DUAL union all
2079: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2080: from DUAL union all
2074: from DUAL union all
2075: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRG' INVERT_ID
2076: from DUAL union all
2077: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2078: from DUAL union all
2079: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2080: from DUAL union all
2081: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2082: from DUAL
2076: from DUAL union all
2077: select 'Y' CB, 'Y' CO, -3 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2078: from DUAL union all
2079: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2080: from DUAL union all
2081: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2082: from DUAL
2083: ) fin_plan,
2084: (
2078: from DUAL union all
2079: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRG' INVERT_ID
2080: from DUAL union all
2081: select 'Y' CB, 'Y' CO, -4 PLAN_VERSION_ID, 'PRJ' INVERT_ID
2082: from DUAL
2083: ) fin_plan,
2084: (
2085: select 1 WBS_SUP_LEVEL,
2086: 1 WBS_SUB_LEVEL,
2084: (
2085: select 1 WBS_SUP_LEVEL,
2086: 1 WBS_SUB_LEVEL,
2087: 'PRJ' INVERT_ID
2088: from DUAL
2089: union all
2090: select 1 WBS_SUP_LEVEL,
2091: 1 WBS_SUB_LEVEL,
2092: 'WBS' INVERT_ID
2089: union all
2090: select 1 WBS_SUP_LEVEL,
2091: 1 WBS_SUB_LEVEL,
2092: 'WBS' INVERT_ID
2093: from DUAL
2094: ) top_slice
2095: where
2096: prg.STRUCT_TYPE = 'PRG' and
2097: prg.SUP_LEVEL = l_level and
2219: (
2220: select 'Y' CB_FLAG,
2221: 'N' CO_FLAG,
2222: -3 PLAN_VERSION_ID
2223: from DUAL union all
2224: select 'N' CB_FLAG,
2225: 'Y' CO_FLAG,
2226: -4 PLAN_VERSION_ID
2227: from DUAL union all
2223: from DUAL union all
2224: select 'N' CB_FLAG,
2225: 'Y' CO_FLAG,
2226: -4 PLAN_VERSION_ID
2227: from DUAL union all
2228: select 'Y' CB_FLAG,
2229: 'Y' CO_FLAG,
2230: -3 PLAN_VERSION_ID
2231: from DUAL union all
2227: from DUAL union all
2228: select 'Y' CB_FLAG,
2229: 'Y' CO_FLAG,
2230: -3 PLAN_VERSION_ID
2231: from DUAL union all
2232: select 'Y' CB_FLAG,
2233: 'Y' CO_FLAG,
2234: -4 PLAN_VERSION_ID
2235: from DUAL
2231: from DUAL union all
2232: select 'Y' CB_FLAG,
2233: 'Y' CO_FLAG,
2234: -4 PLAN_VERSION_ID
2235: from DUAL
2236: ) fin_plan
2237: where
2238: prg.STRUCT_TYPE = 'PRG' and
2239: prg.SUP_LEVEL = l_level and
2285: from
2286: PJI_XBS_DENORM prg,
2287: PA_PROJECTS_ALL map,
2288: (
2289: select 'LF' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2290: select 'LW' INVERT_ID, 'LW' INVERT_VALUE from dual union all
2291: select 'A' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2292: select 'A' INVERT_ID, 'LW' INVERT_VALUE from dual
2293: ) invert
2286: PJI_XBS_DENORM prg,
2287: PA_PROJECTS_ALL map,
2288: (
2289: select 'LF' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2290: select 'LW' INVERT_ID, 'LW' INVERT_VALUE from dual union all
2291: select 'A' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2292: select 'A' INVERT_ID, 'LW' INVERT_VALUE from dual
2293: ) invert
2294: where
2287: PA_PROJECTS_ALL map,
2288: (
2289: select 'LF' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2290: select 'LW' INVERT_ID, 'LW' INVERT_VALUE from dual union all
2291: select 'A' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2292: select 'A' INVERT_ID, 'LW' INVERT_VALUE from dual
2293: ) invert
2294: where
2295: prg.STRUCT_TYPE = 'PRG' and
2288: (
2289: select 'LF' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2290: select 'LW' INVERT_ID, 'LW' INVERT_VALUE from dual union all
2291: select 'A' INVERT_ID, 'LF' INVERT_VALUE from dual union all
2292: select 'A' INVERT_ID, 'LW' INVERT_VALUE from dual
2293: ) invert
2294: where
2295: prg.STRUCT_TYPE = 'PRG' and
2296: prg.SUB_ROLLUP_ID is not null and
2699:
2700: end if;
2701:
2702: Begin
2703: select 1 into l_count from dual
2704: where exists ( select event_type
2705: from PA_PJI_PROJ_EVENTS_LOG elog
2706: where elog.event_type = 'PLANTYPE_UPG');
2707: exception when NO_DATA_FOUND then
3004: sysdate START_DATE,
3005: null END_DATE,
3006: null COMPLETION_TEXT
3007: from
3008: dual;
3009:
3010: -- If this is the resubmit of already existing failed run then Bug 5057835
3011: if l_existing_worker = 'Y' and
3012: (not PJI_PROCESS_UTIL.NEED_TO_RUN_STEP(l_process, 'PJI_PJP_SUM_MAIN.INIT_PROCESS(p_worker_id, p_run_mode);')) then
3037: begin -- bug 5356051
3038:
3039: select 'Y'
3040: into l_prg_exists
3041: from DUAL
3042: where exists (select 1
3043: from PA_PROJ_ELEMENT_VERSIONS proj
3044: where proj.OBJECT_TYPE = 'PA_STRUCTURES' and
3045: proj.PRG_GROUP is not null and
3371:
3372: if (l_extraction_type ='INCREMENTAL' and p_run_mode <> 'NO_PRELOAD') then --Bug#5171542 - Start
3373:
3374: begin
3375: SELECT 'FULL' INTO l_extraction_type FROM DUAL
3376: WHERE EXISTS
3377: (
3378: SELECT 1
3379: FROM pji_pjp_proj_extr_status extr,
3556: SELECT SUM(REFRESH_CODE) INTO l_refresh_code
3557: FROM (
3558: SELECT
3559: DECODE(p_transaction_type,'ALL_TXN_TYPE',1,'ACTUAL_TXN_TYPE',1,0) REFRESH_CODE
3560: FROM DUAL
3561: UNION ALL
3562: SELECT
3563: (CASE p_plan_versions
3564: WHEN 'ALL_PLAN_VERSION' THEN 62
3568: WHEN 'WK_VERSION' THEN 16
3569: WHEN 'LAT_VERSION' THEN 30
3570: ELSE 0
3571: END) REFRESH_CODE
3572: FROM DUAL
3573: );
3574:
3575: else
3576: l_refresh_code :=63;