[Home] [Help]
1: PACKAGE BODY inv_receiving_transaction AS
2: /* $Header: INVRCVFB.pls 120.8.12010000.2 2008/07/29 12:54:37 ptkumar ship $*/
3:
4: -- Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'inv_receiving_transaction';
1: PACKAGE BODY inv_receiving_transaction AS
2: /* $Header: INVRCVFB.pls 120.8.12010000.2 2008/07/29 12:54:37 ptkumar ship $*/
3:
4: -- Global constant holding the package name
5: G_PKG_NAME CONSTANT VARCHAR2(30) := 'inv_receiving_transaction';
6:
7:
8:
9: PROCEDURE print_debug(p_err_msg VARCHAR2,
13: BEGIN
14: IF (l_debug = 1) THEN
15: inv_mobile_helper_functions.tracelog
16: (p_err_msg => p_err_msg,
17: p_module => 'inv_receiving_transaction',
18: p_level => p_level);
19: END IF;
20:
21: END print_debug;
371:
372: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
373:
374: IF SQLCODE IS NOT NULL THEN
375: inv_mobile_helper_functions.sql_error('inv_receiving_transaction.rcv_txn_clean_up', l_progress, SQLCODE);
376: IF (l_debug = 1) THEN
377: print_debug('rcv_txn_clean_up : l_progress = ' || l_progress ||' SQLCODE is '||SQLCODE,4);
378: END IF;
379: END IF;
903: print_debug('Error return from wms_return_sv.txn_complete, exitting - '||x_msg_data||' : 101',1);
904: END IF;
905: IF p_txn_mode <> 'ONLINE' THEN
906: create_errors(p_group_id => p_group_id,
907: p_msg => 'inv_receiving_transaction.txn_complete - 102 -'||x_msg_data);
908: END IF;
909: IF x_return_status = fnd_api.g_ret_sts_error THEN
910: RAISE fnd_api.g_exc_error;
911: ELSE
1223: inv_mobile_helper_functions.get_stacked_messages(x_message => x_msg_data);
1224:
1225: END txn_mobile_timeout_cleanup;
1226:
1227: END inv_receiving_transaction;