eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MRP_CL_FUNCTION dependencies on MSC_UTIL

Line 68: IF MRP_CL_FUNCTION.validateUser(lv_user_id,MSC_UTIL.TASK_COLL,lv_log_msg) THEN

64: WHEN NO_DATA_FOUND THEN
65: raise_application_error (-20001, 'User not defined on Source instance');
66: END;
67:
68: IF MRP_CL_FUNCTION.validateUser(lv_user_id,MSC_UTIL.TASK_COLL,lv_log_msg) THEN
69: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_COLL,
70: lv_user_id,
71: -1, --l_resp_id,
72: -1 --l_application_id

Line 69: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_COLL,

65: raise_application_error (-20001, 'User not defined on Source instance');
66: END;
67:
68: IF MRP_CL_FUNCTION.validateUser(lv_user_id,MSC_UTIL.TASK_COLL,lv_log_msg) THEN
69: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_COLL,
70: lv_user_id,
71: -1, --l_resp_id,
72: -1 --l_application_id
73: );

Line 75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_log_msg);

71: -1, --l_resp_id,
72: -1 --l_application_id
73: );
74: ELSE
75: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_log_msg);
76: raise_application_error (-20001, lv_log_msg);
77: END IF;
78:
79: END IF;

Line 1663: lv_mrp_schema := MSC_UTIL.G_MRP_SCHEMA;

1659: INTO v_current_date,
1660: v_current_user
1661: FROM DUAL;
1662:
1663: lv_mrp_schema := MSC_UTIL.G_MRP_SCHEMA;
1664:
1665: lv_trunc_stmt := ' TRUNCATE TABLE ' || lv_mrp_schema ||
1666: '.MRP_WO_SUB_COMP ';
1667: EXECUTE IMMEDIATE lv_trunc_stmt;

Line 1996: IF MRP_CL_FUNCTION.validateUser(l_user_id,MSC_UTIL.TASK_RELEASE,lv_log_msg) THEN

1992: MRP_CL_REFRESH_SNAPSHOT.LOG_DEBUG('Error in launching the concurrent request : NO_USER_DEFINED');
1993: raise_application_error (-20001, 'NO_USER_DEFINED');
1994: END;
1995:
1996: IF MRP_CL_FUNCTION.validateUser(l_user_id,MSC_UTIL.TASK_RELEASE,lv_log_msg) THEN
1997: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_RELEASE,
1998: l_user_id,
1999: -1, --l_resp_id,
2000: -1 --l_application_id

Line 1997: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_RELEASE,

1993: raise_application_error (-20001, 'NO_USER_DEFINED');
1994: END;
1995:
1996: IF MRP_CL_FUNCTION.validateUser(l_user_id,MSC_UTIL.TASK_RELEASE,lv_log_msg) THEN
1997: MRP_CL_FUNCTION.MSC_Initialize(MSC_UTIL.TASK_RELEASE,
1998: l_user_id,
1999: -1, --l_resp_id,
2000: -1 --l_application_id
2001: );

Line 2003: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_log_msg);

1999: -1, --l_resp_id,
2000: -1 --l_application_id
2001: );
2002: ELSE
2003: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, lv_log_msg);
2004: raise_application_error (-20001, lv_log_msg);
2005: END IF;
2006:
2007:

Line 2047: IF pTASK = MSC_UTIL.TASK_COLL THEN

2043: pMESSAGE IN OUT NOCOPY varchar2)
2044: return BOOLEAN IS
2045: lv_result NUMBER := 0;
2046: BEGIN
2047: IF pTASK = MSC_UTIL.TASK_COLL THEN
2048:
2049: select 1
2050: into lv_result
2051: from fnd_responsibility resp

Line 2059: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN

2055: and resp.responsibility_key = 'APS_COLLECTIONS'
2056: and user_resp.user_id = pUSERID
2057: and rownum =1 ;
2058:
2059: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2060:
2061: select 1
2062: into lv_result
2063: from fnd_responsibility resp,

Line 2081: IF pTASK = MSC_UTIL.TASK_COLL THEN

2077: END IF;
2078:
2079: EXCEPTION
2080: WHEN NO_DATA_FOUND THEN
2081: IF pTASK = MSC_UTIL.TASK_COLL THEN
2082: pMESSAGE := 'User not defnied or not assigned to the responsibility - ''APS COLLECTIONS''';
2083: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2084: pMESSAGE := 'User not defnied or not assigned to the responsibility - ''APS RELEASE''';
2085: END IF;

Line 2083: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN

2079: EXCEPTION
2080: WHEN NO_DATA_FOUND THEN
2081: IF pTASK = MSC_UTIL.TASK_COLL THEN
2082: pMESSAGE := 'User not defnied or not assigned to the responsibility - ''APS COLLECTIONS''';
2083: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2084: pMESSAGE := 'User not defnied or not assigned to the responsibility - ''APS RELEASE''';
2085: END IF;
2086: Return FALSE;
2087: WHEN OTHERS THEN

Line 2112: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Profile Value '|| pwindow );

2108: If (pREFRESH_TYPE = 'C' OR pREFRESH_TYPE = 'P') then
2109: --pwindow := NVL(fnd_profile.value('MSC_COLL_TIME_WINDOW_IBUC_HISTORY') ,0);
2110: lv_start_date := TRUNC(SYSTIMESTAMP-(pWINDOW*30+5));
2111: lv_purge_flag := 'Y';
2112: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Profile Value '|| pwindow );
2113: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window calculated based on profile '||lv_start_date);
2114:
2115: ELSIF pREFRESH_TYPE = 'I' THEN
2116: lv_start_date := TRUNC(pSTART_DATE);

Line 2113: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window calculated based on profile '||lv_start_date);

2109: --pwindow := NVL(fnd_profile.value('MSC_COLL_TIME_WINDOW_IBUC_HISTORY') ,0);
2110: lv_start_date := TRUNC(SYSTIMESTAMP-(pWINDOW*30+5));
2111: lv_purge_flag := 'Y';
2112: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Profile Value '|| pwindow );
2113: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window calculated based on profile '||lv_start_date);
2114:
2115: ELSIF pREFRESH_TYPE = 'I' THEN
2116: lv_start_date := TRUNC(pSTART_DATE);
2117: lv_purge_flag := 'N';

Line 2118: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window for net change '||pSTART_DATE);

2114:
2115: ELSIF pREFRESH_TYPE = 'I' THEN
2116: lv_start_date := TRUNC(pSTART_DATE);
2117: lv_purge_flag := 'N';
2118: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window for net change '||pSTART_DATE);
2119: END IF;
2120:
2121:
2122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Refresh type : '

Line 2122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Refresh type : '

2118: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Start Date of the History window for net change '||pSTART_DATE);
2119: END IF;
2120:
2121:
2122: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Refresh type : '
2123: ||pREFRESH_TYPE||' Start date for CP - ' ||lv_start_date );
2124:
2125: lv_request_id_ibuc := FND_REQUEST.SUBMIT_REQUEST(
2126: 'MSC',

Line 2135: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Request : '

2131: lv_start_date,--to_char(lv_start_date,'DD-MON-RRRR'),
2132: lv_purge_flag
2133: );
2134: COMMIT;
2135: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Request : '
2136: || lv_request_id_IBUC ||' Calculates the Install Base under Contracts
2137: for a given date range');
2138:
2139:

Line 2243: ERRBUF := MSC_UTIL.G_SUCCESS;

2239: prev_lb_inv_item_id number ;
2240:
2241: BEGIN
2242:
2243: ERRBUF := MSC_UTIL.G_SUCCESS;
2244: orig_st_date := trunc(pSTART_DATE);
2245: lv_purge_flag := pPURGE_FLAG;
2246:
2247: BEGIN

Line 2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Profile value for Fixed Date '||prf_end_date);

2245: lv_purge_flag := pPURGE_FLAG;
2246:
2247: BEGIN
2248: prf_end_date := nvl(fnd_profile.value('MSC_FIXED_DATE_IBUC_HISTORY'),0) ;
2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Profile value for Fixed Date '||prf_end_date);
2250: EXCEPTION
2251: WHEN OTHERS THEN
2252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Please enter the value of profile ' ||
2253: 'MSC: Fixed Date for Install Base under Contracts History (DD-MON-YYYY) ' ||

Line 2252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Please enter the value of profile ' ||

2248: prf_end_date := nvl(fnd_profile.value('MSC_FIXED_DATE_IBUC_HISTORY'),0) ;
2249: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Profile value for Fixed Date '||prf_end_date);
2250: EXCEPTION
2251: WHEN OTHERS THEN
2252: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Please enter the value of profile ' ||
2253: 'MSC: Fixed Date for Install Base under Contracts History (DD-MON-YYYY) ' ||
2254: ' in the correct date format DD-MON-YYYY ' );
2255: END;
2256:

Line 2259: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Start date of the Time Window '||orig_st_date);

2255: END;
2256:
2257: orig_end_date := trunc(nvl(prf_end_date,systimestamp));
2258:
2259: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Start date of the Time Window '||orig_st_date);
2260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'End date of the Time Window '||orig_end_date);
2261:
2262: /* determine the list of contracts for each of the above item instance----- */
2263:

Line 2260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'End date of the Time Window '||orig_end_date);

2256:
2257: orig_end_date := trunc(nvl(prf_end_date,systimestamp));
2258:
2259: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Start date of the Time Window '||orig_st_date);
2260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'End date of the Time Window '||orig_end_date);
2261:
2262: /* determine the list of contracts for each of the above item instance----- */
2263:
2264: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP';

Line 2264: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP';

2260: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'End date of the Time Window '||orig_end_date);
2261:
2262: /* determine the list of contracts for each of the above item instance----- */
2263:
2264: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP';
2265: EXECUTE IMMEDIATE lv_sql_stmt;
2266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_IB_CONTRACTS_TEMP');
2267:
2268: for t in c10(orig_st_date)

Line 2266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_IB_CONTRACTS_TEMP');

2262: /* determine the list of contracts for each of the above item instance----- */
2263:
2264: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP';
2265: EXECUTE IMMEDIATE lv_sql_stmt;
2266: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_IB_CONTRACTS_TEMP');
2267:
2268: for t in c10(orig_st_date)
2269: loop
2270: CSI_JAVA_INTERFACE_PKG.getContracts(t.item_instance_id,x_return_status,x_msg_count,x_msg_data,x_output_contracts);

Line 2355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Completed inserting Data into MSC_IB_CONTRACTS_TEMP');

2351:
2352: END LOOP; /*Outer loop - Item instances*/
2353: /* ----------*/
2354:
2355: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Completed inserting Data into MSC_IB_CONTRACTS_TEMP');
2356:
2357: /* ADD the function based index*/
2358:
2359: begin

Line 2360: lv_sql_stmt := 'CREATE INDEX ' || MSC_UTIL.G_MSC_SCHEMA ||'.MSC_IB_CONTRACTS_TEMP_N1 ' ||

2356:
2357: /* ADD the function based index*/
2358:
2359: begin
2360: lv_sql_stmt := 'CREATE INDEX ' || MSC_UTIL.G_MSC_SCHEMA ||'.MSC_IB_CONTRACTS_TEMP_N1 ' ||
2361: 'ON ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP( INSTALL_DATE,
2362: SERVICE_START_DATE, NVL(COTERM_DATE,SERVICE_END_DATE), EXPIRATION_DATE )
2363: STORAGE(INITIAL 1M NEXT 1M MINEXTENTS 1 MAXEXTENTS 2147483645 PCTINCREASE 0 )
2364: TABLESPACE APPS_TS_TX_DATA ';

Line 2361: 'ON ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP( INSTALL_DATE,

2357: /* ADD the function based index*/
2358:
2359: begin
2360: lv_sql_stmt := 'CREATE INDEX ' || MSC_UTIL.G_MSC_SCHEMA ||'.MSC_IB_CONTRACTS_TEMP_N1 ' ||
2361: 'ON ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP( INSTALL_DATE,
2362: SERVICE_START_DATE, NVL(COTERM_DATE,SERVICE_END_DATE), EXPIRATION_DATE )
2363: STORAGE(INITIAL 1M NEXT 1M MINEXTENTS 1 MAXEXTENTS 2147483645 PCTINCREASE 0 )
2364: TABLESPACE APPS_TS_TX_DATA ';
2365:

Line 2367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP created ');

2363: STORAGE(INITIAL 1M NEXT 1M MINEXTENTS 1 MAXEXTENTS 2147483645 PCTINCREASE 0 )
2364: TABLESPACE APPS_TS_TX_DATA ';
2365:
2366: EXECUTE IMMEDIATE lv_sql_stmt;
2367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP created ');
2368: EXCEPTION
2369: WHEN OTHERS THEN
2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

