[Home] [Help]
PACKAGE BODY: APPS.CSI_TXN_ERRORS_PKG
Source
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
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 ,
16 p_transaction_id NUMBER ,
17 p_message_id NUMBER ,
18 p_error_text VARCHAR2,
19 p_source_type VARCHAR2,
20 p_source_id NUMBER ,
21 p_processed_flag VARCHAR2,
22 p_created_by NUMBER ,
23 p_creation_date DATE ,
24 p_last_updated_by NUMBER ,
25 p_last_update_date DATE ,
26 p_last_update_login NUMBER ,
27 p_object_version_number NUMBER ,
28 p_transaction_type_id NUMBER ,
29 p_source_group_ref VARCHAR2,
30 p_source_group_ref_id NUMBER ,
31 p_source_header_ref VARCHAR2,
32 p_source_header_ref_id NUMBER ,
33 p_source_line_ref VARCHAR2,
34 p_source_line_ref_id NUMBER ,
35 p_source_dist_ref_id1 NUMBER ,
36 p_source_dist_ref_id2 NUMBER ,
37 p_inv_material_transaction_id NUMBER ,
38 p_error_stage VARCHAR2,
39 p_message_string VARCHAR2,
40 p_instance_id NUMBER,
41 p_inventory_item_id NUMBER,
42 p_serial_number VARCHAR2,
43 p_lot_number VARCHAR2,
44 p_transaction_error_date DATE,
45 p_src_serial_num_ctrl_code NUMBER,
46 p_src_location_ctrl_code NUMBER,
47 p_src_lot_ctrl_code NUMBER,
48 p_src_rev_qty_ctrl_code NUMBER,
49 p_dst_serial_num_ctrl_code NUMBER,
50 p_dst_location_ctrl_code NUMBER,
51 p_dst_lot_ctrl_code 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;
61 FETCH c2 INTO px_transaction_error_id;
62 CLOSE c2;
63 END IF;
64
65 IF ((p_transaction_error_date = FND_API.G_MISS_DATE) OR
66 (p_transaction_error_date IS NULL))
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,
76 source_type,
77 source_id,
78 processed_flag,
79 created_by,
80 creation_date,
81 last_updated_by,
82 last_update_date,
83 last_update_login,
84 object_version_number,
85 transaction_type_id ,
86 source_group_ref ,
87 source_group_ref_id ,
88 source_header_ref ,
89 source_header_ref_id ,
90 source_line_ref ,
91 source_line_ref_id ,
92 source_dist_ref_id1 ,
93 source_dist_ref_id2 ,
94 inv_material_transaction_id,
95 error_stage,
96 message_string,
97 instance_id,
98 inventory_item_id,
99 serial_number,
100 lot_number,
101 transaction_error_date,
102 src_serial_num_ctrl_code,
103 src_location_ctrl_code,
104 src_lot_ctrl_code,
105 src_rev_qty_ctrl_code,
106 dst_serial_num_ctrl_code,
107 dst_location_ctrl_code,
108 dst_lot_ctrl_code,
109 dst_rev_qty_ctrl_code,
110 comms_nl_trackable_flag)
111 VALUES (px_transaction_error_id,
112 decode( p_transaction_id, fnd_api.g_miss_num, NULL, p_transaction_id),
113 decode( p_message_id, fnd_api.g_miss_num, NULL, p_message_id),
114 decode( p_error_text, fnd_api.g_miss_char, NULL, p_error_text),
115 decode( p_source_type, fnd_api.g_miss_char, NULL, p_source_type),
116 decode( p_source_id, fnd_api.g_miss_num, NULL, p_source_id),
117 decode( p_processed_flag, fnd_api.g_miss_char, NULL, p_processed_flag),
118 decode( p_created_by, fnd_api.g_miss_num, NULL, p_created_by),
119 decode( p_creation_date, fnd_api.g_miss_date, to_date(NULL), p_creation_date),
120 decode( p_last_updated_by, fnd_api.g_miss_num, NULL, p_last_updated_by),
121 decode( p_last_update_date, fnd_api.g_miss_date, to_date(NULL), p_last_update_date),
122 decode( p_last_update_login, fnd_api.g_miss_num, NULL, p_last_update_login),
123 decode( p_object_version_number, fnd_api.g_miss_num, NULL, p_object_version_number),
124 decode( p_transaction_type_id, fnd_api.g_miss_num , NULL, p_transaction_type_id),
125 decode( p_source_group_ref, fnd_api.g_miss_char, NULL, p_source_group_ref),
126 decode( p_source_group_ref_id, fnd_api.g_miss_num , NULL, p_source_group_ref_id),
127 decode( p_source_header_ref, fnd_api.g_miss_char, NULL, p_source_header_ref),
128 decode( p_source_header_ref_id, fnd_api.g_miss_num, NULL, p_source_header_ref_id),
129 decode( p_source_line_ref, fnd_api.g_miss_char, NULL, p_source_line_ref),
130 decode( p_source_line_ref_id, fnd_api.g_miss_num ,NULL, p_source_line_ref_id),
131 decode( p_source_dist_ref_id1, fnd_api.g_miss_num ,NULL, p_source_dist_ref_id1),
132 decode( p_source_dist_ref_id2, fnd_api.g_miss_num , NULL, p_source_dist_ref_id2),
133 decode( p_inv_material_transaction_id, fnd_api.g_miss_num ,NULL,p_inv_material_transaction_id),
134 decode( p_error_stage, fnd_api.g_miss_char ,NULL,p_error_stage),
135 decode( p_message_string, fnd_api.g_miss_char ,NULL,p_message_string),
136 decode( p_instance_id, fnd_api.g_miss_num , NULL, p_instance_id),
137 decode( p_inventory_item_id, fnd_api.g_miss_num , NULL, p_inventory_item_id),
138 decode( p_serial_number, fnd_api.g_miss_char ,NULL,p_serial_number),
139 decode( p_lot_number, fnd_api.g_miss_char ,NULL,p_lot_number),
140 decode( p_transaction_error_date,fnd_api.g_miss_date, v_transaction_error_date, p_transaction_error_date),
141 decode( p_src_serial_num_ctrl_code, fnd_api.g_miss_num , NULL, p_src_serial_num_ctrl_code),
142 decode( p_src_location_ctrl_code, fnd_api.g_miss_num , NULL, p_src_location_ctrl_code),
143 decode( p_src_lot_ctrl_code, fnd_api.g_miss_num , NULL, p_src_lot_ctrl_code),
144 decode( p_src_rev_qty_ctrl_code, fnd_api.g_miss_num , NULL, p_src_rev_qty_ctrl_code),
145 decode( p_dst_serial_num_ctrl_code, fnd_api.g_miss_num , NULL, p_dst_serial_num_ctrl_code),
146 decode( p_dst_location_ctrl_code, fnd_api.g_miss_num , NULL, p_dst_location_ctrl_code),
147 decode( p_dst_lot_ctrl_code, fnd_api.g_miss_num , NULL, p_dst_lot_ctrl_code),
148 decode( p_dst_rev_qty_ctrl_code, fnd_api.g_miss_num , NULL, p_dst_rev_qty_ctrl_code),
149 decode( p_comms_nl_trackable_flag, fnd_api.g_miss_char ,NULL,p_comms_nl_trackable_flag)
150 );
151
152 -- commit;
153
154 END insert_row;
155
156
157 END csi_txn_errors_pkg;