[Home] [Help]
1: package body ecx_utils as
2: -- $Header: ECXUTILB.pls 120.13 2011/02/15 07:05:39 jmaddila ship $
3: l_procedure PLS_INTEGER := ecx_debug.g_procedure;
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
1: package body ecx_utils as
2: -- $Header: ECXUTILB.pls 120.13 2011/02/15 07:05:39 jmaddila ship $
3: l_procedure PLS_INTEGER := ecx_debug.g_procedure;
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
8: l_unexpectedEnabled boolean := ecx_debug.g_unexpectedEnabled;
1: package body ecx_utils as
2: -- $Header: ECXUTILB.pls 120.13 2011/02/15 07:05:39 jmaddila ship $
3: l_procedure PLS_INTEGER := ecx_debug.g_procedure;
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
8: l_unexpectedEnabled boolean := ecx_debug.g_unexpectedEnabled;
9: DELETE_DOCTYPE_PROC_NAME CONSTANT varchar2(50) := 'ECX_ACTIONS.DELETE_DOCTYPE';
2: -- $Header: ECXUTILB.pls 120.13 2011/02/15 07:05:39 jmaddila ship $
3: l_procedure PLS_INTEGER := ecx_debug.g_procedure;
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
8: l_unexpectedEnabled boolean := ecx_debug.g_unexpectedEnabled;
9: DELETE_DOCTYPE_PROC_NAME CONSTANT varchar2(50) := 'ECX_ACTIONS.DELETE_DOCTYPE';
10: /**
3: l_procedure PLS_INTEGER := ecx_debug.g_procedure;
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
8: l_unexpectedEnabled boolean := ecx_debug.g_unexpectedEnabled;
9: DELETE_DOCTYPE_PROC_NAME CONSTANT varchar2(50) := 'ECX_ACTIONS.DELETE_DOCTYPE';
10: /**
11: Prepares the Select statement for the ec_views on the base Applications tables.
4: l_statement PLS_INTEGER := ecx_debug.g_statement;
5: l_unexpected PLS_INTEGER := ecx_debug.g_unexpected;
6: l_procedureEnabled boolean := ecx_debug.g_procedureEnabled;
7: l_statementEnabled boolean := ecx_debug.g_statementEnabled;
8: l_unexpectedEnabled boolean := ecx_debug.g_unexpectedEnabled;
9: DELETE_DOCTYPE_PROC_NAME CONSTANT varchar2(50) := 'ECX_ACTIONS.DELETE_DOCTYPE';
10: /**
11: Prepares the Select statement for the ec_views on the base Applications tables.
12: **/
29: iRow_count pls_integer := ecx_utils.g_source.COUNT;
30: i pls_integer;
31: BEGIN
32: if (l_procedureEnabled) then
33: ecx_debug.push(i_method_name);
34: end if;
35:
36: if(l_statementEnabled) then
37: ecx_debug.log(l_statement, 'i_level',i_level,i_method_name);
33: ecx_debug.push(i_method_name);
34: end if;
35:
36: if(l_statementEnabled) then
37: ecx_debug.log(l_statement, 'i_level',i_level,i_method_name);
38: end if;
39:
40: i := ecx_utils.g_source_levels(i_level).file_start_pos;
41: loop
72: cSelect_stmt := RTRIM(cSelect_stmt, ',');
73: i_Where_string := cSelect_stmt||' '||cFrom_stmt||' '||cWhere_Stmt;
74:
75: if(l_statementEnabled) then
76: ecx_debug.log(l_statement,'i_Where_String',i_Where_String,i_method_name);
77: end if;
78:
79: if (l_procedureEnabled) then
80: ecx_debug.pop(i_method_name);
76: ecx_debug.log(l_statement,'i_Where_String',i_Where_String,i_method_name);
77: end if;
78:
79: if (l_procedureEnabled) then
80: ecx_debug.pop(i_method_name);
81: end if;
82: exception
83: when others then
84: if(l_unexpectedEnabled) then
81: end if;
82: exception
83: when others then
84: if(l_unexpectedEnabled) then
85: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
86: 'PROGRESS_LEVEL','ECX_UTILS.SELect_CLAUSE');
87: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
88: 'ERROR_MESSAGE',SQLERRM);
89: end if;
83: when others then
84: if(l_unexpectedEnabled) then
85: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
86: 'PROGRESS_LEVEL','ECX_UTILS.SELect_CLAUSE');
87: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
88: 'ERROR_MESSAGE',SQLERRM);
89: end if;
90: ecx_utils.error_type := 30;
91: ecx_utils.i_ret_code :=2;
112: l_clob clob;
113:
114: begin
115: if (l_procedureEnabled) then
116: ecx_debug.push(i_method_name);
117: end if;
118:
119: if (ecx_utils.g_source_levels.COUNT >0) then
120: for i in ecx_utils.g_source_levels.first..ecx_utils.g_source_levels.last
142: **/
143:
144:
145: if(l_statementEnabled) then
146: ecx_debug.log(l_statement,ecx_utils.g_source_levels(i).sql_stmt,i_method_name);
147: end if;
148:
149: -- Open Cursor For Each level and store the handles in the PL/SQL table.
150: ecx_utils.g_source_levels(i).Cursor_handle := dbms_sql.open_cursor;
149: -- Open Cursor For Each level and store the handles in the PL/SQL table.
150: ecx_utils.g_source_levels(i).Cursor_handle := dbms_sql.open_cursor;
151:
152: if(l_statementEnabled) then
153: ecx_debug.log(l_statement,'Cursor handle',
154: ecx_utils.g_source_levels(i).Cursor_handle,i_method_name);
155: end if;
156:
157: -- Parse the Select Statement for Each level
170: );
171:
172:
173: if(l_statementEnabled) then
174: ecx_debug.log(l_statement,'ECX','ECX_PROGRAM_ERROR',i_method_name,
175: 'PROGRESS_LEVEL','ECX_UTILS.LOAD_OBJECTS');
176: ecx_debug.log(l_statement,'ECX','ECX_PARSE_VIEW_ERROR',i_method_name,'LEVEL',i);
177: ecx_debug.log(l_statement, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
178: end if;
172:
173: if(l_statementEnabled) then
174: ecx_debug.log(l_statement,'ECX','ECX_PROGRAM_ERROR',i_method_name,
175: 'PROGRESS_LEVEL','ECX_UTILS.LOAD_OBJECTS');
176: ecx_debug.log(l_statement,'ECX','ECX_PARSE_VIEW_ERROR',i_method_name,'LEVEL',i);
177: ecx_debug.log(l_statement, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
178: end if;
179: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
180: raise ecx_utils.PROGRAM_EXIT;
173: if(l_statementEnabled) then
174: ecx_debug.log(l_statement,'ECX','ECX_PROGRAM_ERROR',i_method_name,
175: 'PROGRESS_LEVEL','ECX_UTILS.LOAD_OBJECTS');
176: ecx_debug.log(l_statement,'ECX','ECX_PARSE_VIEW_ERROR',i_method_name,'LEVEL',i);
177: ecx_debug.log(l_statement, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
178: end if;
179: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
180: raise ecx_utils.PROGRAM_EXIT;
181: END;
175: 'PROGRESS_LEVEL','ECX_UTILS.LOAD_OBJECTS');
176: ecx_debug.log(l_statement,'ECX','ECX_PARSE_VIEW_ERROR',i_method_name,'LEVEL',i);
177: ecx_debug.log(l_statement, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
178: end if;
179: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
180: raise ecx_utils.PROGRAM_EXIT;
181: END;
182:
183: i_counter :=0;
211:
212: END LOOP;
213: end if;
214: if (l_procedureEnabled) then
215: ecx_debug.pop(i_method_name);
216: end if;
217: EXCEPTION
218: WHEN ecx_utils.PROGRAM_EXIT then
219: raise ecx_utils.program_exit;
218: WHEN ecx_utils.PROGRAM_EXIT then
219: raise ecx_utils.program_exit;
220: WHEN OTHERS THEN
221: if(l_unexpectedEnabled) then
222: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
223: 'PROGRESS_LEVEL',
224: 'ECX_UTILS.LOAD_OBJECTS');
225: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
226: 'ERROR_MESSAGE',SQLERRM);
221: if(l_unexpectedEnabled) then
222: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
223: 'PROGRESS_LEVEL',
224: 'ECX_UTILS.LOAD_OBJECTS');
225: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
226: 'ERROR_MESSAGE',SQLERRM);
227: ecx_debug.log(l_unexpected, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
228: end if;
229: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
223: 'PROGRESS_LEVEL',
224: 'ECX_UTILS.LOAD_OBJECTS');
225: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
226: 'ERROR_MESSAGE',SQLERRM);
227: ecx_debug.log(l_unexpected, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
228: end if;
229: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
230: raise ecx_utils.PROGRAM_EXIT;
231: end load_objects;
225: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
226: 'ERROR_MESSAGE',SQLERRM);
227: ecx_debug.log(l_unexpected, 'ECX', SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS',i_method_name);
228: end if;
229: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.LOAD_OBJECTS');
230: raise ecx_utils.PROGRAM_EXIT;
231: end load_objects;
232:
233: procedure load_procedure_mappings (
256: i pls_integer := 0;
257:
258: BEGIN
259: if (l_procedureEnabled) then
260: ecx_debug.push(i_method_name);
261: end if;
262: if(l_statementEnabled) then
263: ecx_debug.log(l_statement,'i_map_id',i_map_id,i_method_name);
264: end if;
259: if (l_procedureEnabled) then
260: ecx_debug.push(i_method_name);
261: end if;
262: if(l_statementEnabled) then
263: ecx_debug.log(l_statement,'i_map_id',i_map_id,i_method_name);
264: end if;
265: ecx_utils.g_procedure_mappings.DELETE;
266:
267: for proc_map in proc_mapping (i_map_id) loop
277: ecx_utils.g_procedure_mappings(i).data_type := proc_map.data_type;
278: ecx_utils.g_procedure_mappings(i).variable_constant := proc_map.variable_constant;
279:
280: if(l_statementEnabled) then
281: ecx_debug.log(l_statement, ecx_utils.g_procedure_mappings(i).tranStage_id ||'|'||
282: ecx_utils.g_procedure_mappings(i).procedure_name||'|'||
283: ecx_utils.g_procedure_mappings(i).parameter_name||'|'||
284: ecx_utils.g_procedure_mappings(i).action_type||'|'||
285: ecx_utils.g_procedure_mappings(i).variable_level||'|'||
291: end if;
292: end loop;
293:
294: if (l_procedureEnabled) then
295: ecx_debug.pop(i_method_name);
296: end if;
297:
298: EXCEPTION
299: WHEN PROGRAM_EXIT then
298: EXCEPTION
299: WHEN PROGRAM_EXIT then
300:
301: if (l_procedureEnabled) then
302: ecx_debug.pop(i_method_name);
303: end if;
304: raise;
305:
306: WHEN OTHERS THEN
304: raise;
305:
306: WHEN OTHERS THEN
307: if(l_unexpectedEnabled) then
308: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR','PROGRESS_LEVEL',i_method_name,
309: 'ecx_utils.LOAD_PROCEDURE_MAPPINGS');
310: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
311: ecx_debug.log(l_unexpected, 'ECX',
312: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ',
306: WHEN OTHERS THEN
307: if(l_unexpectedEnabled) then
308: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR','PROGRESS_LEVEL',i_method_name,
309: 'ecx_utils.LOAD_PROCEDURE_MAPPINGS');
310: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
311: ecx_debug.log(l_unexpected, 'ECX',
312: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ',
313: i_method_name);
314: end if;
307: if(l_unexpectedEnabled) then
308: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR','PROGRESS_LEVEL',i_method_name,
309: 'ecx_utils.LOAD_PROCEDURE_MAPPINGS');
310: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
311: ecx_debug.log(l_unexpected, 'ECX',
312: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ',
313: i_method_name);
314: end if;
315: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
311: ecx_debug.log(l_unexpected, 'ECX',
312: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ',
313: i_method_name);
314: end if;
315: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
316: ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ');
317: if (l_procedureEnabled) then
318: ecx_debug.pop(i_method_name);
319: end if;
314: end if;
315: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
316: ' - ecx_utils.LOAD_PROCEDURE_MAPPINGS: ');
317: if (l_procedureEnabled) then
318: ecx_debug.pop(i_method_name);
319: end if;
320: raise PROGRAM_EXIT;
321: end load_procedure_mappings;
322:
335: l_proc_name Varchar2(80);
336:
337: BEGIN
338: if (l_procedureEnabled) then
339: ecx_debug.push(i_method_name);
340: end if;
341:
342: ecx_utils.g_procedure_list.DELETE;
343: -- load all the procedure definitions and build the cursor
350: ecx_utils.g_procedure_list(l_transtage_id).cursor_handle);
351: end loop;
352:
353: if (l_procedureEnabled) then
354: ecx_debug.pop(i_method_name);
355: end if;
356:
357: EXCEPTION
358: WHEN PROGRAM_EXIT then
356:
357: EXCEPTION
358: WHEN PROGRAM_EXIT then
359: if (l_procedureEnabled) then
360: ecx_debug.pop(i_method_name);
361: end if;
362: raise;
363:
364: WHEN OTHERS THEN
362: raise;
363:
364: WHEN OTHERS THEN
365: if(l_unexpectedEnabled) then
366: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
367: 'PROGRESS_LEVEL',
368: 'ecx_utils.LOAD_PROCEDURE_DEFINITIONS');
369: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
370: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS:',
365: if(l_unexpectedEnabled) then
366: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
367: 'PROGRESS_LEVEL',
368: 'ecx_utils.LOAD_PROCEDURE_DEFINITIONS');
369: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
370: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS:',
371: i_method_name);
372: end if;
373: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
366: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
367: 'PROGRESS_LEVEL',
368: 'ecx_utils.LOAD_PROCEDURE_DEFINITIONS');
369: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
370: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS:',
371: i_method_name);
372: end if;
373: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
374: ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS: ');
369: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
370: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS:',
371: i_method_name);
372: end if;
373: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
374: ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS: ');
375: if (l_procedureEnabled) then
376: ecx_debug.pop(i_method_name);
377: end if;
372: end if;
373: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM ||
374: ' - ecx_utils.LOAD_PROCEDURE_DEFINITIONS: ');
375: if (l_procedureEnabled) then
376: ecx_debug.pop(i_method_name);
377: end if;
378: raise PROGRAM_EXIT;
379:
380: END;
392: parse_error EXCEPTION;
393:
394: BEGIN
395: if (l_procedureEnabled) then
396: ecx_debug.push(i_method_name);
397: end if;
398: if(l_statementEnabled) then
399: ecx_debug.log(l_statement,'p_transtage_id',p_transtage_id,i_method_name);
400: ecx_debug.log(l_statement,'p_procedure_name',p_procedure_name,i_method_name);
395: if (l_procedureEnabled) then
396: ecx_debug.push(i_method_name);
397: end if;
398: if(l_statementEnabled) then
399: ecx_debug.log(l_statement,'p_transtage_id',p_transtage_id,i_method_name);
400: ecx_debug.log(l_statement,'p_procedure_name',p_procedure_name,i_method_name);
401: end if;
402: l_proc_call := 'BEGIN ' || p_procedure_name || '(';
403:
396: ecx_debug.push(i_method_name);
397: end if;
398: if(l_statementEnabled) then
399: ecx_debug.log(l_statement,'p_transtage_id',p_transtage_id,i_method_name);
400: ecx_debug.log(l_statement,'p_procedure_name',p_procedure_name,i_method_name);
401: end if;
402: l_proc_call := 'BEGIN ' || p_procedure_name || '(';
403:
404: if (ecx_utils.g_procedure_mappings.count <> 0)
427: loop
428: if(ecx_utils.g_procedure_list.EXISTS(i) and ecx_utils.g_procedure_list(i).procedure_call = l_proc_call) then
429: x_proc_cursor := ecx_utils.g_procedure_list(i).cursor_handle;
430: if(l_statementEnabled) then
431: ecx_debug.log(l_statement, 'proc_call', l_proc_call,i_method_name);
432: ecx_debug.log(l_statement,'x_proc_cursor',x_proc_cursor,i_method_name);
433: end if;
434: if (l_procedureEnabled) then
435: ecx_debug.pop(i_method_name);
428: if(ecx_utils.g_procedure_list.EXISTS(i) and ecx_utils.g_procedure_list(i).procedure_call = l_proc_call) then
429: x_proc_cursor := ecx_utils.g_procedure_list(i).cursor_handle;
430: if(l_statementEnabled) then
431: ecx_debug.log(l_statement, 'proc_call', l_proc_call,i_method_name);
432: ecx_debug.log(l_statement,'x_proc_cursor',x_proc_cursor,i_method_name);
433: end if;
434: if (l_procedureEnabled) then
435: ecx_debug.pop(i_method_name);
436: end if;
431: ecx_debug.log(l_statement, 'proc_call', l_proc_call,i_method_name);
432: ecx_debug.log(l_statement,'x_proc_cursor',x_proc_cursor,i_method_name);
433: end if;
434: if (l_procedureEnabled) then
435: ecx_debug.pop(i_method_name);
436: end if;
437: return;
438: end if;
439: end loop;
437: return;
438: end if;
439: end loop;
440: if(l_statementEnabled) then
441: ecx_debug.log(l_statement, 'proc_call', l_proc_call,i_method_name);
442: end if;
443: x_proc_cursor := dbms_sql.open_cursor;
444: BEGIN
445: dbms_sql.parse (x_proc_cursor, l_proc_call, dbms_sql.native);
447: when others then
448: raise parse_error;
449: END;
450: if(l_statementEnabled) then
451: ecx_debug.log(l_statement,'x_proc_cursor',x_proc_cursor,i_method_name);
452: end if;
453: if (l_procedureEnabled) then
454: ecx_debug.pop(i_method_name);
455: end if;
450: if(l_statementEnabled) then
451: ecx_debug.log(l_statement,'x_proc_cursor',x_proc_cursor,i_method_name);
452: end if;
453: if (l_procedureEnabled) then
454: ecx_debug.pop(i_method_name);
455: end if;
456: EXCEPTION
457: WHEN PARSE_ERROR then
458: error_position := dbms_sql.last_error_position;
457: WHEN PARSE_ERROR then
458: error_position := dbms_sql.last_error_position;
459: ecx_error_handling_pvt.print_parse_error (error_position, l_proc_call);
460: if(l_unexpectedEnabled) then
461: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
462: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
463: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PARSE_ERROR', i_method_name);
464: end if;
465: ecx_debug.setErrorInfo(1, 25, 'ECX_PARSE_ERROR');
459: ecx_error_handling_pvt.print_parse_error (error_position, l_proc_call);
460: if(l_unexpectedEnabled) then
461: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
462: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
463: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PARSE_ERROR', i_method_name);
464: end if;
465: ecx_debug.setErrorInfo(1, 25, 'ECX_PARSE_ERROR');
466: if (l_procedureEnabled) then
467: ecx_debug.pop(i_method_name);
461: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
462: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
463: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PARSE_ERROR', i_method_name);
464: end if;
465: ecx_debug.setErrorInfo(1, 25, 'ECX_PARSE_ERROR');
466: if (l_procedureEnabled) then
467: ecx_debug.pop(i_method_name);
468: end if;
469: raise program_exit;
463: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PARSE_ERROR', i_method_name);
464: end if;
465: ecx_debug.setErrorInfo(1, 25, 'ECX_PARSE_ERROR');
466: if (l_procedureEnabled) then
467: ecx_debug.pop(i_method_name);
468: end if;
469: raise program_exit;
470:
471: WHEN PROGRAM_EXIT then
469: raise program_exit;
470:
471: WHEN PROGRAM_EXIT then
472: if (l_procedureEnabled) then
473: ecx_debug.pop(i_method_name);
474: end if;
475: raise;
476:
477: WHEN OTHERS THEN
475: raise;
476:
477: WHEN OTHERS THEN
478: if(l_statementEnabled) then
479: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
480: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
481: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
482: 'ERROR_MESSAGE',SQLERRM);
483: ecx_debug.log(l_unexpected, 'ECX',
477: WHEN OTHERS THEN
478: if(l_statementEnabled) then
479: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
480: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
481: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
482: 'ERROR_MESSAGE',SQLERRM);
483: ecx_debug.log(l_unexpected, 'ECX',
484: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ',
485: i_method_name);
479: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
480: 'PROGRESS_LEVEL','ecx_utils.BUILD_PROCEDURE_CALL');
481: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,
482: 'ERROR_MESSAGE',SQLERRM);
483: ecx_debug.log(l_unexpected, 'ECX',
484: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ',
485: i_method_name);
486: end if;
487: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ');
483: ecx_debug.log(l_unexpected, 'ECX',
484: ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ',
485: i_method_name);
486: end if;
487: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ');
488:
489: if (l_procedureEnabled) then
490: ecx_debug.pop(i_method_name);
491: end if;
486: end if;
487: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.BUILD_PROCEDURE_CALL: ');
488:
489: if (l_procedureEnabled) then
490: ecx_debug.pop(i_method_name);
491: end if;
492: raise PROGRAM_EXIT;
493:
494: END build_procedure_call;
504: if (g_source.EXISTS(i))
505: then
506:
507: if(l_statementEnabled) then
508: ecx_debug.log(l_statement, i || '|'||
509: g_source(i).attribute_id || '|' ||
510: g_source(i).parent_attribute_id || '|' ||
511: g_source(i).external_level || '|' ||
512: g_source(i).attribute_name || '|' ||
646: no_seed_data EXCEPTION;
647:
648: begin
649: if (l_procedureEnabled) then
650: ecx_debug.push(i_method_name);
651: end if;
652: if(l_statementEnabled) then
653: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
654: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
649: if (l_procedureEnabled) then
650: ecx_debug.push(i_method_name);
651: end if;
652: if(l_statementEnabled) then
653: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
654: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
655: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
656: end if;
657: select
650: ecx_debug.push(i_method_name);
651: end if;
652: if(l_statementEnabled) then
653: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
654: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
655: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
656: end if;
657: select
658: a.attribute_id,
651: end if;
652: if(l_statementEnabled) then
653: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
654: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
655: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
656: end if;
657: select
658: a.attribute_id,
659: a.attribute_name,
730: --if i_object_level <> 0
731: --then
732: --if (g_tbl(i).attribute_name = g_level(i_object_level).start_element) then
733: --g_level(i_object_level).dtd_node_index := i;
734: --ecx_debug.log(3, 'dtd_node_index', g_level(i_object_level).dtd_node_index || ' at level' || i_object_level);
735: --end if;
736:
737: -- select source_attribute_id
738: -- bulk collect into dtd_map_tbl
777: -- end loop;
778: end if;
779:
780: if (l_procedureEnabled) then
781: ecx_debug.pop(i_method_name);
782: end if;
783: exception
784: WHEN PROGRAM_EXIT then
785: if (l_procedureEnabled) then
782: end if;
783: exception
784: WHEN PROGRAM_EXIT then
785: if (l_procedureEnabled) then
786: ecx_debug.pop(i_method_name);
787: end if;
788: raise;
789: WHEN OTHERS THEN
790: if(l_unexpectedEnabled) then
787: end if;
788: raise;
789: WHEN OTHERS THEN
790: if(l_unexpectedEnabled) then
791: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
792: 'PROGRESS_LEVEL',
793: 'ECX_UTILS.LOAD_ATTRIBUTES');
794: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
795: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ',
790: if(l_unexpectedEnabled) then
791: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
792: 'PROGRESS_LEVEL',
793: 'ECX_UTILS.LOAD_ATTRIBUTES');
794: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
795: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ',
796: i_method_name);
797: end if;
798: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ');
791: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
792: 'PROGRESS_LEVEL',
793: 'ECX_UTILS.LOAD_ATTRIBUTES');
794: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
795: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ',
796: i_method_name);
797: end if;
798: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ');
799: if (l_procedureEnabled) then
794: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
795: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ',
796: i_method_name);
797: end if;
798: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ');
799: if (l_procedureEnabled) then
800: ecx_debug.pop(i_method_name);
801: end if;
802: raise PROGRAM_EXIT;
796: i_method_name);
797: end if;
798: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_ATTRIBUTES: ');
799: if (l_procedureEnabled) then
800: ecx_debug.pop(i_method_name);
801: end if;
802: raise PROGRAM_EXIT;
803: end LOAD_ATTRIBUTES;
804:
818: no_seed_data EXCEPTION;
819:
820: BEGIN
821: if (l_procedureEnabled) then
822: ecx_debug.push(i_method_name);
823: end if;
824: if(l_statementEnabled) then
825: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
826: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
821: if (l_procedureEnabled) then
822: ecx_debug.push(i_method_name);
823: end if;
824: if(l_statementEnabled) then
825: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
826: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
827: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
828: ecx_debug.log(l_statement,'i_source',i_source,i_method_name);
829: end if;
822: ecx_debug.push(i_method_name);
823: end if;
824: if(l_statementEnabled) then
825: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
826: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
827: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
828: ecx_debug.log(l_statement,'i_source',i_source,i_method_name);
829: end if;
830:
823: end if;
824: if(l_statementEnabled) then
825: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
826: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
827: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
828: ecx_debug.log(l_statement,'i_source',i_source,i_method_name);
829: end if;
830:
831: if ( i_source )
824: if(l_statementEnabled) then
825: ecx_debug.log(l_statement,'i_map_id', i_map_id,i_method_name);
826: ecx_debug.log(l_statement,'i_level_id',i_level_id,i_method_name);
827: ecx_debug.log(l_statement,'i_object_level',i_object_level,i_method_name);
828: ecx_debug.log(l_statement,'i_source',i_source,i_method_name);
829: end if;
830:
831: if ( i_source )
832: then
835: load_attributes(i_map_id,i_level_id,i_object_level,ecx_utils.g_target,ecx_utils.g_target_levels);
836: end if;
837:
838: if (l_procedureEnabled) then
839: ecx_debug.pop(i_method_name);
840: end if;
841:
842: EXCEPTION
843: WHEN NO_SEED_DATA then
840: end if;
841:
842: EXCEPTION
843: WHEN NO_SEED_DATA then
844: ecx_debug.setErrorInfo(1, 30, 'ECX_SEED_DATA_NOT_FOUND', 'MAP_ID', i_map_id);
845:
846: if(l_unexpectedEnabled) then
847: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_FOUND',i_method_name,'MAP_ID', i_map_id);
848: end if;
843: WHEN NO_SEED_DATA then
844: ecx_debug.setErrorInfo(1, 30, 'ECX_SEED_DATA_NOT_FOUND', 'MAP_ID', i_map_id);
845:
846: if(l_unexpectedEnabled) then
847: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_FOUND',i_method_name,'MAP_ID', i_map_id);
848: end if;
849: if (l_procedureEnabled) then
850: ecx_debug.pop(i_method_name);
851: end if;
846: if(l_unexpectedEnabled) then
847: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_FOUND',i_method_name,'MAP_ID', i_map_id);
848: end if;
849: if (l_procedureEnabled) then
850: ecx_debug.pop(i_method_name);
851: end if;
852: raise PROGRAM_EXIT;
853:
854: WHEN PROGRAM_EXIT then
851: end if;
852: raise PROGRAM_EXIT;
853:
854: WHEN PROGRAM_EXIT then
855: ecx_debug.pop('ECX_UTILS.LOAD_DTD_NODES');
856: raise;
857: WHEN OTHERS THEN
858: if(l_unexpectedEnabled) then
859: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
855: ecx_debug.pop('ECX_UTILS.LOAD_DTD_NODES');
856: raise;
857: WHEN OTHERS THEN
858: if(l_unexpectedEnabled) then
859: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
860: 'PROGRESS_LEVEL',
861: 'ECX_UTILS.LOAD_DTD_NODES');
862: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES',
863: i_method_name);
858: if(l_unexpectedEnabled) then
859: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,
860: 'PROGRESS_LEVEL',
861: 'ECX_UTILS.LOAD_DTD_NODES');
862: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES',
863: i_method_name);
864: end if;
865: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES');
866:
861: 'ECX_UTILS.LOAD_DTD_NODES');
862: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES',
863: i_method_name);
864: end if;
865: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES');
866:
867: if (l_procedureEnabled) then
868: ecx_debug.pop(i_method_name);
869: end if;
864: end if;
865: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.LOAD_DTD_NODES');
866:
867: if (l_procedureEnabled) then
868: ecx_debug.pop(i_method_name);
869: end if;
870: raise PROGRAM_EXIT;
871: END LOAD_DTD_NODES;
872:
1053: root_level_found Boolean := false;
1054:
1055: BEGIN
1056: if (l_procedureEnabled) then
1057: ecx_debug.push(i_method_name);
1058: end if;
1059: if(l_statementEnabled) then
1060: ecx_debug.log(l_statement,'i_map_id',i_map_id,i_method_name);
1061: end if;
1056: if (l_procedureEnabled) then
1057: ecx_debug.push(i_method_name);
1058: end if;
1059: if(l_statementEnabled) then
1060: ecx_debug.log(l_statement,'i_map_id',i_map_id,i_method_name);
1061: end if;
1062:
1063: ecx_utils.g_source_levels.DELETE;
1064: ecx_utils.g_target_levels.DELETE;
1065: ecx_utils.g_target_source_levels.DELETE;
1066: ecx_utils.g_target.DELETE;
1067: ecx_utils.g_source.DELETE;
1068: if(l_statementEnabled) then
1069: ecx_debug.log(l_statement,'ECX','ECX_LOADING_LEVELS',i_method_name,
1070: 'LEVEL','Loading Target levels');
1071: end if;
1072: -- Loading Target level information.
1073:
1095: if v_target_level_id.COUNT > 0 then
1096: for j in v_target_level_id.FIRST..v_target_level_id.LAST
1097: -- for c1 in target_rec ( p_map_id => i_map_id )
1098: loop
1099: -- ecx_debug.log(3,'Target Level Id',targ_rec_table(j).target_level_id||' Target Level =>'||targ_rec_table(j).target_level);
1100: cur_ext_level := v_target_level(j);
1101: ecx_utils.g_target_levels(cur_ext_level).level := cur_ext_level;
1102: ecx_utils.g_target_levels(cur_ext_level).level := v_parent_level(j);
1103: ecx_utils.g_target_levels(cur_ext_level).start_element := v_target_level_name(j);
1107: ecx_utils.g_target_levels(cur_ext_level).file_start_pos := 0;
1108: ecx_utils.g_target_levels(cur_ext_level).file_end_pos := 0;
1109: ecx_utils.g_target_levels(cur_ext_level).dtd_node_index := 0;
1110: if(l_statementEnabled) then
1111: ecx_debug.log(l_statement, 'External Level ('|| cur_ext_level||')',
1112: ecx_utils.g_target_levels(cur_ext_level).level,i_method_name);
1113: ecx_debug.log(l_statement, 'External Level ('||cur_ext_level||') Object Name: '
1114: || 'start_element: ' || ecx_utils.g_target_levels (cur_ext_level).start_element,
1115: i_method_name);
1109: ecx_utils.g_target_levels(cur_ext_level).dtd_node_index := 0;
1110: if(l_statementEnabled) then
1111: ecx_debug.log(l_statement, 'External Level ('|| cur_ext_level||')',
1112: ecx_utils.g_target_levels(cur_ext_level).level,i_method_name);
1113: ecx_debug.log(l_statement, 'External Level ('||cur_ext_level||') Object Name: '
1114: || 'start_element: ' || ecx_utils.g_target_levels (cur_ext_level).start_element,
1115: i_method_name);
1116: end if;
1117:
1117:
1118: /** Load the Target Object Attributes **/
1119: load_dtd_nodes( i_map_id,v_target_level_id(j),v_target_level(j),false);
1120:
1121: -- ecx_debug.log(3,'ECX','ECX_LOADING_LEVELS','LEVEL','Loading Levels Matrices');
1122: int_ext_loaded := False;
1123:
1124: -- Loading target and source information.
1125: -- ecx_debug.log(3, 'Target Level Id', targ_rec_table(j).target_level_id );
1121: -- ecx_debug.log(3,'ECX','ECX_LOADING_LEVELS','LEVEL','Loading Levels Matrices');
1122: int_ext_loaded := False;
1123:
1124: -- Loading target and source information.
1125: -- ecx_debug.log(3, 'Target Level Id', targ_rec_table(j).target_level_id );
1126: if(l_statementEnabled) then
1127: ecx_debug.log(l_statement,'ECX','ECX_LOADING_LEVELS','LEVEL','Loading Levels Matrices', i_method_name);
1128: ecx_debug.log(l_statement, 'Target Level Id', v_target_level_id(j) , i_method_name);
1129: end if;
1123:
1124: -- Loading target and source information.
1125: -- ecx_debug.log(3, 'Target Level Id', targ_rec_table(j).target_level_id );
1126: if(l_statementEnabled) then
1127: ecx_debug.log(l_statement,'ECX','ECX_LOADING_LEVELS','LEVEL','Loading Levels Matrices', i_method_name);
1128: ecx_debug.log(l_statement, 'Target Level Id', v_target_level_id(j) , i_method_name);
1129: end if;
1130:
1131: select object_level source_level,
1124: -- Loading target and source information.
1125: -- ecx_debug.log(3, 'Target Level Id', targ_rec_table(j).target_level_id );
1126: if(l_statementEnabled) then
1127: ecx_debug.log(l_statement,'ECX','ECX_LOADING_LEVELS','LEVEL','Loading Levels Matrices', i_method_name);
1128: ecx_debug.log(l_statement, 'Target Level Id', v_target_level_id(j) , i_method_name);
1129: end if;
1130:
1131: select object_level source_level,
1132: level_mapping_id ,
1182: end if;
1183: ecx_utils.g_target_source_levels(j_count).source_level := cur_int_level;
1184: ecx_utils.g_target_source_levels(j_count).target_level := cur_ext_level;
1185: if(l_statementEnabled) then
1186: ecx_debug.log(l_statement,'Source and target Node Index ',v_source_element_id(k)||' '||v_target_element_id(k), i_method_name);
1187: end if;
1188: j_count := j_count + 1;
1189:
1190: /** Update the Target Node Index **/
1189:
1190: /** Update the Target Node Index **/
1191: ecx_utils.g_target_levels(cur_ext_level).dtd_node_index := v_target_element_id(k);
1192: if(l_statementEnabled) then
1193: ecx_debug.log(l_statement, 'Target Node_index', g_target_levels(cur_ext_level).dtd_node_index ||
1194: ' at level' || cur_ext_level, i_method_name);
1195: ecx_debug.log(l_statement, 'Internal Level '|| cur_int_level||' External Level '
1196: || cur_ext_level, i_method_name);
1197:
1191: ecx_utils.g_target_levels(cur_ext_level).dtd_node_index := v_target_element_id(k);
1192: if(l_statementEnabled) then
1193: ecx_debug.log(l_statement, 'Target Node_index', g_target_levels(cur_ext_level).dtd_node_index ||
1194: ' at level' || cur_ext_level, i_method_name);
1195: ecx_debug.log(l_statement, 'Internal Level '|| cur_int_level||' External Level '
1196: || cur_ext_level, i_method_name);
1197:
1198: ecx_debug.log(l_statement,'Source Level Id ' ,v_source_level_id(k), i_method_name);
1199: -- Loading Internal Level information.
1194: ' at level' || cur_ext_level, i_method_name);
1195: ecx_debug.log(l_statement, 'Internal Level '|| cur_int_level||' External Level '
1196: || cur_ext_level, i_method_name);
1197:
1198: ecx_debug.log(l_statement,'Source Level Id ' ,v_source_level_id(k), i_method_name);
1199: -- Loading Internal Level information.
1200: ecx_debug.log(l_statement, 'ECX', 'ECX_LOADING_LEVELS', i_method_name,
1201: 'LEVEL', 'Loading Source Levels');
1202: end if;
1196: || cur_ext_level, i_method_name);
1197:
1198: ecx_debug.log(l_statement,'Source Level Id ' ,v_source_level_id(k), i_method_name);
1199: -- Loading Internal Level information.
1200: ecx_debug.log(l_statement, 'ECX', 'ECX_LOADING_LEVELS', i_method_name,
1201: 'LEVEL', 'Loading Source Levels');
1202: end if;
1203: -- If the current interface level is the same as previous one,
1204: -- then the interface info for the current level has been loaded.
1220: ecx_utils.g_source_levels(cur_int_level).file_start_pos := 0;
1221: ecx_utils.g_source_levels(cur_int_level).file_end_pos := 0;
1222: ecx_utils.g_source_levels(cur_int_level).dtd_node_index := v_source_element_id(k);
1223: if(l_statementEnabled) then
1224: ecx_debug.log(l_statement, 'Source Node_index', g_source_levels(cur_int_level).dtd_node_index ||
1225: ' at level' || cur_int_level,i_method_name);
1226:
1227: ecx_debug.log(l_statement, 'Internal Level ('||cur_int_level||') Object Name: '
1228: || ecx_utils.g_source_levels (cur_int_level).base_table_name
1223: if(l_statementEnabled) then
1224: ecx_debug.log(l_statement, 'Source Node_index', g_source_levels(cur_int_level).dtd_node_index ||
1225: ' at level' || cur_int_level,i_method_name);
1226:
1227: ecx_debug.log(l_statement, 'Internal Level ('||cur_int_level||') Object Name: '
1228: || ecx_utils.g_source_levels (cur_int_level).base_table_name
1229: || ' Parent Level '
1230: || ecx_utils.g_source_levels(cur_int_level).parent_level,i_method_name);
1231: end if;
1252: end if;
1253:
1254: if(l_statementEnabled) then
1255: if not (int_ext_loaded) then
1256: ecx_debug.log(l_statement, 'Seed Data is missing for map_id', i_map_id,i_method_name);
1257: end if;
1258: end if;
1259:
1260: end loop; -- external_rec
1264: if (ecx_utils.g_source_levels.count <> 0)
1265: then
1266: for i in ecx_utils.g_source_levels.first..ecx_utils.g_source_levels.last
1267: loop
1268: ecx_debug.log(l_statement, 'ECX', 'ECX_INT_FILE_START',i_method_name, 'LEVEL', i,
1269: 'POSITION', ecx_utils.g_source_levels(i).file_start_pos);
1270: ecx_debug.log(l_statement, 'ECX', 'ECX_INT_FILE_END',i_method_name, 'LEVEL', i,
1271: 'POSITION', ecx_utils.g_source_levels(i).file_end_pos);
1272: end loop;
1266: for i in ecx_utils.g_source_levels.first..ecx_utils.g_source_levels.last
1267: loop
1268: ecx_debug.log(l_statement, 'ECX', 'ECX_INT_FILE_START',i_method_name, 'LEVEL', i,
1269: 'POSITION', ecx_utils.g_source_levels(i).file_start_pos);
1270: ecx_debug.log(l_statement, 'ECX', 'ECX_INT_FILE_END',i_method_name, 'LEVEL', i,
1271: 'POSITION', ecx_utils.g_source_levels(i).file_end_pos);
1272: end loop;
1273: end if;
1274: if (ecx_utils.g_target_levels.count <> 0)
1274: if (ecx_utils.g_target_levels.count <> 0)
1275: then
1276: for i in ecx_utils.g_target_levels.first..ecx_utils.g_target_levels.last
1277: loop
1278: ecx_debug.log(l_statement, 'ECX', 'ECX_EXT_FILE_START',i_method_name, 'LEVEL', i,
1279: 'POSITION', ecx_utils.g_target_levels(i).file_start_pos);
1280: ecx_debug.log(l_statement, 'ECX', 'ECX_EXT_FILE_END',i_method_name, 'LEVEL', i,
1281: 'POSITION', ecx_utils.g_target_levels(i).file_end_pos);
1282: end loop;
1276: for i in ecx_utils.g_target_levels.first..ecx_utils.g_target_levels.last
1277: loop
1278: ecx_debug.log(l_statement, 'ECX', 'ECX_EXT_FILE_START',i_method_name, 'LEVEL', i,
1279: 'POSITION', ecx_utils.g_target_levels(i).file_start_pos);
1280: ecx_debug.log(l_statement, 'ECX', 'ECX_EXT_FILE_END',i_method_name, 'LEVEL', i,
1281: 'POSITION', ecx_utils.g_target_levels(i).file_end_pos);
1282: end loop;
1283: end if;
1284: end if;
1350: end if;
1351: end if;
1352:
1353: if(l_statementEnabled) then
1354: ecx_debug.log(l_statement,'Source '||i, 'SOURCE FIRST:'||g_source_levels(i).first_source_level||
1355: 'SOURCE LAST:'||g_source_levels(i).last_source_level||
1356: 'TARGET FIRST:'||g_source_levels(i).first_target_level||
1357: 'TARGET LAST:'||g_source_levels(i).last_target_level,
1358: i_method_name
1364: load_procedure_mappings (i_map_id);
1365: load_procedure_definitions (i_map_id);
1366:
1367: if (l_procedureEnabled) then
1368: ecx_debug.pop(i_method_name);
1369: end if;
1370:
1371: EXCEPTION
1372: WHEN NO_SEED_DATA then
1369: end if;
1370:
1371: EXCEPTION
1372: WHEN NO_SEED_DATA then
1373: ecx_debug.setErrorInfo(1, 30, 'ECX_SEED_DATA_NOT_FOUND', 'MAP_ID', i_map_id);
1374: if(l_unexpectedEnabled) then
1375: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_NOT_FOUND',i_method_name, 'MAP_ID', i_map_id);
1376: end if;
1377: if (l_procedureEnabled) then
1371: EXCEPTION
1372: WHEN NO_SEED_DATA then
1373: ecx_debug.setErrorInfo(1, 30, 'ECX_SEED_DATA_NOT_FOUND', 'MAP_ID', i_map_id);
1374: if(l_unexpectedEnabled) then
1375: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_NOT_FOUND',i_method_name, 'MAP_ID', i_map_id);
1376: end if;
1377: if (l_procedureEnabled) then
1378: ecx_debug.pop(i_method_name);
1379: end if;
1374: if(l_unexpectedEnabled) then
1375: ecx_debug.log(l_unexpected, 'ECX', 'ECX_SEED_DATA_NOT_FOUND',i_method_name, 'MAP_ID', i_map_id);
1376: end if;
1377: if (l_procedureEnabled) then
1378: ecx_debug.pop(i_method_name);
1379: end if;
1380: raise PROGRAM_EXIT;
1381:
1382: WHEN PROGRAM_EXIT then
1380: raise PROGRAM_EXIT;
1381:
1382: WHEN PROGRAM_EXIT then
1383: if (l_procedureEnabled) then
1384: ecx_debug.pop(i_method_name);
1385: end if;
1386: raise;
1387:
1388: WHEN OTHERS THEN
1386: raise;
1387:
1388: WHEN OTHERS THEN
1389: if(l_unexpectedEnabled) then
1390: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1391: 'ecx_utils.LOAD_MAPPINGS');
1392: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1393: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ',
1394: i_method_name);
1388: WHEN OTHERS THEN
1389: if(l_unexpectedEnabled) then
1390: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1391: 'ecx_utils.LOAD_MAPPINGS');
1392: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1393: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ',
1394: i_method_name);
1395: end if;
1396: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ');
1389: if(l_unexpectedEnabled) then
1390: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1391: 'ecx_utils.LOAD_MAPPINGS');
1392: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1393: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ',
1394: i_method_name);
1395: end if;
1396: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ');
1397: if (l_procedureEnabled) then
1392: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1393: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ',
1394: i_method_name);
1395: end if;
1396: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ');
1397: if (l_procedureEnabled) then
1398: ecx_debug.pop(i_method_name);
1399: end if;
1400: raise PROGRAM_EXIT;
1394: i_method_name);
1395: end if;
1396: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.LOAD_MAPPINGS: ');
1397: if (l_procedureEnabled) then
1398: ecx_debug.pop(i_method_name);
1399: end if;
1400: raise PROGRAM_EXIT;
1401:
1402: end load_mappings;
1420: i_eng_version varchar2(2000);
1421:
1422: begin
1423: if (l_procedureEnabled) then
1424: ecx_debug.push(i_method_name);
1425: end if;
1426: -- get the version from the map
1427: begin
1428: select em.ecx_major_version,
1433: where em.map_id = i_map_id;
1434: exception
1435: when others then
1436: if(l_unexpectedEnabled) then
1437: ecx_debug.log(l_unexpected, SQLERRM,i_method_name);
1438: end if;
1439: i_ret_msg := SQLERRM;
1440: i_result := false;
1441: if (l_procedureEnabled) then
1438: end if;
1439: i_ret_msg := SQLERRM;
1440: i_result := false;
1441: if (l_procedureEnabled) then
1442: ecx_debug.pop(i_method_name);
1443: end if;
1444: return;
1445: end;
1446:
1446:
1447: if (i_major_version is null AND i_minor_version is null)
1448: then
1449: if(l_statementEnabled) then
1450: ecx_debug.log(l_statement, 'ECX', 'ECX_MAJOR_MINOR_VERSION_NULL',i_method_name);
1451: end if;
1452: i_major_version := 2;
1453: i_minor_version := 6;
1454: end if;
1453: i_minor_version := 6;
1454: end if;
1455:
1456: if(l_statementEnabled) then
1457: ecx_debug.log(l_statement, 'i_major_version', i_major_version,i_method_name);
1458: ecx_debug.log(l_statement, 'i_minor_version', i_minor_version,i_method_name);
1459: end if;
1460:
1461: -- get the engine version
1454: end if;
1455:
1456: if(l_statementEnabled) then
1457: ecx_debug.log(l_statement, 'i_major_version', i_major_version,i_method_name);
1458: ecx_debug.log(l_statement, 'i_minor_version', i_minor_version,i_method_name);
1459: end if;
1460:
1461: -- get the engine version
1462: begin
1467: and type = 'WFTKN'
1468: and language = 'US';
1469: exception
1470: when no_data_found then
1471: ecx_debug.setErrorInfo(1, 30, 'ECX_WF_RESCRS_VER_NOT_FOUND');
1472: if(l_unexpectedEnabled) then
1473: ecx_debug.log(l_unexpected, 'ECX', 'ECX_WF_RESCRS_VER_NOT_FOUND', i_method_name);
1474: end if;
1475: i_result := false;
1469: exception
1470: when no_data_found then
1471: ecx_debug.setErrorInfo(1, 30, 'ECX_WF_RESCRS_VER_NOT_FOUND');
1472: if(l_unexpectedEnabled) then
1473: ecx_debug.log(l_unexpected, 'ECX', 'ECX_WF_RESCRS_VER_NOT_FOUND', i_method_name);
1474: end if;
1475: i_result := false;
1476: if (l_procedureEnabled) then
1477: ecx_debug.pop(i_method_name);
1473: ecx_debug.log(l_unexpected, 'ECX', 'ECX_WF_RESCRS_VER_NOT_FOUND', i_method_name);
1474: end if;
1475: i_result := false;
1476: if (l_procedureEnabled) then
1477: ecx_debug.pop(i_method_name);
1478: end if;
1479: return;
1480: when others then
1481: ecx_debug.setErrorInfo(2, 30, SQLERRM);
1477: ecx_debug.pop(i_method_name);
1478: end if;
1479: return;
1480: when others then
1481: ecx_debug.setErrorInfo(2, 30, SQLERRM);
1482: if(l_unexpectedEnabled) then
1483: ecx_debug.log(l_unexpected, 'ECX', SQLERRM,i_method_name);
1484: end if;
1485: i_result := false;
1479: return;
1480: when others then
1481: ecx_debug.setErrorInfo(2, 30, SQLERRM);
1482: if(l_unexpectedEnabled) then
1483: ecx_debug.log(l_unexpected, 'ECX', SQLERRM,i_method_name);
1484: end if;
1485: i_result := false;
1486: if (l_procedureEnabled) then
1487: ecx_debug.pop(i_method_name);
1483: ecx_debug.log(l_unexpected, 'ECX', SQLERRM,i_method_name);
1484: end if;
1485: i_result := false;
1486: if (l_procedureEnabled) then
1487: ecx_debug.pop(i_method_name);
1488: end if;
1489: return;
1490: end;
1491:
1489: return;
1490: end;
1491:
1492: if(l_statementEnabled) then
1493: ecx_debug.log(l_statement, 'i_eng_version', i_eng_version,i_method_name);
1494: end if;
1495:
1496: -- compare the map_version against the engine version
1497: i_eng_major_version := to_number(substr(i_eng_version, 1, 1));
1497: i_eng_major_version := to_number(substr(i_eng_version, 1, 1));
1498: i_eng_minor_version := to_number(substr(i_eng_version, 3, 1));
1499:
1500: if(l_statementEnabled) then
1501: ecx_debug.log(l_statement, 'i_eng_major_version', i_eng_major_version,i_method_name);
1502: ecx_debug.log(l_statement, 'i_eng_minor_version', i_eng_minor_version,i_method_name);
1503: end if;
1504: if (i_major_version = i_eng_major_version)
1505: then
1498: i_eng_minor_version := to_number(substr(i_eng_version, 3, 1));
1499:
1500: if(l_statementEnabled) then
1501: ecx_debug.log(l_statement, 'i_eng_major_version', i_eng_major_version,i_method_name);
1502: ecx_debug.log(l_statement, 'i_eng_minor_version', i_eng_minor_version,i_method_name);
1503: end if;
1504: if (i_major_version = i_eng_major_version)
1505: then
1506: if (i_minor_version <= i_eng_minor_version)
1507: then
1508: i_ret_msg := null;
1509: i_result := true;
1510: if (l_procedureEnabled) then
1511: ecx_debug.pop(i_method_name);
1512: end if;
1513: return;
1514: else
1515: ecx_debug.setErrorInfo(1, 30, 'ECX_VERSION_MISMATCH',
1511: ecx_debug.pop(i_method_name);
1512: end if;
1513: return;
1514: else
1515: ecx_debug.setErrorInfo(1, 30, 'ECX_VERSION_MISMATCH',
1516: 'i_version', i_major_version || '.' || i_minor_version,
1517: 'i_eng_version', i_eng_version);
1518: if(l_statementEnabled) then
1519: ecx_debug.log(l_statement, 'ECX', 'ECX_VERSION_MISMATCH',i_method_name,
1515: ecx_debug.setErrorInfo(1, 30, 'ECX_VERSION_MISMATCH',
1516: 'i_version', i_major_version || '.' || i_minor_version,
1517: 'i_eng_version', i_eng_version);
1518: if(l_statementEnabled) then
1519: ecx_debug.log(l_statement, 'ECX', 'ECX_VERSION_MISMATCH',i_method_name,
1520: 'i_version', i_major_version || '.' || i_minor_version,
1521: 'i_eng_version', i_eng_version);
1522: end if;
1523: i_result := false;
1521: 'i_eng_version', i_eng_version);
1522: end if;
1523: i_result := false;
1524: if (l_procedureEnabled) then
1525: ecx_debug.pop(i_method_name);
1526: end if;
1527: return;
1528: end if;
1529: else
1526: end if;
1527: return;
1528: end if;
1529: else
1530: ecx_debug.setErrorInfo(1, 30, 'ECX_VERSION_MISMATCH',
1531: 'i_version', i_major_version || '.' || i_minor_version,
1532: 'i_eng_version', i_eng_version);
1533: if(l_statementEnabled) then
1534: ecx_debug.log(l_statement, 'ECX', 'ECX_VERSION_MISMATCH', i_method_name,
1530: ecx_debug.setErrorInfo(1, 30, 'ECX_VERSION_MISMATCH',
1531: 'i_version', i_major_version || '.' || i_minor_version,
1532: 'i_eng_version', i_eng_version);
1533: if(l_statementEnabled) then
1534: ecx_debug.log(l_statement, 'ECX', 'ECX_VERSION_MISMATCH', i_method_name,
1535: 'i_version', i_major_version || '.' || i_minor_version,
1536: 'i_eng_version', i_eng_version);
1537: end if;
1538: i_result := false;
1536: 'i_eng_version', i_eng_version);
1537: end if;
1538: i_result := false;
1539: if (l_procedureEnabled) then
1540: ecx_debug.pop(i_method_name);
1541: end if;
1542: return;
1543: end if;
1544: exception
1543: end if;
1544: exception
1545: when others then
1546: if(l_unexpectedEnabled) then
1547: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1548: 'ecx_utils.CHECK_VERSION');
1549: ecx_debug.log(l_unexpected,'ECX', 'ECX_ERROR_MESSAGE',i_method_name, 'ERROR_MESSAGE', SQLERRM);
1550: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION',i_method_name);
1551: end if;
1545: when others then
1546: if(l_unexpectedEnabled) then
1547: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1548: 'ecx_utils.CHECK_VERSION');
1549: ecx_debug.log(l_unexpected,'ECX', 'ECX_ERROR_MESSAGE',i_method_name, 'ERROR_MESSAGE', SQLERRM);
1550: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION',i_method_name);
1551: end if;
1552: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION');
1553: if (l_procedureEnabled) then
1546: if(l_unexpectedEnabled) then
1547: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
1548: 'ecx_utils.CHECK_VERSION');
1549: ecx_debug.log(l_unexpected,'ECX', 'ECX_ERROR_MESSAGE',i_method_name, 'ERROR_MESSAGE', SQLERRM);
1550: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION',i_method_name);
1551: end if;
1552: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION');
1553: if (l_procedureEnabled) then
1554: ecx_debug.pop(i_method_name);
1548: 'ecx_utils.CHECK_VERSION');
1549: ecx_debug.log(l_unexpected,'ECX', 'ECX_ERROR_MESSAGE',i_method_name, 'ERROR_MESSAGE', SQLERRM);
1550: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION',i_method_name);
1551: end if;
1552: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION');
1553: if (l_procedureEnabled) then
1554: ecx_debug.pop(i_method_name);
1555: end if;
1556: raise ecx_utils.program_exit;
1550: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION',i_method_name);
1551: end if;
1552: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.CHECK_VERSION');
1553: if (l_procedureEnabled) then
1554: ecx_debug.pop(i_method_name);
1555: end if;
1556: raise ecx_utils.program_exit;
1557: end check_version;
1558:
1614: i_map_code varchar2(32);
1615:
1616: BEGIN
1617:
1618: /* Assign local variables with the ecx_debug global variables*/
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1615:
1616: BEGIN
1617:
1618: /* Assign local variables with the ecx_debug global variables*/
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1616: BEGIN
1617:
1618: /* Assign local variables with the ecx_debug global variables*/
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1617:
1618: /* Assign local variables with the ecx_debug global variables*/
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1625:
1618: /* Assign local variables with the ecx_debug global variables*/
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1625:
1626: if (l_procedureEnabled) then
1619: l_procedure := ecx_debug.g_procedure;
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1625:
1626: if (l_procedureEnabled) then
1627: ecx_debug.push(i_method_name);
1620: l_statement := ecx_debug.g_statement;
1621: l_unexpected := ecx_debug.g_unexpected;
1622: l_procedureEnabled := ecx_debug.g_procedureEnabled;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1625:
1626: if (l_procedureEnabled) then
1627: ecx_debug.push(i_method_name);
1628: end if;
1623: l_statementEnabled := ecx_debug.g_statementEnabled;
1624: l_unexpectedEnabled := ecx_debug.g_unexpectedEnabled;
1625:
1626: if (l_procedureEnabled) then
1627: ecx_debug.push(i_method_name);
1628: end if;
1629:
1630: if(l_statementEnabled) then
1631: ecx_debug.log(l_statement,'i_map_id ',i_map_id,i_method_name);
1627: ecx_debug.push(i_method_name);
1628: end if;
1629:
1630: if(l_statementEnabled) then
1631: ecx_debug.log(l_statement,'i_map_id ',i_map_id,i_method_name);
1632: end if;
1633:
1634: i_ret_code := 0;
1635: i_errbuf := null;
1645: ecx_utils.check_version(i_map_id, i_result, i_ret_msg);
1646: if (not i_result)
1647: then
1648: if(l_statementEnabled) then
1649: ecx_debug.log(l_statement, 'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
1650: 'ecx_utils.INITIALIZE');
1651: ecx_debug.log(l_statement, 'ECX','ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', i_ret_msg);
1652: end if;
1653: raise ecx_utils.program_exit;
1647: then
1648: if(l_statementEnabled) then
1649: ecx_debug.log(l_statement, 'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
1650: 'ecx_utils.INITIALIZE');
1651: ecx_debug.log(l_statement, 'ECX','ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', i_ret_msg);
1652: end if;
1653: raise ecx_utils.program_exit;
1654: end if;
1655: /* Find the map code for bug 1939677 */
1664: FROM ecx_mappings em
1665: WHERE em.map_id = i_map_id;
1666: exception
1667: when others then
1668: ecx_debug.setErrorInfo(1, 30, 'ECX_MAPPINGS_NOT_FOUND', 'MAP_ID', i_map_id);
1669: if(l_unexpectedEnabled) then
1670: ecx_debug.log(l_unexpected,'ECX', 'ECX_MAPPINGS_NOT_FOUND',i_method_name,
1671: 'MAP_ID', i_map_id);
1672: end if;
1666: exception
1667: when others then
1668: ecx_debug.setErrorInfo(1, 30, 'ECX_MAPPINGS_NOT_FOUND', 'MAP_ID', i_map_id);
1669: if(l_unexpectedEnabled) then
1670: ecx_debug.log(l_unexpected,'ECX', 'ECX_MAPPINGS_NOT_FOUND',i_method_name,
1671: 'MAP_ID', i_map_id);
1672: end if;
1673: raise ecx_utils.program_exit;
1674: end;
1697: ---end of 5609625
1698: ecx_utils.getLogDirectory;
1699:
1700: if(l_statementEnabled) then
1701: ecx_debug.log(l_statement, 'ecx_UTL_DTD_DIR', ecx_utils.g_logdir,i_method_name);
1702: end if;
1703: -- xmlparser.setbaseDir (ecx_utils.g_parser, l_dtd_path);
1704:
1705: if ( g_direction = 'IN' )
1713: end if;
1714: close get_dtd;
1715:
1716: if(l_statementEnabled) then
1717: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1718: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1719: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1720: end if;
1721: -- check if it is a pure Inbound case
1714: close get_dtd;
1715:
1716: if(l_statementEnabled) then
1717: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1718: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1719: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1720: end if;
1721: -- check if it is a pure Inbound case
1722: SELECT object_type
1715:
1716: if(l_statementEnabled) then
1717: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1718: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1719: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1720: end if;
1721: -- check if it is a pure Inbound case
1722: SELECT object_type
1723: INTO i_tar_obj_type
1727:
1728: if (i_tar_obj_type not in ('DB'))
1729: then
1730: if(l_statementEnabled) then
1731: ecx_debug.log(l_statement, 'DTD/XML on Target',i_method_name);
1732: end if;
1733: -- get the target details
1734: open get_dtd ( i_map_id,g_target_object_id);
1735: fetch get_dtd into t_root_element, t_fullpath,t_runtime_location;
1738: raise no_dtd_exception;
1739: end if;
1740: close get_dtd;
1741: if(l_statementEnabled) then
1742: ecx_debug.log(l_statement, 't_root_element', t_root_element,i_method_name);
1743: ecx_debug.log(l_statement, 't_fullpath', t_fullpath,i_method_name);
1744: ecx_debug.log(l_statement, 't_runtime_location', t_runtime_location,i_method_name);
1745: end if;
1746: -- check if data transformation or structure transformation
1739: end if;
1740: close get_dtd;
1741: if(l_statementEnabled) then
1742: ecx_debug.log(l_statement, 't_root_element', t_root_element,i_method_name);
1743: ecx_debug.log(l_statement, 't_fullpath', t_fullpath,i_method_name);
1744: ecx_debug.log(l_statement, 't_runtime_location', t_runtime_location,i_method_name);
1745: end if;
1746: -- check if data transformation or structure transformation
1747: if ((t_fullpath = l_fullpath) AND
1740: close get_dtd;
1741: if(l_statementEnabled) then
1742: ecx_debug.log(l_statement, 't_root_element', t_root_element,i_method_name);
1743: ecx_debug.log(l_statement, 't_fullpath', t_fullpath,i_method_name);
1744: ecx_debug.log(l_statement, 't_runtime_location', t_runtime_location,i_method_name);
1745: end if;
1746: -- check if data transformation or structure transformation
1747: if ((t_fullpath = l_fullpath) AND
1748: (t_root_element = l_root_element))
1747: if ((t_fullpath = l_fullpath) AND
1748: (t_root_element = l_root_element))
1749: then
1750: if(l_statementEnabled) then
1751: ecx_debug.log(l_statement, 'Source and Target DTDs are same',i_method_name);
1752: end if;
1753: ecx_utils.dom_printing := FALSE;
1754: ecx_utils.structure_printing := FALSE;
1755:
1768: end if;
1769: else
1770: -- DTDs are different, so this is structure transformation
1771: if(l_statementEnabled) then
1772: ecx_debug.log(l_statement,'Source and Target DTDs are different',i_method_name);
1773: end if;
1774: -- initialize the target parser
1775: ecx_utils.g_inb_parser := xmlparser.NewParser;
1776:
1786: raise no_dtd_exception;
1787: end if;
1788:
1789: if(l_statementEnabled) then
1790: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1791: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1792: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1793: end if;
1794: end if;
1787: end if;
1788:
1789: if(l_statementEnabled) then
1790: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1791: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1792: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1793: end if;
1794: end if;
1795: if(l_statementEnabled) then
1788:
1789: if(l_statementEnabled) then
1790: ecx_debug.log(l_statement, 'l_root_element', l_root_element,i_method_name);
1791: ecx_debug.log(l_statement, 'l_fullpath', l_fullpath,i_method_name);
1792: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1793: end if;
1794: end if;
1795: if(l_statementEnabled) then
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1792: ecx_debug.log(l_statement, 'l_runtime_location', l_runtime_location,i_method_name);
1793: end if;
1794: end if;
1795: if(l_statementEnabled) then
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1797: ecx_debug.log(l_statement, 'SOurce Object', to_char(g_source_object_id),i_method_name);
1798: ecx_debug.log(l_statement, 'Taregt Object', to_char(g_target_object_id),i_method_name);
1799: ecx_debug.log(l_statement, 'dom_printing', dom_printing,i_method_name);
1800: ecx_debug.log(l_statement, 'structure_printing', structure_printing,i_method_name);
1793: end if;
1794: end if;
1795: if(l_statementEnabled) then
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1797: ecx_debug.log(l_statement, 'SOurce Object', to_char(g_source_object_id),i_method_name);
1798: ecx_debug.log(l_statement, 'Taregt Object', to_char(g_target_object_id),i_method_name);
1799: ecx_debug.log(l_statement, 'dom_printing', dom_printing,i_method_name);
1800: ecx_debug.log(l_statement, 'structure_printing', structure_printing,i_method_name);
1801: end if;
1794: end if;
1795: if(l_statementEnabled) then
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1797: ecx_debug.log(l_statement, 'SOurce Object', to_char(g_source_object_id),i_method_name);
1798: ecx_debug.log(l_statement, 'Taregt Object', to_char(g_target_object_id),i_method_name);
1799: ecx_debug.log(l_statement, 'dom_printing', dom_printing,i_method_name);
1800: ecx_debug.log(l_statement, 'structure_printing', structure_printing,i_method_name);
1801: end if;
1802:
1795: if(l_statementEnabled) then
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1797: ecx_debug.log(l_statement, 'SOurce Object', to_char(g_source_object_id),i_method_name);
1798: ecx_debug.log(l_statement, 'Taregt Object', to_char(g_target_object_id),i_method_name);
1799: ecx_debug.log(l_statement, 'dom_printing', dom_printing,i_method_name);
1800: ecx_debug.log(l_statement, 'structure_printing', structure_printing,i_method_name);
1801: end if;
1802:
1803: -- Get the DTD Clob . If not Found , continue .
1796: ecx_debug.log(l_statement, 'Direction', g_direction,i_method_name);
1797: ecx_debug.log(l_statement, 'SOurce Object', to_char(g_source_object_id),i_method_name);
1798: ecx_debug.log(l_statement, 'Taregt Object', to_char(g_target_object_id),i_method_name);
1799: ecx_debug.log(l_statement, 'dom_printing', dom_printing,i_method_name);
1800: ecx_debug.log(l_statement, 'structure_printing', structure_printing,i_method_name);
1801: end if;
1802:
1803: -- Get the DTD Clob . If not Found , continue .
1804: if ( l_root_element is not null and l_fullpath is not null)
1919: end if;
1920: /*bug 10254870 getting no of xslt transformation defined for map*/
1921: ecx_utils.g_cnt_xslt_defined := ecx_actions.get_Count_Action_Type(30,5000);
1922: if (l_procedureEnabled) then
1923: ecx_debug.pop(i_method_name);
1924: end if;
1925:
1926: EXCEPTION
1927: WHEN NO_DTD_EXCEPTION then
1924: end if;
1925:
1926: EXCEPTION
1927: WHEN NO_DTD_EXCEPTION then
1928: ecx_debug.setErrorInfo(1, 30, 'ECX_DTD_NOT_FOUND', 'MAP_CODE', i_map_code);
1929: if(l_unexpectedEnabled) then
1930: ecx_debug.log(l_unexpected,'ECX', 'ECX_DTD_NOT_FOUND', i_method_name,'MAP_CODE', i_map_code);
1931: end if;
1932: if get_dtd%ISOPEN
1926: EXCEPTION
1927: WHEN NO_DTD_EXCEPTION then
1928: ecx_debug.setErrorInfo(1, 30, 'ECX_DTD_NOT_FOUND', 'MAP_CODE', i_map_code);
1929: if(l_unexpectedEnabled) then
1930: ecx_debug.log(l_unexpected,'ECX', 'ECX_DTD_NOT_FOUND', i_method_name,'MAP_CODE', i_map_code);
1931: end if;
1932: if get_dtd%ISOPEN
1933: then
1934: close get_dtd;
1940: WHEN PROGRAM_EXIT then
1941: ecx_utils.g_map_id := -1;
1942: ecx_utils.g_node_tbl.DELETE;
1943: if (l_procedureEnabled) then
1944: ecx_debug.pop(i_method_name);
1945: end if;
1946: -- bug 8718549, free parser before program exit
1947: if (ecx_utils.g_parser.id is not null ) then
1948: xmlparser.freeparser(ecx_utils.g_parser);
1955: raise;
1956:
1957: WHEN OTHERS THEN
1958: if(l_unexpectedEnabled) then
1959: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name, 'PROGRESS_LEVEL',
1960: 'ecx_utils.INITIALIZE');
1961: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1962: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ',
1963: i_method_name);
1957: WHEN OTHERS THEN
1958: if(l_unexpectedEnabled) then
1959: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name, 'PROGRESS_LEVEL',
1960: 'ecx_utils.INITIALIZE');
1961: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1962: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ',
1963: i_method_name);
1964: end if;
1965: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ');
1958: if(l_unexpectedEnabled) then
1959: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR',i_method_name, 'PROGRESS_LEVEL',
1960: 'ecx_utils.INITIALIZE');
1961: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1962: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ',
1963: i_method_name);
1964: end if;
1965: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ');
1966: ecx_utils.g_map_id := -1;
1961: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
1962: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ',
1963: i_method_name);
1964: end if;
1965: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ');
1966: ecx_utils.g_map_id := -1;
1967: ecx_utils.g_node_tbl.DELETE;
1968: if (l_procedureEnabled) then
1969: ecx_debug.pop(i_method_name);
1965: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.INITIALIZE: ');
1966: ecx_utils.g_map_id := -1;
1967: ecx_utils.g_node_tbl.DELETE;
1968: if (l_procedureEnabled) then
1969: ecx_debug.pop(i_method_name);
1970: end if;
1971: raise PROGRAM_EXIT;
1972:
1973: end initialize;
1984: closed_cursors tclosed_cursors;
1985:
1986: BEGIN
1987: if (l_procedureEnabled) then
1988: ecx_debug.push(i_method_name);
1989: end if;
1990:
1991: -- close all open cursors.
1992: if (g_source_levels.count <> 0)
2029: end loop;
2030: END IF;
2031:
2032: if (l_procedureEnabled) then
2033: ecx_debug.pop(i_method_name);
2034: end if;
2035:
2036: EXCEPTION
2037: WHEN OTHERS THEN
2035:
2036: EXCEPTION
2037: WHEN OTHERS THEN
2038: if(l_unexpectedEnabled) then
2039: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
2040: 'ecx_utils.CLOSE_PROCESS');
2041: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
2042: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ',
2043: i_method_name);
2037: WHEN OTHERS THEN
2038: if(l_unexpectedEnabled) then
2039: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
2040: 'ecx_utils.CLOSE_PROCESS');
2041: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
2042: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ',
2043: i_method_name);
2044: end if;
2045: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ');
2038: if(l_unexpectedEnabled) then
2039: ecx_debug.log(l_unexpected,'ECX','ECX_PROGRAM_ERROR',i_method_name,'PROGRESS_LEVEL',
2040: 'ecx_utils.CLOSE_PROCESS');
2041: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
2042: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ',
2043: i_method_name);
2044: end if;
2045: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ');
2046: raise PROGRAM_EXIT;
2041: ecx_debug.log(l_unexpected,'ECX','ECX_ERROR_MESSAGE',i_method_name,'ERROR_MESSAGE',SQLERRM);
2042: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ',
2043: i_method_name);
2044: end if;
2045: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ecx_utils.CLOSE_PROCESS: ');
2046: raise PROGRAM_EXIT;
2047:
2048: end close_process;
2049:
2376: i_counter pls_integer := 0;
2377: BEGIN
2378: ecx_utils.g_delete_doctype := false;
2379: if (l_procedureEnabled) then
2380: ecx_debug.push(i_method_name);
2381: end if;
2382: ecx_utils.g_stage_data.DELETE;
2383:
2384: select
2621:
2622: IF (instr(temp_util_rec.custom_procedure_name, DELETE_DOCTYPE_PROC_NAME) > 0) THEN
2623: g_delete_doctype := true;
2624: if(l_statementEnabled) then
2625: ecx_debug.log(l_statement, 'g_delete_doctype = true',i_method_name);
2626: end if;
2627: END IF;
2628:
2629:
2627: END IF;
2628:
2629:
2630: if(l_statementEnabled) then
2631: ecx_debug.log(l_statement,temp_util_rec.transtage_id||'|'||
2632: temp_util_rec.level||'|'||
2633: temp_util_rec.stage||'|'||
2634: temp_util_rec.object_direction||'|'||
2635: temp_util_rec.seq_number||'|'||
2784: ecx_utils.g_stage_data(i_counter).operand6_direction := get_stage_data.operand6_direction;
2785: ecx_utils.g_stage_data(i_counter).operand6_constant := get_stage_data.operand6_constant;
2786:
2787: if(l_statementEnabled) then
2788: ecx_debug.log(l_statement,
2789: ecx_utils.g_stage_data(i_counter).transtage_id||'|'||
2790: ecx_utils.g_stage_data(i_counter).level||'|'||
2791: ecx_utils.g_stage_data(i_counter).stage||'|'||
2792: ecx_utils.g_stage_data(i_counter).object_direction||'|'||
2863: i_counter := i_counter + 1;
2864: end loop;
2865: */
2866: if (l_procedureEnabled) then
2867: ecx_debug.pop(i_method_name);
2868: end if;
2869:
2870: EXCEPTION
2871: WHEN ecx_utils.PROGRAM_EXIT then
2869:
2870: EXCEPTION
2871: WHEN ecx_utils.PROGRAM_EXIT then
2872: if (l_procedureEnabled) then
2873: ecx_debug.pop(i_method_name);
2874: end if;
2875: raise;
2876:
2877: WHEN OTHERS THEN
2875: raise;
2876:
2877: WHEN OTHERS THEN
2878: if(l_unexpectedEnabled) then
2879: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
2880: 'ecx_UTILS.GET_TRAN_STAGE_DATA');
2881: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', SQLERRM);
2882: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ',
2883: i_method_name);
2877: WHEN OTHERS THEN
2878: if(l_unexpectedEnabled) then
2879: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
2880: 'ecx_UTILS.GET_TRAN_STAGE_DATA');
2881: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', SQLERRM);
2882: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ',
2883: i_method_name);
2884: end if;
2885: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ');
2878: if(l_unexpectedEnabled) then
2879: ecx_debug.log(l_unexpected,'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
2880: 'ecx_UTILS.GET_TRAN_STAGE_DATA');
2881: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', SQLERRM);
2882: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ',
2883: i_method_name);
2884: end if;
2885: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ');
2886: if (l_procedureEnabled) then
2881: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', i_method_name,'ERROR_MESSAGE', SQLERRM);
2882: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ',
2883: i_method_name);
2884: end if;
2885: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ');
2886: if (l_procedureEnabled) then
2887: ecx_debug.pop(i_method_name);
2888: end if;
2889: raise ecx_utils.PROGRAM_EXIT;
2883: i_method_name);
2884: end if;
2885: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.GET_TRAN_STAGE_DATA: ');
2886: if (l_procedureEnabled) then
2887: ecx_debug.pop(i_method_name);
2888: end if;
2889: raise ecx_utils.PROGRAM_EXIT;
2890:
2891: END get_tran_stage_data;
2909: end if;
2910:
2911:
2912: /* Remove the additional '/' at the end of the profile option if present
2913: or else it will cause error in the ecx_debug.print_log */
2914:
2915: If (ecx_utils.g_logdir is not null) then
2916: if (substr(ecx_utils.g_logdir,-1,1) = '/') then
2917: ecx_utils.g_logdir := substr(ecx_utils.g_logdir,1,
2918: length(ecx_utils.g_logdir)-1);
2919: end if;
2920: End If;
2921: if(l_statementEnabled) then
2922: ecx_debug.log(l_statement, 'ecx_utils.g_logdir',ecx_utils.g_logdir,i_method_name);
2923: end if;
2924:
2925: exception
2926: when others then
2971: i_method_name varchar2(2000) := 'ecx_utils.set_error';
2972: begin
2973:
2974: if (l_procedureEnabled) then
2975: ecx_debug.push(i_method_name);
2976: end if;
2977: ecx_debug.setErrorInfo(p_error_code => p_error_code,
2978: p_error_type => p_error_type,
2979: p_errmsg_name=> p_error_msg,
2973:
2974: if (l_procedureEnabled) then
2975: ecx_debug.push(i_method_name);
2976: end if;
2977: ecx_debug.setErrorInfo(p_error_code => p_error_code,
2978: p_error_type => p_error_type,
2979: p_errmsg_name=> p_error_msg,
2980: p_token1 => p_token1,
2981: p_value1 => p_value1,
2998: p_token10 => p_token10,
2999: p_value10 => p_value10);
3000:
3001: if (l_procedureEnabled) then
3002: ecx_debug.pop(i_method_name);
3003: end if;
3004: exception
3005: when others then
3006: if(l_unexpectedEnabled) then
3003: end if;
3004: exception
3005: when others then
3006: if(l_unexpectedEnabled) then
3007: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
3008: 'ECX_UTILS.SET_ERROR',i_method_name);
3009: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM,i_method_name);
3010: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ',
3011: i_method_name);
3005: when others then
3006: if(l_unexpectedEnabled) then
3007: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
3008: 'ECX_UTILS.SET_ERROR',i_method_name);
3009: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM,i_method_name);
3010: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ',
3011: i_method_name);
3012: end if;
3013: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ');
3006: if(l_unexpectedEnabled) then
3007: ecx_debug.log(l_unexpected, 'ECX', 'ECX_PROGRAM_ERROR', i_method_name, 'PROGRESS_LEVEL',
3008: 'ECX_UTILS.SET_ERROR',i_method_name);
3009: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM,i_method_name);
3010: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ',
3011: i_method_name);
3012: end if;
3013: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ');
3014: if (l_procedureEnabled) then
3009: ecx_debug.log(l_unexpected, 'ECX', 'ECX_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM,i_method_name);
3010: ecx_debug.log(l_unexpected, 'ECX', ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ',
3011: i_method_name);
3012: end if;
3013: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ');
3014: if (l_procedureEnabled) then
3015: ecx_debug.pop(i_method_name);
3016: end if;
3017: raise ecx_utils.PROGRAM_EXIT;
3011: i_method_name);
3012: end if;
3013: ecx_debug.setErrorInfo(2, 30, ecx_utils.i_errbuf || SQLERRM || ' - ECX_UTILS.SET_ERROR: ');
3014: if (l_procedureEnabled) then
3015: ecx_debug.pop(i_method_name);
3016: end if;
3017: raise ecx_utils.PROGRAM_EXIT;
3018: end set_error;
3019:
3043: x_party_type := null;
3044: end if;
3045: exception
3046: when others then
3047: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.ConvertPartyTypeToCode: ');
3048: if(l_unexpectedEnabled) then
3049: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3050: end if;
3051: if (l_procedureEnabled) then
3045: exception
3046: when others then
3047: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.ConvertPartyTypeToCode: ');
3048: if(l_unexpectedEnabled) then
3049: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3050: end if;
3051: if (l_procedureEnabled) then
3052: ecx_debug.pop(i_method_name);
3053: end if;
3048: if(l_unexpectedEnabled) then
3049: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3050: end if;
3051: if (l_procedureEnabled) then
3052: ecx_debug.pop(i_method_name);
3053: end if;
3054: raise ecx_utils.PROGRAM_EXIT;
3055: end convertPartyTypeToCode;
3056:
3068: l_root_node ecx_object_attributes.attribute_name%type;
3069:
3070: begin
3071: if (l_procedureEnabled) then
3072: ecx_debug.push(i_method_name);
3073: end if;
3074: SELECT object_level_name INTO l_root_node
3075: FROM ecx_object_levels
3076: WHERE map_id=v_map_id and object_level=0 and object_id=1;
3110: ELSE
3111: l_node_path := l_root_node||'<'||l_node_path;
3112: END IF;
3113: if (l_procedureEnabled) then
3114: ecx_debug.pop(i_method_name);
3115: end if;
3116: return l_node_path;
3117: exception
3118: when others then
3115: end if;
3116: return l_node_path;
3117: exception
3118: when others then
3119: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.getNodePath ');
3120: if(l_unexpectedEnabled) then
3121: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3122: end if;
3123: if (l_procedureEnabled) then
3117: exception
3118: when others then
3119: ecx_debug.setErrorInfo(2, 30, SQLERRM || ' - ECX_UTILS.getNodePath ');
3120: if(l_unexpectedEnabled) then
3121: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3122: end if;
3123: if (l_procedureEnabled) then
3124: ecx_debug.pop(i_method_name);
3125: end if;
3120: if(l_unexpectedEnabled) then
3121: ecx_debug.log(l_unexpected, ecx_utils.i_errbuf,i_method_name);
3122: end if;
3123: if (l_procedureEnabled) then
3124: ecx_debug.pop(i_method_name);
3125: end if;
3126: raise ecx_utils.PROGRAM_EXIT;
3127: End getNodePath;
3128:
3154: xmlParser.freeParser(l_parser);
3155: end if;
3156: exception
3157: when others then
3158: ecx_debug.setErrorInfo(1, 30, SQLERRM);
3159: if(l_statementEnabled) then
3160: ecx_debug.log(l_statement,'ECX', SQLERRM,i_method_name);
3161: end if;
3162: if (l_parser.id <> -1)
3156: exception
3157: when others then
3158: ecx_debug.setErrorInfo(1, 30, SQLERRM);
3159: if(l_statementEnabled) then
3160: ecx_debug.log(l_statement,'ECX', SQLERRM,i_method_name);
3161: end if;
3162: if (l_parser.id <> -1)
3163: then
3164: xmlParser.freeParser(l_parser);