DBA Data[Home] [Help]

APPS.GMD_SPREAD_CALCULATE_PKG dependencies on FND_API

Line 134: X_return_status := FND_API.g_ret_sts_success;

130: X_byprod_wt NUMBER ;
131: X_byprod_wtpct NUMBER ;
132: X_rollup NUMBER;
133: BEGIN
134: X_return_status := FND_API.g_ret_sts_success;
135:
136: OPEN Cur_get_line (-1);
137: FETCH Cur_get_line INTO X_ingred_wt, X_ingred_wtpct;
138: CLOSE Cur_get_line;

Line 175: X_return_status := FND_API.g_ret_sts_error;

171: END IF;
172:
173: IF X_rollup IS NULL THEN
174: gmd_api_grp.log_message('GMD_WEIGHT_CALCULATE','V_PARM_NAME',V_parm_name);
175: X_return_status := FND_API.g_ret_sts_error;
176: END IF;
177:
178: EXCEPTION
179: WHEN OTHERS THEN

Line 181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

177:
178: EXCEPTION
179: WHEN OTHERS THEN
180: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Rollup_Wt_Pct');
181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
182: END rollup_wt_pct;
183:
184: /*##############################################################
185: # NAME

Line 205: X_return_status := FND_API.g_ret_sts_success;

201: X_rollup NUMBER;
202: l_param_id NUMBER;
203: l_value NUMBER;
204: BEGIN
205: X_return_status := FND_API.g_ret_sts_success;
206: gmd_expression_util.evaluate_expression (p_entity_id => v_entity_id,
207: p_line_id => v_line_id,
208: p_tech_parm_id => v_parm_id,
209: X_value => l_value,

Line 237: IF X_return_status <> FND_API.g_ret_sts_success THEN

233: l_value,
234: l_value);
235: END IF;
236:
237: IF X_return_status <> FND_API.g_ret_sts_success THEN
238: gmd_api_grp.log_message('GMD_EXPRESSION_CALCULATE','V_PARM_NAME', V_parm_name);
239: X_return_status := FND_API.g_ret_sts_error;
240: END IF;
241:

Line 239: X_return_status := FND_API.g_ret_sts_error;

235: END IF;
236:
237: IF X_return_status <> FND_API.g_ret_sts_success THEN
238: gmd_api_grp.log_message('GMD_EXPRESSION_CALCULATE','V_PARM_NAME', V_parm_name);
239: X_return_status := FND_API.g_ret_sts_error;
240: END IF;
241:
242: EXCEPTION
243: WHEN OTHERS THEN

Line 245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

241:
242: EXCEPTION
243: WHEN OTHERS THEN
244: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Evaluate_Expression');
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
246: END evaluate_expression;
247:
248: /*##############################################################
249: # NAME

Line 300: X_return_status := FND_API.g_ret_sts_success;

296: L_return_status VARCHAR2(1);
297:
298: NO_PARAMETER EXCEPTION;
299: BEGIN
300: X_return_status := FND_API.g_ret_sts_success;
301:
302: OPEN Cur_get_line1 (-1);
303: FETCH Cur_get_line1 INTO X_ingred_vol, X_ingred_volpct;
304: CLOSE Cur_get_line1;

Line 341: X_return_status := FND_API.g_ret_sts_error;

337: END IF;
338:
339: IF X_rollup IS NULL THEN
340: gmd_api_grp.log_message('GMD_VOLUME_CALCULATE','V_PARM_NAME', V_parm_name);
341: X_return_status := FND_API.g_ret_sts_error;
342: END IF;
343: gmd_api_grp.fetch_parm_values(P_orgn_id => v_orgn_id,
344: P_parm_name => 'GMD_MASS_UM_TYPE',
345: P_parm_value => X_uom_type,

Line 347: IF (L_return_status <> FND_API.g_ret_sts_success) THEN

343: gmd_api_grp.fetch_parm_values(P_orgn_id => v_orgn_id,
344: P_parm_name => 'GMD_MASS_UM_TYPE',
345: P_parm_value => X_uom_type,
346: X_return_status => L_return_status);
347: IF (L_return_status <> FND_API.g_ret_sts_success) THEN
348: RAISE NO_PARAMETER;
349: END IF;
350: OPEN Cur_std_um (X_uom_type);
351: FETCH Cur_std_um INTO X_mass_uom;

Line 358: IF (L_return_status <> FND_API.g_ret_sts_success) THEN

354: gmd_api_grp.fetch_parm_values(P_orgn_id => v_orgn_id,
355: P_parm_name => 'GMD_VOLUME_UM_TYPE',
356: P_parm_value => X_uom_type,
357: X_return_status => L_return_status);
358: IF (L_return_status <> FND_API.g_ret_sts_success) THEN
359: RAISE NO_PARAMETER;
360: END IF;
361:
362: OPEN Cur_std_um (X_uom_type);

Line 382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

378:
379: EXCEPTION
380: WHEN NO_PARAMETER THEN
381: fnd_msg_pub.add_exc_msg ('GMD', 'GMD_PARM_NOT_FOUND');
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: WHEN OTHERS THEN
384: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Rollup_Vol_Pct');
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: END rollup_vol_pct;

Line 385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

381: fnd_msg_pub.add_exc_msg ('GMD', 'GMD_PARM_NOT_FOUND');
382: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
383: WHEN OTHERS THEN
384: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Rollup_Vol_Pct');
385: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
386: END rollup_vol_pct;
387:
388: /*##############################################################
389: # NAME

Line 521: X_return_status := FND_API.g_ret_sts_success;

517: X_ingred_volpct NUMBER ;
518: X_byprod_volpct NUMBER ;
519: X_rollup NUMBER;
520: BEGIN
521: X_return_status := FND_API.g_ret_sts_success;
522:
523: OPEN Cur_get_line2 (-1);
524: FETCH Cur_get_line2 INTO X_ingred_volpct;
525: CLOSE Cur_get_line2;

Line 537: X_return_status := FND_API.g_ret_sts_error;

533: END IF;
534:
535: IF X_rollup IS NULL THEN
536: gmd_api_grp.log_message('GMD_COST_CALCULATE','V_PARM_NAME', V_parm_name);
537: X_return_status := FND_API.g_ret_sts_error;
538: END IF;
539: RETURN(X_rollup);
540: EXCEPTION
541: WHEN OTHERS THEN

Line 543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

539: RETURN(X_rollup);
540: EXCEPTION
541: WHEN OTHERS THEN
542: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Rollup_Cost_Units');
543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
544: RETURN(0);
545: END rollup_cost_units;
546:
547: /*##############################################################

Line 589: X_return_status := FND_API.g_ret_sts_success;

585: l_equiv_qty NUMBER;
586: X_rollup NUMBER;
587: l_error NUMBER;
588: BEGIN
589: X_return_status := FND_API.g_ret_sts_success;
590: FOR l_rec IN Cur_get_line3(-1) LOOP
591: IF (l_rec.detail_uom <> V_unit_code) THEN
592: l_equiv_qty := gmd_labuom_calculate_pkg.uom_conversion (pitem_id => l_rec.inventory_item_id,
593: pformula_id => NVL(l_rec.tpformula_id,0),

Line 640: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;

636: SET value = NULL,
637: num_data = NULL
638: WHERE line_id = V_line_id
639: AND tech_parm_id = V_parm_id;
640: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
641: ELSE
642: IF (X_ingred_mass - X_byprod_mass) <> 0 THEN
643: X_rollup := (X_ingred_equiv - X_byprod_equiv) / (X_ingred_mass - X_byprod_mass);
644: END IF;

Line 673: X_return_status := FND_API.g_ret_sts_error;

669: END IF;
670:
671: IF X_rollup IS NULL THEN
672: gmd_api_grp.log_message('GMD_EQUIV_WEIGHT_CALCULATE','V_PARM_NAME', V_parm_name);
673: X_return_status := FND_API.g_ret_sts_error;
674: END IF;
675:
676: EXCEPTION
677: WHEN OTHERS THEN

Line 679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

675:
676: EXCEPTION
677: WHEN OTHERS THEN
678: fnd_msg_pub.add_exc_msg ('GMD_SPREAD_CALCULATE_PKG', 'Rollup_Equiv_Wt');
679: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
680: END rollup_equiv_wt;
681:
682:
683: /* following procedures are wrote to debug the procedures */

Line 1000: x_return_status := fnd_api.g_ret_sts_unexp_error;

996: END LOOP;
997:
998: EXCEPTION
999: WHEN CANNOT_CONVERT THEN
1000: x_return_status := fnd_api.g_ret_sts_unexp_error;
1001: /* fnd_message.set_name ('GMD', 'GMD_UNEXPECTED_ERROR');
1002: fnd_message.set_token ('ERROR', SQLERRM);
1003: fnd_msg_pub.ADD; */
1004: fnd_msg_pub.count_and_get (p_count => x_msg_count,