DBA Data[Home] [Help]

PACKAGE BODY: APPS.CSI_GEN_UTILITY_PVT

Source


1 PACKAGE BODY CSI_GEN_UTILITY_PVT AS
2 /* $Header: csivgub.pls 120.12.12000000.2 2007/06/18 14:15:59 sdandapa ship $ */
3 
4 PROCEDURE read_debug_profiles IS
5    BEGIN
6      g_debug_level         := fnd_profile.value('CSI_DEBUG_LEVEL');
7      g_debug_file          := fnd_profile.value('CSI_LOGFILE_NAME');
8      g_debug_file_path     := fnd_profile.value('CSI_LOGFILE_PATH');
9    END read_debug_profiles;
10 
11 PROCEDURE put_line(p_message IN VARCHAR2)
12 IS
13    l_message               VARCHAR2(4000);
14 
15    l_sid                   NUMBER;
16    l_serial                number;
17    l_audsid                number;
18    l_user                  varchar2(30);
19    l_schema                varchar2(30);
20    l_os_user               VARCHAR2(30);
21    l_logon_time            date;
22    l_module                varchar2(48);
23 
24    l_file_handle           utl_file.file_type;
25 
26 BEGIN
27 
28 	IF g_debug_level is null THEN
29 		read_debug_profiles;
30 	END IF;
31 
32  IF g_debug_level > 0 THEN
33     IF g_audsid is NULL THEN
34 
35       SELECT sid, serial#, audsid, username, schemaname, osuser, logon_time, module
36       INTO   l_sid, l_serial, l_audsid, l_user, l_schema, l_os_user, l_logon_time, l_module
37       FROM   v$session
38       WHERE  audsid = (SELECT userenv('SESSIONID') FROM sys.dual);
39 
40       --
41       g_audsid := l_audsid;
42 
43       l_message := '***-new sql session'||l_audsid||'-'||l_sid||'-'||l_serial||'-'||l_user||'-'||l_schema||'-'||
44                    l_os_user||l_module||'-'||to_char(l_logon_time, 'DD-MON-YYYY HH24:MI:SS')||'-***';
45       l_file_handle := UTL_FILE.FOPEN(g_debug_file_path, g_debug_file, 'a');
46       UTL_FILE.PUT_LINE (l_file_handle, l_message);
47     END IF;
48 
49     l_message     := g_audsid||'-'||to_char(sysdate, 'ddmmyyyy hh24:mi:ss')||'-'||p_message;
50     l_file_handle := UTL_FILE.FOPEN(g_debug_file_path, g_debug_file, 'a');
51     UTL_FILE.PUT_LINE (l_file_handle, l_message);
52     UTL_FILE.FFLUSH(l_file_handle);
53     UTL_FILE.FCLOSE(l_file_handle);
54   END IF;
55 
56 EXCEPTION
57   WHEN OTHERS THEN
58     null;
59 END put_line;
60 
61 
62 FUNCTION enable_trace (l_trace_flag IN VARCHAR2)
63 RETURN VARCHAR2
64 is
65 event_on            BINARY_INTEGER;
66 event_num           BINARY_INTEGER := 10046; -- Trace event
67 l_flag              VARCHAR2(1):=l_trace_flag;
68 begin
69  /***** srramakr Commented for Bug 3304439
70  DBMS_SYSTEM.READ_EV(event_num,event_on);
71  IF event_on <> 1 THEN
72         IF (fnd_profile.value('CSI_ENABLE_SQL_TRACE') = 'Y') THEN
73                    dbms_session.set_sql_trace(TRUE);
74            l_flag:='Y';
75     Else
76            l_flag:='N';
77     END IF;
78  ELSE
79            l_flag:='N';
80  END IF;
81  *****/
82  l_flag := 'N';
83 RETURN l_flag;
84 END enable_trace;
85 
86   FUNCTION dump_error_stack RETURN varchar2
87   IS
88     l_msg_count       number;
89     l_msg_data        varchar2(2000);
90     l_msg_index_out   number;
91     x_msg_data        varchar2(4000);
92   BEGIN
93 
94     x_msg_data := null;
95 
96     fnd_msg_pub.count_and_get(
97       p_count  => l_msg_count,
98       p_data   => l_msg_data);
99 
100     FOR l_ind IN 1..l_msg_count
101     LOOP
102 
103       fnd_msg_pub.get(
104         p_msg_index     => l_ind,
105         p_encoded       => fnd_api.g_false,
106         p_data          => l_msg_data,
107         p_msg_index_out => l_msg_index_out);
108 
109       x_msg_data := ltrim(x_msg_data||' '||l_msg_data);
110 
111       IF length(x_msg_data) > 1999 THEN
112         x_msg_data := substr(x_msg_data, 1, 1999);
113         exit;
114       END IF;
115 
116     END LOOP;
117 
118     RETURN x_msg_data;
119 
120   EXCEPTION
121     WHEN others THEN
122       RETURN null;
123   END dump_error_stack;
124 
125 PROCEDURE dump_ext_attrib_values_rec
126      (p_ext_attrib_values_rec       IN  csi_datastructures_pub.extend_attrib_values_rec)
127 IS
128         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_ext_attrib_values_rec';
129         l_api_version       CONSTANT NUMBER         := 1.0;
130 BEGIN
131 
132 -- Standard Start of API savepoint
133 --   SAVEPOINT       dump_ext_attrib_values_rec;
134 
135 PUT_LINE ('                                       ');
136 PUT_LINE ('Dumping the values for Extended Attribs Record:');
137 PUT_LINE ('                                       ');
138 PUT_LINE ('attribute_value_id          :'||p_ext_attrib_values_rec.attribute_value_id);
139 PUT_LINE ('instance_id                 :'||p_ext_attrib_values_rec.instance_id);
140 PUT_LINE ('attribute_id                :'||p_ext_attrib_values_rec.attribute_id);
141 PUT_LINE ('attribute_value             :'||p_ext_attrib_values_rec.attribute_value);
142 PUT_LINE ('active_start_date           :'||p_ext_attrib_values_rec.active_start_date);
143 PUT_LINE ('active_end_date             :'||p_ext_attrib_values_rec.active_end_date);
144 PUT_LINE ('context                     :'||p_ext_attrib_values_rec.context);
145 PUT_LINE ('attribute1                  :'||p_ext_attrib_values_rec.attribute1);
146 PUT_LINE ('attribute2                  :'||p_ext_attrib_values_rec.attribute2);
147 PUT_LINE ('attribute3                  :'||p_ext_attrib_values_rec.attribute3);
148 PUT_LINE ('attribute4                  :'||p_ext_attrib_values_rec.attribute4);
149 PUT_LINE ('attribute5                  :'||p_ext_attrib_values_rec.attribute5);
150 PUT_LINE ('attribute6                  :'||p_ext_attrib_values_rec.attribute6);
151 PUT_LINE ('attribute7                  :'||p_ext_attrib_values_rec.attribute7);
152 PUT_LINE ('attribute8                  :'||p_ext_attrib_values_rec.attribute8);
153 PUT_LINE ('attribute9                  :'||p_ext_attrib_values_rec.attribute9);
154 PUT_LINE ('attribute10                 :'||p_ext_attrib_values_rec.attribute10);
155 PUT_LINE ('attribute11                 :'||p_ext_attrib_values_rec.attribute11);
156 PUT_LINE ('attribute12                 :'||p_ext_attrib_values_rec.attribute12);
157 PUT_LINE ('attribute13                 :'||p_ext_attrib_values_rec.attribute13);
158 PUT_LINE ('attribute14                 :'||p_ext_attrib_values_rec.attribute14);
159 PUT_LINE ('attribute15                 :'||p_ext_attrib_values_rec.attribute15);
160 PUT_LINE ('object_version_number       :'||p_ext_attrib_values_rec.object_version_number);
161 
162 
163 EXCEPTION
164         WHEN OTHERS THEN
165                -- ROLLBACK TO  dump_ext_attrib_values_rec;
166 
167                 IF      FND_MSG_PUB.Check_Msg_Level
168                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
169                 THEN
170                 FND_MSG_PUB.Add_Exc_Msg
171                 (       g_pkg_name          ,
172                         l_api_name
173                      );
174                 END IF;
175 
176 END dump_ext_attrib_values_rec;
177 
178 
179 PROCEDURE dump_ext_attrib_values_tbl
180      (p_ext_attrib_values_tbl       IN  csi_datastructures_pub.extend_attrib_values_tbl)
181 IS
182         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_ext_attrib_values_tbl';
183         l_api_version       CONSTANT NUMBER         := 1.0;
184 BEGIN
185 
186 -- Standard Start of API savepoint
187   -- SAVEPOINT       dump_ext_attrib_values_tbl;
188 
189 IF p_ext_attrib_values_tbl.COUNT > 0 THEN
190  FOR tab_row IN p_ext_attrib_values_tbl.FIRST .. p_ext_attrib_values_tbl.LAST
191    LOOP
192     IF p_ext_attrib_values_tbl.EXISTS(tab_row) THEN
193 
194 PUT_LINE ('                                       ');
195 PUT_LINE ('Dumping the values for Extended Attribs Table Record #  :'||tab_row);
196 PUT_LINE ('                                       ');
197 PUT_LINE ('attribute_value_id          :'||p_ext_attrib_values_tbl(tab_row).attribute_value_id);
198 PUT_LINE ('instance_id                 :'||p_ext_attrib_values_tbl(tab_row).instance_id);
199 PUT_LINE ('attribute_id                :'||p_ext_attrib_values_tbl(tab_row).attribute_id);
200 PUT_LINE ('attribute_value             :'||p_ext_attrib_values_tbl(tab_row).attribute_value);
201 PUT_LINE ('active_start_date           :'||p_ext_attrib_values_tbl(tab_row).active_start_date);
202 PUT_LINE ('active_end_date             :'||p_ext_attrib_values_tbl(tab_row).active_end_date);
203 PUT_LINE ('context                     :'||p_ext_attrib_values_tbl(tab_row).context);
204 PUT_LINE ('attribute1                  :'||p_ext_attrib_values_tbl(tab_row).attribute1);
205 PUT_LINE ('attribute2                  :'||p_ext_attrib_values_tbl(tab_row).attribute2);
206 PUT_LINE ('attribute3                  :'||p_ext_attrib_values_tbl(tab_row).attribute3);
207 PUT_LINE ('attribute4                  :'||p_ext_attrib_values_tbl(tab_row).attribute4);
208 PUT_LINE ('attribute5                  :'||p_ext_attrib_values_tbl(tab_row).attribute5);
209 PUT_LINE ('attribute6                  :'||p_ext_attrib_values_tbl(tab_row).attribute6);
210 PUT_LINE ('attribute7                  :'||p_ext_attrib_values_tbl(tab_row).attribute7);
211 PUT_LINE ('attribute8                  :'||p_ext_attrib_values_tbl(tab_row).attribute8);
212 PUT_LINE ('attribute9                  :'||p_ext_attrib_values_tbl(tab_row).attribute9);
213 PUT_LINE ('attribute10                 :'||p_ext_attrib_values_tbl(tab_row).attribute10);
214 PUT_LINE ('attribute11                 :'||p_ext_attrib_values_tbl(tab_row).attribute11);
215 PUT_LINE ('attribute12                 :'||p_ext_attrib_values_tbl(tab_row).attribute12);
216 PUT_LINE ('attribute13                 :'||p_ext_attrib_values_tbl(tab_row).attribute13);
217 PUT_LINE ('attribute14                 :'||p_ext_attrib_values_tbl(tab_row).attribute14);
218 PUT_LINE ('attribute15                 :'||p_ext_attrib_values_tbl(tab_row).attribute15);
219 PUT_LINE ('object_version_number       :'||p_ext_attrib_values_tbl(tab_row).object_version_number);
220     END IF;
221   END LOOP;
222 END IF;
223 
224 EXCEPTION
225         WHEN OTHERS THEN
226               --  ROLLBACK TO  dump_ext_attrib_values_tbl;
227 
228                 IF      FND_MSG_PUB.Check_Msg_Level
229                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
230                 THEN
231                 FND_MSG_PUB.Add_Exc_Msg
232                 (       g_pkg_name          ,
233                         l_api_name
234                      );
235                 END IF;
236 
237 END dump_ext_attrib_values_tbl;
238 
239 
240 
241 PROCEDURE dump_ext_attrib_query_rec
242      (p_ext_attrib_query_rec       IN  csi_datastructures_pub.extend_attrib_query_rec)
243 IS
244         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_ou_query_rec';
245         l_api_version       CONSTANT NUMBER         := 1.0;
246 BEGIN
247 
248 -- Standard Start of API savepoint
249   -- SAVEPOINT       dump_ext_attrib_query_rec;
250 
251 PUT_LINE ('                                       ');
252 PUT_LINE ('Dumping the values for Extended Attribs Query Record:');
253 PUT_LINE ('                                       ');
254 PUT_LINE ('attribute_value_id          :'||p_ext_attrib_query_rec.attribute_value_id);
255 PUT_LINE ('instance_id                 :'||p_ext_attrib_query_rec.instance_id);
256 PUT_LINE ('attribute_id                :'||p_ext_attrib_query_rec.attribute_id);
257 
258 EXCEPTION
259         WHEN OTHERS THEN
260                -- ROLLBACK TO  dump_ext_attrib_query_rec;
261 
262                 IF      FND_MSG_PUB.Check_Msg_Level
263                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
264                 THEN
265                 FND_MSG_PUB.Add_Exc_Msg
266                 (       g_pkg_name          ,
267                         l_api_name
268                      );
269                 END IF;
270 END dump_ext_attrib_query_rec;
271 
272 
273 PROCEDURE dump_ou_query_rec
274      (p_ou_query_rec       IN  csi_datastructures_pub.organization_unit_query_rec)
275 IS
276         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_ou_query_rec';
277         l_api_version       CONSTANT NUMBER         := 1.0;
278 BEGIN
279 
280 -- Standard Start of API savepoint
281   -- SAVEPOINT       dump_ou_qurey_rec;
282 
283 PUT_LINE ('                                       ');
284 PUT_LINE ('Dumping the values for Org. Assignments Query Record:');
285 PUT_LINE ('                                       ');
286 PUT_LINE ('instance_ou_id              :'||p_ou_query_rec.instance_ou_id);
287 PUT_LINE ('instance_id                 :'||p_ou_query_rec.instance_id);
288 PUT_LINE ('operating_unit_id           :'||p_ou_query_rec.operating_unit_id);
289 PUT_LINE ('relationship_type_code      :'||p_ou_query_rec.relationship_type_code);
290 
291 EXCEPTION
292         WHEN OTHERS THEN
293                -- ROLLBACK TO  dump_ou_qurey_rec;
294 
295                 IF      FND_MSG_PUB.Check_Msg_Level
296                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
297                 THEN
298                 FND_MSG_PUB.Add_Exc_Msg
299                 (       g_pkg_name          ,
300                         l_api_name
301                      );
302                 END IF;
303 
304 END dump_ou_query_rec;
305 
306 PROCEDURE dump_instance_rec
307      (p_instance_rec       IN  csi_datastructures_pub.instance_rec)
308 IS
309         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_instance_rec';
310         l_api_version   CONSTANT NUMBER         := 1.0;
311 BEGIN
312 
313 -- Standard Start of API savepoint
314    --SAVEPOINT       dump_instance_rec;
315 
316 PUT_LINE ('                                       ');
317 PUT_LINE ('Dumping the values for Instance Record:');
318 PUT_LINE ('                                       ');
319 PUT_LINE ('instance_id                 :'||p_instance_rec.instance_id);
320 PUT_LINE ('instance_number             :'||p_instance_rec.instance_number);
321 PUT_LINE ('external_reference          :'||p_instance_rec.external_reference);
322 PUT_LINE ('inventory_item_id           :'||p_instance_rec.inventory_item_id);
323 PUT_LINE ('vld_organization_id         :'||p_instance_rec.vld_organization_id);
327 PUT_LINE ('mfg_serial_number_flag      :'||p_instance_rec.mfg_serial_number_flag);
324 PUT_LINE ('inventory_revision          :'||p_instance_rec.inventory_revision);
325 PUT_LINE ('inv_master_organization_id  :'||p_instance_rec.inv_master_organization_id);
326 PUT_LINE ('serial_number               :'||p_instance_rec.serial_number);
328 PUT_LINE ('lot_number                  :'||p_instance_rec.lot_number);
329 PUT_LINE ('quantity                    :'||p_instance_rec.quantity);
330 PUT_LINE ('unit_of_measure             :'||p_instance_rec.unit_of_measure);
331 PUT_LINE ('accounting_class_code       :'||p_instance_rec.accounting_class_code );
332 PUT_LINE ('instance_condition_id       :'||p_instance_rec.instance_condition_id);
333 PUT_LINE ('instance_status_id          :'||p_instance_rec.instance_status_id);
334 PUT_LINE ('customer_view_flag          :'||p_instance_rec.customer_view_flag);
335 PUT_LINE ('merchant_view_flag          :'||p_instance_rec.merchant_view_flag);
336 PUT_LINE ('sellable_flag               :'||p_instance_rec.sellable_flag);
337 PUT_LINE ('system_id                   :'||p_instance_rec.system_id);
338 PUT_LINE ('instance_type_code          :'||p_instance_rec.instance_type_code );
339 PUT_LINE ('active_start_date           :'||p_instance_rec.active_start_date);
340 PUT_LINE ('active_end_date             :'||p_instance_rec.active_end_date);
341 PUT_LINE ('location_type_code          :'||p_instance_rec.location_type_code );
342 PUT_LINE ('location_id                 :'||p_instance_rec.location_id );
343 PUT_LINE ('inv_organization_id         :'||p_instance_rec.inv_organization_id);
344 PUT_LINE ('inv_subinventory_name       :'||p_instance_rec.inv_subinventory_name);
345 PUT_LINE ('inv_locator_id              :'||p_instance_rec.inv_locator_id);
346 PUT_LINE ('pa_project_id               :'||p_instance_rec.pa_project_id);
347 PUT_LINE ('pa_project_task_id          :'||p_instance_rec.pa_project_task_id );
348 PUT_LINE ('in_transit_order_line_id    :'||p_instance_rec.in_transit_order_line_id);
349 PUT_LINE ('wip_job_id                  :'||p_instance_rec.wip_job_id);
350 PUT_LINE ('po_order_line_id            :'||p_instance_rec.po_order_line_id);
351 PUT_LINE ('last_oe_order_line_id       :'||p_instance_rec.last_oe_order_line_id );
352 PUT_LINE ('last_oe_rma_line_id         :'||p_instance_rec.last_oe_rma_line_id);
353 PUT_LINE ('last_po_po_line_id          :'||p_instance_rec.last_po_po_line_id);
354 PUT_LINE ('last_oe_po_number           :'||p_instance_rec.last_oe_po_number);
355 PUT_LINE ('last_wip_job_id             :'||p_instance_rec.last_wip_job_id );
356 PUT_LINE ('last_pa_project_id          :'||p_instance_rec.last_pa_project_id);
357 PUT_LINE ('last_pa_task_id             :'||p_instance_rec.last_pa_task_id);
358 PUT_LINE ('last_oe_agreement_id        :'||p_instance_rec.last_oe_agreement_id);
359 PUT_LINE ('install_date                :'||p_instance_rec.install_date);
360 PUT_LINE ('manually_created_flag       :'||p_instance_rec.manually_created_flag);
361 PUT_LINE ('return_by_date              :'||p_instance_rec.return_by_date);
362 PUT_LINE ('actual_return_date          :'||p_instance_rec.actual_return_date);
363 PUT_LINE ('creation_complete_flag      :'||p_instance_rec.creation_complete_flag);
364 PUT_LINE ('completeness_flag           :'||p_instance_rec.completeness_flag);
365 PUT_LINE ('version_label               :'||p_instance_rec.version_label);
366 PUT_LINE ('version_label_description   :'||p_instance_rec.version_label_description);
367 PUT_LINE ('context                     :'||p_instance_rec.context );
368 PUT_LINE ('attribute1                  :'||p_instance_rec.attribute1);
369 PUT_LINE ('attribute2                  :'||p_instance_rec.attribute2);
370 PUT_LINE ('attribute3                  :'||p_instance_rec.attribute3);
371 PUT_LINE ('attribute4                  :'||p_instance_rec.attribute4);
372 PUT_LINE ('attribute5                  :'||p_instance_rec.attribute5);
373 PUT_LINE ('attribute6                  :'||p_instance_rec.attribute6);
374 PUT_LINE ('attribute7                  :'||p_instance_rec.attribute7);
375 PUT_LINE ('attribute8                  :'||p_instance_rec.attribute8);
376 PUT_LINE ('attribute9                  :'||p_instance_rec.attribute9);
377 PUT_LINE ('attribute10                 :'||p_instance_rec.attribute10);
378 PUT_LINE ('attribute11                 :'||p_instance_rec.attribute11);
379 PUT_LINE ('attribute12                 :'||p_instance_rec.attribute12);
380 PUT_LINE ('attribute13                 :'||p_instance_rec.attribute13);
381 PUT_LINE ('attribute14                 :'||p_instance_rec.attribute14);
382 PUT_LINE ('attribute15                 :'||p_instance_rec.attribute15);
383 PUT_LINE ('attribute16                 :'||p_instance_rec.attribute16);
384 PUT_LINE ('attribute17                 :'||p_instance_rec.attribute17);
385 PUT_LINE ('attribute18                 :'||p_instance_rec.attribute18);
386 PUT_LINE ('attribute19                 :'||p_instance_rec.attribute19);
387 PUT_LINE ('attribute20                 :'||p_instance_rec.attribute20);
388 PUT_LINE ('attribute21                 :'||p_instance_rec.attribute21);
389 PUT_LINE ('attribute22                 :'||p_instance_rec.attribute22);
390 PUT_LINE ('attribute23                 :'||p_instance_rec.attribute23);
391 PUT_LINE ('attribute24                 :'||p_instance_rec.attribute24);
392 PUT_LINE ('attribute25                 :'||p_instance_rec.attribute25);
393 PUT_LINE ('attribute26                 :'||p_instance_rec.attribute26);
394 PUT_LINE ('attribute27                 :'||p_instance_rec.attribute27);
395 PUT_LINE ('attribute28                 :'||p_instance_rec.attribute28);
396 PUT_LINE ('attribute29                 :'||p_instance_rec.attribute29);
397 PUT_LINE ('attribute30                 :'||p_instance_rec.attribute30);
398 PUT_LINE ('object_version_number       :'||p_instance_rec.object_version_number);
402 PUT_LINE ('instance_usage_code         :'||p_instance_rec.instance_usage_code);
399 PUT_LINE ('last_txn_line_detail_id     :'||p_instance_rec.last_txn_line_detail_id);
400 PUT_LINE ('install_location_type_code  :'||p_instance_rec.install_location_type_code);
401 PUT_LINE ('install_location_id         :'||p_instance_rec.install_location_id);
403 PUT_LINE ('config_inst_hdr_id          :'||p_instance_rec.config_inst_hdr_id);
404 PUT_LINE ('config_inst_rev_num         :'||p_instance_rec.config_inst_rev_num);
405 PUT_LINE ('config_inst_item_id         :'||p_instance_rec.config_inst_item_id);
406 PUT_LINE ('config_valid_status         :'||p_instance_rec.config_valid_status);
407 PUT_LINE ('instance_description        :'||p_instance_rec.instance_description);
408 PUT_LINE ('call_contracts              :'||p_instance_rec.call_contracts);
409 PUT_LINE ('network_asset_flag          :'||p_instance_rec.network_asset_flag);
410 PUT_LINE ('maintainable_flag           :'||p_instance_rec.maintainable_flag);
411 PUT_LINE ('pn_location_id              :'||p_instance_rec.pn_location_id);
412 PUT_LINE ('asset_criticality_code      :'||p_instance_rec.asset_criticality_code);
413 PUT_LINE ('category_id                 :'||p_instance_rec.category_id);
414 PUT_LINE ('equipment_gen_object_id     :'||p_instance_rec.equipment_gen_object_id);
415 PUT_LINE ('instantiation_flag          :'||p_instance_rec.instantiation_flag);
416 PUT_LINE ('linear_location_id          :'||p_instance_rec.linear_location_id);
417 PUT_LINE ('operational_log_flag        :'||p_instance_rec.operational_log_flag);
418 PUT_LINE ('checkin_status              :'||p_instance_rec.checkin_status);
419 PUT_LINE ('supplier_warranty_exp_date  :'||p_instance_rec.supplier_warranty_exp_date);
420 PUT_LINE ('purchase_unit_price         :'||p_instance_rec.purchase_unit_price);
421 PUT_LINE ('purchase_currency_code      :'||p_instance_rec.purchase_currency_code);
422 PUT_LINE ('payables_unit_price         :'||p_instance_rec.payables_unit_price);
423 PUT_LINE ('payables_currency_code      :'||p_instance_rec.payables_currency_code);
424 PUT_LINE ('sales_unit_price            :'||p_instance_rec.sales_unit_price);
425 PUT_LINE ('sales_currency_code         :'||p_instance_rec.sales_currency_code);
426 PUT_LINE ('operational_status_code     :'||p_instance_rec.operational_status_code);
427 EXCEPTION
428         WHEN OTHERS THEN
429                 -- ROLLBACK TO  dump_instance_rec;
430 
431                 IF      FND_MSG_PUB.Check_Msg_Level
432                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
433                 THEN
434                 FND_MSG_PUB.Add_Exc_Msg
435                 (       g_pkg_name          ,
436                         l_api_name
437                      );
438                 END IF;
439 
440 END dump_instance_rec;
441 
442 
443 PROCEDURE dump_instance_query_rec
444      (p_instance_query_rec       IN  csi_datastructures_pub.instance_query_rec)
445 IS
446         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_instance_query_rec';
447         l_api_version   CONSTANT NUMBER         := 1.0;
448 BEGIN
449 
450 -- Standard Start of API savepoint
451   -- SAVEPOINT       dump_instance_query_rec;
452 
453 PUT_LINE ('                                       ');
454 PUT_LINE ('Dumping the values for Instance Query Record ');
455 PUT_LINE ('                                       ');
456 PUT_LINE ('instance_id                 :'||p_instance_query_rec.instance_id  );
457 PUT_LINE ('inventory_item_id           :'||p_instance_query_rec.inventory_item_id);
458 PUT_LINE ('inventory_revision          :'||p_instance_query_rec.inventory_revision);
459 PUT_LINE ('inv_master_organization_id  :'||p_instance_query_rec.inv_master_organization_id);
460 PUT_LINE ('serial_number               :'||p_instance_query_rec.serial_number);
461 PUT_LINE ('lot_number                  :'||p_instance_query_rec.lot_number);
462 PUT_LINE ('unit_of_measure             :'||p_instance_query_rec.unit_of_measure);
463 PUT_LINE ('instance_condition_id       :'||p_instance_query_rec.instance_condition_id);
464 PUT_LINE ('instance_status_id          :'||p_instance_query_rec.instance_status_id);
465 PUT_LINE ('system_id                   :'||p_instance_query_rec.system_id);
466 PUT_LINE ('instance_type_code          :'||p_instance_query_rec.instance_type_code );
467 PUT_LINE ('location_type_code          :'||p_instance_query_rec.location_type_code );
468 PUT_LINE ('location_id                 :'||p_instance_query_rec.location_id );
469 PUT_LINE ('inv_organization_id         :'||p_instance_query_rec.inv_organization_id);
470 PUT_LINE ('inv_subinventory_name       :'||p_instance_query_rec.inv_subinventory_name);
471 PUT_LINE ('inv_locator_id              :'||p_instance_query_rec.inv_locator_id);
472 PUT_LINE ('pa_project_id               :'||p_instance_query_rec.pa_project_id);
473 PUT_LINE ('pa_project_task_id          :'||p_instance_query_rec.pa_project_task_id );
474 PUT_LINE ('in_transit_order_line_id    :'||p_instance_query_rec.in_transit_order_line_id);
475 PUT_LINE ('wip_job_id                  :'||p_instance_query_rec.wip_job_id);
476 PUT_LINE ('po_order_line_id            :'||p_instance_query_rec.po_order_line_id);
477 PUT_LINE ('last_oe_order_line_id       :'||p_instance_query_rec.last_oe_order_line_id );
478 PUT_LINE ('last_oe_rma_line_id         :'||p_instance_query_rec.last_oe_rma_line_id);
479 PUT_LINE ('last_po_po_line_id          :'||p_instance_query_rec.last_po_po_line_id);
480 PUT_LINE ('last_oe_po_number           :'||p_instance_query_rec.last_oe_po_number);
481 PUT_LINE ('last_wip_job_id             :'||p_instance_query_rec.last_wip_job_id );
482 PUT_LINE ('last_pa_project_id          :'||p_instance_query_rec.last_pa_project_id);
483 PUT_LINE ('last_pa_task_id             :'||p_instance_query_rec.last_pa_task_id);
487 PUT_LINE ('return_by_date              :'||p_instance_query_rec.return_by_date);
484 PUT_LINE ('last_oe_agreement_id        :'||p_instance_query_rec.last_oe_agreement_id);
485 PUT_LINE ('install_date                :'||p_instance_query_rec.install_date);
486 PUT_LINE ('manually_created_flag       :'||p_instance_query_rec.manually_created_flag);
488 PUT_LINE ('actual_return_date          :'||p_instance_query_rec.actual_return_date);
489 PUT_LINE ('instance_usage_code         :'||p_instance_query_rec.instance_usage_code);
490 PUT_LINE ('config_inst_hdr_id          :'||p_instance_query_rec.config_inst_hdr_id);
491 PUT_LINE ('config_inst_rev_num         :'||p_instance_query_rec.config_inst_rev_num);
492 PUT_LINE ('config_inst_item_id         :'||p_instance_query_rec.config_inst_item_id);
493 PUT_LINE ('instance_description        :'||p_instance_query_rec.instance_description);
494 PUT_LINE ('operational_status_code     :'||p_instance_query_rec.operational_status_code);
495 EXCEPTION
496         WHEN OTHERS THEN
497    --             ROLLBACK TO  dump_instance_query_rec;
498 
499                 IF      FND_MSG_PUB.Check_Msg_Level
500                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
501                 THEN
502                 FND_MSG_PUB.Add_Exc_Msg
503                 (       g_pkg_name          ,
504                         l_api_name
505                      );
506                 END IF;
507 
508 END dump_instance_query_rec;
509 
510 
511 PROCEDURE dump_instance_header_rec
512      (p_instance_header_rec  IN  csi_datastructures_pub.instance_header_rec)
513 IS
514         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_instance_header_rec';
515         l_api_version   CONSTANT NUMBER         := 1.0;
516 BEGIN
517 
518 -- Standard Start of API savepoint
519   -- SAVEPOINT       dump_instance_header_rec;
520 
521 PUT_LINE ('                                       ');
522 PUT_LINE ('Dumping the values for Instance Header Record:');
523 PUT_LINE ('                                       ');
524 PUT_LINE ('instance_id                 :'||p_instance_header_rec.instance_id  );
525 PUT_LINE ('instance_number             :'||p_instance_header_rec.instance_number);
526 PUT_LINE ('external_reference          :'||p_instance_header_rec.external_reference);
527 --PUT_LINE ('item_description            :'||p_instance_header_rec.item_description);
528 PUT_LINE ('inventory_item_id           :'||p_instance_header_rec.inventory_item_id);
529 PUT_LINE ('inventory_revision          :'||p_instance_header_rec.inventory_revision);
530 PUT_LINE ('inv_master_organization_id  :'||p_instance_header_rec.inv_master_organization_id);
531 PUT_LINE ('serial_number               :'||p_instance_header_rec.serial_number);
532 PUT_LINE ('mfg_serial_number_flag      :'||p_instance_header_rec.mfg_serial_number_flag);
533 PUT_LINE ('lot_number                  :'||p_instance_header_rec.lot_number);
534 PUT_LINE ('quantity                    :'||p_instance_header_rec.quantity);
535 --PUT_LINE ('unit_of_measure_name        :'||p_instance_header_rec.unit_of_measure_name);
536 PUT_LINE ('unit_of_measure             :'||p_instance_header_rec.unit_of_measure);
537 PUT_LINE ('accounting_class            :'||p_instance_header_rec.accounting_class);
538 PUT_LINE ('accounting_class_code       :'||p_instance_header_rec.accounting_class_code );
539 PUT_LINE ('instance_condition          :'||p_instance_header_rec.instance_condition);
540 PUT_LINE ('instance_condition_id       :'||p_instance_header_rec.instance_condition_id);
541 PUT_LINE ('instance_status             :'||p_instance_header_rec.instance_status);
542 PUT_LINE ('instance_status_id          :'||p_instance_header_rec.instance_status_id);
543 PUT_LINE ('customer_view_flag          :'||p_instance_header_rec.customer_view_flag);
544 PUT_LINE ('merchant_view_flag          :'||p_instance_header_rec.merchant_view_flag);
545 PUT_LINE ('sellable_flag               :'||p_instance_header_rec.sellable_flag);
546 PUT_LINE ('system_id                   :'||p_instance_header_rec.system_id);
547 PUT_LINE ('system_name                 :'||p_instance_header_rec.system_name);
548 PUT_LINE ('instance_type_code          :'||p_instance_header_rec.instance_type_code );
549 PUT_LINE ('instance_type_name          :'||p_instance_header_rec.instance_type_name);
550 PUT_LINE ('active_start_date           :'||p_instance_header_rec.active_start_date);
551 PUT_LINE ('active_end_date             :'||p_instance_header_rec.active_end_date);
552 PUT_LINE ('location_type_code          :'||p_instance_header_rec.location_type_code );
553 --PUT_LINE ('location_description        :'||p_instance_header_rec.location_description);
554 PUT_LINE ('location_id                 :'||p_instance_header_rec.location_id );
555 PUT_LINE ('inv_organization_id         :'||p_instance_header_rec.inv_organization_id);
556 PUT_LINE ('inv_organization_name       :'||p_instance_header_rec.inv_organization_name);
557 --PUT_LINE ('inv_description             :'||p_instance_header_rec.inv_description);
558 PUT_LINE ('inv_subinventory_name       :'||p_instance_header_rec.inv_subinventory_name);
559 PUT_LINE ('inv_locator_id              :'||p_instance_header_rec.inv_locator_id);
560 --PUT_LINE ('pa_task_description         :'||p_instance_header_rec.pa_task_description);
561 PUT_LINE ('pa_project_id               :'||p_instance_header_rec.pa_project_id);
562 PUT_LINE ('pa_project_task_id          :'||p_instance_header_rec.pa_project_task_id );
563 PUT_LINE ('pa_project_name             :'||p_instance_header_rec.pa_project_name );
564 PUT_LINE ('pa_project_number           :'||p_instance_header_rec.pa_project_number );
565 PUT_LINE ('pa_task_name                :'||p_instance_header_rec.pa_task_name );
566 PUT_LINE ('pa_task_number              :'||p_instance_header_rec.pa_task_number );
567 --PUT_LINE ('oe_line_item_input          :'||p_instance_header_rec.oe_line_item_input);
571 PUT_LINE ('wip_entity_name             :'||p_instance_header_rec.wip_entity_name);
568 PUT_LINE ('in_transit_order_line_id    :'||p_instance_header_rec.in_transit_order_line_id);
569 PUT_LINE ('in_transit_order_line_number:'||p_instance_header_rec.in_transit_order_line_number);
570 PUT_LINE ('in_transit_order_number     :'||p_instance_header_rec.in_transit_order_number);
572 PUT_LINE ('wip_job_id                  :'||p_instance_header_rec.wip_job_id);
573 --PUT_LINE ('wip_entity_description      :'||p_instance_header_rec.wip_entity_description);
574 --PUT_LINE ('po_item_description         :'||p_instance_header_rec.po_item_description);
575 PUT_LINE ('po_order_line_id            :'||p_instance_header_rec.po_order_line_id);
576 PUT_LINE ('last_oe_order_line_id       :'||p_instance_header_rec.last_oe_order_line_id );
577 PUT_LINE ('last_oe_rma_line_id         :'||p_instance_header_rec.last_oe_rma_line_id);
578 PUT_LINE ('last_po_po_line_id          :'||p_instance_header_rec.last_po_po_line_id);
579 PUT_LINE ('last_oe_po_number           :'||p_instance_header_rec.last_oe_po_number);
580 PUT_LINE ('last_wip_job_id             :'||p_instance_header_rec.last_wip_job_id );
581 PUT_LINE ('last_pa_project_id          :'||p_instance_header_rec.last_pa_project_id);
582 PUT_LINE ('last_pa_task_id             :'||p_instance_header_rec.last_pa_task_id);
583 PUT_LINE ('last_oe_agreement_id        :'||p_instance_header_rec.last_oe_agreement_id);
584 PUT_LINE ('install_date                :'||p_instance_header_rec.install_date);
585 PUT_LINE ('manually_created_flag       :'||p_instance_header_rec.manually_created_flag);
586 PUT_LINE ('return_by_date              :'||p_instance_header_rec.return_by_date);
587 PUT_LINE ('actual_return_date          :'||p_instance_header_rec.actual_return_date);
588 PUT_LINE ('creation_complete_flag      :'||p_instance_header_rec.creation_complete_flag);
589 PUT_LINE ('completeness_flag           :'||p_instance_header_rec.completeness_flag);
590 PUT_LINE ('context                     :'||p_instance_header_rec.context );
591 PUT_LINE ('attribute1                  :'||p_instance_header_rec.attribute1);
592 PUT_LINE ('attribute2                  :'||p_instance_header_rec.attribute2);
593 PUT_LINE ('attribute3                  :'||p_instance_header_rec.attribute3);
594 PUT_LINE ('attribute4                  :'||p_instance_header_rec.attribute4);
595 PUT_LINE ('attribute5                  :'||p_instance_header_rec.attribute5);
596 PUT_LINE ('attribute6                  :'||p_instance_header_rec.attribute6);
597 PUT_LINE ('attribute7                  :'||p_instance_header_rec.attribute7);
598 PUT_LINE ('attribute8                  :'||p_instance_header_rec.attribute8);
599 PUT_LINE ('attribute9                  :'||p_instance_header_rec.attribute9);
600 PUT_LINE ('attribute10                 :'||p_instance_header_rec.attribute10);
601 PUT_LINE ('attribute11                 :'||p_instance_header_rec.attribute11);
602 PUT_LINE ('attribute12                 :'||p_instance_header_rec.attribute12);
603 PUT_LINE ('attribute13                 :'||p_instance_header_rec.attribute13);
604 PUT_LINE ('attribute14                 :'||p_instance_header_rec.attribute14);
605 PUT_LINE ('attribute15                 :'||p_instance_header_rec.attribute15);
606 PUT_LINE ('attribute16                 :'||p_instance_header_rec.attribute16);
607 PUT_LINE ('attribute17                 :'||p_instance_header_rec.attribute17);
608 PUT_LINE ('attribute18                 :'||p_instance_header_rec.attribute18);
609 PUT_LINE ('attribute19                 :'||p_instance_header_rec.attribute19);
610 PUT_LINE ('attribute20                 :'||p_instance_header_rec.attribute20);
611 PUT_LINE ('attribute21                 :'||p_instance_header_rec.attribute21);
612 PUT_LINE ('attribute22                 :'||p_instance_header_rec.attribute22);
613 PUT_LINE ('attribute23                 :'||p_instance_header_rec.attribute23);
614 PUT_LINE ('attribute24                 :'||p_instance_header_rec.attribute24);
615 PUT_LINE ('attribute25                 :'||p_instance_header_rec.attribute25);
616 PUT_LINE ('attribute26                 :'||p_instance_header_rec.attribute26);
617 PUT_LINE ('attribute27                 :'||p_instance_header_rec.attribute27);
618 PUT_LINE ('attribute28                 :'||p_instance_header_rec.attribute28);
619 PUT_LINE ('attribute29                 :'||p_instance_header_rec.attribute29);
620 PUT_LINE ('attribute30                 :'||p_instance_header_rec.attribute30);
621 PUT_LINE ('object_version_number       :'||p_instance_header_rec.object_version_number);
622 PUT_LINE ('last_txn_line_detail_id     :'||p_instance_header_rec.last_txn_line_detail_id);
623 PUT_LINE ('install_location_type_code  :'||p_instance_header_rec.install_location_type_code);
624 PUT_LINE ('install_location_id         :'||p_instance_header_rec.install_location_id);
625 PUT_LINE ('instance_usage_code         :'||p_instance_header_rec.instance_usage_code);
626 PUT_LINE ('current_loc_address1        :'||p_instance_header_rec.current_loc_address1);
627 PUT_LINE ('current_loc_address2        :'||p_instance_header_rec.current_loc_address2);
628 PUT_LINE ('current_loc_address3        :'||p_instance_header_rec.current_loc_address3);
629 PUT_LINE ('current_loc_address4        :'||p_instance_header_rec.current_loc_address4);
630 PUT_LINE ('current_loc_city            :'||p_instance_header_rec.current_loc_city);
631 PUT_LINE ('current_loc_state           :'||p_instance_header_rec.current_loc_state);
632 PUT_LINE ('current_loc_postal_code     :'||p_instance_header_rec.current_loc_postal_code);
633 PUT_LINE ('current_loc_country         :'||p_instance_header_rec.current_loc_country);
634 PUT_LINE ('sales_order_number          :'||p_instance_header_rec.sales_order_number);
635 PUT_LINE ('sales_order_line_number     :'||p_instance_header_rec.sales_order_line_number);
636 PUT_LINE ('sales_order_date            :'||p_instance_header_rec.sales_order_date);
637 PUT_LINE ('purchase_order_number       :'||p_instance_header_rec.purchase_order_number);
638 PUT_LINE ('instance_usage_name         :'||p_instance_header_rec.instance_usage_name);
642 PUT_LINE ('install_loc_address4        :'||p_instance_header_rec.install_loc_address4);
639 PUT_LINE ('install_loc_address1        :'||p_instance_header_rec.install_loc_address1);
640 PUT_LINE ('install_loc_address2        :'||p_instance_header_rec.install_loc_address2);
641 PUT_LINE ('install_loc_address3        :'||p_instance_header_rec.install_loc_address3);
643 PUT_LINE ('install_loc_city            :'||p_instance_header_rec.install_loc_city);
644 PUT_LINE ('install_loc_state           :'||p_instance_header_rec.install_loc_state);
645 PUT_LINE ('install_loc_postal_code     :'||p_instance_header_rec.install_loc_postal_code);
646 PUT_LINE ('install_loc_country         :'||p_instance_header_rec.install_loc_country);
647 PUT_LINE ('vld_organization_id         :'||p_instance_header_rec.vld_organization_id);
648 PUT_LINE ('current_loc_number          :'||p_instance_header_rec.current_loc_number);
649 PUT_LINE ('install_loc_number          :'||p_instance_header_rec.install_loc_number);
650 PUT_LINE ('config_inst_hdr_id          :'||p_instance_header_rec.config_inst_hdr_id);
651 PUT_LINE ('config_inst_rev_num         :'||p_instance_header_rec.config_inst_rev_num);
652 PUT_LINE ('config_inst_item_id         :'||p_instance_header_rec.config_inst_item_id);
653 PUT_LINE ('config_valid_status         :'||p_instance_header_rec.config_valid_status);
654 PUT_LINE ('instance_description        :'||p_instance_header_rec.instance_description);
655 PUT_LINE ('start_loc_address1          :'||p_instance_header_rec.start_loc_address1);
656 PUT_LINE ('start_loc_address2          :'||p_instance_header_rec.start_loc_address2);
657 PUT_LINE ('start_loc_address3          :'||p_instance_header_rec.start_loc_address3);
658 PUT_LINE ('start_loc_address4          :'||p_instance_header_rec.start_loc_address4);
659 PUT_LINE ('start_loc_city              :'||p_instance_header_rec.start_loc_city);
660 PUT_LINE ('start_loc_state             :'||p_instance_header_rec.start_loc_state);
661 PUT_LINE ('start_loc_postal_code       :'||p_instance_header_rec.start_loc_postal_code);
662 PUT_LINE ('start_loc_country           :'||p_instance_header_rec.start_loc_country);
663 PUT_LINE ('end_loc_address1            :'||p_instance_header_rec.end_loc_address1);
664 PUT_LINE ('end_loc_address2            :'||p_instance_header_rec.end_loc_address2);
665 PUT_LINE ('end_loc_address3            :'||p_instance_header_rec.end_loc_address3);
666 PUT_LINE ('end_loc_address4            :'||p_instance_header_rec.end_loc_address4);
667 PUT_LINE ('end_loc_city                :'||p_instance_header_rec.end_loc_city);
668 PUT_LINE ('end_loc_state               :'||p_instance_header_rec.end_loc_state);
669 PUT_LINE ('end_loc_postal_code         :'||p_instance_header_rec.end_loc_postal_code);
670 PUT_LINE ('end_loc_country             :'||p_instance_header_rec.end_loc_country);
671 PUT_LINE ('network_asset_flag          :'||p_instance_header_rec.network_asset_flag);
672 PUT_LINE ('maintainable_flag           :'||p_instance_header_rec.maintainable_flag);
673 PUT_LINE ('pn_location_id              :'||p_instance_header_rec.pn_location_id);
674 PUT_LINE ('asset_criticality_code      :'||p_instance_header_rec.asset_criticality_code);
675 PUT_LINE ('category_id                 :'||p_instance_header_rec.category_id);
676 PUT_LINE ('equipment_gen_object_id     :'||p_instance_header_rec.equipment_gen_object_id);
677 PUT_LINE ('instantiation_flag          :'||p_instance_header_rec.instantiation_flag);
678 PUT_LINE ('linear_location_id          :'||p_instance_header_rec.linear_location_id);
679 PUT_LINE ('operational_log_flag        :'||p_instance_header_rec.operational_log_flag);
680 PUT_LINE ('checkin_status              :'||p_instance_header_rec.checkin_status);
681 PUT_LINE ('supplier_warranty_exp_date  :'||p_instance_header_rec.supplier_warranty_exp_date);
682 PUT_LINE ('purchase_unit_price         :'||p_instance_header_rec.purchase_unit_price);
683 PUT_LINE ('purchase_currency_code      :'||p_instance_header_rec.purchase_currency_code);
684 PUT_LINE ('payables_unit_price         :'||p_instance_header_rec.payables_unit_price);
685 PUT_LINE ('payables_currency_code      :'||p_instance_header_rec.payables_currency_code);
686 PUT_LINE ('sales_unit_price            :'||p_instance_header_rec.sales_unit_price);
687 PUT_LINE ('sales_currency_code         :'||p_instance_header_rec.sales_currency_code);
688 PUT_LINE ('operational_status_code     :'||p_instance_header_rec.operational_status_code);
689 EXCEPTION
690         WHEN OTHERS THEN
691         --        ROLLBACK TO  dump_instance_header_rec;
692 
693                 IF      FND_MSG_PUB.Check_Msg_Level
694                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
695                 THEN
696                 FND_MSG_PUB.Add_Exc_Msg
697                 (       g_pkg_name          ,
698                         l_api_name
699                      );
700                 END IF;
701 
702 END dump_instance_header_rec;
703 
704 
705 
706 PROCEDURE dump_txn_rec
707      (p_txn_rec             IN  csi_datastructures_pub.transaction_rec)
708 IS
709         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_txn_rec';
710         l_api_version       CONSTANT NUMBER         := 1.0;
711 BEGIN
712 
713 -- Standard Start of API savepoint
714 --   SAVEPOINT       dump_txn_rec;
715 
716 put_line('                                       ');
717 put_line('Dumping the values for Transaction Record:');
718 put_line('                                       ');
719 put_line('transaction_id               : '|| p_txn_rec.transaction_id );
720 put_line('transaction_date             : '|| p_txn_rec.transaction_date );
721 put_line('source_transaction_date      : '|| p_txn_rec.source_transaction_date );
722 put_line('transaction_type_id          : '|| p_txn_rec.transaction_type_id );
723 put_line('txn_sub_type_id              : '|| p_txn_rec.txn_sub_type_id );
724 put_line('source_group_ref_id          : '|| p_txn_rec.source_group_ref_id );
728 put_line('source_line_ref_id           : '|| p_txn_rec.source_line_ref_id );
725 put_line('source_group_ref             : '|| p_txn_rec.source_group_ref );
726 put_line('source_header_ref_id         : '|| p_txn_rec.source_header_ref_id );
727 put_line('source_header_ref            : '|| p_txn_rec.source_header_ref );
729 put_line('source_line_ref              : '|| p_txn_rec.source_line_ref );
730 put_line('source_dist_ref_id1          : '|| p_txn_rec.source_dist_ref_id1 );
731 put_line('source_dist_ref_id2          : '|| p_txn_rec.source_dist_ref_id2 );
732 put_line('inv_material_transaction_id  : '|| p_txn_rec.inv_material_transaction_id );
733 put_line('transaction_quantity         : '|| p_txn_rec.transaction_quantity );
734 put_line('transaction_uom_code         : '|| p_txn_rec.transaction_uom_code );
735 put_line('transacted_by                : '|| p_txn_rec.transacted_by );
736 put_line('transaction_status_code      : '|| p_txn_rec.transaction_status_code );
737 put_line('transaction_action_code      : '|| p_txn_rec.transaction_action_code );
738 put_line('message_id                   : '|| p_txn_rec.message_id );
739 put_line('context                      : '|| p_txn_rec.context );
740 put_line('attribute1                   : '|| p_txn_rec.attribute1 );
741 put_line('attribute2                   : '|| p_txn_rec.attribute2 );
742 put_line('attribute3                   : '|| p_txn_rec.attribute3 );
743 put_line('attribute4                   : '|| p_txn_rec.attribute4 );
744 put_line('attribute5                   : '|| p_txn_rec.attribute5 );
745 put_line('attribute6                   : '|| p_txn_rec.attribute6 );
746 put_line('attribute7                   : '|| p_txn_rec.attribute7 );
747 put_line('attribute8                   : '|| p_txn_rec.attribute8 );
748 put_line('attribute9                   : '|| p_txn_rec.attribute9 );
749 put_line('attribute10                  : '|| p_txn_rec.attribute10 );
750 put_line('attribute11                  : '|| p_txn_rec.attribute11 );
751 put_line('attribute12                  : '|| p_txn_rec.attribute12 );
752 put_line('attribute13                  : '|| p_txn_rec.attribute13 );
753 put_line('attribute14                  : '|| p_txn_rec.attribute14 );
754 put_line('attribute15                  : '|| p_txn_rec.attribute15 );
755 put_line('object_version_number        : '|| p_txn_rec.object_version_number);
756 put_line('split_reason_code            : '|| p_txn_rec.split_reason_code);
757 put_line('gl_interface_status_code     : '|| p_txn_rec.gl_interface_status_code);
758 
759 EXCEPTION
760         WHEN OTHERS THEN
761 --                ROLLBACK TO  dump_txn_rec;
762 
763                 IF      FND_MSG_PUB.Check_Msg_Level
764                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
765                 THEN
766                 FND_MSG_PUB.Add_Exc_Msg
767                 (       G_PKG_NAME          ,
768                         l_api_name
769                      );
770                 END IF;
771 
772 END dump_txn_rec;
773 
774 PROCEDURE dump_txn_tbl
775       (p_txn_tbl             IN  csi_datastructures_pub.transaction_tbl)
776 IS
777         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_txn_tbl';
778         l_api_version       CONSTANT NUMBER         := 1.0;
779 BEGIN
780 
781         -- Standard Start of API savepoint
782   --      SAVEPOINT       dump_txn_tbl;
783         IF p_txn_tbl.COUNT > 0 THEN
784            FOR tab_row IN p_txn_tbl.FIRST .. p_txn_tbl.LAST
785            LOOP
786              IF p_txn_tbl.EXISTS(tab_row) THEN
787                    dump_txn_rec(p_txn_rec => p_txn_tbl(tab_row));
788              END IF;
789            END LOOP;
790          END IF;
791 
792 
793 
794 EXCEPTION
795         WHEN OTHERS THEN
796       --          ROLLBACK TO  dump_txn_tbl;
797 
798                 IF      FND_MSG_PUB.Check_Msg_Level
799                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
800                 THEN
801                 FND_MSG_PUB.Add_Exc_Msg
802                 (       G_PKG_NAME          ,
803                         l_api_name
804                      );
805                 END IF;
806 
807 END dump_txn_tbl;
808 
809 PROCEDURE dump_txn_query_rec
810      (p_txn_query_rec             IN  csi_datastructures_pub.transaction_query_rec)
811 IS
812         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_txn_query_rec';
813         l_api_version       CONSTANT NUMBER         := 1.0;
814 BEGIN
815 
816 -- Standard Start of API savepoint
817  --  SAVEPOINT       dump_txn_query_rec;
818 
819 put_line('                                       ');
820 put_line('Dumping the values for Transaction query Record:');
821 put_line('                                       ');
822 put_line('transaction_id               : '|| p_txn_query_rec.transaction_id );
823 put_line('transaction_type_id          : '|| p_txn_query_rec.transaction_type_id );
824 put_line('source_group_ref_id          : '|| p_txn_query_rec.source_group_ref_id );
825 put_line('source_group_ref             : '|| p_txn_query_rec.source_group_ref );
826 put_line('source_header_ref_id         : '|| p_txn_query_rec.source_header_ref_id );
827 put_line('source_header_ref            : '|| p_txn_query_rec.source_header_ref );
828 put_line('source_line_ref_id           : '|| p_txn_query_rec.source_line_ref_id );
829 put_line('source_line_ref              : '|| p_txn_query_rec.source_line_ref );
830 put_line('source_transaction_date      : '|| p_txn_query_rec.source_transaction_date );
831 put_line('inv_material_transaction_id  : '|| p_txn_query_rec.inv_material_transaction_id );
832 put_line('message_id                   : '|| p_txn_query_rec.message_id );
836 put_line('txn_sub_type_id              : '|| p_txn_query_rec.txn_sub_type_id );
833 put_line('transaction_start_date       : '|| p_txn_query_rec.transaction_start_date );
834 put_line('transaction_end_date         : '|| p_txn_query_rec.transaction_end_date );
835 put_line('instance_id                  : '|| p_txn_query_rec.instance_id );
837 put_line('transaction_status_code      : '|| p_txn_query_rec.transaction_status_code );
838 
839 
840 EXCEPTION
841         WHEN OTHERS THEN
842      --           ROLLBACK TO  dump_txn_query_rec;
843 
844                 IF      FND_MSG_PUB.Check_Msg_Level
845                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
846                 THEN
847                 FND_MSG_PUB.Add_Exc_Msg
848                 (       G_PKG_NAME          ,
849                         l_api_name
850                      );
851                 END IF;
852 
853 END dump_txn_query_rec;
854 
855 PROCEDURE dump_txn_sort_rec
856      (p_txn_sort_rec             IN  csi_datastructures_pub.transaction_sort_rec)
857 IS
858         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_txn_query_rec';
859         l_api_version       CONSTANT NUMBER         := 1.0;
860 BEGIN
861 
862 -- Standard Start of API savepoint
863  --  SAVEPOINT       dump_txn_sort_rec;
864 
865 put_line('                                       ');
866 put_line('Dumping the values for Transaction sort Record:');
867 put_line('                                       ');
868 put_line('transaction_date             : '||p_txn_sort_rec.transaction_date );
869 put_line('transaction_type_id          : '||p_txn_sort_rec.transaction_type_id );
870 
871 EXCEPTION
872         WHEN OTHERS THEN
873          --       ROLLBACK TO  dump_txn_sort_rec;
874 
875                 IF      FND_MSG_PUB.Check_Msg_Level
876                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
877                 THEN
878                 FND_MSG_PUB.Add_Exc_Msg
879                 (       G_PKG_NAME          ,
880                         l_api_name
881                      );
882                 END IF;
883 
884 END dump_txn_sort_rec;
885 
886 PROCEDURE dump_txn_error_rec
887      (p_txn_error_rec             IN  csi_datastructures_pub.transaction_error_rec)
888 IS
889         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_txn_error_rec';
890         l_api_version   CONSTANT NUMBER         := 1.0;
891 BEGIN
892 
893 -- Standard Start of API savepoint
894 --   SAVEPOINT       dump_txn_error_rec;
895 
896 put_line('                                       ');
897 put_line('Dumping the values for Transaction Error Record:');
898 put_line('                                       ');
899 put_line('transaction_error_id         : '|| p_txn_error_rec.transaction_error_id );
900 put_line('transaction_id               : '|| p_txn_error_rec.transaction_id );
901 put_line('message_id                   : '|| p_txn_error_rec.message_id );
902 put_line('error_text                   : '|| p_txn_error_rec.error_text );
903 put_line('source_type                  : '|| p_txn_error_rec.source_type );
904 put_line('source_id                    : '|| p_txn_error_rec.source_id );
905 put_line('processed_flag               : '|| p_txn_error_rec.processed_flag );
906 put_line('object_version_number        : '|| p_txn_error_rec.object_version_number );
907 put_line('transaction_type_id          : '|| p_txn_error_rec.transaction_type_id );
908 put_line('source_group_ref                     : '|| p_txn_error_rec.source_group_ref );
909 put_line('source_group_ref_id          : '|| p_txn_error_rec.source_group_ref_id );
910 put_line('source_header_ref                    : '|| p_txn_error_rec.source_header_ref );
911 put_line('source_header_ref_id         : '|| p_txn_error_rec.source_header_ref_id );
912 put_line('source_line_ref                      : '|| p_txn_error_rec.source_line_ref );
913 put_line('source_line_ref_id               : '|| p_txn_error_rec.source_line_ref_id );
914 put_line('source_dist_ref_id1              : '|| p_txn_error_rec.source_dist_ref_id1 );
915 put_line('source_dist_ref_id2              : '|| p_txn_error_rec.source_dist_ref_id2 );
916 put_line('inv_material_transaction_id  : '|| p_txn_error_rec.inv_material_transaction_id );
917 put_line('error_stage  : '|| p_txn_error_rec.error_stage );
918 put_line('message_string  : '|| p_txn_error_rec.message_string );
919 EXCEPTION
920         WHEN OTHERS THEN
921             --    ROLLBACK TO  dump_txn_error_rec;
922 
923                 IF      FND_MSG_PUB.Check_Msg_Level
924                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
925                 THEN
926                 FND_MSG_PUB.Add_Exc_Msg
927                 (       G_PKG_NAME          ,
928                         l_api_name
929                      );
930                 END IF;
931 
932 END dump_txn_error_rec;
933 
934 PROCEDURE dump_rel_rec
935      (p_rel_rec             IN  csi_datastructures_pub.ii_relationship_rec)
936 IS
937         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_rel_rec';
938         l_api_version       CONSTANT NUMBER         := 1.0;
939 BEGIN
940 
941 -- Standard Start of API savepoint
942   -- SAVEPOINT       dump_rel_rec;
943 
944 put_line('                                       ');
945 put_line('Dumping the values for Instance-Instance relationship Record:');
946 put_line('                                       ');
947 put_line('relationship_id              : '|| p_rel_rec.relationship_id );
948 put_line('relationship_type_code       : '|| p_rel_rec.relationship_type_code );
949 put_line('object_id                    : '|| p_rel_rec.object_id );
953 put_line('active_end_date              : '|| p_rel_rec.active_end_date );
950 put_line('subject_id                   : '|| p_rel_rec.subject_id );
951 put_line('position_reference           : '|| p_rel_rec.position_reference );
952 put_line('active_start_date            : '|| p_rel_rec.active_start_date );
954 put_line('display_order                : '|| p_rel_rec.display_order );
955 put_line('mandatory_flag               : '|| p_rel_rec.mandatory_flag );
956 put_line('context                      : '|| p_rel_rec.context );
957 put_line('attribute1                   : '|| p_rel_rec.attribute1 );
958 put_line('attribute2                   : '|| p_rel_rec.attribute2 );
959 put_line('attribute3                   : '|| p_rel_rec.attribute3 );
960 put_line('attribute4                   : '|| p_rel_rec.attribute4 );
961 put_line('attribute5                   : '|| p_rel_rec.attribute5 );
962 put_line('attribute6                   : '|| p_rel_rec.attribute6 );
963 put_line('attribute7                   : '|| p_rel_rec.attribute7 );
964 put_line('attribute8                   : '|| p_rel_rec.attribute8 );
965 put_line('attribute9                   : '|| p_rel_rec.attribute9 );
966 put_line('attribute10                  : '|| p_rel_rec.attribute10 );
967 put_line('attribute11                  : '|| p_rel_rec.attribute11 );
968 put_line('attribute12                  : '|| p_rel_rec.attribute12 );
969 put_line('attribute13                  : '|| p_rel_rec.attribute13 );
970 put_line('attribute14                  : '|| p_rel_rec.attribute14 );
971 put_line('attribute15                  : '|| p_rel_rec.attribute15 );
972 put_line('object_version_number        : '|| p_rel_rec.object_version_number );
973 
974 
975 
976 EXCEPTION
977         WHEN OTHERS THEN
978          --       ROLLBACK TO  dump_rel_rec;
979 
980                 IF      FND_MSG_PUB.Check_Msg_Level
981                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
982                 THEN
983                 FND_MSG_PUB.Add_Exc_Msg
984                 (       G_PKG_NAME          ,
985                         l_api_name
986                      );
987                 END IF;
988 
989 END dump_rel_rec;
990 
991 
992 PROCEDURE dump_rel_tbl
993      (p_rel_tbl             IN  csi_datastructures_pub.ii_relationship_tbl)
994 IS
995         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_rel_tbl';
996         l_api_version       CONSTANT NUMBER         := 1.0;
997 BEGIN
998 
999         -- Standard Start of API savepoint
1000   --      SAVEPOINT       dump_rel_tbl;
1001         IF p_rel_tbl.COUNT > 0 THEN
1002            FOR tab_row IN p_rel_tbl.FIRST .. p_rel_tbl.LAST
1003            LOOP
1004              IF p_rel_tbl.EXISTS(tab_row) THEN
1005                    dump_rel_rec(p_rel_rec => p_rel_tbl(tab_row));
1006              END IF;
1007            END LOOP;
1008          END IF;
1009 
1010 
1011 
1012 EXCEPTION
1013         WHEN OTHERS THEN
1014         --        ROLLBACK TO  dump_rel_tbl;
1015 
1016                 IF      FND_MSG_PUB.Check_Msg_Level
1017                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1018                 THEN
1019                 FND_MSG_PUB.Add_Exc_Msg
1020                 (       G_PKG_NAME          ,
1021                         l_api_name
1022                      );
1023                 END IF;
1024 
1025 END dump_rel_tbl;
1026 
1027 PROCEDURE dump_rel_query_rec
1028      (p_rel_query_rec             IN  csi_datastructures_pub.relationship_query_rec)
1029 IS
1030         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_rel_query_rec';
1031         l_api_version   CONSTANT NUMBER         := 1.0;
1032 BEGIN
1033 
1034 -- Standard Start of API savepoint
1035  --  SAVEPOINT       dump_rel_query_rec;
1036 
1037 put_line('                                       ');
1038 put_line('Dumping the values for Instance-Instance relationship query Record:');
1039 put_line('                                       ');
1040 put_line('relationship_id              : '|| p_rel_query_rec.relationship_id );
1041 put_line('relationship_type_code       : '|| p_rel_query_rec.relationship_type_code );
1042 put_line('object_id                    : '|| p_rel_query_rec.object_id );
1043 put_line('subject_id                   : '|| p_rel_query_rec.subject_id );
1044 
1045 
1046 EXCEPTION
1047         WHEN OTHERS THEN
1048        --         ROLLBACK TO  dump_rel_query_rec;
1049 
1050                 IF      FND_MSG_PUB.Check_Msg_Level
1051                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1052                 THEN
1053                 FND_MSG_PUB.Add_Exc_Msg
1054                 (       G_PKG_NAME          ,
1055                         l_api_name
1056                      );
1057                 END IF;
1058 
1059 END dump_rel_query_rec;
1060 
1061 PROCEDURE dump_sys_rec
1062      (P_system_rec             IN  csi_datastructures_pub.system_rec)
1063 IS
1064         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_sys_rec';
1065         l_api_version       CONSTANT NUMBER         := 1.0;
1066 BEGIN
1067 
1068 -- Standard Start of API savepoint
1069   -- SAVEPOINT       dump_sys_rec;
1070 
1071 put_line('                                       ');
1072 put_line('Dumping the values for System Record:');
1073 put_line('                                       ');
1074 put_line('system_id                    : '|| p_system_rec.system_id );
1075 put_line('customer_id                  : '|| p_system_rec.customer_id );
1079 put_line('ship_to_contact_id           : '|| p_system_rec.ship_to_contact_id );
1076 put_line('system_type_code             : '|| p_system_rec.system_type_code );
1077 put_line('system_number                : '|| p_system_rec.system_number );
1078 put_line('parent_system_id             : '|| p_system_rec.parent_system_id );
1080 put_line('bill_to_contact_id           : '|| p_system_rec.bill_to_contact_id );
1081 put_line('technical_contact_id         : '|| p_system_rec.technical_contact_id );
1082 put_line('service_admin_contact_id     : '|| p_system_rec.service_admin_contact_id );
1083 put_line('ship_to_site_use_id          : '|| p_system_rec.ship_to_site_use_id );
1084 put_line('bill_to_site_use_id          : '|| p_system_rec.bill_to_site_use_id );
1085 put_line('install_site_use_id          : '|| p_system_rec.install_site_use_id );
1086 put_line('coterminate_day_month        : '|| p_system_rec.coterminate_day_month );
1087 put_line('autocreated_from_system_id   : '|| p_system_rec.autocreated_from_system_id );
1088 put_line('config_system_type           : '|| p_system_rec.config_system_type );
1089 put_line('start_date_active            : '|| p_system_rec.start_date_active );
1090 put_line('end_date_active              : '|| p_system_rec.end_date_active );
1091 put_line('context                      : '|| p_system_rec.context );
1092 put_line('attribute1                   : '|| p_system_rec.attribute1 );
1093 put_line('attribute2                   : '|| p_system_rec.attribute2 );
1094 put_line('attribute3                   : '|| p_system_rec.attribute3 );
1095 put_line('attribute4                   : '|| p_system_rec.attribute4 );
1096 put_line('attribute5                   : '|| p_system_rec.attribute5 );
1097 put_line('attribute6                   : '|| p_system_rec.attribute6 );
1098 put_line('attribute7                   : '|| p_system_rec.attribute7 );
1099 put_line('attribute8                   : '|| p_system_rec.attribute8 );
1100 put_line('attribute9                   : '|| p_system_rec.attribute9 );
1101 put_line('attribute10                  : '|| p_system_rec.attribute10 );
1102 put_line('attribute11                  : '|| p_system_rec.attribute11 );
1103 put_line('attribute12                  : '|| p_system_rec.attribute12 );
1104 put_line('attribute13                  : '|| p_system_rec.attribute13 );
1105 put_line('attribute14                  : '|| p_system_rec.attribute14 );
1106 put_line('attribute15                  : '|| p_system_rec.attribute15 );
1107 put_line('object_version_number        : '|| p_system_rec.object_version_number );
1108 put_line('name                         : '|| p_system_rec.name );
1109 put_line('description                  : '|| p_system_rec.description );
1110 put_line('tech_cont_change_flag        : '|| p_system_rec.tech_cont_change_flag );
1111 put_line('bill_to_cont_change_flag     : '|| p_system_rec.bill_to_cont_change_flag );
1112 put_line('ship_to_cont_change_flag     : '|| p_system_rec.ship_to_cont_change_flag );
1113 put_line('serv_admin_cont_change_flag  : '|| p_system_rec.serv_admin_cont_change_flag );
1114 put_line('bill_to_site_change_flag     : '|| p_system_rec.bill_to_site_change_flag );
1115 put_line('ship_to_site_change_flag     : '|| p_system_rec.ship_to_site_change_flag );
1116 put_line('install_to_site_change_flag  : '|| p_system_rec.install_to_site_change_flag );
1117 
1118 
1119 EXCEPTION
1120         WHEN OTHERS THEN
1121       --          ROLLBACK TO  dump_sys_rec;
1122 
1123                 IF      FND_MSG_PUB.Check_Msg_Level
1124                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1125                 THEN
1126                 FND_MSG_PUB.Add_Exc_Msg
1127                 (       G_PKG_NAME          ,
1128                         l_api_name
1129                      );
1130                 END IF;
1131 
1132 END dump_sys_rec;
1133 
1134 
1135 
1136 PROCEDURE dump_sys_tbl
1137      (p_systems_tbl             IN  csi_datastructures_pub.systems_tbl)
1138 IS
1139         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_sys_tbl';
1140         l_api_version       CONSTANT NUMBER         := 1.0;
1141 BEGIN
1142 
1143         -- Standard Start of API savepoint
1144    --     SAVEPOINT       dump_sys_tbl;
1145         IF p_systems_tbl.COUNT > 0 THEN
1146            FOR tab_row IN p_systems_tbl.FIRST .. p_systems_tbl.LAST
1147            LOOP
1148              IF p_systems_tbl.EXISTS(tab_row) THEN
1149                    dump_sys_rec(p_system_rec => p_systems_tbl(tab_row));
1150              END IF;
1151            END LOOP;
1152          END IF;
1153 
1154 
1155 
1156 EXCEPTION
1157         WHEN OTHERS THEN
1158            --    ROLLBACK TO  dump_sys_tbl;
1159 
1160                 IF      FND_MSG_PUB.Check_Msg_Level
1161                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1162                 THEN
1163                 FND_MSG_PUB.Add_Exc_Msg
1164                 (       G_PKG_NAME          ,
1165                         l_api_name
1166                      );
1167                 END IF;
1168 
1169 END dump_sys_tbl;
1170 
1171 
1172 PROCEDURE dump_sys_query_rec
1173      (p_system_query_rec             IN  csi_datastructures_pub.system_query_rec)
1174 IS
1175         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_sys_query_rec';
1176         l_api_version       CONSTANT NUMBER         := 1.0;
1177 BEGIN
1178 
1179 -- Standard Start of API savepoint
1180   -- SAVEPOINT       dump_sys_query_rec;
1181 
1182 put_line('                                       ');
1183 put_line('Dumping the values for System query Record:');
1184 put_line('                                       ');
1185 put_line('system_id                    : '|| p_system_query_rec.system_id );
1189 
1186 put_line('system_type_code             : '|| p_system_query_rec.system_type_code );
1187 put_line('system_number                : '|| p_system_query_rec.system_number );
1188 
1190 
1191 EXCEPTION
1192         WHEN OTHERS THEN
1193     --            ROLLBACK TO  dump_sys_query_rec;
1194 
1195                 IF      FND_MSG_PUB.Check_Msg_Level
1196                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1197                 THEN
1198                 FND_MSG_PUB.Add_Exc_Msg
1199                 (       G_PKG_NAME          ,
1200                         l_api_name
1201                      );
1202                 END IF;
1203 
1204 END dump_sys_query_rec;
1205 
1206 PROCEDURE dump_ext_attrib_rec
1207      (p_ext_attrib_rec           IN  csi_datastructures_pub.ext_attrib_rec)
1208 IS
1209         l_api_name          CONSTANT VARCHAR2(30)   := 'dump_ext_attrib_rec';
1210         l_api_version       CONSTANT NUMBER         := 1.0;
1211 BEGIN
1212 
1213         -- Standard Start of API savepoint
1214      --   SAVEPOINT       dump_ext_attrib_pvt;
1215 
1216 put_line('                                       ');
1217 put_line('Dumping the values for Extended attribs Record:');
1218 put_line('                                       ');
1219 put_line('attribute_id                 : '|| p_ext_attrib_rec.attribute_id );
1220 put_line('attribute_level              : '|| p_ext_attrib_rec.attribute_level );
1221 put_line('master_organization_id       : '|| p_ext_attrib_rec.master_organization_id );
1222 put_line('inventory_item_id            : '|| p_ext_attrib_rec.inventory_item_id );
1223 put_line('item_category_id             : '|| p_ext_attrib_rec.item_category_id );
1224 put_line('instance_id                  : '|| p_ext_attrib_rec.instance_id );
1225 put_line('attribute_code               : '|| p_ext_attrib_rec.attribute_code );
1226 put_line('attribute_name               : '|| p_ext_attrib_rec.attribute_name );
1227 put_line('attribute_category           : '|| p_ext_attrib_rec.attribute_category );
1228 put_line('description                  : '|| p_ext_attrib_rec.description );
1229 put_line('active_start_date            : '|| p_ext_attrib_rec.active_start_date );
1230 put_line('active_end_date              : '|| p_ext_attrib_rec.active_end_date );
1231 put_line('context                      : '|| p_ext_attrib_rec.context );
1232 put_line('attribute1                   : '|| p_ext_attrib_rec.attribute1 );
1233 put_line('attribute2                   : '|| p_ext_attrib_rec.attribute2 );
1234 put_line('attribute3                   : '|| p_ext_attrib_rec.attribute3 );
1235 put_line('attribute4                   : '|| p_ext_attrib_rec.attribute4 );
1236 put_line('attribute5                   : '|| p_ext_attrib_rec.attribute5 );
1237 put_line('attribute6                   : '|| p_ext_attrib_rec.attribute6 );
1238 put_line('attribute7                   : '|| p_ext_attrib_rec.attribute7 );
1239 put_line('attribute8                   : '|| p_ext_attrib_rec.attribute8 );
1240 put_line('attribute9                   : '|| p_ext_attrib_rec.attribute9 );
1241 put_line('attribute10                  : '|| p_ext_attrib_rec.attribute10 );
1242 put_line('attribute11                  : '|| p_ext_attrib_rec.attribute11 );
1243 put_line('attribute12                  : '|| p_ext_attrib_rec.attribute12 );
1244 put_line('attribute13                  : '|| p_ext_attrib_rec.attribute13 );
1245 put_line('attribute14                  : '|| p_ext_attrib_rec.attribute14 );
1246 put_line('attribute15                  : '|| p_ext_attrib_rec.attribute15 );
1247 put_line('object_version_number        : '|| p_ext_attrib_rec.object_version_number );
1248 
1249 EXCEPTION
1250         WHEN OTHERS THEN
1251      --           ROLLBACK TO  dump_ext_attrib_pvt;
1252                 IF      FND_MSG_PUB.Check_Msg_Level
1253                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1254                 THEN
1255                 FND_MSG_PUB.Add_Exc_Msg
1256                 (       G_PKG_NAME          ,
1257                         l_api_name
1258                      );
1259                 END IF;
1260 END dump_ext_attrib_rec;
1261 
1262 
1263 PROCEDURE dump_inst_party_id
1264   (p_instance_party_id_lst IN  csi_datastructures_pub.id_tbl
1265      ) IS
1266  l_api_name      CONSTANT VARCHAR2(30)   := 'dump_inst_party_id';
1267  l_api_version   CONSTANT NUMBER         := 1.0;
1268 
1269 BEGIN
1270 -- Standard Start of API savepoint
1271   -- SAVEPOINT       dump_inst_party_id;
1272 
1273 FOR i IN p_instance_party_id_lst.FIRST..p_instance_party_id_lst.LAST LOOP
1274 
1275    PUT_LINE ('Instance Party id        :'||p_instance_party_id_lst(i));
1276 END LOOP;
1277 
1278 EXCEPTION
1279       WHEN OTHERS THEN
1280        --    ROLLBACK TO  dump_inst_party_id;
1281             IF      FND_MSG_PUB.Check_Msg_Level
1282                     (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1283             THEN
1284             FND_MSG_PUB.Add_Exc_Msg
1285               (       g_pkg_name          ,
1286                       l_api_name           );
1287             END IF;
1288 END dump_inst_party_id ;
1289 
1290 
1291 PROCEDURE dump_instance_asset_rec
1292  (  p_instance_asset_rec  IN  csi_datastructures_pub.instance_asset_rec
1293      ) IS
1294     l_api_name      CONSTANT VARCHAR2(30)   := 'dump_instance_asset_rec';
1295     l_api_version   CONSTANT NUMBER         := 1.0;
1296 BEGIN
1297 
1298 -- Standard Start of API savepoint
1299 --   SAVEPOINT       dump_instance_asset_rec;
1300 
1301 PUT_LINE ('                                       ');
1305 PUT_LINE ('instance_id                 :'||p_instance_asset_rec.instance_id);
1302 PUT_LINE ('Dumping the values for Instance Asset Record:');
1303 PUT_LINE ('                                       ');
1304 PUT_LINE ('instance_asset_id           :'||p_instance_asset_rec.instance_asset_id);
1306 PUT_LINE ('fa_asset_id                 :'||p_instance_asset_rec.fa_asset_id);
1307 PUT_LINE ('fa_book_type_code           :'||p_instance_asset_rec.fa_book_type_code);
1308 PUT_LINE ('fa_location_id              :'||p_instance_asset_rec.fa_location_id);
1309 PUT_LINE ('asset_quantity              :'||p_instance_asset_rec.asset_quantity);
1310 PUT_LINE ('update_status               :'||p_instance_asset_rec.update_status);
1311 PUT_LINE ('active_start_date           :'||p_instance_asset_rec.active_start_date);
1312 PUT_LINE ('active_end_date             :'||p_instance_asset_rec.active_end_date);
1313 PUT_LINE ('fa_sync_flag                :'||p_instance_asset_rec.fa_sync_flag);
1314 PUT_LINE ('fa_sync_validation_reqd     :'||p_instance_asset_rec.fa_sync_validation_reqd);
1315 PUT_LINE ('object_version_number       :'||p_instance_asset_rec.object_version_number);
1316 
1317 EXCEPTION
1318         WHEN OTHERS THEN
1319 --                ROLLBACK TO  dump_instance_asset_rec;
1320                 IF      FND_MSG_PUB.Check_Msg_Level
1321                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1322                 THEN
1323                 FND_MSG_PUB.Add_Exc_Msg
1324                 (       g_pkg_name          ,
1325                         l_api_name           );
1326                 END IF;
1327 END dump_instance_asset_rec;
1328 
1329 
1330 PROCEDURE dump_party_query_rec
1331      (p_party_query_rec             IN  csi_datastructures_pub.party_query_rec
1332       ) IS
1333         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_party_query_rec';
1334         l_api_version   CONSTANT NUMBER         := 1.0;
1335 BEGIN
1336 
1337 -- Standard Start of API savepoint
1338  --  SAVEPOINT       dump_party_query_rec;
1339 
1340 PUT_LINE ('                                       ');
1341 PUT_LINE ('Dumping the values for Instance Party Query Record:');
1342 PUT_LINE ('                                       ');
1343 PUT_LINE ('instance_party_id           :'||p_party_query_rec.instance_party_id);
1344 PUT_LINE ('instance_id                 :'||p_party_query_rec.instance_id);
1345 PUT_LINE ('party_id                    :'||p_party_query_rec.party_id);
1346 PUT_LINE ('relationship_type_code      :'||p_party_query_rec.relationship_type_code);
1347 
1348 EXCEPTION
1349         WHEN OTHERS THEN
1350     --            ROLLBACK TO  dump_party_query_rec;
1351                 IF      FND_MSG_PUB.Check_Msg_Level
1352                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1353                 THEN
1354                 FND_MSG_PUB.Add_Exc_Msg
1355                 (       g_pkg_name          ,
1356                         l_api_name
1357                 );
1358                 END IF;
1359 END dump_party_query_rec;
1360 
1361 
1362 PROCEDURE dump_organization_unit_rec
1363      (p_org_unit_rec        IN  csi_datastructures_pub.organization_units_rec)
1364 IS
1365         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_organization_unit_rec';
1366         l_api_version   CONSTANT NUMBER         := 1.0;
1367 BEGIN
1368 
1369 -- Standard Start of API savepoint
1370   -- SAVEPOINT    dump_organization_unit_rec;
1371 PUT_LINE ('                                       ');
1372 PUT_LINE ('Dumping the values for Org. Assignments Record:');
1373 PUT_LINE ('                                       ');
1374 PUT_LINE ('instance_ou_id              :'||p_org_unit_rec.instance_ou_id);
1375 PUT_LINE ('instance_id                 :'||p_org_unit_rec.instance_id);
1376 PUT_LINE ('operating_unit_id           :'||p_org_unit_rec.operating_unit_id);
1377 PUT_LINE ('relationship_type_code      :'||p_org_unit_rec.relationship_type_code);
1378 PUT_LINE ('active_start_date           :'||p_org_unit_rec.active_start_date);
1379 PUT_LINE ('active_end_date             :'||p_org_unit_rec.active_end_date);
1380 PUT_LINE ('context                     :'||p_org_unit_rec.context);
1381 PUT_LINE ('attribute1                  :'||p_org_unit_rec.attribute1);
1382 PUT_LINE ('attribute2                  :'||p_org_unit_rec.attribute2);
1383 PUT_LINE ('attribute3                  :'||p_org_unit_rec.attribute3);
1384 PUT_LINE ('attribute4                  :'||p_org_unit_rec.attribute4);
1385 PUT_LINE ('attribute5                  :'||p_org_unit_rec.attribute5);
1386 PUT_LINE ('attribute6                  :'||p_org_unit_rec.attribute6);
1387 PUT_LINE ('attribute7                  :'||p_org_unit_rec.attribute7);
1388 PUT_LINE ('attribute8                  :'||p_org_unit_rec.attribute8);
1389 PUT_LINE ('attribute9                  :'||p_org_unit_rec.attribute9);
1390 PUT_LINE ('attribute10                 :'||p_org_unit_rec.attribute10);
1391 PUT_LINE ('attribute11                 :'||p_org_unit_rec.attribute11);
1392 PUT_LINE ('attribute12                 :'||p_org_unit_rec.attribute12);
1393 PUT_LINE ('attribute13                 :'||p_org_unit_rec.attribute13);
1394 PUT_LINE ('attribute14                 :'||p_org_unit_rec.attribute14);
1395 PUT_LINE ('attribute15                 :'||p_org_unit_rec.attribute15);
1396 PUT_LINE ('object_version_number       :'||p_org_unit_rec.object_version_number);
1397 
1398 EXCEPTION
1399         WHEN OTHERS THEN
1400     --            ROLLBACK TO  dump_organization_unit_rec;
1401 
1402                 IF      FND_MSG_PUB.Check_Msg_Level
1403                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1404                 THEN
1405                 FND_MSG_PUB.Add_Exc_Msg
1409                 END IF;
1406                 (       g_pkg_name          ,
1407                         l_api_name
1408                 );
1410 
1411 END dump_organization_unit_rec;
1412 
1413 
1414 PROCEDURE dump_organization_unit_tbl
1415      (p_org_unit_tbl        IN  csi_datastructures_pub.organization_units_tbl)
1416 IS
1417         l_api_name      CONSTANT VARCHAR2(30)   := 'DUMP_ORGANIZATION_UNIT_TBL';
1418         l_api_version   CONSTANT NUMBER         := 1.0;
1419 BEGIN
1420 
1421 -- Standard Start of API savepoint
1422  --  SAVEPOINT       dump_organization_unit_tbl;
1423 
1424 IF p_org_unit_tbl.COUNT > 0 THEN
1425   FOR tab_row IN p_org_unit_tbl.FIRST .. p_org_unit_tbl.LAST
1426    LOOP
1427      IF p_org_unit_tbl.EXISTS(tab_row) THEN
1428 
1429 PUT_LINE ('                                       ');
1430 PUT_LINE ('Dumping the values for Org. Assignments Table Record #  :'||tab_row);
1431 PUT_LINE ('                                       ');
1432 PUT_LINE ('instance_ou_id              :'||p_org_unit_tbl(tab_row).instance_ou_id);
1433 PUT_LINE ('instance_id                 :'||p_org_unit_tbl(tab_row).instance_id);
1434 PUT_LINE ('operating_unit_id           :'||p_org_unit_tbl(tab_row).operating_unit_id);
1435 PUT_LINE ('relationship_type_code      :'||p_org_unit_tbl(tab_row).relationship_type_code);
1436 PUT_LINE ('active_start_date           :'||p_org_unit_tbl(tab_row).active_start_date);
1437 PUT_LINE ('active_end_date             :'||p_org_unit_tbl(tab_row).active_end_date);
1438 PUT_LINE ('context                     :'||p_org_unit_tbl(tab_row).context);
1439 PUT_LINE ('attribute1                  :'||p_org_unit_tbl(tab_row).attribute1);
1440 PUT_LINE ('attribute2                  :'||p_org_unit_tbl(tab_row).attribute2);
1441 PUT_LINE ('attribute3                  :'||p_org_unit_tbl(tab_row).attribute3);
1442 PUT_LINE ('attribute4                  :'||p_org_unit_tbl(tab_row).attribute4);
1443 PUT_LINE ('attribute5                  :'||p_org_unit_tbl(tab_row).attribute5);
1444 PUT_LINE ('attribute6                  :'||p_org_unit_tbl(tab_row).attribute6);
1445 PUT_LINE ('attribute7                  :'||p_org_unit_tbl(tab_row).attribute7);
1446 PUT_LINE ('attribute8                  :'||p_org_unit_tbl(tab_row).attribute8);
1447 PUT_LINE ('attribute9                  :'||p_org_unit_tbl(tab_row).attribute9);
1448 PUT_LINE ('attribute10                 :'||p_org_unit_tbl(tab_row).attribute10);
1449 PUT_LINE ('attribute11                 :'||p_org_unit_tbl(tab_row).attribute11);
1450 PUT_LINE ('attribute12                 :'||p_org_unit_tbl(tab_row).attribute12);
1451 PUT_LINE ('attribute13                 :'||p_org_unit_tbl(tab_row).attribute13);
1452 PUT_LINE ('attribute14                 :'||p_org_unit_tbl(tab_row).attribute14);
1453 PUT_LINE ('attribute15                 :'||p_org_unit_tbl(tab_row).attribute15);
1454 PUT_LINE ('object_version_number       :'||p_org_unit_tbl(tab_row).object_version_number);
1455 
1456       END IF;
1457    END LOOP;
1458 END IF;
1459 
1460 EXCEPTION
1461         WHEN OTHERS THEN
1462         --        ROLLBACK TO  dump_organization_unit_tbl;
1463 
1464                 IF      FND_MSG_PUB.Check_Msg_Level
1465                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1466                 THEN
1467                 FND_MSG_PUB.Add_Exc_Msg
1468                 (       g_pkg_name,
1469                         l_api_name
1470                      );
1471                 END IF;
1472 
1473 END dump_organization_unit_tbl;
1474 
1475 
1476 PROCEDURE dump_pricing_attribs_query_rec
1477         (pricing_attribs_query_rec  IN  csi_datastructures_pub.pricing_attribs_query_rec)
1478 IS
1479        l_api_name      CONSTANT VARCHAR2(30)   := 'dump_pricing_attribs_query_rec';
1480         l_api_version   CONSTANT NUMBER         := 1.0;
1481 BEGIN
1482 
1483 -- Standard Start of API savepoint
1484  --  SAVEPOINT    dump_pricing_attribs_query_rec;
1485 
1486 PUT_LINE ('                                       ');
1487 PUT_LINE ('Dumping the values for Pricing Attribs Query Record:');
1488 PUT_LINE ('                                       ');
1489 PUT_LINE ('pricing_attribute_id        :'||pricing_attribs_query_rec.pricing_attribute_id);
1490 PUT_LINE ('instance_id                 :'||pricing_attribs_query_rec.instance_id);
1491 
1492 EXCEPTION
1493         WHEN OTHERS THEN
1494           --      ROLLBACK TO  dump_pricing_attribs_query_rec;
1495 
1496                 IF      FND_MSG_PUB.Check_Msg_Level
1497                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1498                 THEN
1499                 FND_MSG_PUB.Add_Exc_Msg
1500                 (       g_pkg_name          ,
1501                         l_api_name
1502                     );
1503                 END IF;
1504 
1505 END dump_pricing_attribs_query_rec;
1506 
1507 
1508 PROCEDURE dump_pricing_attribs_rec
1509         (p_pricing_attribs_rec  IN  csi_datastructures_pub.pricing_attribs_rec)
1510 IS
1511         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_pricing_attribs_rec';
1512         l_api_version   CONSTANT NUMBER         := 1.0;
1513 BEGIN
1514 
1515 -- Standard Start of API savepoint
1516  --  SAVEPOINT    dump_pricing_attribs_rec;
1517 
1518 PUT_LINE ('                                       ');
1519 PUT_LINE ('Dumping the values for Pricing Attribs Record:');
1520 PUT_LINE ('                                       ');
1521 PUT_LINE ('pricing_attribute_id        :'||p_pricing_attribs_rec.pricing_attribute_id);
1525 PUT_LINE ('pricing_context             :'||p_pricing_attribs_rec.pricing_context);
1522 PUT_LINE ('instance_id                 :'||p_pricing_attribs_rec.instance_id);
1523 PUT_LINE ('active_start_date           :'||p_pricing_attribs_rec.active_start_date);
1524 PUT_LINE ('active_end_date             :'||p_pricing_attribs_rec.active_end_date);
1526 PUT_LINE ('pricing_attribute1          :'||p_pricing_attribs_rec.pricing_attribute1);
1527 PUT_LINE ('pricing_attribute2          :'||p_pricing_attribs_rec.pricing_attribute2);
1528 PUT_LINE ('pricing_attribute3          :'||p_pricing_attribs_rec.pricing_attribute3);
1529 PUT_LINE ('pricing_attribute4          :'||p_pricing_attribs_rec.pricing_attribute4);
1530 PUT_LINE ('pricing_attribute5          :'||p_pricing_attribs_rec.pricing_attribute5);
1531 PUT_LINE ('pricing_attribute6          :'||p_pricing_attribs_rec.pricing_attribute6);
1532 PUT_LINE ('pricing_attribute7          :'||p_pricing_attribs_rec.pricing_attribute7);
1533 PUT_LINE ('pricing_attribute8          :'||p_pricing_attribs_rec.pricing_attribute8);
1534 PUT_LINE ('pricing_attribute9          :'||p_pricing_attribs_rec.pricing_attribute9);
1535 PUT_LINE ('pricing_attribute10         :'||p_pricing_attribs_rec.pricing_attribute10);
1536 PUT_LINE ('pricing_attribute11         :'||p_pricing_attribs_rec.pricing_attribute11);
1537 PUT_LINE ('pricing_attribute12         :'||p_pricing_attribs_rec.pricing_attribute12);
1538 PUT_LINE ('pricing_attribute13         :'||p_pricing_attribs_rec.pricing_attribute13);
1539 PUT_LINE ('pricing_attribute14         :'||p_pricing_attribs_rec.pricing_attribute14);
1540 PUT_LINE ('pricing_attribute15         :'||p_pricing_attribs_rec.pricing_attribute15);
1541 PUT_LINE ('pricing_attribute16         :'||p_pricing_attribs_rec.pricing_attribute16);
1542 PUT_LINE ('pricing_attribute17         :'||p_pricing_attribs_rec.pricing_attribute17);
1543 PUT_LINE ('pricing_attribute18         :'||p_pricing_attribs_rec.pricing_attribute18);
1544 PUT_LINE ('pricing_attribute19         :'||p_pricing_attribs_rec.pricing_attribute19);
1545 PUT_LINE ('pricing_attribute20         :'||p_pricing_attribs_rec.pricing_attribute20);
1546 PUT_LINE ('pricing_attribute21         :'||p_pricing_attribs_rec.pricing_attribute21);
1547 PUT_LINE ('pricing_attribute22         :'||p_pricing_attribs_rec.pricing_attribute22);
1548 PUT_LINE ('pricing_attribute23         :'||p_pricing_attribs_rec.pricing_attribute23);
1549 PUT_LINE ('pricing_attribute24         :'||p_pricing_attribs_rec.pricing_attribute24);
1550 PUT_LINE ('pricing_attribute25         :'||p_pricing_attribs_rec.pricing_attribute25);
1551 PUT_LINE ('pricing_attribute26         :'||p_pricing_attribs_rec.pricing_attribute26);
1552 PUT_LINE ('pricing_attribute27         :'||p_pricing_attribs_rec.pricing_attribute27);
1553 PUT_LINE ('pricing_attribute28         :'||p_pricing_attribs_rec.pricing_attribute28);
1554 PUT_LINE ('pricing_attribute29         :'||p_pricing_attribs_rec.pricing_attribute29);
1555 PUT_LINE ('pricing_attribute30         :'||p_pricing_attribs_rec.pricing_attribute30);
1556 PUT_LINE ('pricing_attribute31         :'||p_pricing_attribs_rec.pricing_attribute31);
1557 PUT_LINE ('pricing_attribute32         :'||p_pricing_attribs_rec.pricing_attribute32);
1558 PUT_LINE ('pricing_attribute33         :'||p_pricing_attribs_rec.pricing_attribute33);
1559 PUT_LINE ('pricing_attribute34         :'||p_pricing_attribs_rec.pricing_attribute34);
1560 PUT_LINE ('pricing_attribute35         :'||p_pricing_attribs_rec.pricing_attribute35);
1561 PUT_LINE ('pricing_attribute36         :'||p_pricing_attribs_rec.pricing_attribute36);
1562 PUT_LINE ('pricing_attribute37         :'||p_pricing_attribs_rec.pricing_attribute37);
1563 PUT_LINE ('pricing_attribute38         :'||p_pricing_attribs_rec.pricing_attribute38);
1564 PUT_LINE ('pricing_attribute39         :'||p_pricing_attribs_rec.pricing_attribute39);
1565 PUT_LINE ('pricing_attribute40         :'||p_pricing_attribs_rec.pricing_attribute40);
1566 PUT_LINE ('pricing_attribute41         :'||p_pricing_attribs_rec.pricing_attribute41);
1567 PUT_LINE ('pricing_attribute42         :'||p_pricing_attribs_rec.pricing_attribute42);
1568 PUT_LINE ('pricing_attribute43         :'||p_pricing_attribs_rec.pricing_attribute43);
1569 PUT_LINE ('pricing_attribute44         :'||p_pricing_attribs_rec.pricing_attribute44);
1570 PUT_LINE ('pricing_attribute45         :'||p_pricing_attribs_rec.pricing_attribute45);
1571 PUT_LINE ('pricing_attribute46         :'||p_pricing_attribs_rec.pricing_attribute46);
1572 PUT_LINE ('pricing_attribute47         :'||p_pricing_attribs_rec.pricing_attribute47);
1573 PUT_LINE ('pricing_attribute48         :'||p_pricing_attribs_rec.pricing_attribute48);
1574 PUT_LINE ('pricing_attribute49         :'||p_pricing_attribs_rec.pricing_attribute49);
1575 PUT_LINE ('pricing_attribute50         :'||p_pricing_attribs_rec.pricing_attribute50);
1576 PUT_LINE ('pricing_attribute51         :'||p_pricing_attribs_rec.pricing_attribute51);
1577 PUT_LINE ('pricing_attribute52         :'||p_pricing_attribs_rec.pricing_attribute52);
1578 PUT_LINE ('pricing_attribute53         :'||p_pricing_attribs_rec.pricing_attribute53);
1579 PUT_LINE ('pricing_attribute54         :'||p_pricing_attribs_rec.pricing_attribute54);
1580 PUT_LINE ('pricing_attribute55         :'||p_pricing_attribs_rec.pricing_attribute55);
1581 PUT_LINE ('pricing_attribute56         :'||p_pricing_attribs_rec.pricing_attribute56);
1582 PUT_LINE ('pricing_attribute57         :'||p_pricing_attribs_rec.pricing_attribute57);
1583 PUT_LINE ('pricing_attribute58         :'||p_pricing_attribs_rec.pricing_attribute58);
1584 PUT_LINE ('pricing_attribute59         :'||p_pricing_attribs_rec.pricing_attribute59);
1585 PUT_LINE ('pricing_attribute60         :'||p_pricing_attribs_rec.pricing_attribute60);
1586 PUT_LINE ('pricing_attribute61         :'||p_pricing_attribs_rec.pricing_attribute61);
1587 PUT_LINE ('pricing_attribute62         :'||p_pricing_attribs_rec.pricing_attribute62);
1588 PUT_LINE ('pricing_attribute63         :'||p_pricing_attribs_rec.pricing_attribute63);
1592 PUT_LINE ('pricing_attribute67         :'||p_pricing_attribs_rec.pricing_attribute67);
1589 PUT_LINE ('pricing_attribute64         :'||p_pricing_attribs_rec.pricing_attribute64);
1590 PUT_LINE ('pricing_attribute65         :'||p_pricing_attribs_rec.pricing_attribute65);
1591 PUT_LINE ('pricing_attribute66         :'||p_pricing_attribs_rec.pricing_attribute66);
1593 PUT_LINE ('pricing_attribute68         :'||p_pricing_attribs_rec.pricing_attribute68);
1594 PUT_LINE ('pricing_attribute69         :'||p_pricing_attribs_rec.pricing_attribute69);
1595 PUT_LINE ('pricing_attribute70         :'||p_pricing_attribs_rec.pricing_attribute70);
1596 PUT_LINE ('pricing_attribute71         :'||p_pricing_attribs_rec.pricing_attribute71);
1597 PUT_LINE ('pricing_attribute72         :'||p_pricing_attribs_rec.pricing_attribute72);
1598 PUT_LINE ('pricing_attribute73         :'||p_pricing_attribs_rec.pricing_attribute73);
1599 PUT_LINE ('pricing_attribute74         :'||p_pricing_attribs_rec.pricing_attribute74);
1600 PUT_LINE ('pricing_attribute75         :'||p_pricing_attribs_rec.pricing_attribute75);
1601 PUT_LINE ('pricing_attribute76         :'||p_pricing_attribs_rec.pricing_attribute76);
1602 PUT_LINE ('pricing_attribute77         :'||p_pricing_attribs_rec.pricing_attribute77);
1603 PUT_LINE ('pricing_attribute78         :'||p_pricing_attribs_rec.pricing_attribute78);
1604 PUT_LINE ('pricing_attribute79         :'||p_pricing_attribs_rec.pricing_attribute79);
1605 PUT_LINE ('pricing_attribute80         :'||p_pricing_attribs_rec.pricing_attribute80);
1606 PUT_LINE ('pricing_attribute81         :'||p_pricing_attribs_rec.pricing_attribute81);
1607 PUT_LINE ('pricing_attribute82         :'||p_pricing_attribs_rec.pricing_attribute82);
1608 PUT_LINE ('pricing_attribute83         :'||p_pricing_attribs_rec.pricing_attribute83);
1609 PUT_LINE ('pricing_attribute84         :'||p_pricing_attribs_rec.pricing_attribute84);
1610 PUT_LINE ('pricing_attribute85         :'||p_pricing_attribs_rec.pricing_attribute85);
1611 PUT_LINE ('pricing_attribute86         :'||p_pricing_attribs_rec.pricing_attribute86);
1612 PUT_LINE ('pricing_attribute87         :'||p_pricing_attribs_rec.pricing_attribute87);
1613 PUT_LINE ('pricing_attribute88         :'||p_pricing_attribs_rec.pricing_attribute88);
1614 PUT_LINE ('pricing_attribute89         :'||p_pricing_attribs_rec.pricing_attribute89);
1615 PUT_LINE ('pricing_attribute90         :'||p_pricing_attribs_rec.pricing_attribute90);
1616 PUT_LINE ('pricing_attribute91         :'||p_pricing_attribs_rec.pricing_attribute91);
1617 PUT_LINE ('pricing_attribute92         :'||p_pricing_attribs_rec.pricing_attribute92);
1618 PUT_LINE ('pricing_attribute93         :'||p_pricing_attribs_rec.pricing_attribute93);
1619 PUT_LINE ('pricing_attribute94         :'||p_pricing_attribs_rec.pricing_attribute94);
1620 PUT_LINE ('pricing_attribute95         :'||p_pricing_attribs_rec.pricing_attribute95);
1621 PUT_LINE ('pricing_attribute96         :'||p_pricing_attribs_rec.pricing_attribute96);
1622 PUT_LINE ('pricing_attribute97         :'||p_pricing_attribs_rec.pricing_attribute97);
1623 PUT_LINE ('pricing_attribute98         :'||p_pricing_attribs_rec.pricing_attribute98);
1624 PUT_LINE ('pricing_attribute99         :'||p_pricing_attribs_rec.pricing_attribute99);
1625 PUT_LINE ('pricing_attribute100        :'||p_pricing_attribs_rec.pricing_attribute100);
1626 PUT_LINE ('context                     :'||p_pricing_attribs_rec.context);
1627 PUT_LINE ('attribute1                  :'||p_pricing_attribs_rec.attribute1);
1628 PUT_LINE ('attribute2                  :'||p_pricing_attribs_rec.attribute2);
1629 PUT_LINE ('attribute3                  :'||p_pricing_attribs_rec.attribute3);
1630 PUT_LINE ('attribute4                  :'||p_pricing_attribs_rec.attribute4);
1631 PUT_LINE ('attribute5                  :'||p_pricing_attribs_rec.attribute5);
1632 PUT_LINE ('attribute6                  :'||p_pricing_attribs_rec.attribute6);
1633 PUT_LINE ('attribute7                  :'||p_pricing_attribs_rec.attribute7);
1634 PUT_LINE ('attribute8                  :'||p_pricing_attribs_rec.attribute8);
1635 PUT_LINE ('attribute9                  :'||p_pricing_attribs_rec.attribute9);
1636 PUT_LINE ('attribute10                 :'||p_pricing_attribs_rec.attribute10);
1637 PUT_LINE ('attribute11                 :'||p_pricing_attribs_rec.attribute11);
1638 PUT_LINE ('attribute12                 :'||p_pricing_attribs_rec.attribute12);
1639 PUT_LINE ('attribute13                 :'||p_pricing_attribs_rec.attribute13);
1640 PUT_LINE ('attribute14                 :'||p_pricing_attribs_rec.attribute14);
1641 PUT_LINE ('attribute15                 :'||p_pricing_attribs_rec.attribute15);
1642 PUT_LINE ('object_version_number       :'||p_pricing_attribs_rec.object_version_number);
1643 
1644 EXCEPTION
1645         WHEN OTHERS THEN
1646       --         ROLLBACK TO  dump_pricing_attribs_rec;
1647 
1648                 IF      FND_MSG_PUB.Check_Msg_Level
1649                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1650                 THEN
1651                 FND_MSG_PUB.Add_Exc_Msg
1652                 (       g_pkg_name          ,
1653                         l_api_name
1654                     );
1655                 END IF;
1656 
1657 END dump_pricing_attribs_rec;
1658 
1659 PROCEDURE dump_pricing_attribs_tbl
1660         (p_pricing_attribs_tbl  IN  csi_datastructures_pub.pricing_attribs_tbl)
1661 IS
1662         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_pricing_attribs_tbl';
1663         l_api_version   CONSTANT NUMBER         := 1.0;
1664 BEGIN
1665 
1666 -- Standard Start of API savepoint
1667   -- SAVEPOINT       dump_pricing_attribs_tbl;
1668 
1669 IF p_pricing_attribs_tbl.COUNT > 0 THEN
1670    FOR tab_row IN p_pricing_attribs_tbl.FIRST .. p_pricing_attribs_tbl.LAST
1671      LOOP
1672       IF p_pricing_attribs_tbl.EXISTS(tab_row) THEN
1673 
1674 PUT_LINE ('                                       ');
1678 PUT_LINE ('instance_id                 :'||p_pricing_attribs_tbl(tab_row).instance_id);
1675 PUT_LINE ('Dumping the values for Pricing Attribs Table Record #  :'||tab_row);
1676 PUT_LINE ('                                       ');
1677 PUT_LINE ('pricing_attribute_id        :'||p_pricing_attribs_tbl(tab_row).pricing_attribute_id);
1679 PUT_LINE ('active_start_date           :'||p_pricing_attribs_tbl(tab_row).active_start_date);
1680 PUT_LINE ('active_end_date             :'||p_pricing_attribs_tbl(tab_row).active_end_date);
1681 PUT_LINE ('pricing_context             :'||p_pricing_attribs_tbl(tab_row).pricing_context);
1682 PUT_LINE ('pricing_attribute1          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute1);
1683 PUT_LINE ('pricing_attribute2          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute2);
1684 PUT_LINE ('pricing_attribute3          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute3);
1685 PUT_LINE ('pricing_attribute4          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute4);
1686 PUT_LINE ('pricing_attribute5          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute5);
1687 PUT_LINE ('pricing_attribute6          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute6);
1688 PUT_LINE ('pricing_attribute7          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute7);
1689 PUT_LINE ('pricing_attribute8          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute8);
1690 PUT_LINE ('pricing_attribute9          :'||p_pricing_attribs_tbl(tab_row).pricing_attribute9);
1691 PUT_LINE ('pricing_attribute10         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute10);
1692 PUT_LINE ('pricing_attribute11         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute11);
1693 PUT_LINE ('pricing_attribute12         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute12);
1694 PUT_LINE ('pricing_attribute13         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute13);
1695 PUT_LINE ('pricing_attribute14         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute14);
1696 PUT_LINE ('pricing_attribute15         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute15);
1697 PUT_LINE ('pricing_attribute16         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute16);
1698 PUT_LINE ('pricing_attribute17         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute17);
1699 PUT_LINE ('pricing_attribute18         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute18);
1700 PUT_LINE ('pricing_attribute19         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute19);
1701 PUT_LINE ('pricing_attribute20         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute20);
1702 PUT_LINE ('pricing_attribute21         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute21);
1703 PUT_LINE ('pricing_attribute22         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute22);
1704 PUT_LINE ('pricing_attribute23         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute23);
1705 PUT_LINE ('pricing_attribute24         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute24);
1706 PUT_LINE ('pricing_attribute25         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute25);
1707 PUT_LINE ('pricing_attribute26         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute26);
1708 PUT_LINE ('pricing_attribute27         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute27);
1709 PUT_LINE ('pricing_attribute28         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute28);
1710 PUT_LINE ('pricing_attribute29         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute29);
1711 PUT_LINE ('pricing_attribute30         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute30);
1712 PUT_LINE ('pricing_attribute31         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute31);
1713 PUT_LINE ('pricing_attribute32         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute32);
1714 PUT_LINE ('pricing_attribute33         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute33);
1715 PUT_LINE ('pricing_attribute34         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute34);
1716 PUT_LINE ('pricing_attribute35         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute35);
1717 PUT_LINE ('pricing_attribute36         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute36);
1718 PUT_LINE ('pricing_attribute37         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute37);
1719 PUT_LINE ('pricing_attribute38         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute38);
1720 PUT_LINE ('pricing_attribute39         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute39);
1721 PUT_LINE ('pricing_attribute40         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute40);
1722 PUT_LINE ('pricing_attribute41         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute41);
1723 PUT_LINE ('pricing_attribute42         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute42);
1724 PUT_LINE ('pricing_attribute43         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute43);
1725 PUT_LINE ('pricing_attribute44         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute44);
1726 PUT_LINE ('pricing_attribute45         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute45);
1727 PUT_LINE ('pricing_attribute46         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute46);
1728 PUT_LINE ('pricing_attribute47         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute47);
1729 PUT_LINE ('pricing_attribute48         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute48);
1730 PUT_LINE ('pricing_attribute49         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute49);
1731 PUT_LINE ('pricing_attribute50         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute50);
1732 PUT_LINE ('pricing_attribute51         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute51);
1733 PUT_LINE ('pricing_attribute52         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute52);
1734 PUT_LINE ('pricing_attribute53         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute53);
1735 PUT_LINE ('pricing_attribute54         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute54);
1736 PUT_LINE ('pricing_attribute55         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute55);
1737 PUT_LINE ('pricing_attribute56         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute56);
1741 PUT_LINE ('pricing_attribute60         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute60);
1738 PUT_LINE ('pricing_attribute57         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute57);
1739 PUT_LINE ('pricing_attribute58         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute58);
1740 PUT_LINE ('pricing_attribute59         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute59);
1742 PUT_LINE ('pricing_attribute61         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute61);
1743 PUT_LINE ('pricing_attribute62         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute62);
1744 PUT_LINE ('pricing_attribute63         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute63);
1745 PUT_LINE ('pricing_attribute64         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute64);
1746 PUT_LINE ('pricing_attribute65         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute65);
1747 PUT_LINE ('pricing_attribute66         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute66);
1748 PUT_LINE ('pricing_attribute67         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute67);
1749 PUT_LINE ('pricing_attribute68         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute68);
1750 PUT_LINE ('pricing_attribute69         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute69);
1751 PUT_LINE ('pricing_attribute70         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute70);
1752 PUT_LINE ('pricing_attribute71         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute71);
1753 PUT_LINE ('pricing_attribute72         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute72);
1754 PUT_LINE ('pricing_attribute73         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute73);
1755 PUT_LINE ('pricing_attribute74         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute74);
1756 PUT_LINE ('pricing_attribute75         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute75);
1757 PUT_LINE ('pricing_attribute76         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute76);
1758 PUT_LINE ('pricing_attribute77         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute77);
1759 PUT_LINE ('pricing_attribute78         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute78);
1760 PUT_LINE ('pricing_attribute79         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute79);
1761 PUT_LINE ('pricing_attribute80         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute80);
1762 PUT_LINE ('pricing_attribute81         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute81);
1763 PUT_LINE ('pricing_attribute82         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute82);
1764 PUT_LINE ('pricing_attribute83         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute83);
1765 PUT_LINE ('pricing_attribute84         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute84);
1766 PUT_LINE ('pricing_attribute85         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute85);
1767 PUT_LINE ('pricing_attribute86         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute86);
1768 PUT_LINE ('pricing_attribute87         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute87);
1769 PUT_LINE ('pricing_attribute88         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute88);
1770 PUT_LINE ('pricing_attribute89         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute89);
1771 PUT_LINE ('pricing_attribute90         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute90);
1772 PUT_LINE ('pricing_attribute91         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute91);
1773 PUT_LINE ('pricing_attribute92         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute92);
1774 PUT_LINE ('pricing_attribute93         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute93);
1775 PUT_LINE ('pricing_attribute94         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute94);
1776 PUT_LINE ('pricing_attribute95         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute95);
1777 PUT_LINE ('pricing_attribute96         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute96);
1778 PUT_LINE ('pricing_attribute97         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute97);
1779 PUT_LINE ('pricing_attribute98         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute98);
1780 PUT_LINE ('pricing_attribute99         :'||p_pricing_attribs_tbl(tab_row).pricing_attribute99);
1781 PUT_LINE ('pricing_attribute100        :'||p_pricing_attribs_tbl(tab_row).pricing_attribute100);
1782 PUT_LINE ('context                     :'||p_pricing_attribs_tbl(tab_row).context);
1783 PUT_LINE ('attribute1                  :'||p_pricing_attribs_tbl(tab_row).attribute1);
1784 PUT_LINE ('attribute2                  :'||p_pricing_attribs_tbl(tab_row).attribute2);
1785 PUT_LINE ('attribute3                  :'||p_pricing_attribs_tbl(tab_row).attribute3);
1786 PUT_LINE ('attribute4                  :'||p_pricing_attribs_tbl(tab_row).attribute4);
1787 PUT_LINE ('attribute5                  :'||p_pricing_attribs_tbl(tab_row).attribute5);
1788 PUT_LINE ('attribute6                  :'||p_pricing_attribs_tbl(tab_row).attribute6);
1789 PUT_LINE ('attribute7                  :'||p_pricing_attribs_tbl(tab_row).attribute7);
1790 PUT_LINE ('attribute8                  :'||p_pricing_attribs_tbl(tab_row).attribute8);
1791 PUT_LINE ('attribute9                  :'||p_pricing_attribs_tbl(tab_row).attribute9);
1792 PUT_LINE ('attribute10                 :'||p_pricing_attribs_tbl(tab_row).attribute10);
1793 PUT_LINE ('attribute11                 :'||p_pricing_attribs_tbl(tab_row).attribute11);
1794 PUT_LINE ('attribute12                 :'||p_pricing_attribs_tbl(tab_row).attribute12);
1795 PUT_LINE ('attribute13                 :'||p_pricing_attribs_tbl(tab_row).attribute13);
1796 PUT_LINE ('attribute14                 :'||p_pricing_attribs_tbl(tab_row).attribute14);
1797 PUT_LINE ('attribute15                 :'||p_pricing_attribs_tbl(tab_row).attribute15);
1798 PUT_LINE ('object_version_number       :'||p_pricing_attribs_tbl(tab_row).object_version_number);
1799 
1800     END IF;
1801   END LOOP;
1802 END IF;
1803 
1804 EXCEPTION
1805         WHEN OTHERS THEN
1806           --      ROLLBACK TO  dump_pricing_attribs_tbl;
1807 
1808                 IF      FND_MSG_PUB.Check_Msg_Level
1812                 (       g_pkg_name          ,
1809                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1810                 THEN
1811                 FND_MSG_PUB.Add_Exc_Msg
1813                         l_api_name
1814                 );
1815                 END IF;
1816 
1817 END dump_pricing_attribs_tbl;
1818 
1819 
1820 PROCEDURE dump_party_rec
1821  ( p_party_rec            IN  csi_datastructures_pub.party_rec
1822    ) IS
1823         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_party_rec';
1824         l_api_version   CONSTANT NUMBER         := 1.0;
1825 BEGIN
1826 -- Standard Start of API savepoint
1827 --   SAVEPOINT       dump_party_rec;
1828 
1829 PUT_LINE ('                                       ');
1830 PUT_LINE ('Dumping the values for Instance Party Record:');
1831 PUT_LINE ('                                       ');
1832 PUT_LINE ('instance_party_id           :'||p_party_rec.instance_party_id);
1833 PUT_LINE ('instance_id                 :'||p_party_rec.instance_id);
1834 PUT_LINE ('party_source_table          :'||p_party_rec.party_source_table);
1835 PUT_LINE ('party_id                    :'||p_party_rec.party_id);
1836 PUT_LINE ('relationship_type_code      :'||p_party_rec.relationship_type_code);
1837 PUT_LINE ('contact_flag                :'||p_party_rec.contact_flag);
1838 PUT_LINE ('contact_ip_id               :'||p_party_rec.contact_ip_id);
1839 PUT_LINE ('active_start_date           :'||p_party_rec.active_start_date);
1840 PUT_LINE ('active_end_date             :'||p_party_rec.active_end_date);
1841 PUT_LINE ('context                     :'||p_party_rec.context);
1842 PUT_LINE ('attribute1                  :'||p_party_rec.attribute1);
1843 PUT_LINE ('attribute2                  :'||p_party_rec.attribute2);
1844 PUT_LINE ('attribute3                  :'||p_party_rec.attribute3);
1845 PUT_LINE ('attribute4                  :'||p_party_rec.attribute4);
1846 PUT_LINE ('attribute5                  :'||p_party_rec.attribute5);
1847 PUT_LINE ('attribute6                  :'||p_party_rec.attribute6);
1848 PUT_LINE ('attribute7                  :'||p_party_rec.attribute7);
1849 PUT_LINE ('attribute8                  :'||p_party_rec.attribute8);
1850 PUT_LINE ('attribute9                  :'||p_party_rec.attribute9);
1851 PUT_LINE ('attribute10                 :'||p_party_rec.attribute10);
1852 PUT_LINE ('attribute11                 :'||p_party_rec.attribute11);
1853 PUT_LINE ('attribute12                 :'||p_party_rec.attribute12);
1854 PUT_LINE ('attribute13                 :'||p_party_rec.attribute13);
1855 PUT_LINE ('attribute14                 :'||p_party_rec.attribute14);
1856 PUT_LINE ('attribute15                 :'||p_party_rec.attribute15);
1857 PUT_LINE ('object_version_number       :'||p_party_rec.object_version_number);
1858 
1859 
1860 EXCEPTION
1861         WHEN OTHERS THEN
1862        --         ROLLBACK TO  dump_party_rec;
1863                 IF      FND_MSG_PUB.Check_Msg_Level
1864                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1865                 THEN
1866                 FND_MSG_PUB.Add_Exc_Msg
1867                 (       g_pkg_name          ,
1868                         l_api_name              );
1869                 END IF;
1870 END dump_party_rec;
1871 
1872 
1873 PROCEDURE dump_party_tbl
1874   (p_party_tbl        IN  csi_datastructures_pub.party_tbl)
1875 IS
1876         l_api_name      CONSTANT VARCHAR2(30)   := 'DUMP_PARTY_TBL';
1877         l_api_version   CONSTANT NUMBER         := 1.0;
1878 BEGIN
1879 -- Standard Start of API savepoint
1880    -- SAVEPOINT    dump_party_tbl;
1881 
1882 IF p_party_tbl.COUNT > 0 THEN
1883    FOR tab_row IN p_party_tbl.FIRST .. p_party_tbl.LAST   LOOP
1884     IF p_party_tbl.EXISTS(tab_row) THEN
1885 
1886 PUT_LINE ('                                       ');
1887 PUT_LINE ('Dumping the values for Instance Party Table Record #  :'||tab_row);
1888 PUT_LINE ('                                       ');
1889 PUT_LINE ('instance_party_id           :'||p_party_tbl(tab_row).instance_party_id);
1890 PUT_LINE ('instance_id                 :'||p_party_tbl(tab_row).instance_id);
1891 PUT_LINE ('party_source_table          :'||p_party_tbl(tab_row).party_source_table);
1892 PUT_LINE ('party_id                    :'||p_party_tbl(tab_row).party_id);
1893 PUT_LINE ('relationship_type_code      :'||p_party_tbl(tab_row).relationship_type_code);
1894 PUT_LINE ('contact_flag                :'||p_party_tbl(tab_row).contact_flag);
1895 PUT_LINE ('contact_ip_id               :'||p_party_tbl(tab_row).contact_ip_id);
1896 PUT_LINE ('active_start_date           :'||p_party_tbl(tab_row).active_start_date);
1897 PUT_LINE ('active_end_date             :'||p_party_tbl(tab_row).active_end_date);
1898 PUT_LINE ('context                     :'||p_party_tbl(tab_row).context);
1899 PUT_LINE ('attribute1                  :'||p_party_tbl(tab_row).attribute1);
1900 PUT_LINE ('attribute2                  :'||p_party_tbl(tab_row).attribute2);
1901 PUT_LINE ('attribute3                  :'||p_party_tbl(tab_row).attribute3);
1902 PUT_LINE ('attribute4                  :'||p_party_tbl(tab_row).attribute4);
1903 PUT_LINE ('attribute5                  :'||p_party_tbl(tab_row).attribute5);
1904 PUT_LINE ('attribute6                  :'||p_party_tbl(tab_row).attribute6);
1905 PUT_LINE ('attribute7                  :'||p_party_tbl(tab_row).attribute7);
1906 PUT_LINE ('attribute8                  :'||p_party_tbl(tab_row).attribute8);
1907 PUT_LINE ('attribute9                  :'||p_party_tbl(tab_row).attribute9);
1908 PUT_LINE ('attribute10                 :'||p_party_tbl(tab_row).attribute10);
1909 PUT_LINE ('attribute11                 :'||p_party_tbl(tab_row).attribute11);
1910 PUT_LINE ('attribute12                 :'||p_party_tbl(tab_row).attribute12);
1911 PUT_LINE ('attribute13                 :'||p_party_tbl(tab_row).attribute13);
1915      END IF;
1912 PUT_LINE ('attribute14                 :'||p_party_tbl(tab_row).attribute14);
1913 PUT_LINE ('attribute15                 :'||p_party_tbl(tab_row).attribute15);
1914 PUT_LINE ('object_version_number       :'||p_party_tbl(tab_row).object_version_number);
1916    END LOOP;
1917 END IF;
1918 EXCEPTION
1919         WHEN OTHERS THEN
1920               --  ROLLBACK TO  dump_party_tbl;
1921                 IF      FND_MSG_PUB.Check_Msg_Level
1922                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1923                 THEN
1924                 FND_MSG_PUB.Add_Exc_Msg
1925                 (       g_pkg_name          ,
1926                         l_api_name      );
1927                 END IF;
1928 END dump_party_tbl;
1929 
1930 PROCEDURE dump_version_label_rec
1931 (   p_version_label_rec    IN  csi_datastructures_pub.version_label_rec
1932     ) IS
1933 
1934     l_api_name      CONSTANT VARCHAR2(30)   := 'dump_version_label_rec';
1935     l_api_version   CONSTANT NUMBER         := 1.0;
1936 BEGIN
1937 
1938 -- Standard Start of API savepoint
1939   -- SAVEPOINT    dump_version_label_rec;
1940 
1941 PUT_LINE ('                                       ');
1942 PUT_LINE ('Dumping the values for Version Labels Record:');
1943 PUT_LINE ('                                       ');
1944 PUT_LINE ('version_label_id            :'||p_version_label_rec.version_label_id);
1945 PUT_LINE ('instance_id                 :'||p_version_label_rec.instance_id);
1946 PUT_LINE ('version_label               :'||p_version_label_rec.version_label);
1947 PUT_LINE ('description                 :'||p_version_label_rec.description);
1948 PUT_LINE ('date_time_stamp             :'||p_version_label_rec.date_time_stamp);
1949 PUT_LINE ('active_start_date           :'||p_version_label_rec.active_start_date);
1950 PUT_LINE ('active_end_date             :'||p_version_label_rec.active_end_date);
1951 PUT_LINE ('context                     :'||p_version_label_rec.context);
1952 PUT_LINE ('attribute1                  :'||p_version_label_rec.attribute1);
1953 PUT_LINE ('attribute2                  :'||p_version_label_rec.attribute2);
1954 PUT_LINE ('attribute3                  :'||p_version_label_rec.attribute3);
1955 PUT_LINE ('attribute4                  :'||p_version_label_rec.attribute4);
1956 PUT_LINE ('attribute5                  :'||p_version_label_rec.attribute5);
1957 PUT_LINE ('attribute6                  :'||p_version_label_rec.attribute6);
1958 PUT_LINE ('attribute7                  :'||p_version_label_rec.attribute7);
1959 PUT_LINE ('attribute8                  :'||p_version_label_rec.attribute8);
1960 PUT_LINE ('attribute9                  :'||p_version_label_rec.attribute9);
1961 PUT_LINE ('attribute10                 :'||p_version_label_rec.attribute10);
1962 PUT_LINE ('attribute11                 :'||p_version_label_rec.attribute11);
1963 PUT_LINE ('attribute12                 :'||p_version_label_rec.attribute12);
1964 PUT_LINE ('attribute13                 :'||p_version_label_rec.attribute13);
1965 PUT_LINE ('attribute14                 :'||p_version_label_rec.attribute14);
1966 PUT_LINE ('attribute15                 :'||p_version_label_rec.attribute15);
1967 PUT_LINE ('object_version_number       :'||p_version_label_rec.object_version_number);
1968 
1969 EXCEPTION
1970         WHEN OTHERS THEN
1971               --  ROLLBACK TO  dump_version_label_rec;
1972                 IF      FND_MSG_PUB.Check_Msg_Level
1973                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1974                 THEN
1975                 FND_MSG_PUB.Add_Exc_Msg
1976                 (       g_pkg_name          ,
1977                         l_api_name      );
1978                 END IF;
1979 END dump_version_label_rec;
1980 
1981 PROCEDURE dump_version_label_tbl
1982  (  p_version_label_tbl            IN  csi_datastructures_pub.version_label_tbl
1983     ) IS
1984 
1985     l_api_name  CONSTANT VARCHAR2(30)   := 'dump_version_label_tbl';
1986         l_api_version   CONSTANT NUMBER         := 1.0;
1987 BEGIN
1988 
1989 -- Standard Start of API savepoint
1990   -- SAVEPOINT    dump_version_label_tbl;
1991 
1992 IF p_version_label_tbl.COUNT > 0 THEN
1993    FOR tab_row IN p_version_label_tbl.FIRST .. p_version_label_tbl.LAST   LOOP
1994 
1995 PUT_LINE ('                                       ');
1996 PUT_LINE ('Dumping the values for Version Labels Table Record #  :'||tab_row);
1997 PUT_LINE ('                                       ');
1998 PUT_LINE ('version_label_id            :'||p_version_label_tbl(tab_row).version_label_id);
1999 PUT_LINE ('instance_id                 :'||p_version_label_tbl(tab_row).instance_id);
2000 PUT_LINE ('version_label               :'||p_version_label_tbl(tab_row).version_label);
2001 PUT_LINE ('description                 :'||p_version_label_tbl(tab_row).description);
2002 PUT_LINE ('date_time_stamp             :'||p_version_label_tbl(tab_row).date_time_stamp);
2003 PUT_LINE ('active_start_date           :'||p_version_label_tbl(tab_row).active_start_date);
2004 PUT_LINE ('active_end_date             :'||p_version_label_tbl(tab_row).active_end_date);
2005 PUT_LINE ('context                     :'||p_version_label_tbl(tab_row).context);
2006 PUT_LINE ('attribute1                  :'||p_version_label_tbl(tab_row).attribute1);
2007 PUT_LINE ('attribute2                  :'||p_version_label_tbl(tab_row).attribute2);
2008 PUT_LINE ('attribute3                  :'||p_version_label_tbl(tab_row).attribute3);
2009 PUT_LINE ('attribute4                  :'||p_version_label_tbl(tab_row).attribute4);
2010 PUT_LINE ('attribute5                  :'||p_version_label_tbl(tab_row).attribute5);
2011 PUT_LINE ('attribute6                  :'||p_version_label_tbl(tab_row).attribute6);
2012 PUT_LINE ('attribute7                  :'||p_version_label_tbl(tab_row).attribute7);
2016 PUT_LINE ('attribute11                 :'||p_version_label_tbl(tab_row).attribute11);
2013 PUT_LINE ('attribute8                  :'||p_version_label_tbl(tab_row).attribute8);
2014 PUT_LINE ('attribute9                  :'||p_version_label_tbl(tab_row).attribute9);
2015 PUT_LINE ('attribute10                 :'||p_version_label_tbl(tab_row).attribute10);
2017 PUT_LINE ('attribute12                 :'||p_version_label_tbl(tab_row).attribute12);
2018 PUT_LINE ('attribute13                 :'||p_version_label_tbl(tab_row).attribute13);
2019 PUT_LINE ('attribute14                 :'||p_version_label_tbl(tab_row).attribute14);
2020 PUT_LINE ('attribute15                 :'||p_version_label_tbl(tab_row).attribute15);
2021 PUT_LINE ('object_version_number       :'||p_version_label_tbl(tab_row).object_version_number);
2022    END LOOP;
2023 END IF;
2024 EXCEPTION
2025         WHEN OTHERS THEN
2026              --   ROLLBACK TO  dump_version_label_tbl;
2027                 IF      FND_MSG_PUB.Check_Msg_Level
2028                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2029                 THEN
2030                 FND_MSG_PUB.Add_Exc_Msg
2031                 (       g_pkg_name          ,
2032                         l_api_name      );
2033                 END IF;
2034 END dump_version_label_tbl;
2035 
2036 
2037 PROCEDURE dump_party_account_tbl
2038   (p_party_account_tbl        IN  csi_datastructures_pub.party_account_tbl
2039     ) IS
2040         l_api_name      CONSTANT VARCHAR2(30)   := 'DUMP_PARTY_ACCOUNT_TBL';
2041         l_api_version   CONSTANT NUMBER         := 1.0;
2042 
2043 BEGIN
2044 
2045 -- Standard Start of API savepoint
2046    -- SAVEPOINT    dump_party_account_tbl;
2047 
2048 IF p_party_account_tbl.COUNT > 0 THEN
2049    FOR tab_row IN p_party_account_tbl.FIRST .. p_party_account_tbl.LAST   LOOP
2050 
2051 PUT_LINE ('                                       ');
2052 PUT_LINE ('Dumping the values for Instance Party Account Table Record #  :'||tab_row);
2053 PUT_LINE ('                                       ');
2054 PUT_LINE ('ip_account_id               :'||p_party_account_tbl(tab_row).ip_account_id);
2055 PUT_LINE ('parent_tbl_index            :'||p_party_account_tbl(tab_row).parent_tbl_index);
2056 PUT_LINE ('instance_party_id           :'||p_party_account_tbl(tab_row).instance_party_id);
2057 PUT_LINE ('party_account_id            :'||p_party_account_tbl(tab_row).party_account_id);
2058 PUT_LINE ('relationship_type_code      :'||p_party_account_tbl(tab_row).relationship_type_code);
2059 PUT_LINE ('active_start_date           :'||p_party_account_tbl(tab_row).active_start_date);
2060 PUT_LINE ('active_end_date             :'||p_party_account_tbl(tab_row).active_end_date);
2061 PUT_LINE ('context                     :'||p_party_account_tbl(tab_row).context);
2062 PUT_LINE ('attribute1                  :'||p_party_account_tbl(tab_row).attribute1);
2063 PUT_LINE ('attribute2                  :'||p_party_account_tbl(tab_row).attribute2);
2064 PUT_LINE ('attribute3                  :'||p_party_account_tbl(tab_row).attribute3);
2065 PUT_LINE ('attribute4                  :'||p_party_account_tbl(tab_row).attribute4);
2066 PUT_LINE ('attribute5                  :'||p_party_account_tbl(tab_row).attribute5);
2067 PUT_LINE ('attribute6                  :'||p_party_account_tbl(tab_row).attribute6);
2068 PUT_LINE ('attribute7                  :'||p_party_account_tbl(tab_row).attribute7);
2069 PUT_LINE ('attribute8                  :'||p_party_account_tbl(tab_row).attribute8);
2070 PUT_LINE ('attribute9                  :'||p_party_account_tbl(tab_row).attribute9);
2071 PUT_LINE ('attribute10                 :'||p_party_account_tbl(tab_row).attribute10);
2072 PUT_LINE ('attribute11                 :'||p_party_account_tbl(tab_row).attribute11);
2073 PUT_LINE ('attribute12                 :'||p_party_account_tbl(tab_row).attribute12);
2074 PUT_LINE ('attribute13                 :'||p_party_account_tbl(tab_row).attribute13);
2075 PUT_LINE ('attribute14                 :'||p_party_account_tbl(tab_row).attribute14);
2076 PUT_LINE ('attribute15                 :'||p_party_account_tbl(tab_row).attribute15);
2077 PUT_LINE ('object_version_number       :'||p_party_account_tbl(tab_row).object_version_number);
2078 PUT_LINE ('call_contracts              :'||p_party_account_tbl(tab_row).call_contracts);
2079 
2080   END LOOP;
2081 END IF;
2082 EXCEPTION
2083         WHEN OTHERS THEN
2084               --  ROLLBACK TO  dump_party_account_tbl;
2085                 IF      FND_MSG_PUB.Check_Msg_Level
2086                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2087                 THEN
2088                 FND_MSG_PUB.Add_Exc_Msg
2089                 (       g_pkg_name          ,
2090                         l_api_name      );
2091                 END IF;
2092 END dump_party_account_tbl;
2093 
2094 PROCEDURE dump_party_account_rec
2095  ( p_party_account_rec            IN  csi_datastructures_pub.party_account_rec
2096    ) IS
2097         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_party_account_rec';
2098         l_api_version   CONSTANT NUMBER         := 1.0;
2099 BEGIN
2100 -- Standard Start of API savepoint
2101   -- SAVEPOINT       dump_party_account_rec;
2102 
2103 PUT_LINE ('                                       ');
2104 PUT_LINE ('Dumping the values for Instance Party Account Record:');
2105 PUT_LINE ('                                       ');
2106 PUT_LINE ('ip_account_id               :'||p_party_account_rec.ip_account_id);
2107 PUT_LINE ('parent_tbl_index            :'||p_party_account_rec.parent_tbl_index);
2108 PUT_LINE ('instance_party_id           :'||p_party_account_rec.instance_party_id);
2109 PUT_LINE ('party_account_id            :'||p_party_account_rec.party_account_id);
2110 PUT_LINE ('relationship_type_code      :'||p_party_account_rec.relationship_type_code);
2111 PUT_LINE ('bill_to_address             :'||p_party_account_rec.bill_to_address);
2115 PUT_LINE ('context                     :'||p_party_account_rec.context);
2112 PUT_LINE ('ship_to_address             :'||p_party_account_rec.ship_to_address);
2113 PUT_LINE ('active_start_date           :'||p_party_account_rec.active_start_date);
2114 PUT_LINE ('active_end_date             :'||p_party_account_rec.active_end_date);
2116 PUT_LINE ('attribute1                  :'||p_party_account_rec.attribute1);
2117 PUT_LINE ('attribute2                  :'||p_party_account_rec.attribute2);
2118 PUT_LINE ('attribute3                  :'||p_party_account_rec.attribute3);
2119 PUT_LINE ('attribute4                  :'||p_party_account_rec.attribute4);
2120 PUT_LINE ('attribute5                  :'||p_party_account_rec.attribute5);
2121 PUT_LINE ('attribute6                  :'||p_party_account_rec.attribute6);
2122 PUT_LINE ('attribute7                  :'||p_party_account_rec.attribute7);
2123 PUT_LINE ('attribute8                  :'||p_party_account_rec.attribute8);
2124 PUT_LINE ('attribute9                  :'||p_party_account_rec.attribute9);
2125 PUT_LINE ('attribute10                 :'||p_party_account_rec.attribute10);
2126 PUT_LINE ('attribute11                 :'||p_party_account_rec.attribute11);
2127 PUT_LINE ('attribute12                 :'||p_party_account_rec.attribute12);
2128 PUT_LINE ('attribute13                 :'||p_party_account_rec.attribute13);
2129 PUT_LINE ('attribute14                 :'||p_party_account_rec.attribute14);
2130 PUT_LINE ('attribute15                 :'||p_party_account_rec.attribute15);
2131 PUT_LINE ('object_version_number       :'||p_party_account_rec.object_version_number);
2132 PUT_LINE ('call_contracts              :'||p_party_account_rec.call_contracts);
2133 
2134 EXCEPTION
2135         WHEN OTHERS THEN
2136               --  ROLLBACK TO  dump_party_account_rec;
2137                 IF      FND_MSG_PUB.Check_Msg_Level
2138                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2139                 THEN
2140                 FND_MSG_PUB.Add_Exc_Msg
2141                 (       g_pkg_name          ,
2142                         l_api_name              );
2143                 END IF;
2144 END dump_party_account_rec;
2145 
2146 
2147 PROCEDURE dump_account_query_rec
2148      (p_account_query_rec          IN  csi_datastructures_pub.party_account_query_rec
2149       ) IS
2150 
2151         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_account_query_rec';
2152         l_api_version   CONSTANT NUMBER         := 1.0;
2153 BEGIN
2154 -- Standard Start of API savepoint
2155   -- SAVEPOINT       dump_account_query_rec;
2156 
2157 PUT_LINE ('                                       ');
2158 PUT_LINE ('Dumping the values for Instance Party Account Query Record:');
2159 PUT_LINE ('                                       ');
2160 PUT_LINE ('ip_account_id               :'||p_account_query_rec.ip_account_id);
2161 PUT_LINE ('instance_party_id           :'||p_account_query_rec.instance_party_id);
2162 PUT_LINE ('party_account_id            :'||p_account_query_rec.party_account_id);
2163 PUT_LINE ('relationship_type_code      :'||p_account_query_rec.relationship_type_code);
2164 
2165 EXCEPTION
2166         WHEN OTHERS THEN
2167              --   ROLLBACK TO  dump_account_query_rec;
2168                 IF      FND_MSG_PUB.Check_Msg_Level
2169                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2170                 THEN
2171                 FND_MSG_PUB.Add_Exc_Msg
2172                 (       g_pkg_name          ,
2173                         l_api_name              );
2174                 END IF;
2175 END dump_account_query_rec ;
2176 
2177 PROCEDURE dump_asset_query_rec
2178   (  p_asset_query_rec           IN  csi_datastructures_pub.instance_asset_query_rec
2179      ) IS
2180 
2181         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_asset_query_rec';
2182         l_api_version   CONSTANT NUMBER         := 1.0;
2183 BEGIN
2184 -- Standard Start of API savepoint
2185 --   SAVEPOINT       dump_asset_query_rec;
2186 
2187 PUT_LINE ('                                       ');
2188 PUT_LINE ('Dumping the values for Instance Assets Query Record:');
2189 PUT_LINE ('                                       ');
2190 PUT_LINE ('instance_asset_id           :'||p_asset_query_rec.instance_asset_id);
2191 PUT_LINE ('instance_id                 :'||p_asset_query_rec.instance_id);
2192 PUT_LINE ('fa_asset_id                 :'||p_asset_query_rec.fa_asset_id);
2193 PUT_LINE ('fa_book_type_code           :'||p_asset_query_rec.fa_book_type_code);
2194 PUT_LINE ('fa_location_id              :'||p_asset_query_rec.fa_location_id);
2195 PUT_LINE ('update_status               :'||p_asset_query_rec.update_status);
2196 
2197 EXCEPTION
2198         WHEN OTHERS THEN
2199 --                ROLLBACK TO  dump_asset_query_rec;
2200                 IF      FND_MSG_PUB.Check_Msg_Level
2201                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2202                 THEN
2203                 FND_MSG_PUB.Add_Exc_Msg
2204                 (       g_pkg_name          ,
2205                         l_api_name              );
2206                 END IF;
2207 END  dump_asset_query_rec  ;
2208 
2209 PROCEDURE dump_ver_label_query_rec
2210    (  p_version_label_query_rec   IN  csi_datastructures_pub.version_label_query_rec
2211       )IS
2212 
2213         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_ver_label_query_rec';
2214         l_api_version   CONSTANT NUMBER         := 1.0;
2215 BEGIN
2216 -- Standard Start of API savepoint
2217   -- SAVEPOINT       dump_ver_label_query_rec;
2218 
2219 PUT_LINE ('                                       ');
2223 PUT_LINE ('instance_id                 :'||p_version_label_query_rec.instance_id);
2220 PUT_LINE ('Dumping the values for Version Labels Query Record:');
2221 PUT_LINE ('                                       ');
2222 PUT_LINE ('version_label_id            :'||p_version_label_query_rec.version_label_id);
2224 PUT_LINE ('version_label               :'||p_version_label_query_rec.version_label);
2225 PUT_LINE ('date_time_stamp             :'||p_version_label_query_rec.date_time_stamp);
2226 
2227 EXCEPTION
2228         WHEN OTHERS THEN
2229              --   ROLLBACK TO  dump_ver_label_query_rec;
2230                 IF      FND_MSG_PUB.Check_Msg_Level
2231                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2232                 THEN
2233                 FND_MSG_PUB.Add_Exc_Msg
2234                 (       g_pkg_name          ,
2235                         l_api_name              );
2236                 END IF;
2237 END  dump_ver_label_query_rec  ;
2238 
2239 
2240 PROCEDURE dump_id_tbl
2241         (id_tbl  IN  csi_datastructures_pub.id_tbl)
2242 IS
2243         l_api_name      CONSTANT VARCHAR2(30)   := 'dump_id_tbl';
2244         l_api_version   CONSTANT NUMBER         := 1.0;
2245 BEGIN
2246 
2247  -- Standard Start of API savepoint
2248   -- SAVEPOINT    dump_id_tbl;
2249 
2250    IF id_tbl.COUNT > 0 THEN
2251     FOR tab_row IN id_tbl.FIRST .. id_tbl.LAST   LOOP
2252             PUT_LINE (
2253                 id_tbl(tab_row));
2254     END LOOP;
2255    END IF;
2256 
2257 EXCEPTION
2258         WHEN OTHERS THEN
2259                -- ROLLBACK TO  dump_id_tbl;
2260 
2261                 IF      FND_MSG_PUB.Check_Msg_Level
2262                         (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2263                 THEN
2264                 FND_MSG_PUB.Add_Exc_Msg
2265                 (       g_pkg_name          ,
2266                         l_api_name
2267                     );
2268                 END IF;
2269 
2270 END dump_id_tbl;
2271 
2272 PROCEDURE dump_x_msg_data
2273         (p_msg_count IN NUMBER, x_msg_data OUT NOCOPY VARCHAR2)
2274 IS
2275 l_msg_index     NUMBER:=0;
2276 l_msg_data      VARCHAR2(2000):=NULL;
2277 l_msg_count     NUMBER:=0;
2278 l_msg_dummy     NUMBER:=0;
2279 BEGIN
2280   fnd_msg_pub.count_and_get
2281                      (       p_count => l_msg_count,
2282                              p_data  => l_msg_data
2283                       );
2284 
2285   FOR l_msg_index IN  1..l_msg_count
2286   LOOP
2287   fnd_msg_pub.get ( l_msg_index
2288                   , fnd_api.g_false
2289                   , l_msg_data
2290                   , l_msg_dummy );
2291   x_msg_data := ltrim(x_msg_data||' '||l_msg_data);
2292   END LOOP;
2293 
2294 END dump_x_msg_data;
2295 --
2296 PROCEDURE dump_oks_txn_inst_tbl(p_oks_txn_inst_tbl   IN oks_ibint_pub.txn_instance_tbl)
2297 IS
2298 BEGIN
2299    PUT_LINE('OKS_TXN_INST_TBL count is '||p_oks_txn_inst_tbl.count);
2300    IF p_oks_txn_inst_tbl.count > 0 THEN
2301       PUT_LINE ('Dumping the values passed to contracts ib_interface:');
2302       FOR J IN p_oks_txn_inst_tbl.FIRST .. p_oks_txn_inst_tbl.LAST LOOP
2303          IF p_oks_txn_inst_tbl.EXISTS(J) THEN
2304 	    PUT_LINE('Old_Customer_product_id : '||p_oks_txn_inst_tbl(J).Old_Customer_product_id);
2305 	    PUT_LINE('Old_Quantity : '||p_oks_txn_inst_tbl(J).Old_Quantity);
2306 	    PUT_LINE('Old_Unit_of_measur : '||p_oks_txn_inst_tbl(J).Old_Unit_of_measure);
2307 	    PUT_LINE('Old_Inventory_item_id : '||p_oks_txn_inst_tbl(J).Old_Inventory_item_id);
2308 	    PUT_LINE('Old_Customer_acct_id : '||p_oks_txn_inst_tbl(J).Old_Customer_acct_id);
2309 	    PUT_LINE('New_Customer_product_id : '||p_oks_txn_inst_tbl(J).New_Customer_product_id);
2310 	    PUT_LINE('New_Quantity : '||p_oks_txn_inst_tbl(J).New_Quantity);
2311 	    PUT_LINE('New_Customer_acct_id : '||p_oks_txn_inst_tbl(J).New_Customer_acct_id);
2312 	    PUT_LINE('New_inventory_item_id : '||p_oks_txn_inst_tbl(J).New_inventory_item_id);
2313 	    PUT_LINE('New_Unit_of_measure : '||p_oks_txn_inst_tbl(J).New_Unit_of_measure);
2314 	    PUT_LINE('Org_id : '||p_oks_txn_inst_tbl(J).Org_id);
2315 	    PUT_LINE('Order_line_id : '||p_oks_txn_inst_tbl(J).Order_line_id);
2316 	    PUT_LINE('Shipped_date : '||p_oks_txn_inst_tbl(J).Shipped_date);
2317 	    PUT_LINE('Installation_date : '||p_oks_txn_inst_tbl(J).Installation_date);
2318 	    PUT_LINE('Bill_to_site_use_id : '||p_oks_txn_inst_tbl(J).Bill_to_site_use_id);
2319 	    PUT_LINE('Ship_to_site_use_id : '||p_oks_txn_inst_tbl(J).Ship_to_site_use_id);
2320 	    PUT_LINE('Organization_id : '||p_oks_txn_inst_tbl(J).Organization_id);
2321 	    PUT_LINE('System_id : '||p_oks_txn_inst_tbl(J).System_id);
2322 	    PUT_LINE('Bom_explosion_flag : '||p_oks_txn_inst_tbl(J).Bom_explosion_flag);
2323 	    PUT_LINE('Return_reason_code : '||p_oks_txn_inst_tbl(J).Return_reason_code);
2324 	    PUT_LINE('Raise_credit : '||p_oks_txn_inst_tbl(J).Raise_credit);
2325 	    PUT_LINE('Transaction_date : '||p_oks_txn_inst_tbl(J).Transaction_date);
2326 	    PUT_LINE('Transfer_date : '||p_oks_txn_inst_tbl(J).Transfer_date);
2327 	    PUT_LINE('Termination_date : '||p_oks_txn_inst_tbl(J).Termination_date);
2328 	    PUT_LINE('TRM : '||p_oks_txn_inst_tbl(J).TRM);
2329 	    PUT_LINE('TRF : '||p_oks_txn_inst_tbl(J).TRF);
2330 	    PUT_LINE('RET : '||p_oks_txn_inst_tbl(J).RET);
2331 	    PUT_LINE('RPL : '||p_oks_txn_inst_tbl(J).RPL);
2332 	    PUT_LINE('IDC : '||p_oks_txn_inst_tbl(J).IDC);
2333 	    PUT_LINE('UPD : '||p_oks_txn_inst_tbl(J).UPD);
2334 	    PUT_LINE('SPL : '||p_oks_txn_inst_tbl(J).SPL);
2335 	    PUT_LINE('NEW : '||p_oks_txn_inst_tbl(J).NEW);
2339       END LOOP;
2336 	    PUT_LINE('RIN : '||p_oks_txn_inst_tbl(J).RIN);
2337             PUT_LINE('--------------------------------------------------------------------------');
2338          END IF;
2340    END IF;
2341 END dump_oks_txn_inst_tbl;
2342 
2343 PROCEDURE dump_call_batch_val
2344      ( p_api_version           IN    NUMBER
2345       ,p_init_msg_list         IN    VARCHAR2
2346       ,p_parameter_name        IN    csi_datastructures_pub.parameter_name
2347       ,p_parameter_value       IN    csi_datastructures_pub.parameter_value
2348       )
2349 IS
2350     l_api_name          CONSTANT VARCHAR2(30)   := 'dump_call_batch_val';
2351     l_api_version       CONSTANT NUMBER         := 1.0;
2352 BEGIN
2353 -- Standard Start of API savepoint
2354   -- SAVEPOINT       dump_call_batch_val;
2355    PUT_LINE ('Api_version                 :'||p_api_version);
2356    PUT_LINE ('Init_msg_list               :'||p_init_msg_list);
2357    FOR tab_row IN p_parameter_name.FIRST..p_parameter_name.LAST
2358    LOOP
2359     PUT_LINE ('parameter_name  :'||p_parameter_name(tab_row));
2360     PUT_LINE ('parameter_value :'||p_parameter_value(tab_row));
2361    END LOOP;
2362 EXCEPTION
2363         WHEN OTHERS THEN
2364        --  ROLLBACK TO  dump_call_batch_val;
2365           IF      FND_MSG_PUB.Check_Msg_Level
2366                  (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2367           THEN
2368                   FND_MSG_PUB.Add_Exc_Msg
2369                 ( g_pkg_name ,
2370                   l_api_name
2371                  );
2372           END IF;
2373 END dump_call_batch_val;
2374 
2375 PROCEDURE Populate_Install_Param_Rec IS
2376 BEGIN
2377    SELECT INTERNAL_PARTY_ID
2378          ,NULL -- PROJECT_LOCATION_ID
2379          ,NULL -- WIP_LOCATION_ID
2380          ,NULL -- IN_TRANSIT_LOCATION_ID
2381          ,NULL -- PO_LOCATION_ID
2382          ,CATEGORY_SET_ID
2383          ,nvl(HISTORY_FULL_DUMP_FREQUENCY,10)
2384          ,nvl(FREEZE_FLAG,'N')
2385          ,FREEZE_DATE
2386          ,nvl(SHOW_ALL_PARTY_LOCATION,'N')
2387          ,nvl(OWNERSHIP_OVERRIDE_AT_TXN,'N')
2388          ,nvl(SFM_QUEUE_BYPASS_FLAG,'N')
2389          ,nvl(AUTO_ALLOCATE_COMP_AT_WIP,'N')
2390          ,TXN_SEQ_START_DATE
2391          ,nvl(OWNERSHIP_CASCADE_AT_TXN,'N')
2392          ,'Y'
2393          ,FA_CREATION_GROUP_BY
2394    INTO csi_datastructures_pub.G_INSTALL_PARAM_REC.INTERNAL_PARTY_ID
2395        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.PROJECT_LOCATION_ID
2396        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.WIP_LOCATION_ID
2397        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.IN_TRANSIT_LOCATION_ID
2398        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.PO_LOCATION_ID
2399        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.CATEGORY_SET_ID
2400        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.HISTORY_FULL_DUMP_FREQUENCY
2401        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.FREEZE_FLAG
2402        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.FREEZE_DATE
2403        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.SHOW_ALL_PARTY_LOCATION
2404        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.OWNERSHIP_OVERRIDE_AT_TXN
2405        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.SFM_QUEUE_BYPASS_FLAG
2406        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.AUTO_ALLOCATE_COMP_AT_WIP
2407        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.TXN_SEQ_START_DATE
2408        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.OWNERSHIP_CASCADE_AT_TXN
2409        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.FETCH_FLAG
2410        ,csi_datastructures_pub.G_INSTALL_PARAM_REC.FA_CREATION_GROUP_BY
2411      FROM CSI_INSTALL_PARAMETERS;
2412   EXCEPTION
2413      WHEN OTHERS THEN
2414         csi_datastructures_pub.G_INSTALL_PARAM_REC.FETCH_FLAG := 'N';
2415 END Populate_Install_Param_Rec;
2416 --
2417 FUNCTION IB_ACTIVE RETURN BOOLEAN IS
2418   l_freeze_flag VARCHAR2(1) := 'N';
2419 BEGIN
2420     IF csi_datastructures_pub.g_install_param_rec.fetch_flag IS NULL THEN
2421        csi_gen_utility_pvt.populate_install_param_rec;
2422     END IF;
2423     --
2424     l_freeze_flag := csi_datastructures_pub.g_install_param_rec.freeze_flag;
2425     --
2426     IF nvl(l_freeze_flag,'N') = 'Y' THEN
2427       return TRUE;
2428     ELSE
2429       return FALSE;
2430     END IF;
2431 END IB_ACTIVE;
2432 
2433 FUNCTION is_eib_installed RETURN VARCHAR2
2434 IS
2435     l_eib_installed    VARCHAR2(1) := 'N' ;
2436     l_temp             VARCHAR2(40);
2437     l_app_info         BOOLEAN;
2438 BEGIN
2439    IF (CSI_GEN_UTILITY_PVT.g_cse_install is NULL)
2440    THEN
2441       l_app_info := fnd_installation.get_app_info('CSE',
2442                     CSI_GEN_UTILITY_PVT.g_cse_install, l_temp, l_temp);
2443    END IF;
2444 
2445    IF (CSI_GEN_UTILITY_PVT.g_cse_install = 'I')
2446    THEN
2447      l_eib_installed := 'Y';
2448    ELSE
2449      l_eib_installed := 'N';
2450    END IF;
2451    RETURN l_eib_installed ;
2452 
2453 END is_eib_installed ;
2454 
2455 END CSI_GEN_UTILITY_PVT;