[Home] [Help]
94:
95: X_Model NUMBER := 1;
96: X_OptionClass NUMBER := 2;
97: X_Planning NUMBER := 3;
98: X_Standard NUMBER := 4;
99: -- Added for bug 8732198
100: x_phase varchar2(80) := 'Pending';
101: x_dev_phase varchar2(15) := 'Pending';
102: x_status varchar2(80) := 'Pending';
107: -- Added for bug 9243978
108: l_status_type NUMBER := 0;
109:
110: BEGIN
111: -- Standard Start of API savepoint
112: SAVEPOINT Implement_ECO_PUB;
113:
114: -- Standard call to check for call compatibility
115: IF NOT FND_API.Compatible_API_Call ( l_api_version
110: BEGIN
111: -- Standard Start of API savepoint
112: SAVEPOINT Implement_ECO_PUB;
113:
114: -- Standard call to check for call compatibility
115: IF NOT FND_API.Compatible_API_Call ( l_api_version
116: ,p_api_version
117: ,l_api_name
118: ,G_PKG_NAME )
172: l_resp_id := FND_GLOBAL.resp_id;
173:
174: if (l_resp_id is null or l_resp_id = -1) then
175: l_set_dg := fnd_request.set_options(
176: datagroup=> 'Standard');
177: end if;
178: -- submitting the concurrent request
179: x_request_id := Fnd_Request.Submit_Request (
180: application => 'ENG',
361:
362: END IF ;
363:
364:
365: -- Standard ending code ------------------------------------------------
366: -- IF FND_API.To_Boolean ( p_commit ) THEN
367: --Always commit to save request id.
368: COMMIT ;
369: -- END IF;
454:
455: X_Model NUMBER := 1;
456: X_OptionClass NUMBER := 2;
457: X_Planning NUMBER := 3;
458: X_Standard NUMBER := 4;
459:
460: BEGIN
461:
462: -- Standard Start of API savepoint
458: X_Standard NUMBER := 4;
459:
460: BEGIN
461:
462: -- Standard Start of API savepoint
463: SAVEPOINT Implement_ECO_PUB;
464:
465: -- Standard call to check for call compatibility
466: IF NOT FND_API.Compatible_API_Call ( l_api_version
461:
462: -- Standard Start of API savepoint
463: SAVEPOINT Implement_ECO_PUB;
464:
465: -- Standard call to check for call compatibility
466: IF NOT FND_API.Compatible_API_Call ( l_api_version
467: ,p_api_version
468: ,l_api_name
469: ,G_PKG_NAME )
522: Select null
523: From mtl_system_items msi
524: Where msi.inventory_item_id = eri.revised_item_id
525: And msi.organization_id = eri.organization_Id
526: And msi.bom_item_type in (X_Model, X_OptionClass, X_Planning, X_Standard)
527: And rownum = 1
528: )
529: And rownum = 1;
530: */
536: l_resp_id := FND_GLOBAL.resp_id;
537:
538: if (l_resp_id is null or l_resp_id = -1) then
539: l_set_dg := fnd_request.set_options(
540: datagroup=> 'Standard');
541: end if;
542: x_request_id := Fnd_Request.Submit_Request (
543: application => 'ENG',
544: program => 'ENCACN',
682:
683: END IF ;
684:
685:
686: -- Standard ending code ------------------------------------------------
687: IF FND_API.To_Boolean ( p_commit ) THEN
688: COMMIT WORK;
689: END IF;
690:
770:
771: X_Model NUMBER := 1;
772: X_OptionClass NUMBER := 2;
773: X_Planning NUMBER := 3;
774: X_Standard NUMBER := 4;
775:
776: BEGIN
777:
778: -- Standard Start of API savepoint
774: X_Standard NUMBER := 4;
775:
776: BEGIN
777:
778: -- Standard Start of API savepoint
779: SAVEPOINT Implement_ECO_PUB;
780:
781: -- Standard call to check for call compatibility
782: IF NOT FND_API.Compatible_API_Call ( l_api_version
777:
778: -- Standard Start of API savepoint
779: SAVEPOINT Implement_ECO_PUB;
780:
781: -- Standard call to check for call compatibility
782: IF NOT FND_API.Compatible_API_Call ( l_api_version
783: ,p_api_version
784: ,l_api_name
785: ,G_PKG_NAME )
838: Select null
839: From mtl_system_items msi
840: Where msi.inventory_item_id = eri.revised_item_id
841: And msi.organization_id = eri.organization_Id
842: And msi.bom_item_type in (X_Model, X_OptionClass, X_Planning, X_Standard)
843: And rownum = 1
844: )
845: And rownum = 1;
846: */
1000:
1001:
1002:
1003:
1004: -- Standard ending code ------------------------------------------------
1005: IF FND_API.To_Boolean ( p_commit ) THEN
1006: COMMIT WORK;
1007: END IF;
1008:
1088: l_api_version CONSTANT NUMBER := 1.0;
1089: l_return_status VARCHAR2(1);
1090: BEGIN
1091:
1092: -- Standard Start of API savepoint
1093: SAVEPOINT Propagate_ECO_PUB;
1094:
1095: -- Standard call to check for call compatibility
1096: IF NOT FND_API.Compatible_API_Call ( l_api_version
1091:
1092: -- Standard Start of API savepoint
1093: SAVEPOINT Propagate_ECO_PUB;
1094:
1095: -- Standard call to check for call compatibility
1096: IF NOT FND_API.Compatible_API_Call ( l_api_version
1097: ,p_api_version
1098: ,l_api_name
1099: ,G_PKG_NAME )
1271: , x_msg_count => x_msg_count
1272: , x_msg_data => x_msg_data
1273: ) ;
1274:
1275: -- Standard ending code ------------------------------------------------
1276: IF FND_API.To_Boolean ( p_commit ) THEN
1277: COMMIT WORK;
1278: END IF;
1279:
1355: x_user_id NUMBER := to_number(Fnd_Profile.Value('USER_ID'));
1356: x_login_id NUMBER := to_number(Fnd_Profile.Value('LOGIN_ID'));
1357: x_planning_item_access NUMBER := Fnd_Profile.Value('BOM:PLANNING_ITEM_ACCESS');
1358: x_model_item_access NUMBER := Fnd_Profile.Value('BOM:ITEM_ACCESS');
1359: x_standard_item_access NUMBER := Fnd_Profile.Value('BOM:STANDARD_ITEM_ACCESS');
1360: X_Model NUMBER := 1;
1361: X_OptionClass NUMBER := 2;
1362: X_Planning NUMBER := 3;
1363: X_Standard NUMBER := 4;
1359: x_standard_item_access NUMBER := Fnd_Profile.Value('BOM:STANDARD_ITEM_ACCESS');
1360: X_Model NUMBER := 1;
1361: X_OptionClass NUMBER := 2;
1362: X_Planning NUMBER := 3;
1363: X_Standard NUMBER := 4;
1364: x_change_notice VARCHAR2(10);
1365: x_organization_id NUMBER;
1366:
1367: -- Status Lookups
1386: AND bcb.IMPLEMENTATION_DATE IS NULL;
1387:
1388: BEGIN
1389:
1390: -- Standard Start of API savepoint
1391: SAVEPOINT Reschedule_ECO_PUB;
1392:
1393: -- begin of vamohan changes
1394: is_Reschedule_ECO_Allowed(p_change_id, x_is_Chg_Sch_Date_Allowed);
1401: END IF;
1402: -- end of vamohan changes
1403:
1404:
1405: -- Standard call to check for call compatibility
1406: IF NOT FND_API.Compatible_API_Call ( l_api_version
1407: ,p_api_version
1408: ,l_api_name
1409: ,G_PKG_NAME )
1449: X_Model := null;
1450: X_OptionClass := null;
1451: END IF;
1452:
1453: IF x_standard_item_access = 2 THEN
1454: X_Standard := null;
1455: END IF;
1456:
1457: SELECT change_notice, organization_id
1450: X_OptionClass := null;
1451: END IF;
1452:
1453: IF x_standard_item_access = 2 THEN
1454: X_Standard := null;
1455: END IF;
1456:
1457: SELECT change_notice, organization_id
1458: INTO x_change_notice, x_organization_id
1474: Select null
1475: From mtl_system_items msi
1476: Where msi.inventory_item_id = eri.revised_item_id
1477: And msi.organization_id = eri.organization_Id
1478: And msi.bom_item_type in (X_Model, X_OptionClass, X_Planning, X_Standard)
1479: );
1480:
1481: IF FND_API.to_Boolean( p_debug ) THEN
1482: ENG_CHANGE_ACTIONS_UTIL.Write_Debug('Eng_Revised_Items updated ... ' );
1528: 9, -- IMPLEMENTATION_IN_PROGRESS
1529: 2 -- HOLD
1530: )
1531: And msi.bom_item_type in
1532: (X_Model, X_OptionClass, X_Planning, X_Standard);
1533:
1534: IF FND_API.to_Boolean( p_debug ) THEN
1535: ENG_CHANGE_ACTIONS_UTIL.Write_Debug('Eng_Current_Scheduled_Dates inserted ... ' );
1536: ENG_CHANGE_ACTIONS_UTIL.Write_Debug(' SQL%ROWCOUNT = ' || to_char(SQL%ROWCOUNT));
1635: FROM mtl_system_items msi
1636: WHERE msi.inventory_item_id = eri.revised_item_id
1637: AND msi.organization_id = eri.organization_Id
1638: AND msi.bom_item_type in (X_Model, X_OptionClass,
1639: X_Planning, X_Standard)));
1640:
1641:
1642: -------not required to insert to MTL_ITEM_REVISIONS_TL as description is not there.
1643:
1670: FROM mtl_system_items msi
1671: WHERE msi.inventory_item_id = eri.revised_item_id
1672: AND msi.organization_id = eri.organization_Id
1673: AND msi.bom_item_type in (X_Model, X_OptionClass,
1674: X_Planning, X_Standard)));
1675:
1676: IF FND_API.to_Boolean( p_debug ) THEN
1677: ENG_CHANGE_ACTIONS_UTIL.Write_Debug('MTL_RTG_ITEM_REVISIONS updated ... ' );
1678: ENG_CHANGE_ACTIONS_UTIL.Write_Debug(' SQL%ROWCOUNT = ' || to_char(SQL%ROWCOUNT));
1687:
1688: END IF;
1689:
1690:
1691: -- Standard ending code ------------------------------------------------
1692: IF FND_API.To_Boolean ( p_commit ) THEN
1693: COMMIT WORK;
1694: END IF;
1695:
1768: x_user_id NUMBER := to_number(Fnd_Profile.Value('USER_ID'));
1769: x_login_id NUMBER := to_number(Fnd_Profile.Value('LOGIN_ID'));
1770: x_planning_item_access NUMBER := Fnd_Profile.Value('BOM:PLANNING_ITEM_ACCESS');
1771: x_model_item_access NUMBER := Fnd_Profile.Value('BOM:ITEM_ACCESS');
1772: x_standard_item_access NUMBER := Fnd_Profile.Value('BOM:STANDARD_ITEM_ACCESS');
1773: X_Model NUMBER := 1;
1774: X_OptionClass NUMBER := 2;
1775: X_Planning NUMBER := 3;
1776: X_Standard NUMBER := 4;
1772: x_standard_item_access NUMBER := Fnd_Profile.Value('BOM:STANDARD_ITEM_ACCESS');
1773: X_Model NUMBER := 1;
1774: X_OptionClass NUMBER := 2;
1775: X_Planning NUMBER := 3;
1776: X_Standard NUMBER := 4;
1777: x_change_notice VARCHAR2(10);
1778: x_organization_id NUMBER;
1779: -- bug 14548151
1780: l_organization_id eng_revised_items.organization_id%TYPE;
1811: -- bug 14548151 end
1812:
1813: BEGIN
1814:
1815: -- Standard Start of API savepoint
1816: SAVEPOINT Change_Effectivity_Date_PUB;
1817:
1818: -- Standard call to check for call compatibility
1819: IF NOT FND_API.Compatible_API_Call ( l_api_version
1814:
1815: -- Standard Start of API savepoint
1816: SAVEPOINT Change_Effectivity_Date_PUB;
1817:
1818: -- Standard call to check for call compatibility
1819: IF NOT FND_API.Compatible_API_Call ( l_api_version
1820: ,p_api_version
1821: ,l_api_name
1822: ,G_PKG_NAME )
1886: X_Model := null;
1887: X_OptionClass := null;
1888: END IF;
1889:
1890: IF x_standard_item_access = 2 THEN
1891: X_Standard := null;
1892: END IF;
1893:
1894: SELECT change_notice, organization_id
1887: X_OptionClass := null;
1888: END IF;
1889:
1890: IF x_standard_item_access = 2 THEN
1891: X_Standard := null;
1892: END IF;
1893:
1894: SELECT change_notice, organization_id
1895: INTO x_change_notice, x_organization_id
1911: Select null
1912: From mtl_system_items msi
1913: Where msi.inventory_item_id = eri.revised_item_id
1914: And msi.organization_id = eri.organization_Id
1915: And msi.bom_item_type in (X_Model, X_OptionClass, X_Planning, X_Standard)
1916: );
1917:
1918: IF FND_API.to_Boolean( p_debug ) THEN
1919: ENG_CHANGE_ACTIONS_UTIL.Write_Debug('Eng_Revised_Items updated ... ' );
2025: FROM mtl_system_items msi
2026: WHERE msi.inventory_item_id = eri.revised_item_id
2027: AND msi.organization_id = eri.organization_Id
2028: AND msi.bom_item_type in (X_Model, X_OptionClass,
2029: X_Planning, X_Standard)));
2030: --no updation of mtl_item_revisions_tl
2031:
2032:
2033: IF FND_API.to_Boolean( p_debug ) THEN
2056: FROM mtl_system_items msi
2057: WHERE msi.inventory_item_id = eri.revised_item_id
2058: AND msi.organization_id = eri.organization_Id
2059: AND msi.bom_item_type in (X_Model, X_OptionClass,
2060: X_Planning, X_Standard)));
2061:
2062: IF FND_API.to_Boolean( p_debug ) THEN
2063: ENG_CHANGE_ACTIONS_UTIL.Write_Debug('MTL_RTG_ITEM_REVISIONS updated ... ' );
2064: ENG_CHANGE_ACTIONS_UTIL.Write_Debug(' SQL%ROWCOUNT = ' || to_char(SQL%ROWCOUNT));
2073:
2074: END IF;
2075:
2076:
2077: -- Standard ending code ------------------------------------------------
2078: IF FND_API.To_Boolean ( p_commit ) THEN
2079: COMMIT WORK;
2080: END IF;
2081:
2187: , last_updated_by
2188: , creation_date
2189: , created_by
2190: , last_update_login
2191: , standard_operation_id
2192: , department_id
2193: , operation_lead_time_percent
2194: , minimum_transfer_quantity
2195: , count_point_type
2252: , p_user_id -- Last Updated By
2253: , SYSDATE -- Creation Date
2254: , p_user_id -- Created By
2255: , p_login_id -- Last Update Login
2256: , bos.STANDARD_OPERATION_ID
2257: , bos.DEPARTMENT_ID
2258: , bos.OPERATION_LEAD_TIME_PERCENT
2259: , bos.MINIMUM_TRANSFER_QUANTITY
2260: , bos.COUNT_POINT_TYPE
2890: THEN
2891: --
2892: -- Get respective profile values
2893: --
2894: IF fnd_profile.value('BOM:STANDARD_ITEM_ACCESS') = '1'
2895: THEN
2896: Eng_Globals.Set_STD_Item_Access
2897: ( p_std_item_access => 4);
2898: ELSE
4716:
4717:
4718: l_pls_block VARCHAR2(5000);
4719: BEGIN
4720: -- Standard Start of API savepoint
4721: -- Standard Start of API savepoint
4722: SAVEPOINT Init_Lifecycle;
4723: -- Standard call to check for call compatibility
4724: IF NOT FND_API.Compatible_API_Call ( l_api_version
4717:
4718: l_pls_block VARCHAR2(5000);
4719: BEGIN
4720: -- Standard Start of API savepoint
4721: -- Standard Start of API savepoint
4722: SAVEPOINT Init_Lifecycle;
4723: -- Standard call to check for call compatibility
4724: IF NOT FND_API.Compatible_API_Call ( l_api_version
4725: ,p_api_version
4719: BEGIN
4720: -- Standard Start of API savepoint
4721: -- Standard Start of API savepoint
4722: SAVEPOINT Init_Lifecycle;
4723: -- Standard call to check for call compatibility
4724: IF NOT FND_API.Compatible_API_Call ( l_api_version
4725: ,p_api_version
4726: ,l_api_name
4727: ,G_PKG_NAME )