9:
10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ASO_SALES_TEAM_INT';
11:
12: PROCEDURE Assign_Sales_Team (
13: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
14: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
15: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
16: X_Qte_Header_Rec OUT NOCOPY /* file.sql.39 change */ ASO_QUOTE_PUB.Qte_Header_Rec_Type,
17: X_Return_Status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ASO_SALES_TEAM_INT';
11:
12: PROCEDURE Assign_Sales_Team (
13: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
14: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
15: P_Qte_Header_Rec IN ASO_QUOTE_PUB.Qte_Header_Rec_Type,
16: X_Qte_Header_Rec OUT NOCOPY /* file.sql.39 change */ ASO_QUOTE_PUB.Qte_Header_Rec_Type,
17: X_Return_Status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
18: X_Msg_Count OUT NOCOPY /* file.sql.39 change */ NUMBER,
30: -- Standard Start of API savepoint
31: SAVEPOINT ASSIGN_SALES_TEAM_INT;
32:
33: -- Standard call to check for call compatibility.
34: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
35: 1.0,
36: l_api_name,
37: G_PKG_NAME)
38: THEN
35: 1.0,
36: l_api_name,
37: G_PKG_NAME)
38: THEN
39: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
36: l_api_name,
37: G_PKG_NAME)
38: THEN
39: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
44: IF FND_API.to_Boolean( p_init_msg_list )
40: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
41: END IF;
42:
43: -- Initialize message list if p_init_msg_list is set to TRUE.
44: IF FND_API.to_Boolean( p_init_msg_list )
45: THEN
46: FND_MSG_PUB.initialize;
47: END IF;
48:
46: FND_MSG_PUB.initialize;
47: END IF;
48:
49: -- Initialize API return status to SUCCESS
50: x_return_status := FND_API.G_RET_STS_SUCCESS;
51:
52: --
53: -- API body
54: --
67: aso_debug_pub.add('After ASO_SALES_TEAM_PVT.Assign_Sales_Team: '||x_return_status,1,'Y');
68: aso_debug_pub.add('After ASO_SALES_TEAM_PVT.Assign_Sales_Team: '||x_qte_header_rec.Quote_Header_Id,1,'Y');
69: END IF;
70:
71: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
72: RAISE FND_API.G_EXC_ERROR;
73: END IF;
74: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
68: aso_debug_pub.add('After ASO_SALES_TEAM_PVT.Assign_Sales_Team: '||x_qte_header_rec.Quote_Header_Id,1,'Y');
69: END IF;
70:
71: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
72: RAISE FND_API.G_EXC_ERROR;
73: END IF;
74: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
70:
71: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
72: RAISE FND_API.G_EXC_ERROR;
73: END IF;
74: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: -- Standard call to get message count and if count is 1, get message info.
71: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
72: RAISE FND_API.G_EXC_ERROR;
73: END IF;
74: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
75: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
76: END IF;
77:
78: -- Standard call to get message count and if count is 1, get message info.
79: FND_MSG_PUB.Count_And_Get
82: );
83:
84: EXCEPTION
85:
86: WHEN FND_API.G_EXC_ERROR THEN
87: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
88: P_API_NAME => L_API_NAME,
89: P_PKG_NAME => G_PKG_NAME,
90: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR,
95: X_MSG_DATA => X_MSG_DATA,
96: X_RETURN_STATUS => X_RETURN_STATUS
97: );
98:
99: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
100: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
101: P_API_NAME => L_API_NAME,
102: P_PKG_NAME => G_PKG_NAME,
103: P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR,