28: );
29:
30: PROCEDURE partner_attr_insert (
31: P_Api_Version_Number IN NUMBER,
32: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
33: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
34: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
35: p_partner_id IN NUMBER,
36: x_return_status OUT NOCOPY VARCHAR2,
29:
30: PROCEDURE partner_attr_insert (
31: P_Api_Version_Number IN NUMBER,
32: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
33: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
34: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
35: p_partner_id IN NUMBER,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,
30: PROCEDURE partner_attr_insert (
31: P_Api_Version_Number IN NUMBER,
32: P_Init_Msg_List IN VARCHAR2 := FND_API.G_FALSE,
33: P_Commit IN VARCHAR2 := FND_API.G_FALSE,
34: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
35: p_partner_id IN NUMBER,
36: x_return_status OUT NOCOPY VARCHAR2,
37: x_msg_count OUT NOCOPY NUMBER,
38: x_msg_data OUT NOCOPY VARCHAR2
49:
50: BEGIN
51:
52: -- Standard call to check for call compatibility.
53: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
54: p_api_version_number,
55: l_api_name,
56: G_PKG_NAME)
57: THEN
54: p_api_version_number,
55: l_api_name,
56: G_PKG_NAME)
57: THEN
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END IF;
60:
61: -- Initialize message list if p_init_msg_list is set to TRUE.
62: IF FND_API.to_Boolean( p_init_msg_list )
58: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
59: END IF;
60:
61: -- Initialize message list if p_init_msg_list is set to TRUE.
62: IF FND_API.to_Boolean( p_init_msg_list )
63: THEN
64: FND_MSG_PUB.initialize;
65: END IF;
66:
71: fnd_msg_pub.Add;
72: END IF;
73:
74: -- Initialize API return status to SUCCESS
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
76:
77: --
78: EXECUTE IMMEDIATE
79: '