[Home] [Help]
146: x_batch_header_rec := p_batch_header_rec;
147:
148: IF x_batch_header_rec.organization_id IS NULL THEN
149: fnd_message.set_name ('INV', 'INV_INT_ORGCODE');
150: fnd_msg_pub.ADD;
151: END IF;
152:
153: x_batch_header_rec.prod_id := NVL (x_batch_header_rec.prod_id, 0);
154: x_batch_header_rec.prod_sequence :=
186: || ' Error is '
187: || SQLERRM);
188: END IF;
189:
190: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
191: RETURN FALSE;
192: END construct_batch_header;
193:
194: PROCEDURE validate_wip_entity (p_organization_id IN NUMBER,
225: || l_api_name
226: || ' Error is '
227: || SQLERRM);
228: END IF;
229: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
230: x_return_status := fnd_api.g_ret_sts_unexp_error;
231: END validate_wip_entity;
232:
233: PROCEDURE create_batch (
745: -- Recipe does not have a routing, not an error
746: NULL;
747: ELSIF l_return_code = 8 THEN
748: fnd_message.set_name ('GMD', 'GMD_CIRCULAR_DEPEN_DETECT');
749: fnd_msg_pub.ADD;
750: RAISE invalid_recipe;
751: ELSE
752: gme_common_pvt.log_message ('GME_BAD_RECIPE_RETRIEVAL');
753: RAISE invalid_recipe;
970:
971: IF (l_total_output_qty IS NULL AND l_return_status = 'Q') THEN
972: fnd_message.set_name ('GMD', 'GMD_ERR_CALC_OUTPUT');
973: fnd_message.set_token ('UOM', l_uom);
974: fnd_msg_pub.ADD;
975: RAISE expected_error;
976: END IF;
977:
978: gmd_validity_rules.get_output_ratio
1145:
1146: IF (l_total_input_qty IS NULL AND l_return_status = 'Q') THEN
1147: fnd_message.set_name ('GMD', 'GMD_ERR_CALC_OUTPUT');
1148: fnd_message.set_token ('UOM', l_uom);
1149: fnd_msg_pub.ADD;
1150: RAISE expected_error;
1151: END IF;
1152:
1153: gmd_validity_rules.get_batchformula_ratio
2568: || 'Start phantom processing');
2569: END IF;
2570:
2571: /* Now its time to create the phantom batch based on the setting of the phantom type - Automatic */
2572: l_error_count := fnd_msg_pub.count_msg;
2573:
2574: FOR l_row_count IN 1 .. l_number_of_formula_lines LOOP
2575: /* If it is set as an automatic phantom */
2576: IF l_material_details (l_row_count).phantom_type = 1
2597: ,p_contiguity_override => p_contiguity_override
2598: ,p_use_least_cost_validity_rule => p_use_least_cost_validity_rule
2599: ,x_exception_material_tbl => l_phantom_exc_material_tbl_out
2600: ,x_return_status => l_return_status);
2601: l_error_count_after := fnd_msg_pub.count_msg;
2602: g_no_phant_short_check := 0;
2603: -- nsinghi bug#5200395. This will add the exceptions generated by each phantom ingredient to l_phantom_exc_material_tbl.
2604: /* Bug 5512352 No need to add structure since phantoms are now adone along with main batch */
2605: /*
2613: */
2614:
2615: IF l_error_count < l_error_count_after THEN
2616: WHILE l_error_count_after > l_error_count LOOP
2617: fnd_msg_pub.delete_msg (p_msg_index => l_error_count_after);
2618: l_error_count_after := l_error_count_after - 1;
2619: END LOOP;
2620: END IF; /* l_error_count < l_error_count_after */
2621: END IF; /* l_material_details(l_row_count).phantom_type = 1 */
2837: fnd_message.set_name ('GMI', 'IC_API_UOM_CONVERSION_ERROR');
2838: fnd_message.set_token ('ITEM_NO', l_item_no);
2839: fnd_message.set_token ('FROM_UOM', l_from_uom);
2840: fnd_message.set_token ('TO_UOM', l_to_uom);
2841: fnd_msg_pub.ADD;
2842: WHEN Fixed_process_loss_failure THEN
2843: IF (g_debug = gme_debug.g_log_statement) THEN
2844: gme_debug.put_line ('Failed to apply FPL');
2845: END IF;
2887: || ' Error is '
2888: || SQLERRM);
2889: END IF;
2890:
2891: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
2892:
2893: IF (g_debug = gme_debug.g_log_statement) THEN
2894: gme_debug.put_line (SQLERRM);
2895: END IF;
3019: EXCEPTION
3020: WHEN no_data_found THEN
3021: RETURN TRUE ;
3022: WHEN OTHERS THEN
3023: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3024: IF (NVL(G_DEBUG,-1) = GME_DEBUG.G_LOG_STATEMENT) THEN
3025: gme_debug.put_line (SQLERRM);
3026: END IF;
3027: RETURN FALSE ;