[Home] [Help]
1: PACKAGE BODY csi_order_ship_pub AS
2: /* $Header: csipiosb.pls 120.34.12010000.2 2008/10/01 17:54:03 rsinn ship $ */
3:
4:
5: PROCEDURE debug(
15: p_api_name IN varchar2)
16: IS
17: BEGIN
18:
19: g_api_name := 'csi_order_ship_pub.'||p_api_name;
20:
21: csi_t_gen_utility_pvt.dump_api_info(
22: p_api_name => p_api_name,
23: p_pkg_name => 'csi_order_ship_pub');
19: g_api_name := 'csi_order_ship_pub.'||p_api_name;
20:
21: csi_t_gen_utility_pvt.dump_api_info(
22: p_api_name => p_api_name,
23: p_pkg_name => 'csi_order_ship_pub');
24:
25: END api_log;
26:
27: PROCEDURE process_ato_options(
539: x_trx_sub_type_rec txn_sub_type_rec;
540: x_txn_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
541: x_model_inst_tbl model_inst_tbl;
542:
543: l_item_control_rec csi_order_ship_pub.item_control_rec;
544: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
545: l_msg_count number;
546: l_msg_data varchar2(2000);
547: l_temp_txn_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
1313: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
1314: raise fnd_api.g_exc_error;
1315: END IF;
1316:
1317: debug('end: csi_order_ship_pub.order_shipment. status: successful');
1318: debug(' timestamp : '||to_char(sysdate, 'MM/DD/YY HH24:MI:SS'));
1319:
1320: EXCEPTION
1321: WHEN fnd_api.g_exc_error THEN
8357: x_error_message OUT NOCOPY varchar2,
8358: x_mtl_trx_rec OUT NOCOPY MTL_TXN_REC)
8359: IS
8360:
8361: l_api_name varchar2(100) := 'csi_order_ship_pub.decode_message';
8362: l_fnd_unexpected varchar2(1) := fnd_api.g_ret_sts_unexp_error;
8363: l_mtl_txn_id number;
8364: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8365:
8677: px_trx_error_rec := l_error_rec;
8678: debug('Error(O) :'||l_error_rec.error_text);
8679: END oke_shipment;
8680:
8681: END csi_order_ship_pub ;