[Home] [Help]
1: PACKAGE BODY inv_rcv_std_rcpt_apis AS
2: /* $Header: INVSTDRB.pls 120.53.12020000.15 2013/04/26 23:29:46 sahmahes ship $*/
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'INV_RCV_STD_RCPT_APIS';
1: PACKAGE BODY inv_rcv_std_rcpt_apis AS
2: /* $Header: INVSTDRB.pls 120.53.12020000.15 2013/04/26 23:29:46 sahmahes ship $*/
3:
4: -- Global constant holding the package name
5: g_pkg_name CONSTANT VARCHAR2(30) := 'INV_RCV_STD_RCPT_APIS';
6:
7: --g_rcpt_lot_qty_rec_tb rcpt_lot_qty_rec_tb_tp;
8: --g_prev_lot_number VARCHAR2(30) := NULL;
9:
12: BEGIN
13: IF (l_debug = 1) THEN
14: inv_mobile_helper_functions.tracelog(
15: p_err_msg => p_err_msg
16: , p_module => 'INV_RCV_STD_RCPT_APIS'
17: , p_level => p_level);
18: END IF;
19: -- dbms_output.put_line(p_err_msg);
20: END print_debug;
2476: CLOSE l_curs_rcpt_detail;
2477: END IF;
2478:
2479: IF SQLCODE IS NOT NULL THEN
2480: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_po_rcpt_intf_rec', l_progress, SQLCODE);
2481: END IF;
2482:
2483: fnd_msg_pub.count_and_get(
2484: p_encoded => fnd_api.g_false
3281: CLOSE l_curs_rcpt_detail;
3282: END IF;
3283:
3284: IF SQLCODE IS NOT NULL THEN
3285: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_intship_rcpt_intf_rec', l_progress, SQLCODE);
3286: END IF;
3287:
3288: fnd_msg_pub.count_and_get(
3289: p_encoded => fnd_api.g_false
3874: CLOSE l_curs_rcpt_detail;
3875: END IF;
3876:
3877: IF SQLCODE IS NOT NULL THEN
3878: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_rma_rcpt_intf_rec', l_progress, SQLCODE);
3879: END IF;
3880:
3881: fnd_msg_pub.count_and_get(
3882: p_encoded => fnd_api.g_false
5043: CLOSE l_curs_rcpt_detail;
5044: END IF;
5045:
5046: IF SQLCODE IS NOT NULL THEN
5047: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_asn_con_rcpt_intf_rec', l_progress, SQLCODE);
5048: END IF;
5049:
5050: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => l_msg_count, p_data => x_message);
5051:
5780: CLOSE l_curs_serial_number;
5781: END IF;
5782:
5783: IF SQLCODE IS NOT NULL THEN
5784: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_asn_exp_rcpt_intf_rec', l_progress, SQLCODE);
5785: END IF;
5786:
5787: fnd_msg_pub.count_and_get(
5788: p_encoded => fnd_api.g_false
6490: IF c_rti_txn_id%ISOPEN THEN
6491: CLOSE c_rti_txn_id;
6492: END IF;
6493: IF SQLCODE IS NOT NULL THEN
6494: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_std_rcpt_intf_rec', l_progress, SQLCODE);
6495: END IF;
6496: fnd_msg_pub.count_and_get(
6497: p_encoded => fnd_api.g_false
6498: , p_count => l_msg_count
7223: ROLLBACK TO rcv_crt_mo_sp;
7224: x_status := fnd_api.g_ret_sts_unexp_error;
7225:
7226: IF SQLCODE IS NOT NULL THEN
7227: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.create_move_order', l_progress, SQLCODE);
7228: END IF;
7229:
7230: fnd_msg_pub.count_and_get(
7231: p_encoded => fnd_api.g_false
7342: WHEN OTHERS THEN
7343: x_return_status := fnd_api.g_ret_sts_unexp_error;
7344:
7345: IF SQLCODE IS NOT NULL THEN
7346: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.rcv_update_rti_from_header', l_progress, SQLCODE);
7347: END IF;
7348:
7349: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
7350: END rcv_update_rti_from_header;
7631: ROLLBACK TO rcv_insert_ship_header_sp;
7632: x_return_status := fnd_api.g_ret_sts_error;
7633:
7634: IF (l_debug = 1) THEN
7635: print_debug('INV_RCV_STD_RCPT_APIS.rcv_insert_header_interface 50.1: RAISE FND_API.G_EXC_ERROR;' || l_progress, 4);
7636: END IF;
7637:
7638: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
7639: WHEN fnd_api.g_exc_unexpected_error THEN
7640: ROLLBACK TO rcv_insert_ship_header_sp;
7641: x_return_status := fnd_api.g_ret_sts_unexp_error;
7642:
7643: IF (l_debug = 1) THEN
7644: print_debug('INV_RCV_STD_RCPT_APIS.rcv_insert_header_interface 50.2: RAISE FND_API.G_EXC_ERROR;' || l_progress, 4);
7645: END IF;
7646:
7647: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
7648: WHEN OTHERS THEN
7649: ROLLBACK TO rcv_insert_ship_header_sp;
7650: x_return_status := fnd_api.g_ret_sts_unexp_error;
7651:
7652: IF SQLCODE IS NOT NULL THEN
7653: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.rcv_insert_header_interface', l_progress, SQLCODE);
7654: END IF;
7655:
7656: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
7657: END rcv_insert_header_interface;
7873: ROLLBACK TO rcv_update_ship_header_sp;
7874: x_return_status := fnd_api.g_ret_sts_unexp_error;
7875:
7876: IF SQLCODE IS NOT NULL THEN
7877: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.rcv_update_header_interface', l_progress, SQLCODE);
7878: END IF;
7879:
7880: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
7881: END rcv_update_header_interface;
8143: WHEN OTHERS THEN
8144: x_return_status := fnd_api.g_ret_sts_unexp_error;
8145:
8146: IF SQLCODE IS NOT NULL THEN
8147: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.rcv_update_insert_header', l_progress, SQLCODE);
8148: END IF;
8149:
8150: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
8151: END rcv_insert_update_header;
8488: ROLLBACK TO rcv_pack_unpack_sp;
8489: x_return_status := fnd_api.g_ret_sts_unexp_error;
8490:
8491: IF SQLCODE IS NOT NULL THEN
8492: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.packunpack_container', l_progress, SQLCODE);
8493: END IF;
8494:
8495: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
8496: END packunpack_container;
8617:
8618: x_return_status := fnd_api.g_ret_sts_unexp_error;
8619:
8620: IF SQLCODE IS NOT NULL THEN
8621: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.detect_ASN_discrepancy', l_progress, SQLCODE);
8622: END IF;
8623:
8624: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
8625: END detect_asn_discrepancy;
8671: ROLLBACK TO rcv_remove_lpn_cont_sp;
8672: x_return_status := fnd_api.g_ret_sts_unexp_error;
8673:
8674: IF SQLCODE IS NOT NULL THEN
8675: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.remove_lpn_contents', l_progress, SQLCODE);
8676: END IF;
8677:
8678: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
8679: END remove_lpn_contents;
8927:
8928: x_return_status := fnd_api.g_ret_sts_unexp_error;
8929:
8930: IF SQLCODE IS NOT NULL THEN
8931: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.clear_LPN_for_ship', l_progress, SQLCODE);
8932: END IF;
8933:
8934: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
8935: END clear_lpn_for_ship;
9025: WHEN OTHERS THEN
9026: x_return_status := fnd_api.g_ret_sts_unexp_error;
9027:
9028: IF SQLCODE IS NOT NULL THEN
9029: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.check_lpn_on_shipment', l_progress, SQLCODE);
9030: END IF;
9031:
9032: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
9033: END check_lpn_on_shipment;
9117: WHEN OTHERS THEN
9118: x_return_status := fnd_api.g_ret_sts_unexp_error;
9119:
9120: IF SQLCODE IS NOT NULL THEN
9121: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.check_lpn_on_ASN', l_progress, SQLCODE);
9122: END IF;
9123:
9124: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
9125: END check_lpn_on_asn;
9332:
9333: x_return_status := fnd_api.g_ret_sts_unexp_error;
9334:
9335: IF SQLCODE IS NOT NULL THEN
9336: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.check_lpn_on_REQ', l_progress, SQLCODE);
9337: END IF;
9338:
9339: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
9340: END;
9469: ROLLBACK TO rcv_update_lpn_org_sp;
9470: x_return_status := fnd_api.g_ret_sts_unexp_error;
9471:
9472: IF SQLCODE IS NOT NULL THEN
9473: inv_mobile_helper_functions.sql_error('INV_RCV_STD_RCPT_APIS.update_LPN_Org', l_progress, SQLCODE);
9474: END IF;
9475:
9476: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
9477: END update_lpn_org;
9872: print_debug('validate_lot_qty: Exception occured! Exiting...', 4);
9873: END IF;
9874: END validate_lot_qty;
9875:
9876: END inv_rcv_std_rcpt_apis;