13893: THEN
13894: Error_Handler.Write_Debug('Unexpected Error occured in Insert in Create_Change_Lifecycle . . .' || SQLERRM);
13895: END IF;
13896:
13897: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
13898: THEN
13899: l_err_text := G_PKG_NAME||' : Utility (Create_Change_Lifecycle Lifecycle Insert) '||SUBSTR(SQLERRM, 1, 200);
13900:
13901: Error_Handler.Add_Error_Token
14127: END IF;
14128:
14129:
14130:
14131: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
14132: THEN
14133: l_err_text := G_PKG_NAME || ' : Utility (Relationship Insert) ' ||
14134: SUBSTR(SQLERRM, 1, 200);
14135:
15043:
15044: FOR I IN 1..l_pls_msg_count
15045: LOOP
15046: Error_Handler.Add_Error_Token
15047: ( p_Message_Text => FND_MSG_PUB.get(I, 'F')
15048: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
15049: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
15050: );
15051:
16364: ENG_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
16365:
16366: WHEN OTHERS THEN
16367:
16368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
16369: THEN
16370: l_err_text := G_PKG_NAME || ' : Process ECO '
16371: || substrb(SQLERRM,1,200);
16372: Error_Handler.Add_Error_Token
16501:
16502: -- Initialize message list.
16503:
16504: IF FND_API.to_Boolean(p_init_msg_list) THEN
16505: FND_MSG_PUB.initialize;
16506: END IF;
16507:
16508: -- Set Savepoint
16509:
16659: x_return_status := FND_API.G_RET_STS_SUCCESS;
16660:
16661: -- Get message count and data
16662:
16663: FND_MSG_PUB.Count_And_Get
16664: ( p_count => x_msg_count
16665: , p_data => x_msg_data
16666: );
16667:
16673: x_return_status := FND_API.G_RET_STS_ERROR;
16674:
16675: -- Get message count and data
16676:
16677: FND_MSG_PUB.Count_And_Get
16678: ( p_count => x_msg_count
16679: , p_data => x_msg_data
16680: );
16681:
16688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16689:
16690: -- Get message count and data
16691:
16692: FND_MSG_PUB.Count_And_Get
16693: ( p_count => x_msg_count
16694: , p_data => x_msg_data
16695: );
16696:
16701: WHEN OTHERS THEN
16702:
16703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16704:
16705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
16706: THEN
16707: FND_MSG_PUB.Add_Exc_Msg
16708: ( G_PKG_NAME
16709: , 'Lock_Eco'
16703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
16704:
16705: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
16706: THEN
16707: FND_MSG_PUB.Add_Exc_Msg
16708: ( G_PKG_NAME
16709: , 'Lock_Eco'
16710: );
16711: END IF;
16711: END IF;
16712:
16713: -- Get message count and data
16714:
16715: FND_MSG_PUB.Count_And_Get
16716: ( p_count => x_msg_count
16717: , p_data => x_msg_data
16718: );
16719: