APPS.MSC_RELEASE_PK dependencies on MSC_UTIL

Line 697: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'the sql stmt is : '|| lv_sql_stmt_rp);

693: lv_sql_stmt_rp := ' SELECT nvl(profile_value,0)'
694: ||' FROM msc_plan_profiles'
695: ||' WHERE plan_id='|| arg_plan_id
696: ||' AND profile_code=''MSC_AUTO_REL_COMP_TOLERANCE''';
697: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'the sql stmt is : '|| lv_sql_stmt_rp);
698: execute immediate lv_sql_stmt_rp into v_comp_days_tol;
699: END IF;
700: -- ------------------------------------------------------------------------
701: -- Validate the plan

Line 841: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* Call UI API ****** ');

837: lv_sql_stmt:= ' BEGIN '
838: ||' MSC_PQ_UTILS.EXECUTE_PLAN_QUERIES(:ERRBUF,:RETCODE,:arg_plan_id) ; '
839: ||' END ; ' ;
840:
841: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* Call UI API ****** ');
842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,lv_sql_stmt);
843: EXECUTE IMMEDIATE lv_sql_stmt USING OUT ERRBUF, OUT RETCODE, IN arg_plan_id ;
844: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' *******End UI API ***********');
845: QueryBasedAutoRelease(arg_plan_id,ERRBUF,RETCODE);

Line 842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,lv_sql_stmt);

838: ||' MSC_PQ_UTILS.EXECUTE_PLAN_QUERIES(:ERRBUF,:RETCODE,:arg_plan_id) ; '
839: ||' END ; ' ;
840:
841: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* Call UI API ****** ');
842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,lv_sql_stmt);
843: EXECUTE IMMEDIATE lv_sql_stmt USING OUT ERRBUF, OUT RETCODE, IN arg_plan_id ;
844: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' *******End UI API ***********');
845: QueryBasedAutoRelease(arg_plan_id,ERRBUF,RETCODE);
846:

Line 844: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' *******End UI API ***********');

840:
841: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* Call UI API ****** ');
842: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,lv_sql_stmt);
843: EXECUTE IMMEDIATE lv_sql_stmt USING OUT ERRBUF, OUT RETCODE, IN arg_plan_id ;
844: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,' *******End UI API ***********');
845: QueryBasedAutoRelease(arg_plan_id,ERRBUF,RETCODE);
846:
847: EXCEPTION WHEN OTHERS THEN
848:

Line 850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);

846:
847: EXCEPTION WHEN OTHERS THEN
848:
849: ROLLBACK;
850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, DBMS_UTILITY.FORMAT_ERROR_STACK);
852: RAISE;
853:
854: End ;

Line 851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, DBMS_UTILITY.FORMAT_ERROR_STACK);

847: EXCEPTION WHEN OTHERS THEN
848:
849: ROLLBACK;
850: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_FATAL_ERR, ERRBUF);
851: MSC_UTIL.LOG_MSG(MSC_UTIL.G_D_STATUS, DBMS_UTILITY.FORMAT_ERROR_STACK);
852: RAISE;
853:
854: End ;
855:

Line 920: (MSC_UTIL.get_vmi_flag(var_plan_id,

916: END IF;
917: /*VMI Check -- fwd port 3181822 */
918:
919: IF (not (((var_order_type = 5) AND (var_make_buy_code = BUY and
920: (MSC_UTIL.get_vmi_flag(var_plan_id,
921: var_sr_instance_id,
922: var_org_id,
923: var_inventory_item_id,
924: var_source_supplier_id,

Line 926: OR (var_order_type in (1,2) AND (MSC_UTIL.get_vmi_flag(var_plan_id,

922: var_org_id,
923: var_inventory_item_id,
924: var_source_supplier_id,
925: var_source_supplier_site_id)= 1)))
926: OR (var_order_type in (1,2) AND (MSC_UTIL.get_vmi_flag(var_plan_id,
927: var_sr_instance_id,
928: var_org_id,
929: var_inventory_item_id,
930: var_supplier_id,

Line 1449: and MSC_UTIL.G_CMRO_EAM_INT_ENABLED = 'Y') then

1445: commit ;
1446:
1447:
1448: If (var_plan_type =1
1449: and MSC_UTIL.G_CMRO_EAM_INT_ENABLED = 'Y') then
1450: OPEN eam_cmro_orders_to_release;
1451: LOOP
1452: var_entity := 'Fetch eam cmro orders ';
1453:

Line 1737: RETCODE := MSC_UTIL.G_ERROR;

1733: WHERE mp.plan_id = pPlan_id;
1734: EXCEPTION
1735: WHEN NO_DATA_FOUND THEN
1736: ERRMSG := 'Not a Valid plan ID';
1737: RETCODE := MSC_UTIL.G_ERROR;
1738: RETURN;
1739: WHEN OTHERS THEN
1740: ERRMSG := SQLERRM;
1741: RETCODE := MSC_UTIL.G_ERROR;

Line 1741: RETCODE := MSC_UTIL.G_ERROR;

1737: RETCODE := MSC_UTIL.G_ERROR;
1738: RETURN;
1739: WHEN OTHERS THEN
1740: ERRMSG := SQLERRM;
1741: RETCODE := MSC_UTIL.G_ERROR;
1742: RETURN;
1743: END;
1744:
1745: BEGIN

Line 1829: RETCODE := MSC_UTIL.G_ERROR;

1825: IF ((var_loaded_jobs(i) > 0) AND ((var_wip_req_id(i) = 0) OR (var_wip_req_id(i) IS NULL))) THEN
1826: fnd_file.new_line(FND_FILE.LOG, 1);
1827: fnd_message.set_name('MRP', 'CANNOT SUBMIT REQUEST-JOBS');
1828: ERRMSG := ERRMSG || ' ' || fnd_message.get;
1829: RETCODE := MSC_UTIL.G_ERROR;
1830: END IF;
1831:
1832:
1833: IF ((var_loaded_lot_jobs(i) > 0) AND (var_osfm_req_id(i) = 0)) THEN

Line 1837: RETCODE := MSC_UTIL.G_ERROR;

1833: IF ((var_loaded_lot_jobs(i) > 0) AND (var_osfm_req_id(i) = 0)) THEN
1834: fnd_file.new_line(FND_FILE.LOG, 1);
1835: fnd_message.set_name('MRP', 'CANNOT SUBMIT LOT-JOBS INTERFACE');
1836: ERRMSG := ERRMSG || ' ' || fnd_message.get;
1837: RETCODE := MSC_UTIL.G_ERROR;
1838: END IF;
1839:
1840: IF ((var_loaded_reqs(i) > 0) AND (var_req_load_id(i) = 0)) THEN
1841: fnd_file.new_line(FND_FILE.LOG, 1);

Line 1844: RETCODE := MSC_UTIL.G_ERROR;

1840: IF ((var_loaded_reqs(i) > 0) AND (var_req_load_id(i) = 0)) THEN
1841: fnd_file.new_line(FND_FILE.LOG, 1);
1842: fnd_message.set_name('MRP', 'CANNOT SUBMIT REQUEST-REQS');
1843: ERRMSG := ERRMSG || ' ' ||fnd_message.get;
1844: RETCODE := MSC_UTIL.G_ERROR;
1845: END IF;
1846:
1847: IF ((var_loaded_int_repair_orders(i) > 0) AND (var_int_repair_orders_id(i) = 0)) THEN
1848: ERRMSG := ERRMSG || ' ' ||' cannot submit the internal repair order request';

Line 1849: RETCODE := MSC_UTIL.G_ERROR;

1845: END IF;
1846:
1847: IF ((var_loaded_int_repair_orders(i) > 0) AND (var_int_repair_orders_id(i) = 0)) THEN
1848: ERRMSG := ERRMSG || ' ' ||' cannot submit the internal repair order request';
1849: RETCODE := MSC_UTIL.G_ERROR;
1850: END IF;
1851:
1852: IF ((var_loaded_ext_repair_orders(i) > 0) AND (var_ext_repair_orders_id(i) = 0)) THEN
1853: ERRMSG := ERRMSG || ' ' || 'cannot submit the external repair order request';

Line 1854: RETCODE := MSC_UTIL.G_ERROR;

1850: END IF;
1851:
1852: IF ((var_loaded_ext_repair_orders(i) > 0) AND (var_ext_repair_orders_id(i) = 0)) THEN
1853: ERRMSG := ERRMSG || ' ' || 'cannot submit the external repair order request';
1854: RETCODE := MSC_UTIL.G_ERROR;
1855: END IF;
1856:
1857: IF ((var_loaded_eam_jobs(i) > 0) AND ((var_loaded_eam_req_id(i) = 0) OR (var_loaded_eam_req_id(i) IS NULL))) THEN
1858: ERRMSG := ERRMSG || ' ' || 'cannot submit the eam new job creation request';

Line 1859: RETCODE := MSC_UTIL.G_ERROR;

1855: END IF;
1856:
1857: IF ((var_loaded_eam_jobs(i) > 0) AND ((var_loaded_eam_req_id(i) = 0) OR (var_loaded_eam_req_id(i) IS NULL))) THEN
1858: ERRMSG := ERRMSG || ' ' || 'cannot submit the eam new job creation request';
1859: RETCODE := MSC_UTIL.G_ERROR;
1860: END IF;
1861:
1862:
1863: IF ((var_resched_eam_jobs(i) > 0) AND (var_eam_req_id(i) = 0)) THEN

Line 1865: RETCODE := MSC_UTIL.G_ERROR;

1861:
1862:
1863: IF ((var_resched_eam_jobs(i) > 0) AND (var_eam_req_id(i) = 0)) THEN
1864: ERRMSG := ERRMSG || ' ' || 'cannot submit the resched eam jobs request';
1865: RETCODE := MSC_UTIL.G_ERROR;
1866: END IF;
1867:
1868: IF ((var_loaded_cmro_jobs(i) > 0) AND ((var_loaded_cmro_req_id(i) = 0) OR (var_loaded_cmro_req_id(i) IS NULL))) THEN
1869: ERRMSG := ERRMSG || ' ' || 'cannot submit the cmro new job creation request';

Line 1870: RETCODE := MSC_UTIL.G_ERROR;

1866: END IF;
1867:
1868: IF ((var_loaded_cmro_jobs(i) > 0) AND ((var_loaded_cmro_req_id(i) = 0) OR (var_loaded_cmro_req_id(i) IS NULL))) THEN
1869: ERRMSG := ERRMSG || ' ' || 'cannot submit the cmro new job creation request';
1870: RETCODE := MSC_UTIL.G_ERROR;
1871: END IF;
1872:
1873:
1874: IF ((var_resched_cmro_jobs(i) > 0) AND (var_resched_cmro_req_id(i) = 0)) THEN

Line 1876: RETCODE := MSC_UTIL.G_ERROR;

1872:
1873:
1874: IF ((var_resched_cmro_jobs(i) > 0) AND (var_resched_cmro_req_id(i) = 0)) THEN
1875: ERRMSG := ERRMSG || ' ' || 'cannot submit the resched cmro jobs request';
1876: RETCODE := MSC_UTIL.G_ERROR;
1877: END IF;
1878:
1879: END LOOP;
1880:

Line 1897: RETCODE := MSC_UTIL.G_ERROR;

1893:
1894: EXCEPTION
1895: WHEN OTHERS THEN
1896: ERRMSG := SQLERRM;
1897: RETCODE := MSC_UTIL.G_ERROR;
1898: END;
1899:
1900: RETCODE := MSC_UTIL.G_SUCCESS;
1901: EXCEPTION

Line 1900: RETCODE := MSC_UTIL.G_SUCCESS;

1896: ERRMSG := SQLERRM;
1897: RETCODE := MSC_UTIL.G_ERROR;
1898: END;
1899:
1900: RETCODE := MSC_UTIL.G_SUCCESS;
1901: EXCEPTION
1902: WHEN OTHERS THEN
1903: ERRMSG := SQLERRM;
1904: RETCODE := MSC_UTIL.G_ERROR;

Line 1904: RETCODE := MSC_UTIL.G_ERROR;

1900: RETCODE := MSC_UTIL.G_SUCCESS;
1901: EXCEPTION
1902: WHEN OTHERS THEN
1903: ERRMSG := SQLERRM;
1904: RETCODE := MSC_UTIL.G_ERROR;
1905: END msc_web_service_release;
1906:
1907: PROCEDURE QueryBasedAutoRelease(
1908: pPlan_id Number,

Line 1931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In API ****** ');

1927:
1928:
1929:
1930: BEGIN
1931: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In API ****** ');
1932: Select
1933: NVL(Mp.auto_release_method,-1) ,
1934: NVL(Mp.include_reschedules,-1)
1935: INTO

Line 1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,V_TAB(x));

1942:
1943: OPEN queries;
1944: FETCH queries BULK COLLECT INTO V_TAB;
1945: FOR x IN 1..V_TAB.Count LOOP
1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,V_TAB(x));
1947: IF (V_TAB(x) = '1 - 1' ) THEN
1948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-1 ****** ');
1949: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
1950: ( select ms.transaction_id

Line 1948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-1 ****** ');

1944: FETCH queries BULK COLLECT INTO V_TAB;
1945: FOR x IN 1..V_TAB.Count LOOP
1946: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,V_TAB(x));
1947: IF (V_TAB(x) = '1 - 1' ) THEN
1948: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-1 ****** ');
1949: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
1950: ( select ms.transaction_id
1951: from MSC_SUPPLIES ms,
1952: MSC_PQ_RESULTS mpr,

Line 1970: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-2 ****** ');

1966: ) ;
1967:
1968: --Item Query/Applied to Item-org
1969: ElsIF (V_TAB(x) = '1 - 2' ) THEN
1970: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-2 ****** ');
1971: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
1972: (Select ms.transaction_id
1973: from MSC_SUPPLIES ms,
1974: MSC_PQ_RESULTS mpr,

Line 1993: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-3 ****** ');

1989: ) ;
1990:
1991: --Item Query/Applied to Supersession
1992: ElsIF (V_TAB(x) = '1 - 3' ) THEN
1993: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-3 ****** ');
1994: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
1995: (Select ms.transaction_id
1996: from MSC_SUPPLIES ms,
1997: MSC_PQ_RESULTS mpr,

Line 2020: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-4 ****** ');

2016: ) ;
2017:
2018: --Item Query/Applied to Supersession-org
2019: ElsIF (V_TAB(x) = '1 - 4' ) THEN
2020: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 1-4 ****** ');
2021: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2022: (Select ms.transaction_id
2023: from MSC_SUPPLIES ms,
2024: MSC_PQ_RESULTS mpr,

Line 2050: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-1 ****** ');

2046:
2047: ---*********************** Query Type = Exception ***********************
2048: -- Exceptions Query/Applied to Item
2049: ElsIF (V_TAB(x) = '4 - 1' ) THEN
2050: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-1 ****** ');
2051: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2052: (Select ms.transaction_id
2053: from MSC_SUPPLIES ms,
2054: MSC_PQ_RESULTS mpr,

Line 2079: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-2 ****** ');

2075: and Mpq.Applied_to = 1
2076: ) ;
2077:
2078: ElsIF (V_TAB(x) = '4 - 2' ) THEN
2079: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-2 ****** ');
2080: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2081: ( Select ms.transaction_id
2082: from MSC_SUPPLIES ms,
2083: MSC_PQ_RESULTS mpr,

Line 2110: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-3 ****** ');

2106: ) ;
2107:
2108:
2109: ElsIF (V_TAB(x) = '4 - 3' ) THEN
2110: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-3 ****** ');
2111: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2112: ( Select ms.transaction_id
2113: from MSC_SUPPLIES ms,
2114: MSC_PQ_RESULTS mpr,

Line 2144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-4 ****** ');

2140: and Mpq.Applied_to = 3
2141: );
2142:
2143: ElsIF (V_TAB(x) = '4 - 4' ) THEN
2144: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 4-4 ****** ');
2145: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2146: (Select ms.transaction_id
2147: from MSC_SUPPLIES ms,
2148: MSC_PQ_RESULTS mpr,

Line 2181: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-1 ****** ');

2177:
2178: ---*********************** Query Type = Order ***********************
2179:
2180: ElsIF (V_TAB(x) = '9 - 1' ) THEN
2181: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-1 ****** ');
2182: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2183: (Select ms.transaction_id
2184: from MSC_SUPPLIES ms,
2185: MSC_PQ_RESULTS mpr,

Line 2227: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-2 ****** ');

2223: ) ;
2224:
2225:
2226: ElsIF (V_TAB(x) = '9 - 2' ) THEN
2227: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-2 ****** ');
2228: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2229: (Select ms.transaction_id
2230: from MSC_SUPPLIES ms,
2231: MSC_PQ_RESULTS mpr,

Line 2278: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-3 ****** ');

2274: ) ;
2275:
2276:
2277: ElsIF (V_TAB(x) = '9 - 3' ) THEN
2278: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-3 ****** ');
2279: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2280: (Select ms.transaction_id
2281: from MSC_SUPPLIES ms,
2282: MSC_PQ_RESULTS mpr,

Line 2338: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-4 ****** ');

2334: and Mpq.Applied_to = 3
2335: ) ;
2336:
2337: ElsIF (V_TAB(x) = '9 - 4' ) THEN
2338: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-4 ****** ');
2339: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2340: (Select ms.transaction_id
2341: from MSC_SUPPLIES ms,
2342: MSC_PQ_RESULTS mpr,

Line 2401: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-5 ****** ');

2397: ) ;
2398:
2399:
2400: ElsIF (V_TAB(x) = '9 - 5' ) THEN
2401: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 9-5 ****** ');
2402: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2403: (Select ms.transaction_id
2404: from MSC_SUPPLIES ms,
2405: MSC_PQ_RESULTS mpr

Line 2426: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-1 ****** ');

2422:
2423: ---*********************** Query Type = Supplier ***********************
2424:
2425: ElsIF (V_TAB(x) = '5 - 1' ) THEN
2426: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-1 ****** ');
2427: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2428: (select ms.transaction_id
2429: from MSC_SUPPLIES ms,
2430: MSC_PQ_RESULTS mpr,

Line 2454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-2 ****** ');

2450: and Mpq.Applied_to = 1
2451: ) ;
2452:
2453: ElsIF (V_TAB(x) = '5 - 2' ) THEN
2454: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-2 ****** ');
2455: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2456: (select ms.transaction_id
2457: from MSC_SUPPLIES ms,
2458: MSC_PQ_RESULTS mpr,

Line 2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-3 ****** ');

2480: and Mpq.Applied_to = 2
2481: );
2482:
2483: ElsIF (V_TAB(x) = '5 - 3' ) THEN
2484: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-3 ****** ');
2485: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2486: ( select ms.transaction_id
2487: from MSC_SUPPLIES ms,
2488: MSC_PQ_RESULTS mpr,

Line 2516: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-4 ****** ');

2512: and Mpq.Applied_to = 3
2513: ) ;
2514:
2515: ElsIF (V_TAB(x) = '5 - 4' ) THEN
2516: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* 5-4 ****** ');
2517: Update MSC_SUPPLIES set releasable=9999 where transaction_id in
2518: (select ms.transaction_id
2519: from MSC_SUPPLIES ms,
2520: MSC_PQ_RESULTS mpr,

Line 2557: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In IF ****** ');

2553: END LOOP;
2554:
2555: IF ( lv_auto_release_method = 3) THEN -- IF Auto Rel method is Release
2556:
2557: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In IF ****** ');
2558: UPDATE MSC_SUPPLIES
2559: set releasable = 99
2560: where NVL(releasable,-1) = 9999
2561: and plan_id = pPlan_id ;

Line 2564: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In Else ****** ');

2560: where NVL(releasable,-1) = 9999
2561: and plan_id = pPlan_id ;
2562:
2563: ElsIF( lv_auto_release_method = 4) THEN -- IF Auto Rel method is Block
2564: MSC_UTIL.LOG_MSG(MSC_UTIL.G_LVL_STATUS,'******* In Else ****** ');
2565: UPDATE MSC_SUPPLIES
2566: set releasable = 99
2567: where NVL(releasable,-1) <> 9999
2568: and plan_id = pPlan_id ;