[Home] [Help]
7: PROCEDURE print_debug(p_err_msg VARCHAR2, p_level NUMBER) IS
8: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
9: BEGIN
10: IF (l_debug = 1) THEN
11: inv_mobile_helper_functions.tracelog(p_err_msg => p_err_msg, p_module => 'inv_RCV_COMMON_APIS', p_level => p_level);
12: END IF;
13: END print_debug;
14:
15: PROCEDURE init_startup_values(p_organization_id IN NUMBER) IS
420: CLOSE get_all_items_in_lpn;
421: END IF;
422:
423: IF SQLCODE IS NOT NULL THEN
424: inv_mobile_helper_functions.sql_error('check_lot_serial_codes', l_progress, SQLCODE);
425: END IF;
426: END check_lot_serial_codes;
427:
428: PROCEDURE insert_msnt(p_msnt_rec mtl_serial_numbers_temp%ROWTYPE) IS
1423: WHEN OTHERS THEN
1424: x_return_status := fnd_api.g_ret_sts_unexp_error;
1425:
1426: IF SQLCODE IS NOT NULL THEN
1427: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.gen_receipt_num', l_progress, SQLCODE);
1428: END IF;
1429:
1430: fnd_message.set_name('PO', 'PO_SP_GET_NEXT_AUTO_RECEIPT_NM');
1431: fnd_msg_pub.ADD;
1765: END IF;
1766:
1767: --
1768: IF SQLCODE IS NOT NULL THEN
1769: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.init_form_values', l_progress, SQLCODE);
1770: END IF;
1771:
1772: -- Get message count and data
1773: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => l_msg_count, p_data => l_msg_data);
1930: END IF;
1931:
1932: --
1933: IF SQLCODE IS NOT NULL THEN
1934: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.init_rcv_ui_startup_values', l_progress, SQLCODE);
1935: END IF;
1936:
1937: -- Get message count and data
1938: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => l_msg_count, p_data => x_msg_data);
2528: CLOSE l_curs_asn_lpn_content_new;
2529: END IF;
2530:
2531: IF SQLCODE IS NOT NULL THEN
2532: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.get_asn_routing_id', l_progress, SQLCODE);
2533: END IF;
2534:
2535: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
2536:
3258: print_debug('Exiting get_routing_id - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
3259: END IF;
3260:
3261: IF SQLCODE IS NOT NULL THEN
3262: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.get_routing_id', l_progress, SQLCODE);
3263: END IF;
3264:
3265: -- Get message count and data
3266: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
3357: ROLLBACK TO rcv_create_lpn_sp;
3358: x_return_status := fnd_api.g_ret_sts_unexp_error;
3359:
3360: IF SQLCODE IS NOT NULL THEN
3361: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.create_lpn', l_progress, SQLCODE);
3362: END IF;
3363:
3364: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => l_msg_count, p_data => x_msg_data);
3365: END create_lpn;
3475: WHEN OTHERS THEN
3476: x_return_status := fnd_api.g_ret_sts_unexp_error;
3477:
3478: IF SQLCODE IS NOT NULL THEN
3479: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.insert_lot', l_progress, SQLCODE);
3480: END IF;
3481:
3482: IF (l_debug = 1) THEN
3483: print_debug('Exitting insert_lot - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
3648: WHEN OTHERS THEN
3649: x_return_status := fnd_api.g_ret_sts_unexp_error;
3650:
3651: IF SQLCODE IS NOT NULL THEN
3652: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.insert_serial', l_progress, SQLCODE);
3653: END IF;
3654:
3655: IF (l_debug = 1) THEN
3656: print_debug('Exitting insert_serial - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
3746: x_return_status := fnd_api.g_ret_sts_unexp_error;
3747:
3748: IF SQLCODE IS NOT NULL
3749: THEN
3750: inv_mobile_helper_functions.sql_error ('inv_rcv_common_apis.get_rma_uom_code', l_progress, SQLCODE);
3751: END IF;
3752:
3753: IF (l_debug = 1)
3754: THEN
3833: x_return_status := fnd_api.g_ret_sts_unexp_error;
3834:
3835: IF SQLCODE IS NOT NULL
3836: THEN
3837: inv_mobile_helper_functions.sql_error ('inv_rcv_common_apis.get_asn_uom_code', l_progress, SQLCODE);
3838: END IF;
3839:
3840: IF (l_debug = 1)
3841: THEN
3950: x_return_status := fnd_api.g_ret_sts_unexp_error;
3951:
3952: IF SQLCODE IS NOT NULL
3953: THEN
3954: inv_mobile_helper_functions.sql_error ('inv_rcv_common_apis.get_asn_uom_code', l_progress, SQLCODE);
3955: END IF;
3956:
3957: IF (l_debug = 1)
3958: THEN
4135: EXCEPTION
4136: WHEN OTHERS THEN
4137: x_return_status := fnd_api.g_ret_sts_unexp_error;
4138: IF SQLCODE IS NOT NULL THEN
4139: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_uom_code', l_progress, SQLCODE);
4140: END IF;
4141:
4142: IF (l_debug = 1) THEN
4143: print_debug('Exitting get_uom_code - other exception:' || l_progress ||' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
4571: WHEN OTHERS THEN
4572: x_return_status := fnd_api.g_ret_sts_unexp_error;
4573:
4574: IF SQLCODE IS NOT NULL THEN
4575: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_sub_code', l_progress, SQLCODE);
4576: END IF;
4577:
4578: IF (l_debug = 1) THEN
4579: print_debug('Exitting get_sub_code - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
4765: WHEN OTHERS THEN
4766: x_return_status := fnd_api.g_ret_sts_unexp_error;
4767:
4768: IF SQLCODE IS NOT NULL THEN
4769: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_location_code', l_progress, SQLCODE);
4770: END IF;
4771:
4772: IF (l_debug = 1) THEN
4773: print_debug('Exitting get_location_code - other exception: ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
4971: WHEN OTHERS THEN
4972: x_return_status := fnd_api.g_ret_sts_unexp_error;
4973:
4974: IF SQLCODE IS NOT NULL THEN
4975: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_revision_code', l_progress, SQLCODE);
4976: END IF;
4977:
4978: IF (l_debug = 1) THEN
4979: print_debug('Exitting get_revision_code - other exception: ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
5184: EXCEPTION
5185: WHEN OTHERS THEN
5186: x_return_status := fnd_api.g_ret_sts_unexp_error ;
5187: IF SQLCODE IS NOT NULL THEN
5188: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_sub_code', '10', SQLCODE);
5189: END IF;
5190: IF (l_debug = 1) THEN
5191: print_debug('Exitting populatelotattributes - other exception:'|| to_char(sysdate, 'YYYY-MM-DD HH:DD:SS'), 1);
5192: END IF;
5314: , p_parent_lot_number => p_parent_lot_number --bug 10176719 - inserting parent lot number
5315: , p_origination_type => p_origination_type --bug 15896641 - inserting origination type
5316: );
5317: IF (x_return_status = fnd_api.g_ret_sts_success) THEN
5318: inv_mobile_helper_functions.get_stacked_messages(l_stacked_messages);
5319: IF (l_debug = 1) THEN
5320: print_debug('The following messege is removed: ' ||
5321: l_stacked_messages,1);
5322: END IF;
5645:
5646: x_return_status := fnd_api.g_ret_sts_unexp_error;
5647:
5648: IF SQLCODE IS NOT NULL THEN
5649: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.insert_range_serial', l_progress, SQLCODE);
5650: END IF;
5651:
5652: --
5653: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
5936: print_debug('Exitting update_serial_status - other exceptions:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
5937: END IF;
5938:
5939: IF SQLCODE IS NOT NULL THEN
5940: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.update_serial_status', l_progress, SQLCODE);
5941: END IF;
5942:
5943: --
5944: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
6113: print_debug('Exitting process_lot - other exceptions:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
6114: END IF;
6115:
6116: IF SQLCODE IS NOT NULL THEN
6117: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.process_lot', l_progress, SQLCODE);
6118: END IF;
6119:
6120: --
6121: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
6175: WHEN OTHERS THEN
6176: x_return_status := fnd_api.g_ret_sts_error;
6177:
6178: IF SQLCODE IS NOT NULL THEN
6179: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.validate_trx_date', '10', SQLCODE);
6180: END IF;
6181:
6182: fnd_message.set_name('PO', 'PO_PO_ENTER_OPEN_GL_DATE');
6183: fnd_msg_pub.ADD;
6195: WHEN OTHERS THEN
6196: x_return_status := fnd_api.g_ret_sts_error;
6197:
6198: IF SQLCODE IS NOT NULL THEN
6199: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.validate_trx_date', '20', SQLCODE);
6200: END IF;
6201:
6202: fnd_message.set_name('PO', 'PO_INV_NO_OPEN_PERIOD');
6203: fnd_msg_pub.ADD;
6518: , 1);
6519: END IF;
6520:
6521: IF SQLCODE IS NOT NULL THEN
6522: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.get_req_shipment_header_id', l_progress, SQLCODE);
6523: END IF;
6524: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => x_msg_count, p_data => x_msg_data);
6525: END;
6526:
6632: , 1);
6633: END IF;
6634:
6635: IF SQLCODE IS NOT NULL THEN
6636: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.get_req_shipment_header_id', l_progress, SQLCODE);
6637: END IF;
6638:
6639: -- Get message count and data
6640: fnd_msg_pub.count_and_get(
7099: ROLLBACK TO rcv_create_cross_reference_sp;
7100: x_return_status := fnd_api.g_ret_sts_unexp_error;
7101:
7102: IF SQLCODE IS NOT NULL THEN
7103: inv_mobile_helper_functions.sql_error('INV_RCV_COMMON_APIS.create_cross_reference', l_progress, SQLCODE);
7104: END IF;
7105:
7106: fnd_msg_pub.count_and_get(
7107: p_encoded => fnd_api.g_false,
7507: print_debug(SQLCODE, 1);
7508:
7509: IF SQLCODE IS NOT NULL THEN
7510: l_progress := 100;
7511: inv_mobile_helper_functions.sql_error('validate_nested_lpns', l_progress, SQLCODE);
7512: END IF;
7513: END validate_nested_lpn;
7514:
7515: /**
7714: EXCEPTION
7715: WHEN OTHERS THEN
7716: x_return_status := fnd_api.g_ret_sts_unexp_error;
7717: IF SQLCODE IS NOT NULL THEN
7718: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_sub_code', l_progress, SQLCODE);
7719: END IF;
7720: IF (l_debug = 1) THEN
7721: print_debug('Exitting get_sub_code - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
7722: END IF;
7983: WHEN OTHERS THEN
7984: x_return_status := fnd_api.g_ret_sts_unexp_error;
7985:
7986: IF SQLCODE IS NOT NULL THEN
7987: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.validate_from_lpn', l_progress, SQLCODE);
7988: END IF;
7989:
7990: IF (l_debug = 1) THEN
7991: print_debug('Exitting validate_from_lpn - other exception:' || l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
8202:
8203: x_return_status := fnd_api.g_ret_sts_unexp_error;
8204:
8205: IF SQLCODE IS NOT NULL THEN
8206: inv_mobile_helper_functions.sql_error('inv_rcv_common_apis.get_rec_uom_code', l_progress, SQLCODE);
8207: END IF;
8208:
8209: IF (l_debug = 1) THEN
8210: print_debug('Exiting get_rec_uom_code - other exception:' || l_progress ||' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);