[Home] [Help]
201: END IF;
202: CLOSE c_get_default_phase_id;
203: END IF; -- p_lifecycle_id
204:
205: l_user_id := FND_GLOBAL.User_Id;
206: l_login_id := FND_GLOBAL.Login_Id;
207: l_sysdate := SYSDATE;
208:
209: FOR Item_Rev_Record IN c_get_item_rev_details (cp_item_id => p_inventory_item_id
202: CLOSE c_get_default_phase_id;
203: END IF; -- p_lifecycle_id
204:
205: l_user_id := FND_GLOBAL.User_Id;
206: l_login_id := FND_GLOBAL.Login_Id;
207: l_sysdate := SYSDATE;
208:
209: FOR Item_Rev_Record IN c_get_item_rev_details (cp_item_id => p_inventory_item_id
210: ,cp_org_id => p_organization_id)
361: --Return Status Variables
362: l_ret_success CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_SUCCESS; --'S'
363: l_ret_error CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_ERROR; --'E'
364: l_ret_unexp_error CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_UNEXP_ERROR; --'U'
365: l_user_id CONSTANT NUMBER := FND_GLOBAL.User_Id;
366: l_login_id CONSTANT NUMBER := FND_GLOBAL.Login_Id;
367:
368: l_status_rec BOOLEAN := FALSE;
369: l_phase_rec BOOLEAN := FALSE;
362: l_ret_success CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_SUCCESS; --'S'
363: l_ret_error CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_ERROR; --'E'
364: l_ret_unexp_error CONSTANT VARCHAR2(1) := FND_API.g_RET_STS_UNEXP_ERROR; --'U'
365: l_user_id CONSTANT NUMBER := FND_GLOBAL.User_Id;
366: l_login_id CONSTANT NUMBER := FND_GLOBAL.Login_Id;
367:
368: l_status_rec BOOLEAN := FALSE;
369: l_phase_rec BOOLEAN := FALSE;
370: l_pending_flag VARCHAR2(1) := 'Y';
621: END IF;
622: --End 4105841 Raise events
623:
624: /* Fix for bug 10404086 - Here this API should be called only for HTML UI flow
625: (i.e.) when FND_GLOBAL.conc_request_id is null
626: Do not call this ICX API in concurrent program or process_items() API call.
627: For these two flows, this ICX API will be called in INVPOPIF pkg (INVPOPIB.pls)
628: */
629:
626: Do not call this ICX API in concurrent program or process_items() API call.
627: For these two flows, this ICX API will be called in INVPOPIF pkg (INVPOPIB.pls)
628: */
629:
630: IF ( ( FND_GLOBAL.conc_request_id IS NULL OR FND_GLOBAL.conc_request_id = -1)
631: AND (SUBSTR(NVL(INV_EGO_REVISION_VALIDATE.Get_Process_Control_HTML_API(),'HTML'),1,3) <> 'API' ) ) THEN
632:
633: --Call ICX APIs
634: BEGIN
759: l_item_number mtl_system_items_kfv.CONCATENATED_SEGMENTS%TYPE;
760: l_item_desc mtl_system_items_kfv.DESCRIPTION%TYPE;
761: -- End 4105841
762: -- start bug 13473691
763: l_user_id CONSTANT NUMBER := FND_GLOBAL.User_Id;
764: l_login_id CONSTANT NUMBER := FND_GLOBAL.Login_Id;
765: l_sysdate DATE := SYSDATE;
766: -- end bug 13473691
767:
760: l_item_desc mtl_system_items_kfv.DESCRIPTION%TYPE;
761: -- End 4105841
762: -- start bug 13473691
763: l_user_id CONSTANT NUMBER := FND_GLOBAL.User_Id;
764: l_login_id CONSTANT NUMBER := FND_GLOBAL.Login_Id;
765: l_sysdate DATE := SYSDATE;
766: -- end bug 13473691
767:
768: BEGIN
947: );
948: --End 4105841
949:
950: /* Fix for bug 10404086 - Here this API should be called only for HTML UI flow
951: (i.e.) when FND_GLOBAL.conc_request_id is null
952: Do not call this ICX API in concurrent program or process_items() API call.
953: For these two flows, this ICX API will be called in INVPOPIF pkg (INVPOPIB.pls)
954: */
955:
952: Do not call this ICX API in concurrent program or process_items() API call.
953: For these two flows, this ICX API will be called in INVPOPIF pkg (INVPOPIB.pls)
954: */
955:
956: IF ( ( FND_GLOBAL.conc_request_id IS NULL OR FND_GLOBAL.conc_request_id = -1)
957: AND (SUBSTR(NVL(INV_EGO_REVISION_VALIDATE.Get_Process_Control_HTML_API(),'HTML'),1,3) <> 'API' ) ) THEN
958:
959: --Call ICX APIs
960: BEGIN
1669: IF FND_API.To_Boolean( p_commit ) THEN
1670: SAVEPOINT Create_Phase_History_SP;
1671: END IF;
1672:
1673: l_user_id := FND_GLOBAL.User_Id;
1674: l_sysdate := SYSDATE;
1675: INSERT INTO mtl_pending_item_status(
1676: inventory_item_id,
1677: organization_id,