72: ,p_rep_asset_rec IN rep_asset_rec_type
73: ,p_req_asset_tbl IN req_asset_tbl_type)
74: IS
75:
76: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
77: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_LIKE_KIND_EXCHANGE';
78:
79: BEGIN
80: l_return_status := FND_API.G_RET_STS_SUCCESS;
76: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
77: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_LIKE_KIND_EXCHANGE';
78:
79: BEGIN
80: l_return_status := FND_API.G_RET_STS_SUCCESS;
81:
82: -- customer pre-processing
83:
84:
95: ,p_comments => p_comments
96: ,p_rep_asset_rec => p_rep_asset_rec
97: ,p_req_asset_tbl => p_req_asset_tbl);
98:
99: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
100: RAISE FND_API.G_EXC_ERROR;
101: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
96: ,p_rep_asset_rec => p_rep_asset_rec
97: ,p_req_asset_tbl => p_req_asset_tbl);
98:
99: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
100: RAISE FND_API.G_EXC_ERROR;
101: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
97: ,p_req_asset_tbl => p_req_asset_tbl);
98:
99: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
100: RAISE FND_API.G_EXC_ERROR;
101: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
105: -- customer post-processing
98:
99: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
100: RAISE FND_API.G_EXC_ERROR;
101: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
103: END IF;
104:
105: -- customer post-processing
106:
107:
108: x_return_status := l_return_status;
109:
110: EXCEPTION
111: WHEN FND_API.G_EXC_ERROR THEN
112: x_return_status := FND_API.G_RET_STS_ERROR;
113:
114: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
115: ,p_count => x_msg_count
108: x_return_status := l_return_status;
109:
110: EXCEPTION
111: WHEN FND_API.G_EXC_ERROR THEN
112: x_return_status := FND_API.G_RET_STS_ERROR;
113:
114: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
114: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
117:
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
120: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
121: ,p_count => x_msg_count
122: ,p_data => x_msg_data);
115: ,p_count => x_msg_count
116: ,p_data => x_msg_data);
117:
118: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
119: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
120: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
121: ,p_count => x_msg_count
122: ,p_data => x_msg_data);
123:
125: FND_MSG_PUB.ADD_EXC_MSG('OKL_LIKE_KIND_EXCHANGE_PUB','CREATE_LIKE_KIND_EXCHANGE');
126: FND_MSG_PUB.Count_and_get(p_encoded => OKL_API.G_FALSE
127: ,p_count => x_msg_count
128: ,p_data => x_msg_data);
129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
130: END CREATE_LIKE_KIND_EXCHANGE;
131:
132:
133: End OKL_LIKE_KIND_EXCHANGE_PUB;