12: G_SQL_ERR_MSG_TOKEN CONSTANT VARCHAR2(11) := 'SQL_ERR_MSG';
13: G_PLSQL_ERR CONSTANT VARCHAR2(17) := 'EGO_PLSQL_ERR';
14:
15: G_EGO_ITEM CONSTANT VARCHAR2(20) := 'EGO_ITEM';
16: G_CURRENT_USER_ID NUMBER := FND_GLOBAL.User_Id;
17: G_CURRENT_LOGIN_ID NUMBER := FND_GLOBAL.Login_Id;
18:
19:
20: ----------------------------------------------------------------------
13: G_PLSQL_ERR CONSTANT VARCHAR2(17) := 'EGO_PLSQL_ERR';
14:
15: G_EGO_ITEM CONSTANT VARCHAR2(20) := 'EGO_ITEM';
16: G_CURRENT_USER_ID NUMBER := FND_GLOBAL.User_Id;
17: G_CURRENT_LOGIN_ID NUMBER := FND_GLOBAL.Login_Id;
18:
19:
20: ----------------------------------------------------------------------
21: -- Private Procedures / Functions
491: THEN
492: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
493: END IF;
494:
495: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
496: THEN
497: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
498: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
499: END IF;
493: END IF;
494:
495: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
496: THEN
497: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
498: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
499: END IF;
500:
501: --
494:
495: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
496: THEN
497: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
498: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
499: END IF;
500:
501: --
502: -- replaced call to EGO_INV_ITEM_CATALOG_PVT.Check_pending_Change_Orders
1133: THEN
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:
1137: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1138: THEN
1139: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1140: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1141: END IF;
1135: END IF;
1136:
1137: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1138: THEN
1139: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1140: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1141: END IF;
1142:
1143: IF (p_inventory_item_id IS NULL
1136:
1137: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1138: THEN
1139: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1140: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1141: END IF;
1142:
1143: IF (p_inventory_item_id IS NULL
1144: OR
1490: THEN
1491: RAISE FND_API.G_EXC_ERROR;
1492: END IF;
1493:
1494: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1495: THEN
1496: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1497: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1498: END IF;
1492: END IF;
1493:
1494: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1495: THEN
1496: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1497: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1498: END IF;
1499:
1500:
1493:
1494: IF Nvl(FND_GLOBAL.User_Id,-1) <> Nvl(G_CURRENT_USER_ID,-1)
1495: THEN
1496: G_CURRENT_USER_ID := FND_GLOBAL.User_Id;
1497: G_CURRENT_LOGIN_ID := FND_GLOBAL.Login_Id;
1498: END IF;
1499:
1500:
1501: IF ( p_inventory_item_id IS NULL
1983: SELECT
1984: ORGANIZATION_ID BULK COLLECT INTO l_orgs
1985: FROM
1986: ORG_ACCESS_VIEW
1987: WHERE RESPONSIBILITY_ID = FND_GLOBAL.RESP_ID
1988: AND RESP_APPLICATION_ID = FND_GLOBAL.RESP_APPL_ID;
1989:
1990: ELSE
1991:
1984: ORGANIZATION_ID BULK COLLECT INTO l_orgs
1985: FROM
1986: ORG_ACCESS_VIEW
1987: WHERE RESPONSIBILITY_ID = FND_GLOBAL.RESP_ID
1988: AND RESP_APPLICATION_ID = FND_GLOBAL.RESP_APPL_ID;
1989:
1990: ELSE
1991:
1992: l_orgs := ORG_TABLE(p_organization_id);