3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'gmd_val_data_pub';
5: PROCEDURE get_val_data
6: ( p_api_version IN NUMBER ,
7: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
8: p_object_type IN VARCHAR2 ,
9: p_recipe_no IN VARCHAR2 := NULL ,
10: p_recipe_version IN NUMBER := NULL ,
11: p_recipe_id IN NUMBER := NULL ,
33: IS
34:
35:
36: /* local Variable*/
37: p_return_status VARCHAR2(100) := FND_API.G_RET_STS_SUCCESS;
38: -- lrecord_type gmdfmval_pub.formula_info_in;
39: -- x_recipe_id gmd_recipes.recipe_id%type ;
40: -- x_routing_id fm_rout_hdr.routing_id%type ;
41: l_return_status varchar2(1);
163: END IF;
164: EXCEPTION
165: WHEN OTHERS THEN
166: X_return_code := SQLCODE;
167: x_return_status := FND_API.G_RET_STS_ERROR;
168: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
169: END;
170: /* Bug No.6788488 - End */
171:
181:
182: END IF;
183:
184: EXCEPTION
185: WHEN FND_API.G_EXC_ERROR THEN
186: X_return_code := SQLCODE;
187: x_return_status := FND_API.G_RET_STS_ERROR;
188: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
189:
183:
184: EXCEPTION
185: WHEN FND_API.G_EXC_ERROR THEN
186: X_return_code := SQLCODE;
187: x_return_status := FND_API.G_RET_STS_ERROR;
188: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: X_return_code := SQLCODE;
186: X_return_code := SQLCODE;
187: x_return_status := FND_API.G_RET_STS_ERROR;
188: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: X_return_code := SQLCODE;
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
194:
188: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
189:
190: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
191: X_return_code := SQLCODE;
192: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
193: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
194:
195: WHEN OTHERS THEN
196: X_return_code := SQLCODE;
193: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
194:
195: WHEN OTHERS THEN
196: X_return_code := SQLCODE;
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
199:
200: END ;
201: