DBA Data[Home] [Help]

APPS.GMD_VALIDITY_RULES dependencies on FND_API

Line 30: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,

26: --
27: --===================================================================== */
28:
29: PROCEDURE get_validity_rules(p_api_version IN NUMBER ,
30: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE ,
31: p_recipe_no IN VARCHAR2 := NULL ,
32: p_recipe_version IN NUMBER := NULL ,
33: p_recipe_id IN NUMBER := NULL ,
34: p_total_input IN NUMBER := NULL ,

Line 238: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,

234: l_return_status VARCHAR2(10);
235: l_form_id NUMBER;
236:
237: BEGIN
238: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
239: l_api_name, G_PKG_NAME)) THEN
240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
241: END IF;
242: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

Line 240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

236:
237: BEGIN
238: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
239: l_api_name, G_PKG_NAME)) THEN
240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
241: END IF;
242: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
243: FND_MSG_PUB.initialize;
244: END IF;

Line 242: IF (FND_API.to_Boolean(p_init_msg_list)) THEN

238: IF (NOT FND_API.Compatible_API_Call (l_api_version, p_api_version,
239: l_api_name, G_PKG_NAME)) THEN
240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
241: END IF;
242: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
243: FND_MSG_PUB.initialize;
244: END IF;
245: X_return_status := FND_API.G_RET_STS_SUCCESS;
246:

Line 245: X_return_status := FND_API.G_RET_STS_SUCCESS;

241: END IF;
242: IF (FND_API.to_Boolean(p_init_msg_list)) THEN
243: FND_MSG_PUB.initialize;
244: END IF;
245: X_return_status := FND_API.G_RET_STS_SUCCESS;
246:
247: /* Bug No.6346013 - Start */
248:
249: /* Delete from this table for any existing data */

Line 301: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) AND

297: /*The return status can be 'Q' from the above call for two reasons either */
298: /*the total input qty was not calculatable or the total output qty is not */
299: /*calculatable, we need to see the mode in which this procedure was invoked */
300: /*to determine if an error should be raised */
301: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) AND
302: (l_return_status <> 'Q') THEN
303: RAISE GET_TOTAL_QTY_ERR;
304: ELSIF l_return_status = 'Q' THEN
305: IF (p_total_output IS NOT NULL) AND

Line 337: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

333: p_yield_um => l_uom,
334: p_formula_output => l_formula_output,
335: x_return_status => l_return_status,
336: X_output_ratio => l_output_ratio);
337: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
338: RAISE GET_OUTPUT_RATIO_ERR;
339: END IF;
340: ELSIF (p_total_input IS NOT NULL) THEN
341:

Line 347: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

343: gmd_validity_rules.get_ingredprod_ratio(p_formula_id => l_formula_id,
344: p_yield_um => l_uom,
345: x_return_status => l_return_status,
346: X_ingred_prod_ratio => l_ingred_prod_ratio);
347: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
348: RAISE GET_INGREDPROD_RATIO_ERR;
349: END IF;
350: /* Get the ratio of the batch input to the formula input */
351: gmd_validity_rules.get_batchformula_ratio(p_formula_id => l_formula_id,

Line 357: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

353: p_yield_um => l_uom,
354: p_formula_input => l_formula_input,
355: x_return_status => l_return_status,
356: X_batchformula_ratio => l_batchformula_ratio);
357: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
358: RAISE GET_BATCHFORMULA_RATIO_ERR;
359: END IF;
360:
361: /* Get the contributing qty of the formula */

Line 368: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

364: p_batchformula_ratio => l_batchformula_ratio,
365: p_yield_um => l_uom,
366: x_return_status => l_return_status,
367: X_contributing_qty => l_contributing_qty);
368: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
369: RAISE GET_CONTRIBUTING_QTY_ERR;
370: END IF;
371: /* Calculate actual contributing qty of formula */
372: l_contributing_qty := l_contributing_qty * l_ingred_prod_ratio;

Line 381: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

377: p_yield_um => l_uom,
378: p_formula_output => l_formula_input,
379: x_return_status => l_return_status,
380: X_output_ratio => l_output_ratio);
381: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
382: RAISE GET_INPUT_RATIO_ERR;
383: END IF;
384: END IF;
385:

Line 405: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

401: ,p_organization_id => p_organization_id
402: ,p_orgn_code => l_orgn_code
403: ,x_return_status => l_return_status
404: ,p_Production_check => TRUE);
405: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
406: RAISE ITEM_ORGN_MISSING;
407: END IF;
408: END IF;
409: -- End NPD Conv.

Line 442: IF l_return_status <> FND_API.g_ret_sts_success THEN

438: ,p_organization_id => p_organization_id
439: ,X_unit_cost => l_unit_cost
440: ,X_total_cost => l_total_cost
441: ,X_return_status => l_return_status);
442: IF l_return_status <> FND_API.g_ret_sts_success THEN
443: RAISE GET_FORMULA_COST_ERR;
444: END IF;
445: END IF; /* IF p_least_cost_validity = 'T' */
446: GMD_VALIDITY_RULES.insert_val_temp_tbl(p_val_rec => get_rec

Line 453: x_return_status := FND_API.G_RET_STS_ERROR;

449: END IF; /* IF (l_item_qty >= get_rec.min_qty AND l_item_qty <= get_rec.max_qty) */
450: END IF; /* IF (l_scale_type = 1) */
451: EXCEPTION
452: WHEN ITEM_ORGN_MISSING THEN
453: x_return_status := FND_API.G_RET_STS_ERROR;
454: END;
455: END LOOP;
456: ELSIF (p_item_id IS NOT NULL or p_item_no IS NOT NULL) THEN
457:

Line 499: x_return_status := FND_API.G_RET_STS_SUCCESS;

495: END IF;
496:
497: FOR get_rec IN get_val_item(l_quantity) LOOP
498: BEGIN
499: x_return_status := FND_API.G_RET_STS_SUCCESS;
500:
501: /* Get the formula for this recipe */
502: OPEN Cur_get_formula (get_rec.recipe_id);
503: FETCH Cur_get_formula INTO l_formula_id;

Line 520: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

516: ,p_organization_id => p_organization_id
517: ,p_orgn_code => p_orgn_code
518: ,x_return_status => l_return_status
519: ,p_Production_check => TRUE);
520: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
521: RAISE ITEM_ORGN_MISSING;
522: END IF;
523: END IF;
524: -- End NPD Conv.

Line 535: IF l_return_status <> FND_API.g_ret_sts_success THEN

531: ,p_organization_id => p_organization_id
532: ,X_unit_cost => l_unit_cost
533: ,X_total_cost => l_total_cost
534: ,X_return_status => l_return_status);
535: IF l_return_status <> FND_API.g_ret_sts_success THEN
536: RAISE GET_FORMULA_COST_ERR;
537: END IF;
538: END IF; /* IF p_least_cost_validity = 'T' */
539:

Line 545: x_return_status := FND_API.G_RET_STS_ERROR;

541: ,p_unit_cost => l_unit_cost
542: ,p_total_cost => l_total_cost);
543: EXCEPTION
544: WHEN ITEM_ORGN_MISSING THEN
545: x_return_status := FND_API.G_RET_STS_ERROR;
546: END;
547: END LOOP;
548:
549: ELSE

Line 588: x_return_status := FND_API.G_RET_STS_SUCCESS;

584: -- Bug 3818835 - End
585:
586: FOR get_rec IN get_val LOOP
587: BEGIN
588: x_return_status := FND_API.G_RET_STS_SUCCESS;
589:
590: -- NPD Conv.
591: IF (p_orgn_code IS NOT NULL OR (p_orgn_code IS NULL AND p_organization_id IS NOT NULL)) THEN
592:

Line 606: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

602: ,p_orgn_code => l_orgn_code
603: ,x_return_status => l_return_status
604: ,p_Production_check => TRUE);
605:
606: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
607: RAISE ITEM_ORGN_MISSING;
608: END IF;
609: END IF;
610: -- End NPD Conv.

Line 625: IF l_return_status <> FND_API.g_ret_sts_success THEN

621: ,p_organization_id => p_organization_id
622: ,X_unit_cost => l_unit_cost
623: ,X_total_cost => l_total_cost
624: ,X_return_status => l_return_status);
625: IF l_return_status <> FND_API.g_ret_sts_success THEN
626: RAISE GET_FORMULA_COST_ERR;
627: END IF;
628: END IF; /* IF p_least_cost_validity = 'T' */
629:

Line 637: x_return_status := FND_API.G_RET_STS_ERROR;

633:
634: END IF; /* IF (l_quantity >= get_rec.min_qty AND l_quantity <= get_rec.max_qty) */
635: EXCEPTION
636: WHEN ITEM_ORGN_MISSING THEN
637: x_return_status := FND_API.G_RET_STS_ERROR;
638: END;
639: END LOOP;
640: END IF;
641:

Line 705: X_return_status := Fnd_api.G_ret_sts_success;

701: x_recipe_validity_out(i).total_cost := l_rec.total_cost ;
702: END LOOP;
703:
704: IF i > 0 THEN
705: X_return_status := Fnd_api.G_ret_sts_success;
706: END IF;
707:
708: -- standard call to get msge cnt, and if cnt is 1, get mesg info
709: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);

Line 712: x_return_status := FND_API.G_RET_STS_ERROR;

708: -- standard call to get msge cnt, and if cnt is 1, get mesg info
709: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
710: EXCEPTION
711: WHEN NO_YIELD_TYPE_UM THEN
712: x_return_status := FND_API.G_RET_STS_ERROR;
713: FND_MESSAGE.SET_NAME('GMD', 'FM_SCALE_BAD_YIELD_TYPE');
714: FND_MSG_PUB.ADD;
715: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
716: P_data => x_msg_data);

Line 718: x_return_status := FND_API.G_RET_STS_ERROR;

714: FND_MSG_PUB.ADD;
715: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
716: P_data => x_msg_data);
717: WHEN GET_FORMULA_COST_ERR THEN
718: x_return_status := FND_API.G_RET_STS_ERROR;
719: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
720: P_data => x_msg_data);
721: WHEN GET_FORMULA_ERR THEN
722: x_return_status := FND_API.G_RET_STS_ERROR;

Line 722: x_return_status := FND_API.G_RET_STS_ERROR;

718: x_return_status := FND_API.G_RET_STS_ERROR;
719: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
720: P_data => x_msg_data);
721: WHEN GET_FORMULA_ERR THEN
722: x_return_status := FND_API.G_RET_STS_ERROR;
723: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
724: P_data => x_msg_data);
725: WHEN GET_TOTAL_QTY_ERR OR GET_OUTPUT_RATIO_ERR
726: OR GET_INGREDPROD_RATIO_ERR OR GET_BATCHFORMULA_RATIO_ERR

Line 728: x_return_status := FND_API.G_RET_STS_ERROR;

724: P_data => x_msg_data);
725: WHEN GET_TOTAL_QTY_ERR OR GET_OUTPUT_RATIO_ERR
726: OR GET_INGREDPROD_RATIO_ERR OR GET_BATCHFORMULA_RATIO_ERR
727: OR GET_CONTRIBUTING_QTY_ERR OR GET_INPUT_RATIO_ERR THEN
728: x_return_status := FND_API.G_RET_STS_ERROR;
729: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
730: P_data => x_msg_data);
731: WHEN UOM_CONVERSION_ERROR THEN
732: x_return_status := FND_API.G_RET_STS_ERROR;

Line 732: x_return_status := FND_API.G_RET_STS_ERROR;

728: x_return_status := FND_API.G_RET_STS_ERROR;
729: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
730: P_data => x_msg_data);
731: WHEN UOM_CONVERSION_ERROR THEN
732: x_return_status := FND_API.G_RET_STS_ERROR;
733: gmd_validity_rules.uom_conversion_mesg(p_item_id => p_item_id,
734: p_from_um => p_uom,
735: p_to_um => l_item_uom);
736: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,

Line 739: WHEN FND_API.G_EXC_ERROR THEN

735: p_to_um => l_item_uom);
736: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
737: P_data => x_msg_data);
738:
739: WHEN FND_API.G_EXC_ERROR THEN
740: X_return_code := SQLCODE;
741: x_return_status := FND_API.G_RET_STS_ERROR;
742: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
743:

Line 741: x_return_status := FND_API.G_RET_STS_ERROR;

737: P_data => x_msg_data);
738:
739: WHEN FND_API.G_EXC_ERROR THEN
740: X_return_code := SQLCODE;
741: x_return_status := FND_API.G_RET_STS_ERROR;
742: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
743:
744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
745: X_return_code := SQLCODE;

Line 744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

740: X_return_code := SQLCODE;
741: x_return_status := FND_API.G_RET_STS_ERROR;
742: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
743:
744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
745: X_return_code := SQLCODE;
746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
747: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
748:

Line 746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

742: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
743:
744: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
745: X_return_code := SQLCODE;
746: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
747: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
748:
749: WHEN OTHERS THEN
750: X_return_code := SQLCODE;

Line 751: x_return_status := FND_API.G_RET_STS_ERROR;

747: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
748:
749: WHEN OTHERS THEN
750: X_return_code := SQLCODE;
751: x_return_status := FND_API.G_RET_STS_ERROR;
752: FND_MSG_PUB.Count_And_Get(p_count=>x_msg_count, p_data=>x_msg_data);
753: END get_validity_rules;
754:
755: /*======================================================================

Line 793: x_return_status := FND_API.G_RET_STS_SUCCESS;

789: X_detail_uom VARCHAR2(4);
790: UOM_CONVERSION_ERROR EXCEPTION;
791:
792: BEGIN
793: x_return_status := FND_API.G_RET_STS_SUCCESS;
794: FOR get_rec IN Cur_get_prods
795: LOOP
796: IF (get_rec.scale_type = 0) THEN
797: IF (get_rec.detail_uom <> p_yield_um) THEN

Line 825: x_return_status := FND_API.G_RET_STS_ERROR;

821: X_output_ratio := l_batch_output/l_formula_output;
822:
823: EXCEPTION
824: WHEN UOM_CONVERSION_ERROR THEN
825: x_return_status := FND_API.G_RET_STS_ERROR;
826: gmd_validity_rules.uom_conversion_mesg(p_item_id => X_item_id,
827: p_from_um => X_detail_uom,
828: p_to_um => p_yield_um);
829: END get_output_ratio;

Line 865: x_return_status := FND_API.G_RET_STS_SUCCESS;

861: X_item_id NUMBER;
862: X_detail_uom VARCHAR2(4);
863: UOM_CONVERSION_ERROR EXCEPTION;
864: BEGIN
865: x_return_status := FND_API.G_RET_STS_SUCCESS;
866: --Get sum of products in yield UM.
867: FOR get_rec IN Cur_get_details(1)
868: LOOP
869: IF (get_rec.detail_uom <> p_yield_um) THEN

Line 918: x_return_status := FND_API.G_RET_STS_ERROR;

914: --Get ratio and return.
915: X_ingred_prod_ratio := l_sum_prods/l_sum_ingreds;
916: EXCEPTION
917: WHEN UOM_CONVERSION_ERROR THEN
918: x_return_status := FND_API.G_RET_STS_ERROR;
919: gmd_validity_rules.uom_conversion_mesg(p_item_id => X_item_id,
920: p_from_um => X_detail_uom,
921: p_to_um => p_yield_um);
922: END get_ingredprod_ratio;

Line 966: x_return_status := FND_API.G_RET_STS_SUCCESS;

962: X_item_id NUMBER;
963: X_detail_uom VARCHAR2(4);
964: UOM_CONVERSION_ERROR EXCEPTION;
965: BEGIN
966: x_return_status := FND_API.G_RET_STS_SUCCESS;
967: FOR get_rec IN Cur_get_ingreds LOOP
968: IF (get_rec.scale_type = 0) THEN
969: IF (get_rec.detail_uom <> p_yield_um) THEN
970:

Line 995: x_return_status := FND_API.G_RET_STS_ERROR;

991: l_formula_input := p_formula_input - l_fixed_ingred;
992: X_batchformula_ratio := l_batch_input / l_formula_input;
993: EXCEPTION
994: WHEN UOM_CONVERSION_ERROR THEN
995: x_return_status := FND_API.G_RET_STS_ERROR;
996: gmd_validity_rules.uom_conversion_mesg(p_item_id => X_item_id,
997: p_from_um => X_detail_uom,
998: p_to_um => p_yield_um);
999: END get_batchformula_ratio;

Line 1043: x_return_status := FND_API.G_RET_STS_SUCCESS;

1039: UOM_CONVERSION_ERROR EXCEPTION;
1040: PROCESS_LOSS_ERR EXCEPTION;
1041: BEGIN
1042: x_contributing_qty := 0;
1043: x_return_status := FND_API.G_RET_STS_SUCCESS;
1044: /* Loop through ingredients and determine total contributing qty */
1045: FOR get_rec IN Cur_get_ingreds LOOP
1046: IF (get_rec.contribute_yield_ind = 'Y') THEN
1047: /* Convert all ingredient values to yield UM and determine contributing qty */

Line 1084: /* IF (X_status <> FND_API.G_RET_STS_SUCCESS) THEN

1080: x_return_status => X_status,
1081: x_msg_count => l_msg_count,
1082: x_msg_data => l_msg_data);
1083:
1084: /* IF (X_status <> FND_API.G_RET_STS_SUCCESS) THEN
1085: RAISE PROCESS_LOSS_ERR;
1086: END IF;*/
1087: /* Shrikant : Added NVL and / 100 in the following equation */
1088: X_contributing_qty := X_contributing_qty * (100 - NVL(l_process_loss,0))/100;

Line 1091: x_return_status := FND_API.G_RET_STS_ERROR;

1087: /* Shrikant : Added NVL and / 100 in the following equation */
1088: X_contributing_qty := X_contributing_qty * (100 - NVL(l_process_loss,0))/100;
1089: EXCEPTION
1090: WHEN UOM_CONVERSION_ERROR THEN
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092: gmd_validity_rules.uom_conversion_mesg(p_item_id => X_item_id,
1093: p_from_um => X_detail_uom,
1094: p_to_um => p_yield_um);
1095: END get_contributing_qty;

Line 1161: x_return_status := FND_API.G_RET_STS_ERROR;

1157: l_formula_output := P_formula_output - l_fixed_prod;
1158: X_output_ratio := l_contributing_qty / l_formula_output;
1159: EXCEPTION
1160: WHEN UOM_CONVERSION_ERROR THEN
1161: x_return_status := FND_API.G_RET_STS_ERROR;
1162: gmd_validity_rules.uom_conversion_mesg(p_item_id => X_item_id,
1163: p_from_um => X_detail_uom,
1164: p_to_um => p_yield_um);
1165: END get_input_ratio;

Line 1225: P_init_msg_list IN VARCHAR2 := Fnd_api.G_false,

1221: --===================================================================== */
1222: /* Formatted on 2002/07/11 18:01 (RevealNet Formatter v4.4.0) */
1223: PROCEDURE Get_all_validity_rules (
1224: P_api_version IN NUMBER,
1225: P_init_msg_list IN VARCHAR2 := Fnd_api.G_false,
1226: P_recipe_id IN NUMBER := NULL,
1227: P_item_id IN NUMBER := NULL,
1228: p_revision IN VARCHAR2 := NULL,
1229: p_least_cost_validity IN VARCHAR2 := 'F',

Line 1291: IF (NOT Fnd_api.Compatible_api_call ( L_api_version,

1287:
1288: GET_FORMULA_COST_ERR EXCEPTION;
1289:
1290: BEGIN
1291: IF (NOT Fnd_api.Compatible_api_call ( L_api_version,
1292: P_api_version,
1293: L_api_name,
1294: G_pkg_name ))
1295: THEN

Line 1296: RAISE Fnd_api.G_exc_unexpected_error;

1292: P_api_version,
1293: L_api_name,
1294: G_pkg_name ))
1295: THEN
1296: RAISE Fnd_api.G_exc_unexpected_error;
1297: END IF;
1298:
1299: IF (Fnd_api.To_boolean (P_init_msg_list))
1300: THEN

Line 1299: IF (Fnd_api.To_boolean (P_init_msg_list))

1295: THEN
1296: RAISE Fnd_api.G_exc_unexpected_error;
1297: END IF;
1298:
1299: IF (Fnd_api.To_boolean (P_init_msg_list))
1300: THEN
1301: Fnd_msg_pub.Initialize;
1302: END IF;
1303:

Line 1304: X_return_status := Fnd_api.G_ret_sts_success;

1300: THEN
1301: Fnd_msg_pub.Initialize;
1302: END IF;
1303:
1304: X_return_status := Fnd_api.G_ret_sts_success;
1305:
1306: /* Delete from this table for any existing data */
1307: DELETE FROM GMD_VAL_RULE_GTMP;
1308:

Line 1311: X_return_status := Fnd_api.G_ret_sts_success;

1307: DELETE FROM GMD_VAL_RULE_GTMP;
1308:
1309: IF (P_item_id IS NOT NULL) THEN
1310: FOR Get_rec IN Get_val_item LOOP
1311: X_return_status := Fnd_api.G_ret_sts_success;
1312:
1313: IF p_least_cost_validity = 'T' THEN
1314: OPEN Cur_get_form_id (get_rec.recipe_id, get_rec.inventory_item_id);
1315: FETCH Cur_get_form_id INTO l_formula_id, l_quantity, l_uom;

Line 1326: IF l_return_status <> FND_API.g_ret_sts_success THEN

1322: ,p_organization_id => get_rec.organization_id
1323: ,X_unit_cost => l_unit_cost
1324: ,X_total_cost => l_total_cost
1325: ,X_return_status => l_return_status);
1326: IF l_return_status <> FND_API.g_ret_sts_success THEN
1327: RAISE GET_FORMULA_COST_ERR;
1328: END IF;
1329: END IF;
1330: END IF; /* IF p_least_cost_validity = 'T' */

Line 1338: X_return_status := Fnd_api.G_ret_sts_success;

1334: END LOOP;
1335: ELSE
1336: /* Try to get validity rules based on recipe ID */
1337: FOR Get_rec IN Get_val_recipe LOOP
1338: X_return_status := Fnd_api.G_ret_sts_success;
1339:
1340: IF p_least_cost_validity = 'T' THEN
1341: OPEN Cur_get_form_id (get_rec.recipe_id, get_rec.inventory_item_id);
1342: FETCH Cur_get_form_id INTO l_formula_id, l_quantity, l_uom;

Line 1353: IF l_return_status <> FND_API.g_ret_sts_success THEN

1349: ,p_organization_id => get_rec.organization_id
1350: ,X_unit_cost => l_unit_cost
1351: ,X_total_cost => l_total_cost
1352: ,X_return_status => l_return_status);
1353: IF l_return_status <> FND_API.g_ret_sts_success THEN
1354: RAISE GET_FORMULA_COST_ERR;
1355: END IF;
1356: END IF;
1357: END IF; /* IF p_least_cost_validity = 'T' */

Line 1431: x_return_status := FND_API.G_RET_STS_ERROR;

1427: Fnd_msg_pub.Count_and_get (P_count => X_msg_count, P_data => X_msg_data);
1428:
1429: EXCEPTION
1430: WHEN GET_FORMULA_COST_ERR THEN
1431: x_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
1433: P_data => x_msg_data);
1434: WHEN Fnd_api.G_exc_error THEN
1435: X_return_code := SQLCODE;

Line 1434: WHEN Fnd_api.G_exc_error THEN

1430: WHEN GET_FORMULA_COST_ERR THEN
1431: x_return_status := FND_API.G_RET_STS_ERROR;
1432: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
1433: P_data => x_msg_data);
1434: WHEN Fnd_api.G_exc_error THEN
1435: X_return_code := SQLCODE;
1436: X_return_status := Fnd_api.G_ret_sts_error;
1437: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1438: P_data=> X_msg_data );

Line 1436: X_return_status := Fnd_api.G_ret_sts_error;

1432: FND_MSG_PUB.COUNT_AND_GET (P_count => x_msg_count,
1433: P_data => x_msg_data);
1434: WHEN Fnd_api.G_exc_error THEN
1435: X_return_code := SQLCODE;
1436: X_return_status := Fnd_api.G_ret_sts_error;
1437: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1438: P_data=> X_msg_data );
1439: WHEN Fnd_api.G_exc_unexpected_error THEN
1440: X_return_code := SQLCODE;

Line 1439: WHEN Fnd_api.G_exc_unexpected_error THEN

1435: X_return_code := SQLCODE;
1436: X_return_status := Fnd_api.G_ret_sts_error;
1437: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1438: P_data=> X_msg_data );
1439: WHEN Fnd_api.G_exc_unexpected_error THEN
1440: X_return_code := SQLCODE;
1441: X_return_status := Fnd_api.G_ret_sts_unexp_error;
1442: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1443: P_data=> X_msg_data );

Line 1441: X_return_status := Fnd_api.G_ret_sts_unexp_error;

1437: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1438: P_data=> X_msg_data );
1439: WHEN Fnd_api.G_exc_unexpected_error THEN
1440: X_return_code := SQLCODE;
1441: X_return_status := Fnd_api.G_ret_sts_unexp_error;
1442: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1443: P_data=> X_msg_data );
1444: WHEN OTHERS THEN
1445: X_return_code := SQLCODE;

Line 1446: X_return_status := Fnd_api.G_ret_sts_error;

1442: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1443: P_data=> X_msg_data );
1444: WHEN OTHERS THEN
1445: X_return_code := SQLCODE;
1446: X_return_status := Fnd_api.G_ret_sts_error;
1447: Fnd_msg_pub.Count_and_get ( P_count=> X_msg_count,
1448: P_data=> X_msg_data );
1449: END Get_all_validity_rules;
1450:

Line 1488: x_return_status := FND_API.g_ret_sts_success;

1484: ITEM_NOT_FOUND EXCEPTION;
1485: UOM_CONVERSION_ERR EXCEPTION;
1486: BEGIN
1487: /* Let us initialize the return status to success */
1488: x_return_status := FND_API.g_ret_sts_success;
1489:
1490: /* Let us fetch the product quantities in the formula for the item passed in */
1491: OPEN Cur_get_product_lines;
1492: FETCH Cur_get_product_lines INTO l_prod_rec;

Line 1528: x_return_status := FND_API.g_ret_sts_error;

1524: x_scale_factor := p_std_qty;
1525: END IF;
1526: EXCEPTION
1527: WHEN item_not_found THEN
1528: x_return_status := FND_API.g_ret_sts_error;
1529: WHEN uom_conversion_err THEN
1530: x_return_status := FND_API.g_ret_sts_error;
1531: uom_conversion_mesg (p_item_id, l_prod_rec.detail_uom, p_std_um);
1532: WHEN OTHERS THEN

Line 1530: x_return_status := FND_API.g_ret_sts_error;

1526: EXCEPTION
1527: WHEN item_not_found THEN
1528: x_return_status := FND_API.g_ret_sts_error;
1529: WHEN uom_conversion_err THEN
1530: x_return_status := FND_API.g_ret_sts_error;
1531: uom_conversion_mesg (p_item_id, l_prod_rec.detail_uom, p_std_um);
1532: WHEN OTHERS THEN
1533: x_return_status := FND_API.g_ret_sts_unexp_error;
1534: fnd_msg_pub.add_exc_msg ('GMD_VALIDITY_RULES', 'GET_VALIDITY_SCALE_FACTOR');

Line 1533: x_return_status := FND_API.g_ret_sts_unexp_error;

1529: WHEN uom_conversion_err THEN
1530: x_return_status := FND_API.g_ret_sts_error;
1531: uom_conversion_mesg (p_item_id, l_prod_rec.detail_uom, p_std_um);
1532: WHEN OTHERS THEN
1533: x_return_status := FND_API.g_ret_sts_unexp_error;
1534: fnd_msg_pub.add_exc_msg ('GMD_VALIDITY_RULES', 'GET_VALIDITY_SCALE_FACTOR');
1535: END get_validity_scale_factor;
1536:
1537: /*======================================================================

Line 1577: x_return_status := FND_API.g_ret_sts_success;

1573: l_uom mtl_units_of_measure.unit_of_measure%TYPE;
1574:
1575: BEGIN
1576: /* Let us initialize the return status to success */
1577: x_return_status := FND_API.g_ret_sts_success;
1578:
1579: /* Lets get the scale factor between the validity std qty and the formula product qty */
1580: gmd_validity_rules.get_validity_scale_factor (p_recipe_id => p_recipe_id
1581: ,p_item_id => p_item_id

Line 1627: x_return_status := FND_API.g_ret_sts_unexp_error;

1623: x_scale_factor := 1;
1624: END IF;
1625: EXCEPTION
1626: WHEN OTHERS THEN
1627: x_return_status := FND_API.g_ret_sts_unexp_error;
1628: fnd_msg_pub.add_exc_msg ('GMD_VALIDITY_RULES', 'GET_VALIDITY_OUTPUT_FACTOR');
1629: END get_validity_output_factor;
1630:
1631: /*=================================================================================

Line 1760: X_return_status := FND_API.G_RET_STS_SUCCESS;

1756:
1757: SCALE_ERROR EXCEPTION;
1758: BEGIN
1759: /* Initialize return status to success */
1760: X_return_status := FND_API.G_RET_STS_SUCCESS;
1761:
1762: l_organization_id := P_organization_id;
1763:
1764: /* Get the cost source organization for the organization passed in */

Line 1817: IF l_return_status <> FND_API.G_ret_sts_success THEN

1813: ,p_scale_factor => p_requested_qty / l_product_qty
1814: ,p_primaries => 'PRODUCT'
1815: ,x_scale_tab => l_scale_tab_out
1816: ,x_return_status => l_return_status);
1817: IF l_return_status <> FND_API.G_ret_sts_success THEN
1818: RAISE SCALE_ERROR;
1819: END IF;
1820: ELSE
1821: l_scale_tab_out := l_scale_tab_in;

Line 1847: x_return_status := FND_API.G_RET_STS_ERROR;

1843: X_unit_cost := l_ing_cost / l_ing_qty;
1844: END IF;
1845: EXCEPTION
1846: WHEN SCALE_ERROR THEN
1847: x_return_status := FND_API.G_RET_STS_ERROR;
1848: END Get_Formula_Cost;
1849:
1850:
1851: END GMD_VALIDITY_RULES;