Line 2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2366: EXECUTE IMMEDIATE lv_sql_stmt;
2367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP created ');
2368: EXCEPTION
2369: WHEN OTHERS THEN
2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2372: /* IF SQLCODE IN (-01418) THEN RAISE; END IF; */
2373: END;
2374: BEGIN

Line 2371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2367: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP created ');
2368: EXCEPTION
2369: WHEN OTHERS THEN
2370: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2371: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2372: /* IF SQLCODE IN (-01418) THEN RAISE; END IF; */
2373: END;
2374: BEGIN
2375: /*Aggregate the quantity based on the item, date, quantity */

Line 2378: lv_sql_stmt := 'Truncate table '|| MSC_UTIL.G_MSC_SCHEMA || '.MSC_SR_ZN_AGGR_IBUC';

2374: BEGIN
2375: /*Aggregate the quantity based on the item, date, quantity */
2376:
2377: if lv_purge_flag = 'Y' then
2378: lv_sql_stmt := 'Truncate table '|| MSC_UTIL.G_MSC_SCHEMA || '.MSC_SR_ZN_AGGR_IBUC';
2379: EXECUTE IMMEDIATE lv_sql_stmt;
2380: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_SR_ZN_AGGR_IBUC');
2381:
2382: elsif lv_purge_flag = 'N' THEN

Line 2380: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_SR_ZN_AGGR_IBUC');

2376:
2377: if lv_purge_flag = 'Y' then
2378: lv_sql_stmt := 'Truncate table '|| MSC_UTIL.G_MSC_SCHEMA || '.MSC_SR_ZN_AGGR_IBUC';
2379: EXECUTE IMMEDIATE lv_sql_stmt;
2380: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Truncated table MSC_SR_ZN_AGGR_IBUC');
2381:
2382: elsif lv_purge_flag = 'N' THEN
2383: /* In case of net-change coll, we are deleting the data of the start date
2384: alone, to avoid unique constraint, as data would have been collected in the

Line 2431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Completed inserting data into MSC_SR_ZN_AGGR_IBUC');

2427:
2428:
2429: COMMIT;
2430:
2431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Completed inserting data into MSC_SR_ZN_AGGR_IBUC');
2432:
2433: BEGIN
2434: lv_sql_stmt := 'DROP INDEX ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP_N1';
2435: EXECUTE IMMEDIATE lv_sql_stmt;

Line 2434: lv_sql_stmt := 'DROP INDEX ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP_N1';

2430:
2431: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Completed inserting data into MSC_SR_ZN_AGGR_IBUC');
2432:
2433: BEGIN
2434: lv_sql_stmt := 'DROP INDEX ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP_N1';
2435: EXECUTE IMMEDIATE lv_sql_stmt;
2436: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP Dropped ');
2437: EXCEPTION
2438: WHEN OTHERS THEN

Line 2436: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP Dropped ');

2432:
2433: BEGIN
2434: lv_sql_stmt := 'DROP INDEX ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_IB_CONTRACTS_TEMP_N1';
2435: EXECUTE IMMEDIATE lv_sql_stmt;
2436: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP Dropped ');
2437: EXCEPTION
2438: WHEN OTHERS THEN
2439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

Line 2439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2435: EXECUTE IMMEDIATE lv_sql_stmt;
2436: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP Dropped ');
2437: EXCEPTION
2438: WHEN OTHERS THEN
2439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2441: /*
2442: IF SQLCODE IN (-01418) THEN
2443: RAISE;

Line 2440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2436: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS,'Index MSC_IB_CONTRACTS_TEMP_N1 on table MSC_IB_CONTRACTS_TEMP Dropped ');
2437: EXCEPTION
2438: WHEN OTHERS THEN
2439: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2440: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2441: /*
2442: IF SQLCODE IN (-01418) THEN
2443: RAISE;
2444: END IF;

Line 2452: || MSC_UTIL.G_MSC_SCHEMA ||'.MSC_IB_CONTRACTS_TEMP'

2448: BEGIN
2449: prev_lb_inv_item_id := -1;
2450: lv_sql_stmt3 :=
2451: 'select inventory_item_id,item_instance_id,location_id from '
2452: || MSC_UTIL.G_MSC_SCHEMA ||'.MSC_IB_CONTRACTS_TEMP'
2453: || ' where zone is null group by inventory_item_id,item_instance_id,location_id order by inventory_item_id ' ;
2454:
2455: EXECUTE IMMEDIATE lv_sql_stmt3 BULK COLLECT into lb_inv_item_id,lb_item_instance_id,lb_location_id ;
2456:

Line 2458: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2454:
2455: EXECUTE IMMEDIATE lv_sql_stmt3 BULK COLLECT into lb_inv_item_id,lb_item_instance_id,lb_location_id ;
2456:
2457: IF lb_inv_item_id.count >0 THEN
2458: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Following Item Instances do not have Location to Zone Mapping ');
2460:
2461: for j in lb_inv_item_id.FIRST .. lb_inv_item_id.LAST
2462: Loop

Line 2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Following Item Instances do not have Location to Zone Mapping ');

2455: EXECUTE IMMEDIATE lv_sql_stmt3 BULK COLLECT into lb_inv_item_id,lb_item_instance_id,lb_location_id ;
2456:
2457: IF lb_inv_item_id.count >0 THEN
2458: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2459: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Following Item Instances do not have Location to Zone Mapping ');
2460:
2461: for j in lb_inv_item_id.FIRST .. lb_inv_item_id.LAST
2462: Loop
2463: IF prev_lb_inv_item_id <> lb_inv_item_id(j) THEN

Line 2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Inventory Item Id '||lb_inv_item_id(j));

2460:
2461: for j in lb_inv_item_id.FIRST .. lb_inv_item_id.LAST
2462: Loop
2463: IF prev_lb_inv_item_id <> lb_inv_item_id(j) THEN
2464: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Source Inventory Item Id '||lb_inv_item_id(j));
2465: ELSE
2466: prev_lb_inv_item_id := lb_inv_item_id(j);
2467: END IF;
2468:

Line 2469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' Item Instance Id -- ' || lb_item_instance_id(j)

2465: ELSE
2466: prev_lb_inv_item_id := lb_inv_item_id(j);
2467: END IF;
2468:
2469: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, ' Item Instance Id -- ' || lb_item_instance_id(j)
2470: || ' Location Id -- ' || lb_location_id(j) );
2471: END LOOP;
2472:
2473: ELSE

Line 2474: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2470: || ' Location Id -- ' || lb_location_id(j) );
2471: END LOOP;
2472:
2473: ELSE
2474: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2475: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'All Item Instances have Location to Zone Mapping ');
2476: END IF ;
2477:
2478: /*IF lb_inv_item_id.COUNT >0 THEN

Line 2475: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'All Item Instances have Location to Zone Mapping ');

2471: END LOOP;
2472:
2473: ELSE
2474: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2475: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'All Item Instances have Location to Zone Mapping ');
2476: END IF ;
2477:
2478: /*IF lb_inv_item_id.COUNT >0 THEN
2479: RETCODE := MSC_UTIL.G_WARNING;

Line 2479: RETCODE := MSC_UTIL.G_WARNING;

2475: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'All Item Instances have Location to Zone Mapping ');
2476: END IF ;
2477:
2478: /*IF lb_inv_item_id.COUNT >0 THEN
2479: RETCODE := MSC_UTIL.G_WARNING;
2480: END IF;*/
2481:
2482: EXCEPTION
2483: WHEN OTHERS THEN

Line 2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2480: END IF;*/
2481:
2482: EXCEPTION
2483: WHEN OTHERS THEN
2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2485: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2486: END;
2487:
2488: EXCEPTION

Line 2485: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2481:
2482: EXCEPTION
2483: WHEN OTHERS THEN
2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2485: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2486: END;
2487:
2488: EXCEPTION
2489: WHEN OTHERS THEN

Line 2542: IF pTASK = MSC_UTIL.TASK_COLL THEN

2538: lv_resp_id NUMBER;
2539: lv_application_id NUMBER;
2540: PRAGMA AUTONOMOUS_TRANSACTION;
2541: BEGIN
2542: IF pTASK = MSC_UTIL.TASK_COLL THEN
2543:
2544: select resp.responsibility_id, resp.application_id
2545: into lv_resp_id, lv_application_id
2546: from fnd_responsibility resp,

Line 2554: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN

2550: and resp.responsibility_key = 'APS_COLLECTIONS'
2551: and user_resp.user_id = pUSERID
2552: and rownum =1 ;
2553:
2554: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2555:
2556: select resp.responsibility_id, resp.application_id
2557: into lv_resp_id, lv_application_id
2558: from fnd_responsibility resp,

Line 2566: ELSIF pTASK = MSC_UTIL.TASK_USER_DEFINED THEN

2562: and resp.responsibility_key = 'APS_RELEASE'
2563: and user_resp.user_id = pUSERID
2564: and rownum =1 ;
2565:
2566: ELSIF pTASK = MSC_UTIL.TASK_USER_DEFINED THEN
2567:
2568: lv_resp_id := pRESPID;
2569: lv_application_id := pAPPLID;
2570:

Line 2579: IF pTASK = MSC_UTIL.TASK_COLL THEN

2575: lv_application_id);
2576: commit;
2577: EXCEPTION
2578: WHEN NO_DATA_FOUND THEN
2579: IF pTASK = MSC_UTIL.TASK_COLL THEN
2580: raise_application_error (-20001, 'User not defnied or not assigned to the responsibility - ''APS COLLECTIONS''');
2581: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2582: raise_application_error (-20001, 'User not defnied or not assigned to the responsibility - ''APS RELEASE''');
2583: ELSE

Line 2581: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN

2577: EXCEPTION
2578: WHEN NO_DATA_FOUND THEN
2579: IF pTASK = MSC_UTIL.TASK_COLL THEN
2580: raise_application_error (-20001, 'User not defnied or not assigned to the responsibility - ''APS COLLECTIONS''');
2581: ELSIF pTASK = MSC_UTIL.TASK_RELEASE THEN
2582: raise_application_error (-20001, 'User not defnied or not assigned to the responsibility - ''APS RELEASE''');
2583: ELSE
2584: raise_application_error (-20001, 'User not defnied or not assigned to the required responsibility');
2585: END IF;

Line 2587: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Unable to initialize user because of unexpected error');

2583: ELSE
2584: raise_application_error (-20001, 'User not defnied or not assigned to the required responsibility');
2585: END IF;
2586: WHEN OTHERS THEN
2587: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Unable to initialize user because of unexpected error');
2588: RAISE;
2589: END;
2590:
2591:

Line 2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Inside Function Long_Text. ');

2598: lv_sql_stmt VARCHAR2(500);
2599: v_sql_stmt VARCHAR2(5000);
2600:
2601: BEGIN
2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Inside Function Long_Text. ');
2603:
2604: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_ST_LONG_TEXT';
2605: EXECUTE IMMEDIATE lv_sql_stmt;
2606:

Line 2604: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_ST_LONG_TEXT';

2600:
2601: BEGIN
2602: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Inside Function Long_Text. ');
2603:
2604: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_ST_LONG_TEXT';
2605: EXECUTE IMMEDIATE lv_sql_stmt;
2606:
2607: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Truncated table MSC_ST_LONG_TEXT ');
2608:

Line 2607: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Truncated table MSC_ST_LONG_TEXT ');

2603:
2604: lv_sql_stmt := 'Truncate table ' || MSC_UTIL.G_MSC_SCHEMA || '.MSC_ST_LONG_TEXT';
2605: EXECUTE IMMEDIATE lv_sql_stmt;
2606:
2607: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'Truncated table MSC_ST_LONG_TEXT ');
2608:
2609: v_sql_stmt:=
2610: ' INSERT INTO MSC_ST_LONG_TEXT '
2611: ||'( MEDIA_ID,'

Line 2632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'sql statement getting executed '||v_sql_stmt);

2628: ||' MLT.CREATED_BY,'
2629: ||' MLT.LAST_UPDATE_LOGIN'
2630: ||' FROM MSC_AP_LONG_TEXT_V MLT';
2631:
2632: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, 'sql statement getting executed '||v_sql_stmt);
2633: EXECUTE IMMEDIATE v_sql_stmt;
2634: COMMIT;
2635:
2636: Return 1;

Line 2638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');

2634: COMMIT;
2635:
2636: Return 1;
2637: EXCEPTION WHEN OTHERS THEN
2638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2640: RETURN 0;
2641:
2642: END LONG_TEXT ;

Line 2639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);

2635:
2636: Return 1;
2637: EXCEPTION WHEN OTHERS THEN
2638: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, '========================================');
2639: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, SQLERRM);
2640: RETURN 0;
2641:
2642: END LONG_TEXT ;
2643: