17: null;
18: END debug;
19:
20: PROCEDURE create_inst_asset(
21: px_inst_asset_rec IN OUT nocopy csi_datastructures_pub.instance_asset_rec,
22: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
23: x_return_status OUT nocopy varchar2)
24: IS
25: l_lookup_tbl csi_asset_pvt.lookup_tbl;
18: END debug;
19:
20: PROCEDURE create_inst_asset(
21: px_inst_asset_rec IN OUT nocopy csi_datastructures_pub.instance_asset_rec,
22: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
23: x_return_status OUT nocopy varchar2)
24: IS
25: l_lookup_tbl csi_asset_pvt.lookup_tbl;
26: l_asset_count_rec csi_asset_pvt.asset_count_rec;
59: x_return_status := fnd_api.g_ret_sts_error;
60: END create_inst_asset;
61:
62: PROCEDURE update_inst_asset(
63: px_inst_asset_rec IN OUT nocopy csi_datastructures_pub.instance_asset_rec,
64: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
65: x_return_status OUT nocopy varchar2)
66: IS
67:
60: END create_inst_asset;
61:
62: PROCEDURE update_inst_asset(
63: px_inst_asset_rec IN OUT nocopy csi_datastructures_pub.instance_asset_rec,
64: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
65: x_return_status OUT nocopy varchar2)
66: IS
67:
68: l_lookup_tbl csi_asset_pvt.lookup_tbl;
113: END update_inst_asset;
114:
115:
116: FUNCTION total_inst_asset_qty(
117: p_inst_asset_tbl IN csi_datastructures_pub.instance_asset_header_tbl)
118: RETURN number
119: IS
120: l_total_qty number := 0;
121: BEGIN
129: END total_inst_asset_qty;
130:
131:
132: PROCEDURE reinstate_inst_asset(
133: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_header_rec,
134: p_units IN number,
135: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
136: x_return_status OUT nocopy varchar2)
137: IS
131:
132: PROCEDURE reinstate_inst_asset(
133: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_header_rec,
134: p_units IN number,
135: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
136: x_return_status OUT nocopy varchar2)
137: IS
138:
139: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
135: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
136: x_return_status OUT nocopy varchar2)
137: IS
138:
139: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
140: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
141: l_time_stamp date := null;
142:
143: l_total_inst_asset_qty number := 0;
136: x_return_status OUT nocopy varchar2)
137: IS
138:
139: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
140: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
141: l_time_stamp date := null;
142:
143: l_total_inst_asset_qty number := 0;
144: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec;
140: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
141: l_time_stamp date := null;
142:
143: l_total_inst_asset_qty number := 0;
144: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec;
145:
146: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
147: l_msg_count number;
148: l_msg_data varchar2(2000);
216: END reinstate_inst_asset;
217:
218: PROCEDURE retire_inst_asset(
219: p_inst_asset_id IN number,
220: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
221: x_return_status OUT nocopy varchar2)
222: IS
223:
224: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec;
220: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
221: x_return_status OUT nocopy varchar2)
222: IS
223:
224: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec;
225: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
226:
227: BEGIN
228: x_return_status := fnd_api.g_ret_sts_success;
246: x_return_status := fnd_api.g_ret_sts_error;
247: END retire_inst_asset;
248:
249: PROCEDURE split_inst_asset(
250: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_header_rec,
251: p_quantity IN number,
252: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
253: x_new_inst_asset_id OUT nocopy number,
254: x_return_status OUT nocopy varchar2)
248:
249: PROCEDURE split_inst_asset(
250: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_header_rec,
251: p_quantity IN number,
252: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
253: x_new_inst_asset_id OUT nocopy number,
254: x_return_status OUT nocopy varchar2)
255: IS
256: l_old_asset_qty number;
253: x_new_inst_asset_id OUT nocopy number,
254: x_return_status OUT nocopy varchar2)
255: IS
256: l_old_asset_qty number;
257: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec;
258: l_lookup_tbl csi_asset_pvt.lookup_tbl;
259: l_asset_count_rec csi_asset_pvt.asset_count_rec;
260: l_asset_id_tbl csi_asset_pvt.asset_id_tbl;
261: l_asset_loc_tbl csi_asset_pvt.asset_loc_tbl;
311: p_asset_id IN NUMBER,
312: p_units IN NUMBER,
313: p_trans_date IN DATE,
314: p_trans_by IN NUMBER,
315: px_txn_rec IN OUT NOCOPY csi_datastructures_pub.transaction_rec,
316: x_return_status OUT NOCOPY VARCHAR2,
317: x_error_message OUT NOCOPY VARCHAR2)
318: IS
319:
316: x_return_status OUT NOCOPY VARCHAR2,
317: x_error_message OUT NOCOPY VARCHAR2)
318: IS
319:
320: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
321: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
322: l_time_stamp date := null;
323:
324: l_new_inst_asset_id number;
317: x_error_message OUT NOCOPY VARCHAR2)
318: IS
319:
320: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
321: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
322: l_time_stamp date := null;
323:
324: l_new_inst_asset_id number;
325: l_total_inst_asset_qty number := 0;
447: x_return_status OUT NOCOPY VARCHAR2,
448: x_error_message OUT NOCOPY VARCHAR2)
449: IS
450:
451: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
452: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
453: l_csi_txn_rec csi_datastructures_pub.transaction_rec;
454: l_time_stamp date := null;
455: l_new_inst_asset_id number;
448: x_error_message OUT NOCOPY VARCHAR2)
449: IS
450:
451: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
452: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
453: l_csi_txn_rec csi_datastructures_pub.transaction_rec;
454: l_time_stamp date := null;
455: l_new_inst_asset_id number;
456:
449: IS
450:
451: l_inst_asset_qry_rec csi_datastructures_pub.instance_asset_query_rec;
452: l_inst_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
453: l_csi_txn_rec csi_datastructures_pub.transaction_rec;
454: l_time_stamp date := null;
455: l_new_inst_asset_id number;
456:
457: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;