4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'GMD_FETCH_PUB';
5:
6: /* IN Parameters:
7: P_api_version - standard parameter
8: P_init_msg_list - standard parameter Should be FND_API.G_FALSE
9: P_commit - standard parameter. Should be FND_API.G_FALSE
10: This procedure does no insert/update/delete
11: P_validation_level - standard parameter
12: OUT Parameters:
5:
6: /* IN Parameters:
7: P_api_version - standard parameter
8: P_init_msg_list - standard parameter Should be FND_API.G_FALSE
9: P_commit - standard parameter. Should be FND_API.G_FALSE
10: This procedure does no insert/update/delete
11: P_validation_level - standard parameter
12: OUT Parameters:
13: x_return_status - standard parameter. S=success,E=expected error,
46: l_api_name CONSTANT VARCHAR2(30) := 'get_recipe_id';
47: l_api_version CONSTANT NUMBER := 1.0;
48:
49: BEGIN
50: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
51: l_api_name, G_PKG_NAME)) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54: IF FND_API.to_Boolean(p_init_msg_list) THEN
48:
49: BEGIN
50: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
51: l_api_name, G_PKG_NAME)) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54: IF FND_API.to_Boolean(p_init_msg_list) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
50: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
51: l_api_name, G_PKG_NAME)) THEN
52: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
53: END IF;
54: IF FND_API.to_Boolean(p_init_msg_list) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57: x_return_status := FND_API.G_RET_STS_SUCCESS;
58:
53: END IF;
54: IF FND_API.to_Boolean(p_init_msg_list) THEN
55: FND_MSG_PUB.initialize;
56: END IF;
57: x_return_status := FND_API.G_RET_STS_SUCCESS;
58:
59: OPEN get_recp;
60: FETCH get_recp into x_recipe_id;
61: IF get_recp%NOTFOUND THEN
58:
59: OPEN get_recp;
60: FETCH get_recp into x_recipe_id;
61: IF get_recp%NOTFOUND THEN
62: RAISE fnd_api.g_exc_error;
63: END IF;
64: CLOSE get_recp;
65:
66: -- standard call to get msge cnt, and if cnt is 1, get mesg info
66: -- standard call to get msge cnt, and if cnt is 1, get mesg info
67: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
68:
69: EXCEPTION
70: WHEN FND_API.G_EXC_ERROR THEN
71: X_return_code := SQLCODE;
72: x_return_status := FND_API.G_RET_STS_ERROR;
73: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
74:
68:
69: EXCEPTION
70: WHEN FND_API.G_EXC_ERROR THEN
71: X_return_code := SQLCODE;
72: x_return_status := FND_API.G_RET_STS_ERROR;
73: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
74:
75: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
76: X_return_code := SQLCODE;
71: X_return_code := SQLCODE;
72: x_return_status := FND_API.G_RET_STS_ERROR;
73: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
74:
75: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
76: X_return_code := SQLCODE;
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
79:
73: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
74:
75: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
76: X_return_code := SQLCODE;
77: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
78: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
79:
80: WHEN OTHERS THEN
81:
79:
80: WHEN OTHERS THEN
81:
82: X_return_code := SQLCODE;
83: x_return_status := FND_API.G_RET_STS_ERROR;
84: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
85:
86: END get_recipe_id;
87:
122: l_api_name CONSTANT VARCHAR2(30) := 'get_routing_id';
123: l_api_version CONSTANT NUMBER := 1.0;
124:
125: BEGIN
126: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
127: l_api_name, G_PKG_NAME) THEN
128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
129: END IF;
130: IF FND_API.to_Boolean(p_init_msg_list) THEN
124:
125: BEGIN
126: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
127: l_api_name, G_PKG_NAME) THEN
128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
129: END IF;
130: IF FND_API.to_Boolean(p_init_msg_list) THEN
131: FND_MSG_PUB.initialize;
132: END IF;
126: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
127: l_api_name, G_PKG_NAME) THEN
128: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
129: END IF;
130: IF FND_API.to_Boolean(p_init_msg_list) THEN
131: FND_MSG_PUB.initialize;
132: END IF;
133: x_return_status := FND_API.G_RET_STS_SUCCESS;
134:
129: END IF;
130: IF FND_API.to_Boolean(p_init_msg_list) THEN
131: FND_MSG_PUB.initialize;
132: END IF;
133: x_return_status := FND_API.G_RET_STS_SUCCESS;
134:
135: OPEN get_rout;
136: FETCH get_rout into x_routing_id;
137: IF get_rout%NOTFOUND THEN
134:
135: OPEN get_rout;
136: FETCH get_rout into x_routing_id;
137: IF get_rout%NOTFOUND THEN
138: RAISE fnd_api.g_exc_error;
139: END IF;
140: CLOSE get_rout;
141:
142: -- standard call to get msge cnt, and if cnt is 1, get mesg info
142: -- standard call to get msge cnt, and if cnt is 1, get mesg info
143: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
144:
145: EXCEPTION
146: WHEN FND_API.G_EXC_ERROR THEN
147: X_return_code := SQLCODE;
148: x_return_status := FND_API.G_RET_STS_ERROR;
149: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
150:
144:
145: EXCEPTION
146: WHEN FND_API.G_EXC_ERROR THEN
147: X_return_code := SQLCODE;
148: x_return_status := FND_API.G_RET_STS_ERROR;
149: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
150:
151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
152: X_return_code := SQLCODE;
147: X_return_code := SQLCODE;
148: x_return_status := FND_API.G_RET_STS_ERROR;
149: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
150:
151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
152: X_return_code := SQLCODE;
153: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
154: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
155:
149: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
150:
151: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
152: X_return_code := SQLCODE;
153: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
154: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
155:
156: WHEN OTHERS THEN
157:
155:
156: WHEN OTHERS THEN
157:
158: X_return_code := SQLCODE;
159: x_return_status := FND_API.G_RET_STS_ERROR;
160: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
161:
162: END get_routing_id;
163:
209: ORDER BY routing_id;
210:
211: begin
212:
213: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
214: l_api_name, G_PKG_NAME) THEN
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217: IF FND_API.to_Boolean(p_init_msg_list) THEN
211: begin
212:
213: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
214: l_api_name, G_PKG_NAME) THEN
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217: IF FND_API.to_Boolean(p_init_msg_list) THEN
218: FND_MSG_PUB.initialize;
219: END IF;
213: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
214: l_api_name, G_PKG_NAME) THEN
215: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
216: END IF;
217: IF FND_API.to_Boolean(p_init_msg_list) THEN
218: FND_MSG_PUB.initialize;
219: END IF;
220:
221: For get_rec IN cur_rout_hdr LOOP
218: FND_MSG_PUB.initialize;
219: END IF;
220:
221: For get_rec IN cur_rout_hdr LOOP
222: x_return_status := FND_API.G_RET_STS_SUCCESS;
223:
224: i := i + 1;
225:
226: x_rout_out(i).routing_id := get_rec.routing_id ;
280:
281: END LOOP;
282:
283: IF i= 0 THEN
284: RAISE fnd_api.g_exc_error;
285: END IF;
286:
287: -- standard call to get msge cnt, and if cnt is 1, get mesg info
288: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
287: -- standard call to get msge cnt, and if cnt is 1, get mesg info
288: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: X_return_code := SQLCODE;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
295:
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: X_return_code := SQLCODE;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
295:
296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
297: X_return_code := SQLCODE;
292: X_return_code := SQLCODE;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
295:
296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
297: X_return_code := SQLCODE;
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
300:
294: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
295:
296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
297: X_return_code := SQLCODE;
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
300:
301: WHEN OTHERS THEN
302: X_return_code := SQLCODE;
299: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
300:
301: WHEN OTHERS THEN
302: X_return_code := SQLCODE;
303: x_return_status := FND_API.G_RET_STS_ERROR;
304: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
305:
306: END get_rout_hdr;
307:
342: l_api_name CONSTANT VARCHAR2(30) := 'get_formula_id';
343: l_api_version CONSTANT NUMBER := 1.0;
344:
345: BEGIN
346: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
347: l_api_name, G_PKG_NAME) THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: END IF;
350: IF FND_API.to_Boolean(p_init_msg_list) THEN
344:
345: BEGIN
346: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
347: l_api_name, G_PKG_NAME) THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: END IF;
350: IF FND_API.to_Boolean(p_init_msg_list) THEN
351: FND_MSG_PUB.initialize;
352: END IF;
346: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
347: l_api_name, G_PKG_NAME) THEN
348: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
349: END IF;
350: IF FND_API.to_Boolean(p_init_msg_list) THEN
351: FND_MSG_PUB.initialize;
352: END IF;
353: x_return_status := FND_API.G_RET_STS_SUCCESS;
354:
349: END IF;
350: IF FND_API.to_Boolean(p_init_msg_list) THEN
351: FND_MSG_PUB.initialize;
352: END IF;
353: x_return_status := FND_API.G_RET_STS_SUCCESS;
354:
355: OPEN get_form;
356: FETCH get_form into x_formula_id;
357:
355: OPEN get_form;
356: FETCH get_form into x_formula_id;
357:
358: IF get_form%NOTFOUND THEN
359: RAISE fnd_api.g_exc_error;
360: END IF; -- end if formula_id not found
361:
362: CLOSE get_form;
363:
364: -- standard call to get msge cnt, and if cnt is 1, get mesg info
365: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
366:
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: X_return_code := SQLCODE;
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
372:
366:
367: EXCEPTION
368: WHEN FND_API.G_EXC_ERROR THEN
369: X_return_code := SQLCODE;
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
372:
373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
374: X_return_code := SQLCODE;
369: X_return_code := SQLCODE;
370: x_return_status := FND_API.G_RET_STS_ERROR;
371: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
372:
373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
374: X_return_code := SQLCODE;
375: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
376: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
377:
371: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
372:
373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
374: X_return_code := SQLCODE;
375: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
376: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
377:
378: WHEN OTHERS THEN
379:
377:
378: WHEN OTHERS THEN
379:
380: X_return_code := SQLCODE;
381: x_return_status := FND_API.G_RET_STS_ERROR;
382: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
383:
384: END get_formula_id;
385:
425: l_return_code NUMBER ;
426: l_msg_data VARCHAR2(2000) ;
427:
428: BEGIN
429: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
430: l_api_name, G_PKG_NAME) THEN
431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
432: END IF;
433: IF FND_API.to_Boolean(p_init_msg_list) THEN
427:
428: BEGIN
429: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
430: l_api_name, G_PKG_NAME) THEN
431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
432: END IF;
433: IF FND_API.to_Boolean(p_init_msg_list) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
429: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
430: l_api_name, G_PKG_NAME) THEN
431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
432: END IF;
433: IF FND_API.to_Boolean(p_init_msg_list) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
432: END IF;
433: IF FND_API.to_Boolean(p_init_msg_list) THEN
434: FND_MSG_PUB.initialize;
435: END IF;
436: x_return_status := FND_API.G_RET_STS_SUCCESS;
437:
438: -- call the get_routing_id procedure to check the routing exists or not
439: get_routing_id
440: ( p_api_version => 1.0 ,
452: IF l_routing_id IS not null then
453: OPEN get_proc;
454: FETCH get_proc into x_process_loss;
455: ELSE
456: RAISE fnd_api.g_exc_error;
457: END IF;
458: /* IF get_proc%NOTFOUND THEN
459: RAISE fnd_api.g_exc_error;
460: END IF; -- end if recipe_id not found */
455: ELSE
456: RAISE fnd_api.g_exc_error;
457: END IF;
458: /* IF get_proc%NOTFOUND THEN
459: RAISE fnd_api.g_exc_error;
460: END IF; -- end if recipe_id not found */
461:
462: CLOSE get_proc;
463:
464: /* standard call to get msge cnt, and if cnt is 1, get mesg info */
465: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
466:
467: EXCEPTION
468: WHEN FND_API.G_EXC_ERROR THEN
469: X_return_code := SQLCODE;
470: x_return_status := FND_API.G_RET_STS_ERROR;
471: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
472:
466:
467: EXCEPTION
468: WHEN FND_API.G_EXC_ERROR THEN
469: X_return_code := SQLCODE;
470: x_return_status := FND_API.G_RET_STS_ERROR;
471: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
472:
473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
474: X_return_code := SQLCODE;
469: X_return_code := SQLCODE;
470: x_return_status := FND_API.G_RET_STS_ERROR;
471: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
472:
473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
474: X_return_code := SQLCODE;
475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
477:
471: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
472:
473: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
474: X_return_code := SQLCODE;
475: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
476: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
477:
478: WHEN OTHERS THEN
479:
477:
478: WHEN OTHERS THEN
479:
480: X_return_code := SQLCODE;
481: x_return_status := FND_API.G_RET_STS_ERROR;
482: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
483:
484: END get_process_loss;
485:
530: l_api_version CONSTANT NUMBER := 1.0;
531: i NUMBER := 0;
532:
533: BEGIN
534: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
535: l_api_name, G_PKG_NAME) THEN
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538: IF FND_API.to_Boolean(p_init_msg_list) THEN
532:
533: BEGIN
534: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
535: l_api_name, G_PKG_NAME) THEN
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538: IF FND_API.to_Boolean(p_init_msg_list) THEN
539: FND_MSG_PUB.initialize;
540: END IF;
534: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
535: l_api_name, G_PKG_NAME) THEN
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537: END IF;
538: IF FND_API.to_Boolean(p_init_msg_list) THEN
539: FND_MSG_PUB.initialize;
540: END IF;
541: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
542:
537: END IF;
538: IF FND_API.to_Boolean(p_init_msg_list) THEN
539: FND_MSG_PUB.initialize;
540: END IF;
541: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
542:
543:
544: FOR get_rec IN get_matl LOOP
545: x_return_status := FND_API.G_RET_STS_SUCCESS;
541: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
542:
543:
544: FOR get_rec IN get_matl LOOP
545: x_return_status := FND_API.G_RET_STS_SUCCESS;
546: i := i + 1;
547:
548: x_recipe_rout_matl_tbl(i).recipe_id := get_rec.recipe_id;
549: x_recipe_rout_matl_tbl(i).formulaline_id := get_rec.formulaline_id ;
595:
596: END LOOP;
597:
598: IF i = 0 THEN
599: RAISE fnd_api.g_exc_error;
600: END IF; -- end if recipe_id not found
601:
602: /* standard call to get msge cnt, and if cnt is 1, get mesg info*/
603: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
602: /* standard call to get msge cnt, and if cnt is 1, get mesg info*/
603: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
604:
605: EXCEPTION
606: WHEN FND_API.G_EXC_ERROR THEN
607: X_return_code := SQLCODE;
608: x_return_status := FND_API.G_RET_STS_ERROR;
609: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
610:
604:
605: EXCEPTION
606: WHEN FND_API.G_EXC_ERROR THEN
607: X_return_code := SQLCODE;
608: x_return_status := FND_API.G_RET_STS_ERROR;
609: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: X_return_code := SQLCODE;
607: X_return_code := SQLCODE;
608: x_return_status := FND_API.G_RET_STS_ERROR;
609: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: X_return_code := SQLCODE;
613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
614: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
615:
609: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
610:
611: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
612: X_return_code := SQLCODE;
613: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
614: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
615:
616: WHEN OTHERS THEN
617: X_return_code := SQLCODE;
614: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
615:
616: WHEN OTHERS THEN
617: X_return_code := SQLCODE;
618: x_return_status := FND_API.G_RET_STS_ERROR;
619: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
620:
621: END get_rout_material;
622:
673: AND d.oprn_id = o.oprn_id ;
674: --END BUG#2330056
675:
676: BEGIN
677: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
678: l_api_name, G_PKG_NAME) THEN
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681: IF FND_API.to_Boolean(p_init_msg_list) THEN
675:
676: BEGIN
677: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
678: l_api_name, G_PKG_NAME) THEN
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681: IF FND_API.to_Boolean(p_init_msg_list) THEN
682: FND_MSG_PUB.initialize;
683: END IF;
677: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
678: l_api_name, G_PKG_NAME) THEN
679: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
680: END IF;
681: IF FND_API.to_Boolean(p_init_msg_list) THEN
682: FND_MSG_PUB.initialize;
683: END IF;
684: x_return_status := FND_API.G_RET_STS_SUCCESS;
685:
680: END IF;
681: IF FND_API.to_Boolean(p_init_msg_list) THEN
682: FND_MSG_PUB.initialize;
683: END IF;
684: x_return_status := FND_API.G_RET_STS_SUCCESS;
685:
686: For get_rec IN get_routing_step LOOP
687: x_return_status := FND_API.G_RET_STS_SUCCESS;
688: i := i + 1;
683: END IF;
684: x_return_status := FND_API.G_RET_STS_SUCCESS;
685:
686: For get_rec IN get_routing_step LOOP
687: x_return_status := FND_API.G_RET_STS_SUCCESS;
688: i := i + 1;
689:
690: x_routing_step_out(i).routingstep_no := get_rec.routingstep_no ;
691: x_routing_step_out(i).routingstep_id := get_rec.routingstep_id ;
740: x_routing_step_out(i).attribute30 := get_rec.attribute30;
741: END LOOP;
742:
743: IF i = 0 THEN
744: RAISE fnd_api.g_exc_error;
745: END IF; -- end if recipe_id not found
746:
747: -- standard call to get msge cnt, and if cnt is 1, get mesg info
748: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
747: -- standard call to get msge cnt, and if cnt is 1, get mesg info
748: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
749:
750: EXCEPTION
751: WHEN FND_API.G_EXC_ERROR THEN
752: X_return_code := SQLCODE;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
755:
749:
750: EXCEPTION
751: WHEN FND_API.G_EXC_ERROR THEN
752: X_return_code := SQLCODE;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
755:
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: X_return_code := SQLCODE;
752: X_return_code := SQLCODE;
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
755:
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: X_return_code := SQLCODE;
758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
759: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
760:
754: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
755:
756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
757: X_return_code := SQLCODE;
758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
759: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
760:
761: WHEN OTHERS THEN
762: X_return_code := SQLCODE;
759: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
760:
761: WHEN OTHERS THEN
762: X_return_code := SQLCODE;
763: x_return_status := FND_API.G_RET_STS_ERROR;
764: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
765:
766: END get_routing_step_details;
767:
893: FROM org_access_view
894: WHERE organization_id = p_organization_id;
895:
896: BEGIN
897: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
898: l_api_name, G_PKG_NAME) THEN
899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
900: END IF;
901:
895:
896: BEGIN
897: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
898: l_api_name, G_PKG_NAME) THEN
899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
900: END IF;
901:
902: IF FND_API.to_Boolean(p_init_msg_list) THEN
903: FND_MSG_PUB.initialize;
898: l_api_name, G_PKG_NAME) THEN
899: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
900: END IF;
901:
902: IF FND_API.to_Boolean(p_init_msg_list) THEN
903: FND_MSG_PUB.initialize;
904: END IF;
905:
906: x_return_status := FND_API.G_RET_STS_SUCCESS;
902: IF FND_API.to_Boolean(p_init_msg_list) THEN
903: FND_MSG_PUB.initialize;
904: END IF;
905:
906: x_return_status := FND_API.G_RET_STS_SUCCESS;
907:
908: -- call the get_routing_id procedure to check the routing exists or not
909: OPEN Cur_get_recipe;
910: FETCH Cur_get_recipe INTO l_routing_id, l_calculate_step_qty;
926: p_ignore_vol_conv => TRUE,
927: p_scale_factor => NVL(P_val_scale_factor,1),
928: p_process_loss => NVL(p_process_loss, 0),
929: p_organization_id => p_organization_id);
930: IF l_return_status <> FND_API.g_ret_sts_success THEN
931: RAISE FND_API.G_EXC_ERROR;
932: END IF;
933: ELSE
934: l_rout_scale_factor := GMD_COMMON_VAL.Get_Routing_Scale_Factor
927: p_scale_factor => NVL(P_val_scale_factor,1),
928: p_process_loss => NVL(p_process_loss, 0),
929: p_organization_id => p_organization_id);
930: IF l_return_status <> FND_API.g_ret_sts_success THEN
931: RAISE FND_API.G_EXC_ERROR;
932: END IF;
933: ELSE
934: l_rout_scale_factor := GMD_COMMON_VAL.Get_Routing_Scale_Factor
935: (vRecipe_Id => p_recipe_id
1046: /* standard call to get msge cnt, and if cnt is 1, get mesg info*/
1047: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1048:
1049: EXCEPTION
1050: WHEN FND_API.G_EXC_ERROR THEN
1051: X_return_code := SQLCODE;
1052: x_return_status := FND_API.G_RET_STS_ERROR;
1053: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1054:
1048:
1049: EXCEPTION
1050: WHEN FND_API.G_EXC_ERROR THEN
1051: X_return_code := SQLCODE;
1052: x_return_status := FND_API.G_RET_STS_ERROR;
1053: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1054:
1055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1056: X_return_code := SQLCODE;
1051: X_return_code := SQLCODE;
1052: x_return_status := FND_API.G_RET_STS_ERROR;
1053: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1054:
1055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1056: X_return_code := SQLCODE;
1057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1058: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1059:
1053: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1054:
1055: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1056: X_return_code := SQLCODE;
1057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1058: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1059:
1060: WHEN OTHERS THEN
1061: X_return_code := SQLCODE;
1058: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1059:
1060: WHEN OTHERS THEN
1061: X_return_code := SQLCODE;
1062: x_return_status := FND_API.G_RET_STS_ERROR;
1063: FND_MSG_PUB.add_exc_msg ('GMD_RECIPE_FETCH_PUB', 'GET_RECIPE_STEP_DETAILS');
1064: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1065:
1066: END get_recipe_step_details;
1114: l_return_code NUMBER ;
1115: l_msg_data VARCHAR2(2000) ;
1116:
1117: BEGIN
1118: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1119: l_api_name, G_PKG_NAME) THEN
1120: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1121: END IF;
1122: IF FND_API.to_Boolean(p_init_msg_list) THEN
1116:
1117: BEGIN
1118: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1119: l_api_name, G_PKG_NAME) THEN
1120: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1121: END IF;
1122: IF FND_API.to_Boolean(p_init_msg_list) THEN
1123: FND_MSG_PUB.initialize;
1124: END IF;
1118: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1119: l_api_name, G_PKG_NAME) THEN
1120: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1121: END IF;
1122: IF FND_API.to_Boolean(p_init_msg_list) THEN
1123: FND_MSG_PUB.initialize;
1124: END IF;
1125: x_return_status := FND_API.G_RET_STS_SUCCESS;
1126: /*Check for circular step dependency */
1121: END IF;
1122: IF FND_API.to_Boolean(p_init_msg_list) THEN
1123: FND_MSG_PUB.initialize;
1124: END IF;
1125: x_return_status := FND_API.G_RET_STS_SUCCESS;
1126: /*Check for circular step dependency */
1127: -- call the get_routing_id procedure to check the routing exists or not
1128:
1129: get_routing_id (
1144: ELSE
1145:
1146: FOR get_rec IN get_depd LOOP
1147: i := i + 1;
1148: x_return_status := FND_API.G_RET_STS_SUCCESS;
1149: x_routing_depd_tbl(i).dep_routingstep_no := get_rec.dep_routingstep_no ;
1150: x_routing_depd_tbl(i).routingstep_no := get_rec.routingstep_no ;
1151: x_routing_depd_tbl(i).routing_id := get_rec.routing_id;
1152: x_routing_depd_tbl(i).dep_type := get_rec.dep_type;
1168: x_routing_depd_tbl(i).chargeable_ind := get_rec.chargeable_ind;
1169: END LOOP;
1170:
1171: IF i = 0 THEN
1172: RAISE fnd_api.g_exc_error;
1173: END IF;
1174: END IF;
1175: END IF;
1176:
1177: /* standard call to get msge cnt, and if cnt is 1, get mesg info*/
1178: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1179:
1180: EXCEPTION
1181: WHEN FND_API.G_EXC_ERROR THEN
1182: X_return_code := SQLCODE;
1183: x_return_status := FND_API.G_RET_STS_ERROR;
1184: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1185:
1179:
1180: EXCEPTION
1181: WHEN FND_API.G_EXC_ERROR THEN
1182: X_return_code := SQLCODE;
1183: x_return_status := FND_API.G_RET_STS_ERROR;
1184: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1185:
1186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1187: X_return_code := SQLCODE;
1182: X_return_code := SQLCODE;
1183: x_return_status := FND_API.G_RET_STS_ERROR;
1184: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1185:
1186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1187: X_return_code := SQLCODE;
1188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1189: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1190:
1184: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1185:
1186: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1187: X_return_code := SQLCODE;
1188: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1189: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1190:
1191: WHEN OTHERS THEN
1192: X_return_code := SQLCODE;
1189: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1190:
1191: WHEN OTHERS THEN
1192: X_return_code := SQLCODE;
1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1195:
1196: END get_step_depd_details;
1197:
1281: -- END BUG#2686887
1282:
1283: BEGIN
1284:
1285: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1286: l_api_name, G_PKG_NAME) THEN
1287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1288: END IF;
1289: IF FND_API.to_Boolean(p_init_msg_list) THEN
1283: BEGIN
1284:
1285: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1286: l_api_name, G_PKG_NAME) THEN
1287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1288: END IF;
1289: IF FND_API.to_Boolean(p_init_msg_list) THEN
1290: FND_MSG_PUB.initialize;
1291: END IF;
1285: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1286: l_api_name, G_PKG_NAME) THEN
1287: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1288: END IF;
1289: IF FND_API.to_Boolean(p_init_msg_list) THEN
1290: FND_MSG_PUB.initialize;
1291: END IF;
1292:
1293: FOR get_rec IN get_recp_act LOOP
1290: FND_MSG_PUB.initialize;
1291: END IF;
1292:
1293: FOR get_rec IN get_recp_act LOOP
1294: x_return_status := FND_API.G_RET_STS_SUCCESS;
1295: i := i + 1;
1296: x_oprn_act_out(i).routingstep_no := get_rec.routing_step_no ;
1297: x_oprn_act_out(i).routingstep_id := get_rec.routingstep_id ;
1298: x_oprn_act_out(i).oprn_no := get_rec.oprn_no ;
1350:
1351: END LOOP;
1352:
1353: IF i = 0 THEN
1354: RAISE fnd_api.g_exc_error;
1355: END IF;
1356:
1357: /*standard call to get msge cnt, and if cnt is 1, get mesg info*/
1358: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1357: /*standard call to get msge cnt, and if cnt is 1, get mesg info*/
1358: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1359:
1360: EXCEPTION
1361: WHEN FND_API.G_EXC_ERROR THEN
1362: X_return_code := SQLCODE;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1365:
1359:
1360: EXCEPTION
1361: WHEN FND_API.G_EXC_ERROR THEN
1362: X_return_code := SQLCODE;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1365:
1366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1367: X_return_code := SQLCODE;
1362: X_return_code := SQLCODE;
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1365:
1366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1367: X_return_code := SQLCODE;
1368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1369: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1370:
1364: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1365:
1366: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1367: X_return_code := SQLCODE;
1368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1369: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1370:
1371: WHEN OTHERS THEN
1372: X_return_code := SQLCODE;
1369: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1370:
1371: WHEN OTHERS THEN
1372: X_return_code := SQLCODE;
1373: x_return_status := FND_API.G_RET_STS_ERROR;
1374: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1375:
1376: END get_oprn_act_detl;
1377:
1508:
1509: --END BUG #2686887
1510:
1511: BEGIN
1512: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1513: l_api_name, G_PKG_NAME) THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: END IF;
1516: IF FND_API.to_Boolean(p_init_msg_list) THEN
1510:
1511: BEGIN
1512: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1513: l_api_name, G_PKG_NAME) THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: END IF;
1516: IF FND_API.to_Boolean(p_init_msg_list) THEN
1517: FND_MSG_PUB.initialize;
1518: END IF;
1512: IF NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
1513: l_api_name, G_PKG_NAME) THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1515: END IF;
1516: IF FND_API.to_Boolean(p_init_msg_list) THEN
1517: FND_MSG_PUB.initialize;
1518: END IF;
1519: x_return_status := FND_API.G_RET_STS_SUCCESS;
1520:
1515: END IF;
1516: IF FND_API.to_Boolean(p_init_msg_list) THEN
1517: FND_MSG_PUB.initialize;
1518: END IF;
1519: x_return_status := FND_API.G_RET_STS_SUCCESS;
1520:
1521: /* BUG#2621411 RajaSekhar Added capacity_tolerance field */
1522:
1523: FOR get_rec IN get_recp_resc LOOP
1598:
1599: END LOOP;
1600:
1601: IF i = 0 THEN
1602: RAISE fnd_api.g_exc_error;
1603: END IF; -- end if recipe_id not found
1604:
1605: /* standard call to get msge cnt, and if cnt is 1, get mesg info */
1606: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1605: /* standard call to get msge cnt, and if cnt is 1, get mesg info */
1606: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1607:
1608: EXCEPTION
1609: WHEN FND_API.G_EXC_ERROR THEN
1610: X_return_code := SQLCODE;
1611: x_return_status := FND_API.G_RET_STS_ERROR;
1612: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1613:
1607:
1608: EXCEPTION
1609: WHEN FND_API.G_EXC_ERROR THEN
1610: X_return_code := SQLCODE;
1611: x_return_status := FND_API.G_RET_STS_ERROR;
1612: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1613:
1614: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1615: X_return_code := SQLCODE;
1610: X_return_code := SQLCODE;
1611: x_return_status := FND_API.G_RET_STS_ERROR;
1612: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1613:
1614: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1615: X_return_code := SQLCODE;
1616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1617: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1618:
1612: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1613:
1614: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1615: X_return_code := SQLCODE;
1616: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1617: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1618:
1619: WHEN OTHERS THEN
1620: X_return_code := SQLCODE;
1617: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1618:
1619: WHEN OTHERS THEN
1620: X_return_code := SQLCODE;
1621: x_return_status := FND_API.G_RET_STS_ERROR;
1622: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
1623:
1624: END get_oprn_resc_detl;
1625:
1905:
1906: BEGIN
1907:
1908: /* Set return status to success initially */
1909: x_return_status := FND_API.G_RET_STS_SUCCESS;
1910:
1911: /* Chk. whether the recipe id or the validity rule id is passed */
1912: IF (p_recipe_id IS NULL AND p_recipe_validity_rule_id IS NULL) THEN
1913: RAISE INVALID_DATA;
1967: x_contiguous_ind := NULL;
1968: fnd_message.set_name ('GMI', 'GMI_MISSING');
1969: fnd_message.set_token ('MISSING', 'RECIPE_ID');
1970: fnd_msg_pub.add;
1971: x_return_status := FND_API.G_RET_STS_ERROR;
1972:
1973: END FETCH_CONTIGUOUS_IND;
1974:
1975: /*======================================================================
2014:
2015: BEGIN
2016:
2017: /* Set return status to success initially */
2018: x_return_status := FND_API.G_RET_STS_SUCCESS;
2019:
2020: /* Chk. whether the recipe id or the validity rule id is passed */
2021: IF (p_recipe_id IS NULL AND p_recipe_validity_rule_id IS NULL) THEN
2022: RAISE INVALID_DATA;
2055: x_enhanced_pi_ind := NULL;
2056: fnd_message.set_name ('GMI', 'GMI_MISSING');
2057: fnd_message.set_token ('MISSING', 'RECIPE_ID');
2058: fnd_msg_pub.add;
2059: x_return_status := FND_API.G_RET_STS_ERROR;
2060:
2061: END FETCH_ENHANCED_PI_IND;
2062:
2063: END GMD_RECIPE_FETCH_PUB ;