1: PACKAGE BODY csi_txn_errors_pkg AS
2: /* $Header: csittxeb.pls 115.18 2003/11/14 19:58:43 epajaril ship $ */
3: -- start of comments
4: -- package name : csi_txn_errors_pkg
5: -- purpose :
1: PACKAGE BODY csi_txn_errors_pkg AS
2: /* $Header: csittxeb.pls 115.18 2003/11/14 19:58:43 epajaril ship $ */
3: -- start of comments
4: -- package name : csi_txn_errors_pkg
5: -- purpose :
6: -- history :
7: -- note :
8: -- end of comments
7: -- note :
8: -- end of comments
9:
10:
11: g_pkg_name CONSTANT VARCHAR2(30):= 'csi_txn_errors_pkg';
12: g_file_name CONSTANT VARCHAR2(12) := 'csittxeb.pls';
13:
14: PROCEDURE insert_row(
15: px_transaction_error_id IN OUT NOCOPY NUMBER ,
52: p_dst_rev_qty_ctrl_code NUMBER,
53: p_comms_nl_trackable_flag VARCHAR2)
54:
55: is
56: CURSOR c2 IS SELECT csi_txn_errors_s.nextval FROM sys.dual;
57: v_transaction_error_date DATE;
58: BEGIN
59: IF (px_transaction_error_id IS NULL) OR (px_transaction_error_id = fnd_api.g_miss_num) THEN
60: OPEN c2;
67: THEN
68: v_transaction_error_date := SYSDATE;
69: END IF;
70:
71: INSERT INTO csi_txn_errors(
72: transaction_error_id,
73: transaction_id,
74: message_id,
75: error_text,
153:
154: END insert_row;
155:
156:
157: END csi_txn_errors_pkg;