[Home] [Help]
1959:
1960: FUNCTION get_scenario_name(p_scenario_id in number) return varchar2 is
1961: cursor c_scn_name is
1962: select scenario_name
1963: from msc_scenarios
1964: where scenario_id = p_scenario_id;
1965:
1966: l_scn_name varchar2(100);
1967: begin
2066: for every plan_id,
2067: generate plan_run_id and update plan_run_id field for it.
2068: call populate_Details api
2069: end for;
2070: insert new record into msc_scenarios for current version of the scenario
2071: update scenario_name,version for this scenario_id by appending sysdate to it
2072: */
2073:
2074:
2098: return;
2099: end if;
2100:
2101: l_scn_name := msc_scn_utils.get_scenario_name(p_scn_id);
2102: select count(*) into l_scn_count from msc_scenarios where scenario_name like l_scn_name||' ('||sysdate||')%';
2103: l_scn_count := l_scn_count+1;
2104: msc_util.msc_debug('New Scenario Name:'||l_scn_name||' ('||sysdate||')('||l_scn_count||')');
2105: update msc_scenarios set scn_version = sysdate,scenario_name = scenario_name||' ('||sysdate||')('||l_scn_count||')' where scenario_id = p_scn_id;
2106:
2101: l_scn_name := msc_scn_utils.get_scenario_name(p_scn_id);
2102: select count(*) into l_scn_count from msc_scenarios where scenario_name like l_scn_name||' ('||sysdate||')%';
2103: l_scn_count := l_scn_count+1;
2104: msc_util.msc_debug('New Scenario Name:'||l_scn_name||' ('||sysdate||')('||l_scn_count||')');
2105: update msc_scenarios set scn_version = sysdate,scenario_name = scenario_name||' ('||sysdate||')('||l_scn_count||')' where scenario_id = p_scn_id;
2106:
2107: l_user_id := fnd_profile.value ('USER_ID');
2108: l_login_id := FND_PROFILE.VALUE('LOGIN_ID');
2109:
2108: l_login_id := FND_PROFILE.VALUE('LOGIN_ID');
2109:
2110: select msc_scn_scenarios_s.nextval into l_new_scn_id from dual;
2111:
2112: -- Insert rows into msc_scenarios,msc_scenario_plans,msc_scenario_users;
2113:
2114: insert into msc_scenarios(scenario_id,
2115: scenario_name,
2116: created_by,
2110: select msc_scn_scenarios_s.nextval into l_new_scn_id from dual;
2111:
2112: -- Insert rows into msc_scenarios,msc_scenario_plans,msc_scenario_users;
2113:
2114: insert into msc_scenarios(scenario_id,
2115: scenario_name,
2116: created_by,
2117: creation_date,
2118: last_update_date,
2140: scn_comment,
2141: valid_from,
2142: valid_to,
2143: null
2144: from msc_scenarios where scenario_id = p_scn_id);
2145:
2146: insert into msc_scenario_plans (scenario_id,
2147: plan_type,
2148: plan_id,
2238: where scenario_id = p_scn_id and purge_flag = 'Y' and plan_run_id is not null;
2239:
2240: cursor c_scn_version is
2241: select scn_version
2242: from msc_scenarios
2243: where scenario_id = p_scn_id;
2244:
2245: l_scn_version date;
2246: l_plan_type number;
2279: end loop;
2280: close c_scn_plans;
2281:
2282: end if;
2283: delete msc_scenarios where scenario_id = p_scn_id;
2284:
2285: delete msc_scenario_plans where scenario_id = p_scn_id;
2286:
2287: delete msc_Scenario_users where scenario_id = p_scn_id;
2545: from_query := from_query || ' ms.Description Scenario_Description, msc_scn_utils.Scenario_Status(msa.scenario_id) Scenario_Status, msc_pers_queries.get_user(ms.owner) Scenario_Owner_Name, ms.Scn_Comment Scenario_Comment, to_char(Null) Plan_Name, ';
2546: from_query := from_query || ' to_char(NULL) Plan_Status, msc_get_name.lookup_meaning(''MSC_SCN_PRIORITIES'',msa.Priority) Priority_Text, msa.Completed_On Completed_On, msc_pers_queries.get_user(msa.alternate_owner) alternate_owner_name, ';
2547: from_query := from_query || ' msc_pers_queries.get_user(msa.created_by) Created_By_User, msa.Creation_date, msa.rowid ROW_ID, msa.Activity_Id, msa.Scenario_Id, msa.Scenario_set_Id, ''MSA'' source_table, ';
2548: from_query := from_query || ' msa.Owner, msa.Status Status, msa.created_by, msa.last_update_date, msa.Last_updated_by, msa.last_update_login, msa.Priority, msa.Alternate_Owner, ms.owner Scenario_Owner FROM MSC_SCENARIO_ACTIVITIES MSA, ';
2549: from_query := from_query || ' MSC_SCENARIOS MS, MSC_SCENARIO_SETS MSS WHERE ';
2550: from_query := from_query || ' MSA.SCENARIO_ID=MS.SCENARIO_ID(+) AND MSA.SCENARIO_SET_ID=MSS.SCENARIO_SET_ID(+) and status in (1,2,4)) union ';
2551: from_query := from_query || ' (select concat(concat(mpp.process_name,'' - ''),msc_get_name.lookup_meaning(''MSC_PROCESS_ACTIVITY_TYPES'',MPPA.Activity_Type)) Activity_Name, to_char(NULL) Activity_Description, ';
2552: from_query := from_query || ' msc_get_name.lookup_meaning(''MSC_SCN_ACTIVITY_STATES'',MPPA.Status) Activity_Status, msc_pers_queries.get_user(MPPA.owner) Owner_Name, trunc(mppa.creation_date + nvl(time_out,0)) ';
2553: from_query := from_query || ' Finish_By, to_char(decode(MPPA.activity_type,14,''Manual'',15,''Manual'',16,''Manual'',17,''Manual'',18,''Manual'',20,''Manual'',22,''Manual'',23,''Manual'',''System'' ) ) Activity_Type, ';