[Home] [Help]
76: x_batch_header_rec := p_batch_header_rec;
77:
78: IF x_batch_header_rec.organization_id IS NULL THEN
79: fnd_message.set_name ('INV', 'INV_INT_ORGCODE');
80: fnd_msg_pub.ADD;
81: END IF;
82:
83: x_batch_header_rec.prod_id := NVL (x_batch_header_rec.prod_id, 0);
84: x_batch_header_rec.prod_sequence :=
116: || ' Error is '
117: || SQLERRM);
118: END IF;
119:
120: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
121: RETURN FALSE;
122: END construct_batch_header;
123:
124: PROCEDURE validate_wip_entity (p_organization_id IN NUMBER,
155: || l_api_name
156: || ' Error is '
157: || SQLERRM);
158: END IF;
159: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
160: x_return_status := fnd_api.g_ret_sts_unexp_error;
161: END validate_wip_entity;
162:
163: PROCEDURE create_batch (
614: -- Recipe does not have a routing, not an error
615: NULL;
616: ELSIF l_return_code = 8 THEN
617: fnd_message.set_name ('GMD', 'GMD_CIRCULAR_DEPEN_DETECT');
618: fnd_msg_pub.ADD;
619: RAISE invalid_recipe;
620: ELSE
621: gme_common_pvt.log_message ('GME_BAD_RECIPE_RETRIEVAL');
622: RAISE invalid_recipe;
797:
798: IF (l_total_output_qty IS NULL AND l_return_status = 'Q') THEN
799: fnd_message.set_name ('GMD', 'GMD_ERR_CALC_OUTPUT');
800: fnd_message.set_token ('UOM', l_uom);
801: fnd_msg_pub.ADD;
802: RAISE expected_error;
803: END IF;
804:
805: gmd_validity_rules.get_output_ratio
980:
981: IF (l_total_input_qty IS NULL AND l_return_status = 'Q') THEN
982: fnd_message.set_name ('GMD', 'GMD_ERR_CALC_OUTPUT');
983: fnd_message.set_token ('UOM', l_uom);
984: fnd_msg_pub.ADD;
985: RAISE expected_error;
986: END IF;
987:
988: gmd_validity_rules.get_batchformula_ratio
2296: || 'Start phantom processing');
2297: END IF;
2298:
2299: /* Now its time to create the phantom batch based on the setting of the phantom type - Automatic */
2300: l_error_count := fnd_msg_pub.count_msg;
2301:
2302: FOR l_row_count IN 1 .. l_number_of_formula_lines LOOP
2303: /* If it is set as an automatic phantom */
2304: IF l_material_details (l_row_count).phantom_type = 1
2321: ,p_contiguity_override => p_contiguity_override
2322: ,p_use_least_cost_validity_rule => p_use_least_cost_validity_rule
2323: ,x_exception_material_tbl => l_phantom_exc_material_tbl_out
2324: ,x_return_status => l_return_status);
2325: l_error_count_after := fnd_msg_pub.count_msg;
2326: g_no_phant_short_check := 0;
2327: -- nsinghi bug#5200395. This will add the exceptions generated by each phantom ingredient to l_phantom_exc_material_tbl.
2328: /* Bug 5512352 No need to add structure since phantoms are now adone along with main batch */
2329: /*
2337: */
2338:
2339: IF l_error_count < l_error_count_after THEN
2340: WHILE l_error_count_after > l_error_count LOOP
2341: fnd_msg_pub.delete_msg (p_msg_index => l_error_count_after);
2342: l_error_count_after := l_error_count_after - 1;
2343: END LOOP;
2344: END IF; /* l_error_count < l_error_count_after */
2345: END IF; /* l_material_details(l_row_count).phantom_type = 1 */
2549: fnd_message.set_name ('GMI', 'IC_API_UOM_CONVERSION_ERROR');
2550: fnd_message.set_token ('ITEM_NO', l_item_no);
2551: fnd_message.set_token ('FROM_UOM', l_from_uom);
2552: fnd_message.set_token ('TO_UOM', l_to_uom);
2553: fnd_msg_pub.ADD;
2554: WHEN Fixed_process_loss_failure THEN
2555: IF (g_debug = gme_debug.g_log_statement) THEN
2556: gme_debug.put_line ('Failed to apply FPL');
2557: END IF;
2592: || ' Error is '
2593: || SQLERRM);
2594: END IF;
2595:
2596: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2597:
2598: IF (g_debug = gme_debug.g_log_statement) THEN
2599: gme_debug.put_line (SQLERRM);
2600: END IF;
2693: EXCEPTION
2694: WHEN no_data_found THEN
2695: RETURN TRUE ;
2696: WHEN OTHERS THEN
2697: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2698: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
2699: gme_debug.put_line (SQLERRM);
2700: END IF;
2701: RETURN FALSE ;