[Home] [Help]
70: BSC_METADATA_OPTIMIZER_PKG.g_fileOpened := true;
71:
72: bsc_apps.init_bsc_apps;
73: bsc_message.init('Y');
74: bsc_mo_helper_pkg.InitTablespaceNames;
75: BSC_MO_HELPER_PKG.InitializePeriodicities;
76:
77: BSC_METADATA_OPTIMIZER_PKG.gAppsSchema := BSC_MO_HELPER_PKG.getAppsSchema;
78: BSC_METADATA_OPTIMIZER_PKG.gBSCSchema := BSC_MO_HELPER_PKG.getBSCSchema;
71:
72: bsc_apps.init_bsc_apps;
73: bsc_message.init('Y');
74: bsc_mo_helper_pkg.InitTablespaceNames;
75: BSC_MO_HELPER_PKG.InitializePeriodicities;
76:
77: BSC_METADATA_OPTIMIZER_PKG.gAppsSchema := BSC_MO_HELPER_PKG.getAppsSchema;
78: BSC_METADATA_OPTIMIZER_PKG.gBSCSchema := BSC_MO_HELPER_PKG.getBSCSchema;
79: BSC_METADATA_OPTIMIZER_PKG.gApplsysSchema := BSC_MO_HELPER_PKG.getApplsysSchema;
73: bsc_message.init('Y');
74: bsc_mo_helper_pkg.InitTablespaceNames;
75: BSC_MO_HELPER_PKG.InitializePeriodicities;
76:
77: BSC_METADATA_OPTIMIZER_PKG.gAppsSchema := BSC_MO_HELPER_PKG.getAppsSchema;
78: BSC_METADATA_OPTIMIZER_PKG.gBSCSchema := BSC_MO_HELPER_PKG.getBSCSchema;
79: BSC_METADATA_OPTIMIZER_PKG.gApplsysSchema := BSC_MO_HELPER_PKG.getApplsysSchema;
80: BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE := 0;
81: BSC_METADATA_OPTIMIZER_PKG.initMVFlags ;
74: bsc_mo_helper_pkg.InitTablespaceNames;
75: BSC_MO_HELPER_PKG.InitializePeriodicities;
76:
77: BSC_METADATA_OPTIMIZER_PKG.gAppsSchema := BSC_MO_HELPER_PKG.getAppsSchema;
78: BSC_METADATA_OPTIMIZER_PKG.gBSCSchema := BSC_MO_HELPER_PKG.getBSCSchema;
79: BSC_METADATA_OPTIMIZER_PKG.gApplsysSchema := BSC_MO_HELPER_PKG.getApplsysSchema;
80: BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE := 0;
81: BSC_METADATA_OPTIMIZER_PKG.initMVFlags ;
82:
75: BSC_MO_HELPER_PKG.InitializePeriodicities;
76:
77: BSC_METADATA_OPTIMIZER_PKG.gAppsSchema := BSC_MO_HELPER_PKG.getAppsSchema;
78: BSC_METADATA_OPTIMIZER_PKG.gBSCSchema := BSC_MO_HELPER_PKG.getBSCSchema;
79: BSC_METADATA_OPTIMIZER_PKG.gApplsysSchema := BSC_MO_HELPER_PKG.getApplsysSchema;
80: BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE := 0;
81: BSC_METADATA_OPTIMIZER_PKG.initMVFlags ;
82:
83: END IF;
82:
83: END IF;
84:
85: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
86: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
87: BSC_MO_HELPER_PKG.writeTmp('Database Generator Documentation start time is '||to_char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
88: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
83: END IF;
84:
85: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
86: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
87: BSC_MO_HELPER_PKG.writeTmp('Database Generator Documentation start time is '||to_char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
88: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
91:
84:
85: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
86: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
87: BSC_MO_HELPER_PKG.writeTmp('Database Generator Documentation start time is '||to_char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
88: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
91:
92: BSC_MO_HELPER_PKG.InitializeMasterTables;
85: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
86: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
87: BSC_MO_HELPER_PKG.writeTmp('Database Generator Documentation start time is '||to_char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
88: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
91:
92: BSC_MO_HELPER_PKG.InitializeMasterTables;
93: BSC_MO_HELPER_PKG.InitLOV;
88: BSC_MO_HELPER_PKG.writeTmp('---------------------------------------------------------'||g_newline);
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
91:
92: BSC_MO_HELPER_PKG.InitializeMasterTables;
93: BSC_MO_HELPER_PKG.InitLOV;
94:
95: EXCEPTION WHEN OTHERS THEN
96: g_error := sqlerrm;
89: BSC_MO_HELPER_PKG.writeTmp(g_newline);
90: END IF;
91:
92: BSC_MO_HELPER_PKG.InitializeMasterTables;
93: BSC_MO_HELPER_PKG.InitLOV;
94:
95: EXCEPTION WHEN OTHERS THEN
96: g_error := sqlerrm;
97: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.Initialize :' ||g_error);
93: BSC_MO_HELPER_PKG.InitLOV;
94:
95: EXCEPTION WHEN OTHERS THEN
96: g_error := sqlerrm;
97: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.Initialize :' ||g_error);
98: raise;
99: END;
100: --****************************************************************************
101: -- GetDbObjectType
114: CLOSE cObjectType;
115: return l_type;
116: EXCEPTION WHEN OTHERS THEN
117: g_error := sqlerrm;
118: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetDbObjectType :' ||g_error);
119: raise;
120: End ;
121:
122:
145:
146: Return MVName;
147: EXCEPTION WHEN OTHERS THEN
148: g_error := sqlerrm;
149: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetSumTableMVName :' ||g_error);
150: bsc_mo_helper_pkg.writeTmp('TableName :' ||TableName||', pos='||pos, fnd_log.level_statement, true);
151: raise;
152: End ;
153: --****************************************************************************
146: Return MVName;
147: EXCEPTION WHEN OTHERS THEN
148: g_error := sqlerrm;
149: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetSumTableMVName :' ||g_error);
150: bsc_mo_helper_pkg.writeTmp('TableName :' ||TableName||', pos='||pos, fnd_log.level_statement, true);
151: raise;
152: End ;
153: --****************************************************************************
154: -- WRITELINETEXTFILE
171: --****************************************************************************
172: PROCEDURE WriteDocHeader IS
173: BEGIN
174: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
175: BSC_MO_HELPER_PKG.writeTmp('Inside WriteDocHeader', FND_LOG.LEVEL_PROCEDURE);
176: END IF;
177:
178: WriteLineTextFile( '+---------------------------------------------------------------------------+');
179: WriteLineTextFile( 'Oracle Balanced Scorecard: Version : ' || BSC_METADATA_OPTIMIZER_PKG.VERSION);
183: -- Changed 'Metadata Optimizer' to 'Generated Database' in the following statement
184: WriteLineTextFile( 'Module: Generate Database');
185: WriteLineTextFile( '+---------------------------------------------------------------------------+');
186: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
187: BSC_MO_HELPER_PKG.writeTmp('Completed WriteDocHeader', FND_LOG.LEVEL_PROCEDURE);
188: END IF;
189:
190: End ;
191: --****************************************************************************
216: return l_name;
217: */
218: EXCEPTION WHEN OTHERS THEN
219: g_error := sqlerrm;
220: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetPeriodicityName :' ||g_error);
221: raise;
222: End ;
223:
224: --****************************************************************************
250: return l_name;
251: */
252: EXCEPTION WHEN OTHERS THEN
253: g_error := sqlerrm;
254: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetPeriodicityCalendarName, periodicity ='||periodicity_id||' :' ||g_error);
255: raise;
256: End;
257:
258:
302: l_fields DBMS_SQL.VARCHAR2_TABLE;
303: l_sumLevelChangedMsg VARCHAR2(1000);
304: BEGIN
305: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
306: bsc_mo_helper_pkg.writeTmp('Inside DocResult', FND_LOG.LEVEL_PROCEDURE);
307: END IF;
308: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'));
309: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'))));
310: --Bug#3306248
304: BEGIN
305: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
306: bsc_mo_helper_pkg.writeTmp('Inside DocResult', FND_LOG.LEVEL_PROCEDURE);
307: END IF;
308: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'));
309: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'))));
310: --Bug#3306248
311: --get message if summarization level was changed
312: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
305: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
306: bsc_mo_helper_pkg.writeTmp('Inside DocResult', FND_LOG.LEVEL_PROCEDURE);
307: END IF;
308: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'));
309: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'))));
310: --Bug#3306248
311: --get message if summarization level was changed
312: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
313: l_sumLevelChangedMsg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUM_LEVEL_CHANGE') ||
309: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'METADATA_OPTIMIZER_RESULT'))));
310: --Bug#3306248
311: --get message if summarization level was changed
312: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
313: l_sumLevelChangedMsg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUM_LEVEL_CHANGE') ||
314: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' ||
315: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'FROM') || ' ';
316: If BSC_METADATA_OPTIMIZER_PKG.g_Current_Adv_Sum_Level IS NULL Then
317: l_sumLevelChangedMsg := l_sumLevelChangedMsg || 'NULL';
310: --Bug#3306248
311: --get message if summarization level was changed
312: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
313: l_sumLevelChangedMsg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUM_LEVEL_CHANGE') ||
314: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' ||
315: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'FROM') || ' ';
316: If BSC_METADATA_OPTIMIZER_PKG.g_Current_Adv_Sum_Level IS NULL Then
317: l_sumLevelChangedMsg := l_sumLevelChangedMsg || 'NULL';
318: Else
311: --get message if summarization level was changed
312: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
313: l_sumLevelChangedMsg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUM_LEVEL_CHANGE') ||
314: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' ||
315: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'FROM') || ' ';
316: If BSC_METADATA_OPTIMIZER_PKG.g_Current_Adv_Sum_Level IS NULL Then
317: l_sumLevelChangedMsg := l_sumLevelChangedMsg || 'NULL';
318: Else
319: l_sumLevelChangedMsg := l_sumLevelChangedMsg || BSC_METADATA_OPTIMIZER_PKG.g_Current_Adv_Sum_Level;
317: l_sumLevelChangedMsg := l_sumLevelChangedMsg || 'NULL';
318: Else
319: l_sumLevelChangedMsg := l_sumLevelChangedMsg || BSC_METADATA_OPTIMIZER_PKG.g_Current_Adv_Sum_Level;
320: End If;
321: l_sumLevelChangedMsg := l_sumLevelChangedMsg || ' ' || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'TO') || ' ';
322: If BSC_METADATA_OPTIMIZER_PKG.g_Adv_Summarization_Level IS NULL Then
323: l_sumLevelChangedMsg := l_sumLevelChangedMsg || 'NULL';
324: Else
325: l_sumLevelChangedMsg := l_sumLevelChangedMsg || BSC_METADATA_OPTIMIZER_PKG.g_Adv_Summarization_Level;
326: End If;
327: End If;
328: IF (BSC_METADATA_OPTIMIZER_PKG.gIndicators.count=0) THEN
329: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
330: bsc_mo_helper_pkg.writeTmp('Completed DocResult, gIndicators.count was zero');
331: END IF;
332: return;
333: END IF;
334: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gIndicators.first;
332: return;
333: END IF;
334: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gIndicators.first;
335: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
336: bsc_mo_helper_pkg.writeTmp('gIndicators.count = '||BSC_METADATA_OPTIMIZER_PKG.gIndicators.count);
337: END IF;
338: LOOP
339: Indicator := BSC_METADATA_OPTIMIZER_PKG.gIndicators(l_index1);
340: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
337: END IF;
338: LOOP
339: Indicator := BSC_METADATA_OPTIMIZER_PKG.gIndicators(l_index1);
340: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
341: bsc_mo_helper_pkg.writeTmp('Indicator.code = '||Indicator.code||', Indicator.Action_Flag = '||Indicator.Action_Flag);
342: END IF;
343: --Indicator code and name
344: If Indicator.EDW_Flag = 0 Then
345: WriteLineTextFile (Indicator.Code || ' ' || Indicator.Name);
343: --Indicator code and name
344: If Indicator.EDW_Flag = 0 Then
345: WriteLineTextFile (Indicator.Code || ' ' || Indicator.Name);
346: Else
347: WriteLineTextFile (Indicator.Code || ' ' || Indicator.Name || ' (' ||BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'EDW') || ')');
348: End If;
349: IF (Indicator.Action_Flag = 0 OR Indicator.Action_Flag=6) THEN
350: --Case 0, 6
351: --No changes were made.
369: ShowOldITables := False;
370: End If;
371: ELSIF (Indicator.Action_Flag = 1 OR Indicator.Action_Flag=3) THEN
372: --Case 1, 3
373: If BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.garrOldIndicators, Indicator.Code)>=0 Then
374: --Structural changes: Add or drop a dimension, data set, analysis group, etc.
375: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'STRUCTURAL_CHANGE');
376: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
377: fnd_message.set_name('BSC', 'BSC_ADD_DROP_DIMENSION');
371: ELSIF (Indicator.Action_Flag = 1 OR Indicator.Action_Flag=3) THEN
372: --Case 1, 3
373: If BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.garrOldIndicators, Indicator.Code)>=0 Then
374: --Structural changes: Add or drop a dimension, data set, analysis group, etc.
375: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'STRUCTURAL_CHANGE');
376: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
377: fnd_message.set_name('BSC', 'BSC_ADD_DROP_DIMENSION');
378: msg := msg || ' ' ||fnd_message.get;
379: WriteLineTextFile (msg);
372: --Case 1, 3
373: If BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.garrOldIndicators, Indicator.Code)>=0 Then
374: --Structural changes: Add or drop a dimension, data set, analysis group, etc.
375: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'STRUCTURAL_CHANGE');
376: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
377: fnd_message.set_name('BSC', 'BSC_ADD_DROP_DIMENSION');
378: msg := msg || ' ' ||fnd_message.get;
379: WriteLineTextFile (msg);
380: --Bug#3306248
384: ShowITables := True;
385: ShowOldITables := True;
386: Else
387: --New indicator
388: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'NEW_INDICATOR'));
389: ShowITables := False;
390: ShowOldITables := False;
391: End If;
392: ELSIF (Indicator.Action_Flag = 2) THEN
391: End If;
392: ELSIF (Indicator.Action_Flag = 2) THEN
393: --Case 2
394: --Deleted
395: WriteLineTextFile(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'DELETED'));
396: ShowITables := False;
397: ShowOldITables := True;
398: ELSIF (Indicator.Action_Flag = 4 OR Indicator.Action_Flag = 5 OR Indicator.Action_Flag = 7) THEN
399: --Case 4, 5, 7
398: ELSIF (Indicator.Action_Flag = 4 OR Indicator.Action_Flag = 5 OR Indicator.Action_Flag = 7) THEN
399: --Case 4, 5, 7
400: --Non-structural change(s):Change color or group functions.
401: --Input tables were not changed
402: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NONSTRUCTURAL_CHANGE');
403: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
404: msg := msg || ' ' || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'CHANGE_COLOR_OR_GROUP_FUNCTION');
405: WriteLineTextFile (msg);
406: --Bug#3306248
399: --Case 4, 5, 7
400: --Non-structural change(s):Change color or group functions.
401: --Input tables were not changed
402: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NONSTRUCTURAL_CHANGE');
403: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
404: msg := msg || ' ' || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'CHANGE_COLOR_OR_GROUP_FUNCTION');
405: WriteLineTextFile (msg);
406: --Bug#3306248
407: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
400: --Non-structural change(s):Change color or group functions.
401: --Input tables were not changed
402: msg := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NONSTRUCTURAL_CHANGE');
403: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON');
404: msg := msg || ' ' || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'CHANGE_COLOR_OR_GROUP_FUNCTION');
405: WriteLineTextFile (msg);
406: --Bug#3306248
407: If BSC_METADATA_OPTIMIZER_PKG.g_Sum_Level_Change <> 0 Then
408: WriteLineTextFile (l_sumLevelChangedMsg);
420: --Input tables
421: If ShowITables Then
422: FirstTable := True;
423: For i IN 0..BSC_METADATA_OPTIMIZER_PKG.gnumNewITables - 1 LOOP
424: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).Indicators, ',');
425: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
426: If FirstTable Then
427: --Write header
428: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'));
421: If ShowITables Then
422: FirstTable := True;
423: For i IN 0..BSC_METADATA_OPTIMIZER_PKG.gnumNewITables - 1 LOOP
424: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).Indicators, ',');
425: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
426: If FirstTable Then
427: --Write header
428: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'));
429: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'))));
424: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).Indicators, ',');
425: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
426: If FirstTable Then
427: --Write header
428: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'));
429: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'))));
430: FirstTable := False;
431: End If;
432: --Table Name (Periodicity name)
425: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
426: If FirstTable Then
427: --Write header
428: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'));
429: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'INPUT_TABLE'))));
430: FirstTable := False;
431: End If;
432: --Table Name (Periodicity name)
433: msg := BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).Name || ' (' ||
433: msg := BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).Name || ' (' ||
434: GetPeriodicityName(BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).periodicity) || ' (' ||
435: GetPeriodicityCalendarName(BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).periodicity) || '))';
436: WriteLineTextFile (msg);
437: l_fields := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.garrNewITables(i).fields, ',');
438: --fields
439: j := l_fields.first;
440: LOOP
441: EXIT WHEN l_fields.count=0;
452: FirstTable := True;
453: i := BSC_METADATA_OPTIMIZER_PKG.garrOldBTables.first;
454: LOOP
455: EXIT WHEN BSC_METADATA_OPTIMIZER_PKG.garrOldBTables.count = 0;
456: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Indicators, ',');
457: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
458: If FirstTable Then
459: --Write header
460: msg := StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'), TABLELENGTH) || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'), TABLELENGTH);
453: i := BSC_METADATA_OPTIMIZER_PKG.garrOldBTables.first;
454: LOOP
455: EXIT WHEN BSC_METADATA_OPTIMIZER_PKG.garrOldBTables.count = 0;
456: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Indicators, ',');
457: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
458: If FirstTable Then
459: --Write header
460: msg := StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'), TABLELENGTH) || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'), TABLELENGTH);
461: WriteLineTextFile (msg);
456: l_indic_table := BSC_MO_HELPER_PKG.decomposestringtonumber( BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Indicators, ',');
457: If BSC_MO_HELPER_PKG.findIndex(l_indic_table, Indicator.Code)>=0 Then
458: If FirstTable Then
459: --Write header
460: msg := StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'), TABLELENGTH) || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'), TABLELENGTH);
461: WriteLineTextFile (msg);
462: msg := StrFix(StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'))), TABLELENGTH) || StrFix(StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'))), TABLELENGTH);
463: WriteLineTextFile (msg);
464: FirstTable := False;
458: If FirstTable Then
459: --Write header
460: msg := StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'), TABLELENGTH) || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'), TABLELENGTH);
461: WriteLineTextFile (msg);
462: msg := StrFix(StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'OLD_INPUT_TABLE'))), TABLELENGTH) || StrFix(StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'BACKUP_TABLE'))), TABLELENGTH);
463: WriteLineTextFile (msg);
464: FirstTable := False;
465: End If;
466:
469: --Fix bug#2436864 The peridiodicity or calendar of a old table could be deleted.
470: --So show (Custom Periodicity) when that is the case.
471: msg := StrFix(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).InputTable, TABLELENGTH);
472: -- Show B table backup only if it has really been created in this round
473: IF BSC_MO_HELPER_PKG.findIndexVARCHAR2(BSC_METADATA_OPTIMIZER_PKG.gBackedUpBTables, BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Name) >= 0 THEN
474: msg := msg || BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Name || '_BAK (';
475: PeriodicityName := GetPeriodicityName(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).periodicity);
476: CalendarName := GetPeriodicityCalendarName(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).periodicity);
477: If (PeriodicityName IS NULL Or CalendarName IS NULL) Then
474: msg := msg || BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Name || '_BAK (';
475: PeriodicityName := GetPeriodicityName(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).periodicity);
476: CalendarName := GetPeriodicityCalendarName(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).periodicity);
477: If (PeriodicityName IS NULL Or CalendarName IS NULL) Then
478: msg := msg || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_KPIDESIGNER', 'CUSTOM_PERIODICITY');
479: Else
480: msg := msg || PeriodicityName || ' (' || CalendarName || ')';
481: End If;
482: msg := msg || ')';
481: End If;
482: msg := msg || ')';
483: END IF;
484: WriteLineTextFile( msg);
485: IF BSC_MO_HELPER_PKG.findIndexVARCHAR2(BSC_METADATA_OPTIMIZER_PKG.gBackedUpBTables, BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Name) >= 0 THEN
486: --fields
487: l_fields := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Fields, ',');
488: j := l_fields.first;
489: LOOP
483: END IF;
484: WriteLineTextFile( msg);
485: IF BSC_MO_HELPER_PKG.findIndexVARCHAR2(BSC_METADATA_OPTIMIZER_PKG.gBackedUpBTables, BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Name) >= 0 THEN
486: --fields
487: l_fields := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.garrOldBTables(i).Fields, ',');
488: j := l_fields.first;
489: LOOP
490: EXIT WHEN l_fields.count=0;
491: msg := StrX(' ', TABLELENGTH) || StrX(' ', INDENT) || l_Fields(j);
502: EXIT WHEN l_index1 = BSC_METADATA_OPTIMIZER_PKG.gIndicators.last;
503: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gIndicators.next(l_index1);
504: END LOOP;
505: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
506: bsc_mo_helper_pkg.writeTmp('Completed DocResult', FND_LOG.LEVEL_PROCEDURE);
507: END IF;
508: EXCEPTION WHEN OTHERS THEN
509: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm, 'DocResult');
510: bsc_mo_helper_pkg.writeTmp('Exception in DocResult, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
505: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
506: bsc_mo_helper_pkg.writeTmp('Completed DocResult', FND_LOG.LEVEL_PROCEDURE);
507: END IF;
508: EXCEPTION WHEN OTHERS THEN
509: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm, 'DocResult');
510: bsc_mo_helper_pkg.writeTmp('Exception in DocResult, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
511: bsc_mo_helper_pkg.TerminateWithError('BSC_RESULT_REPORT_FAILED', 'DocResult');
512: raise;
513: End;
506: bsc_mo_helper_pkg.writeTmp('Completed DocResult', FND_LOG.LEVEL_PROCEDURE);
507: END IF;
508: EXCEPTION WHEN OTHERS THEN
509: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm, 'DocResult');
510: bsc_mo_helper_pkg.writeTmp('Exception in DocResult, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
511: bsc_mo_helper_pkg.TerminateWithError('BSC_RESULT_REPORT_FAILED', 'DocResult');
512: raise;
513: End;
514:
507: END IF;
508: EXCEPTION WHEN OTHERS THEN
509: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm, 'DocResult');
510: bsc_mo_helper_pkg.writeTmp('Exception in DocResult, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
511: bsc_mo_helper_pkg.TerminateWithError('BSC_RESULT_REPORT_FAILED', 'DocResult');
512: raise;
513: End;
514:
515: --****************************************************************************
540: return l_num;
541: END IF;
542: EXCEPTION WHEN OTHERS THEN
543: g_error := sqlerrm;
544: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetMaxSubPeriodUsr :' ||g_error);
545: raise;
546: End ;
547:
548: --****************************************************************************
567: CLOSE c1;
568: return l_num;
569: EXCEPTION WHEN OTHERS THEN
570: g_error := sqlerrm;
571: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetMaxPeriod :' ||g_error);
572: raise;
573: END;
574:
575: --****************************************************************************
643: l_bind_case number;
644: BEGIN
645:
646: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
647: bsc_mo_helper_pkg.writeTmp('writeTableDescription, Table is : ');
648: bsc_mo_helper_pkg.write_this(tabla);
649: END IF;
650: --BSC Multiple Optimizers
651: -- Table_Keys := BSC_MO_HELPER_PKG.getAllKeyFields(Tabla.name);
644: BEGIN
645:
646: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
647: bsc_mo_helper_pkg.writeTmp('writeTableDescription, Table is : ');
648: bsc_mo_helper_pkg.write_this(tabla);
649: END IF;
650: --BSC Multiple Optimizers
651: -- Table_Keys := BSC_MO_HELPER_PKG.getAllKeyFields(Tabla.name);
652: -- Table_Data := BSC_MO_HELPER_PKG.getAllDataFields(Tabla.name);
647: bsc_mo_helper_pkg.writeTmp('writeTableDescription, Table is : ');
648: bsc_mo_helper_pkg.write_this(tabla);
649: END IF;
650: --BSC Multiple Optimizers
651: -- Table_Keys := BSC_MO_HELPER_PKG.getAllKeyFields(Tabla.name);
652: -- Table_Data := BSC_MO_HELPER_PKG.getAllDataFields(Tabla.name);
653: Table_Keys := Tabla.keys;
654: Table_Data := Tabla.data;
655: If BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV Then
648: bsc_mo_helper_pkg.write_this(tabla);
649: END IF;
650: --BSC Multiple Optimizers
651: -- Table_Keys := BSC_MO_HELPER_PKG.getAllKeyFields(Tabla.name);
652: -- Table_Data := BSC_MO_HELPER_PKG.getAllDataFields(Tabla.name);
653: Table_Keys := Tabla.keys;
654: Table_Data := Tabla.data;
655: If BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV Then
656: isBaseTable := BSC_MO_LOADER_CONFIG_PKG.isBasicTable(Tabla.Name);
662: l_period_column := BSC_MO_DB_PKG.GetPeriodColumnName(Tabla.Periodicity);
663: MaxPeriod := GetMaxPeriod(Tabla.Periodicity);
664: l_subperiod_column := BSC_MO_DB_PKG.GetSubperiodColumnName(Tabla.Periodicity);
665: MaxSubPeriod := GetMaxSubPeriodUsr(Tabla.Periodicity);
666: descCodeZero := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'REQUIRES_TOTALS_CODE_0');
667: Else
668: --system table
669: l_periodicity_name := GetPeriodicityName(Tabla.Periodicity) ;
670: l_periodicity_name := l_periodicity_name || ' (' || GetPeriodicityCalendarName(Tabla.Periodicity) || ')';
674: MaxSubPeriod := 0;
675: End If;
676: --Table name and periodicity
677: If Tabla.EDW_Flag = 1 Then
678: TableName := Tabla.Name || ' (' || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'EDW') || ')';
679: Else
680: TableName := Tabla.Name;
681: End If;
682: --BSC-MV Note
680: TableName := Tabla.Name;
681: End If;
682: --BSC-MV Note
683: If (BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV And (Tabla.Type = 0 Or isBaseTable)) Or (Not BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV) Then
684: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || TableName);
685: If Tabla.IsTargetTable Then
686: fnd_message.set_name('BSC', 'BSC_TABLE_FOR_BENCHMARKS');
687: WriteLineTextFile (StrFix(' ', TABLELENGTH) || fnd_message.get);
688: End If;
685: If Tabla.IsTargetTable Then
686: fnd_message.set_name('BSC', 'BSC_TABLE_FOR_BENCHMARKS');
687: WriteLineTextFile (StrFix(' ', TABLELENGTH) || fnd_message.get);
688: End If;
689: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIODICITY') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || l_periodicity_name);
690: Else
691: If Tabla.dbObjectType = 'VIEW' Then
692: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || Tabla.MVName);
693: Else
688: End If;
689: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIODICITY') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || l_periodicity_name);
690: Else
691: If Tabla.dbObjectType = 'VIEW' Then
692: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || Tabla.MVName);
693: Else
694: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || Tabla.MVName);
695: End If;
696: End If;
690: Else
691: If Tabla.dbObjectType = 'VIEW' Then
692: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || Tabla.MVName);
693: Else
694: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) || Tabla.MVName);
695: End If;
696: End If;
697: --Bug3351483 Add reference to Zero code MVs and Projection Tabels in system.txt
698: If BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV And Tabla.Type <> 0 And (Not isBaseTable) Then
700: OPEN cZeroMV(substr(tabla.name, 1, instr(tabla.name, '_', -1))||'%MV');
701: FETCH cZeroMV INTO l_mvname;
702: CLOSE cZeroMV;
703: If l_mvname IS NOT NULL THEN
704: WriteLineTextFile (bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_BACKEND', 'ASSOCIATED_ZMV') || bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' || l_mvname);
705: End If;
706: --Get the associated Projection table
707: OPEN cProjTable(substr(tabla.name,1, instr(tabla.name, '_', -1))||'PT');
708: FETCH cProjTable into l_mvname;
707: OPEN cProjTable(substr(tabla.name,1, instr(tabla.name, '_', -1))||'PT');
708: FETCH cProjTable into l_mvname;
709: CLOSE cProjTable;
710: If l_mvname is not null Then
711: WriteLineTextFile(bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_BACKEND', 'ASSOCIATED_PT') || bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' '|| l_mvname);
712: End If;
713: End If;
714: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
715: bsc_mo_helper_pkg.writeTmp( 'Writing Headers');
711: WriteLineTextFile(bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_BACKEND', 'ASSOCIATED_PT') || bsc_mo_helper_pkg.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' '|| l_mvname);
712: End If;
713: End If;
714: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
715: bsc_mo_helper_pkg.writeTmp( 'Writing Headers');
716: END IF;
717: --Headers
718: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
719: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
714: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
715: bsc_mo_helper_pkg.writeTmp( 'Writing Headers');
716: END IF;
717: --Headers
718: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
719: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
720: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
721: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
722: --BSC_MV Note
715: bsc_mo_helper_pkg.writeTmp( 'Writing Headers');
716: END IF;
717: --Headers
718: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
719: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
720: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
721: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
722: --BSC_MV Note
723: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
716: END IF;
717: --Headers
718: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
719: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
720: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
721: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
722: --BSC_MV Note
723: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
724: bsc_mo_helper_pkg.writeTmp( 'Writing Columns');
717: --Headers
718: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
719: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
720: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
721: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
722: --BSC_MV Note
723: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
724: bsc_mo_helper_pkg.writeTmp( 'Writing Columns');
725: END IF;
720: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
721: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
722: --BSC_MV Note
723: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
724: bsc_mo_helper_pkg.writeTmp( 'Writing Columns');
725: END IF;
726: --Columns
727: l_stmt := 'SELECT DISTINCT A.COLUMN_NAME, DATA_TYPE, DATA_LENGTH, DATA_PRECISION, DATA_SCALE, B.SOURCE, A.COLUMN_ID ';
728: If BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV And Tabla.dbObjectType = 'VIEW' Then
739: --BSC Autogen
740: l_stmt := l_stmt ||' AND A.TABLE_NAME = B.TABLE_NAME(+) AND A.COLUMN_NAME=upper(B.COLUMN_NAME(+)) ';
741: l_stmt := l_stmt ||' AND A.OWNER = :2';
742: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
743: bsc_mo_helper_pkg.writeTmp( 'table');
744: END IF;
745: Else
746: l_bind_case := 3;
747: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
744: END IF;
745: Else
746: l_bind_case := 3;
747: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
748: bsc_mo_helper_pkg.writeTmp( 'MV');
749: END IF;
750: l_stmt := l_stmt ||' WHERE A.TABLE_NAME = :1 ';
751: --BSC Autogen
752: l_stmt := l_stmt ||' AND B.TABLE_NAME(+) = :2 AND A.COLUMN_NAME=upper(B.COLUMN_NAME(+)) ';
754: End If;
755: End If;
756: l_stmt := l_stmt ||' ORDER BY COLUMN_ID ';
757: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
758: bsc_mo_helper_pkg.writeTmp( 'l_stmt = '||l_stmt);
759: END IF;
760: IF (l_bind_case =1) THEN
761: OPEN cv for l_stmt using UPPER(Tabla.MVName) ,UPPER(Tabla.Name);
762: ELSIF l_bind_case=2 THEN
801: ELSE
802: Linea := Linea || StrFix(rsData_Length, SIZELENGTH);
803: End If;
804: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
805: BSC_MO_HELPER_PKG.writeTmp('Processing column:'||rsColumn_Name, FND_LOG.LEVEL_STATEMENT);
806: END IF;
807: If BSC_MO_INDICATOR_PKG.keyFieldExists(Table_Keys, rsColumn_Name) Then
808: BSC_MO_HELPER_PKG.writeTmp('Its a key', FND_LOG.LEVEL_STATEMENT);
809: If Tabla.Type = 0 Then -- input table
804: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
805: BSC_MO_HELPER_PKG.writeTmp('Processing column:'||rsColumn_Name, FND_LOG.LEVEL_STATEMENT);
806: END IF;
807: If BSC_MO_INDICATOR_PKG.keyFieldExists(Table_Keys, rsColumn_Name) Then
808: BSC_MO_HELPER_PKG.writeTmp('Its a key', FND_LOG.LEVEL_STATEMENT);
809: If Tabla.Type = 0 Then -- input table
810: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
811: Else
812: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE');
806: END IF;
807: If BSC_MO_INDICATOR_PKG.keyFieldExists(Table_Keys, rsColumn_Name) Then
808: BSC_MO_HELPER_PKG.writeTmp('Its a key', FND_LOG.LEVEL_STATEMENT);
809: If Tabla.Type = 0 Then -- input table
810: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
811: Else
812: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE');
813: End If;
814: l_temp := BSC_MO_HELPER_PKG.findKeyIndex(BSC_METADATA_OPTIMIZER_PKG.gMasterTable, rsColumn_Name);
808: BSC_MO_HELPER_PKG.writeTmp('Its a key', FND_LOG.LEVEL_STATEMENT);
809: If Tabla.Type = 0 Then -- input table
810: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
811: Else
812: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE');
813: End If;
814: l_temp := BSC_MO_HELPER_PKG.findKeyIndex(BSC_METADATA_OPTIMIZER_PKG.gMasterTable, rsColumn_Name);
815: fnd_message.set_name('BSC', 'BSC_SEE_TABLE_NAME');
816: IF (l_temp <> -1) THEN
810: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
811: Else
812: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE');
813: End If;
814: l_temp := BSC_MO_HELPER_PKG.findKeyIndex(BSC_METADATA_OPTIMIZER_PKG.gMasterTable, rsColumn_Name);
815: fnd_message.set_name('BSC', 'BSC_SEE_TABLE_NAME');
816: IF (l_temp <> -1) THEN
817: fnd_message.set_token('TABLE_NAME', BSC_METADATA_OPTIMIZER_PKG.gMasterTable(l_temp).Name );
818: msg := fnd_message.get;
818: msg := fnd_message.get;
819: Linea := Linea || ' (' || msg || ')';
820: END IF;
821: If Tabla.Type = 0 Then --input table
822: l_temp := BSC_MO_HELPER_PKG.findIndex(Table_Keys, rsColumn_Name);
823: IF (l_temp <> -1) THEN
824: If Table_Keys(l_temp).NeedsCode0 Then
825: --If property NecesitaCod0 is TRUE the input table is for a precalculated indicator.
826: --The input tables for no-precalculated indicators have this property in FALSE
829: END IF;
830: End If;
831: ElsIf BSC_MO_INDICATOR_PKG.dataFieldExists(Table_Data, rsColumn_Name) Then
832: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
833: bsc_mo_helper_pkg.writeTmp('Data field exists, rsColumn_Name='||rsColumn_Name);
834: END IF;
835: If substr(rsColumn_Name, 1, 5) = 'BSCIC' Then
836: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
837: Else
832: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
833: bsc_mo_helper_pkg.writeTmp('Data field exists, rsColumn_Name='||rsColumn_Name);
834: END IF;
835: If substr(rsColumn_Name, 1, 5) = 'BSCIC' Then
836: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
837: Else
838: l_temp := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gLov, rsColumn_name, l_source, true);
839: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
840: bsc_mo_helper_pkg.writeTmp(' l_temp = '||l_temp);
834: END IF;
835: If substr(rsColumn_Name, 1, 5) = 'BSCIC' Then
836: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
837: Else
838: l_temp := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gLov, rsColumn_name, l_source, true);
839: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
840: bsc_mo_helper_pkg.writeTmp(' l_temp = '||l_temp);
841: END IF;
842: IF (l_temp <>-1) THEN
836: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
837: Else
838: l_temp := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gLov, rsColumn_name, l_source, true);
839: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
840: bsc_mo_helper_pkg.writeTmp(' l_temp = '||l_temp);
841: END IF;
842: IF (l_temp <>-1) THEN
843: Linea := Linea || BSC_METADATA_OPTIMIZER_PKG.gLov(l_temp).Description;
844: END IF;
843: Linea := Linea || BSC_METADATA_OPTIMIZER_PKG.gLov(l_temp).Description;
844: END IF;
845: End If;
846: ElsIf UPPER(rsColumn_Name) = 'YEAR' Then
847: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'YEAR_1999_2000_ACTUAL_YEAR');
848: ElsIf UPPER(rsColumn_Name) = 'TYPE' Then
849: If (Tabla.EDW_Flag = 1 And Tabla.Type = 0) Or (Tabla.IsTargetTable) Then
850: --If the input table is for EDW or is a targets input table, say 'Type: 1: Plan. Do not load actuals.'
851: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_1_PLAN_EDW');
847: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'YEAR_1999_2000_ACTUAL_YEAR');
848: ElsIf UPPER(rsColumn_Name) = 'TYPE' Then
849: If (Tabla.EDW_Flag = 1 And Tabla.Type = 0) Or (Tabla.IsTargetTable) Then
850: --If the input table is for EDW or is a targets input table, say 'Type: 1: Plan. Do not load actuals.'
851: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_1_PLAN_EDW');
852: Else
853: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_0_ACTUAL_1_PLAN');
854: End If;
855: --added for bug 3919130
849: If (Tabla.EDW_Flag = 1 And Tabla.Type = 0) Or (Tabla.IsTargetTable) Then
850: --If the input table is for EDW or is a targets input table, say 'Type: 1: Plan. Do not load actuals.'
851: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_1_PLAN_EDW');
852: Else
853: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_0_ACTUAL_1_PLAN');
854: End If;
855: --added for bug 3919130
856: ElsIf UPPER(rsColumn_Name) = 'TIME_FK' Then
857: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DATE');
853: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE_0_ACTUAL_1_PLAN');
854: End If;
855: --added for bug 3919130
856: ElsIf UPPER(rsColumn_Name) = 'TIME_FK' Then
857: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DATE');
858: ElsIf UPPER(rsColumn_Name) = UPPER(l_period_column) Then
859: If (BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV And (Tabla.Type = 0 Or isBaseTable))
860: Or (Not BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV) Then
861: l_temp := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gperiodicities, Tabla.periodicity);
857: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DATE');
858: ElsIf UPPER(rsColumn_Name) = UPPER(l_period_column) Then
859: If (BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV And (Tabla.Type = 0 Or isBaseTable))
860: Or (Not BSC_METADATA_OPTIMIZER_PKG.g_BSC_MV) Then
861: l_temp := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gperiodicities, Tabla.periodicity);
862: IF (l_temp <> -1) THEN
863: --I am doing this because the periodicity could not exist in the system.
864: --Documentation can be run at anytime and the user could have deleted the periodicity
865: If BSC_METADATA_OPTIMIZER_PKG.gPeriodicities(l_temp).Yearly_Flag = 1 Then
864: --Documentation can be run at anytime and the user could have deleted the periodicity
865: If BSC_METADATA_OPTIMIZER_PKG.gPeriodicities(l_temp).Yearly_Flag = 1 Then
866: Linea := Linea || ' 0'; --bug#3980028
867: Else
868: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIOD'); --bug#3980028
869: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' 1 ' ||
870: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'TO') || ' ' || MaxPeriod;
871: End If;
872: END IF;
865: If BSC_METADATA_OPTIMIZER_PKG.gPeriodicities(l_temp).Yearly_Flag = 1 Then
866: Linea := Linea || ' 0'; --bug#3980028
867: Else
868: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIOD'); --bug#3980028
869: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' 1 ' ||
870: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'TO') || ' ' || MaxPeriod;
871: End If;
872: END IF;
873: Else
866: Linea := Linea || ' 0'; --bug#3980028
867: Else
868: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIOD'); --bug#3980028
869: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' 1 ' ||
870: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_IVIEWER', 'TO') || ' ' || MaxPeriod;
871: End If;
872: END IF;
873: Else
874: --Do not mention more info about period. MV has multiple periodicities.
872: END IF;
873: Else
874: --Do not mention more info about period. MV has multiple periodicities.
875: null;
876: --Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIOD');
877: End If;
878: ElsIf UPPER(rsColumn_Name) = UPPER(l_subperiod_column) Then
879: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUBPERIOD_1_TO') || ' ' || MaxSubPeriod;
880: ElsIf UPPER(rsColumn_Name) = 'PERIODICITY_ID' OR UPPER(rsColumn_Name) = 'RECORD_TYPE' Then
875: null;
876: --Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'PERIOD');
877: End If;
878: ElsIf UPPER(rsColumn_Name) = UPPER(l_subperiod_column) Then
879: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUBPERIOD_1_TO') || ' ' || MaxSubPeriod;
880: ElsIf UPPER(rsColumn_Name) = 'PERIODICITY_ID' OR UPPER(rsColumn_Name) = 'RECORD_TYPE' Then
881: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
882: ELSE
883: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
877: End If;
878: ElsIf UPPER(rsColumn_Name) = UPPER(l_subperiod_column) Then
879: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUBPERIOD_1_TO') || ' ' || MaxSubPeriod;
880: ElsIf UPPER(rsColumn_Name) = 'PERIODICITY_ID' OR UPPER(rsColumn_Name) = 'RECORD_TYPE' Then
881: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
882: ELSE
883: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
884: End If;
885: WriteLineTextFile (Linea);
879: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SUBPERIOD_1_TO') || ' ' || MaxSubPeriod;
880: ElsIf UPPER(rsColumn_Name) = 'PERIODICITY_ID' OR UPPER(rsColumn_Name) = 'RECORD_TYPE' Then
881: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
882: ELSE
883: Linea := Linea || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INTERNAL_COLUMN');
884: End If;
885: WriteLineTextFile (Linea);
886: END Loop;
887: Close cv;
888: WriteLineTextFile ('');
889: WriteLineTextFile ('');
890: EXCEPTION WHEN OTHERS THEN
891: g_error := sqlerrm;
892: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.writeTableDescription :' ||sqlerrm);
893: fnd_message.set_name ('BSC', 'BSC_TABLENAME_DESCR_FAILED');
894: fnd_message.set_token('TABLE_NAME', Tabla.name);
895: g_error := fnd_message.get;
896: BSC_MO_HELPER_PKG.TerminateWithMsg(g_error);
892: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.writeTableDescription :' ||sqlerrm);
893: fnd_message.set_name ('BSC', 'BSC_TABLENAME_DESCR_FAILED');
894: fnd_message.set_token('TABLE_NAME', Tabla.name);
895: g_error := fnd_message.get;
896: BSC_MO_HELPER_PKG.TerminateWithMsg(g_error);
897: raise;
898: End ;
899: --****************************************************************************
900: -- WriteInputAndSystemTables : DocumentacionTablasDatos
911: arrMvs DBMS_SQL.VARCHAR2_TABLE;
912: numMVs NUMBER := 0;
913: BEGIn
914: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
915: BSC_MO_HELPER_PKG.writeTmp('Inside WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
916: END IF;
917: --Input tables
918: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'));
919: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'))));
914: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
915: BSC_MO_HELPER_PKG.writeTmp('Inside WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
916: END IF;
917: --Input tables
918: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'));
919: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'))));
920: IF (BSC_METADATA_OPTIMIZER_PKG.gTables.count >0 ) THEN
921: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.first;
922: LOOP
915: BSC_MO_HELPER_PKG.writeTmp('Inside WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
916: END IF;
917: --Input tables
918: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'));
919: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLES_DESCRIPTION'))));
920: IF (BSC_METADATA_OPTIMIZER_PKG.gTables.count >0 ) THEN
921: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.first;
922: LOOP
923: l_table := BSC_METADATA_OPTIMIZER_PKG.gTables(l_index1);
928: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.next(l_index1);
929: END LOOP;
930: END IF;
931: --System tables
932: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SYSTEM_TABLES_DESCRIPTION'));
933: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SYSTEM_TABLES_DESCRIPTION'))) );
934: IF (BSC_METADATA_OPTIMIZER_PKG.gTables.count >0 ) THEN
935: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.first;
936: LOOP
929: END LOOP;
930: END IF;
931: --System tables
932: WriteLineTextFile (BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SYSTEM_TABLES_DESCRIPTION'));
933: WriteLineTextFile (StrX('-', Length(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SYSTEM_TABLES_DESCRIPTION'))) );
934: IF (BSC_METADATA_OPTIMIZER_PKG.gTables.count >0 ) THEN
935: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.first;
936: LOOP
937: l_table := BSC_METADATA_OPTIMIZER_PKG.gTables(l_index1);
940: --BSC-MV Note: If the table is a base table then write the description of the table.
941: --If not then write the description of the MV (if exists)
942: If BSC_MO_LOADER_CONFIG_PKG.isBasicTable(l_table.Name) Then
943: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
944: bsc_mo_helper_pkg.writeTmp('SYNONYM', FND_LOG.LEVEL_STATEMENT);
945: END IF;
946: writeTableDescription (l_table);
947: l_table.dbObjectType := 'SYNONYM';
948: Else
950: dbObjectType := GetDbObjectType(MVName);
951: l_table.dbObjectType := dbObjectType;
952: l_table.MVName := MVName;
953: --Remember that 1 mv correespond to multiple summary tables (different periodicities)
954: If Not BSC_MO_HELPER_PKG.searchStringExists(arrMvs, numMVs, MVName) Then
955: If dbObjectType IS NOT NULL Then
956: --It is a MV or View
957: writeTableDescription (l_table);
958: End If;
968: l_index1 := BSC_METADATA_OPTIMIZER_PKG.gTables.next(l_index1);
969: END LOOP;
970: END IF;
971: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
972: BSC_MO_HELPER_PKG.writeTmp('Completed WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
973: END IF;
974: EXCEPTION WHEN OTHERS THEN
975: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
976: bsc_mo_helper_pkg.writeTmp('Exception in WriteInputAndSystemTables, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
971: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
972: BSC_MO_HELPER_PKG.writeTmp('Completed WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
973: END IF;
974: EXCEPTION WHEN OTHERS THEN
975: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
976: bsc_mo_helper_pkg.writeTmp('Exception in WriteInputAndSystemTables, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
977: bsc_mo_helper_pkg.TerminateWithError('BSC_DATATABLE_DOC_FAILED', 'WriteInputAndSystemTables');
978: raise;
979: End ;
972: BSC_MO_HELPER_PKG.writeTmp('Completed WriteInputAndSystemTables', FND_LOG.LEVEL_PROCEDURE);
973: END IF;
974: EXCEPTION WHEN OTHERS THEN
975: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
976: bsc_mo_helper_pkg.writeTmp('Exception in WriteInputAndSystemTables, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
977: bsc_mo_helper_pkg.TerminateWithError('BSC_DATATABLE_DOC_FAILED', 'WriteInputAndSystemTables');
978: raise;
979: End ;
980: --****************************************************************************
973: END IF;
974: EXCEPTION WHEN OTHERS THEN
975: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
976: bsc_mo_helper_pkg.writeTmp('Exception in WriteInputAndSystemTables, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
977: bsc_mo_helper_pkg.TerminateWithError('BSC_DATATABLE_DOC_FAILED', 'WriteInputAndSystemTables');
978: raise;
979: End ;
980: --****************************************************************************
981: -- SetNeedCod0InOriTables
1003:
1004:
1005: BEGIN
1006: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1007: bsc_mo_helper_pkg.writeTmp('Inside SetNeedCod0InOriTables', FND_LOG.LEVEL_PROCEDURE);
1008: END IF;
1009: numTablesOri := 0;
1010: For i IN 0..numTablesCod0 - 1 LOOP
1011: l_table_index_in_gTables := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, arrTablesCod0(i));
1007: bsc_mo_helper_pkg.writeTmp('Inside SetNeedCod0InOriTables', FND_LOG.LEVEL_PROCEDURE);
1008: END IF;
1009: numTablesOri := 0;
1010: For i IN 0..numTablesCod0 - 1 LOOP
1011: l_table_index_in_gTables := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, arrTablesCod0(i));
1012: l_originTable := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index_in_gTables).originTable, ',');
1013: l_origin_counter := l_originTable.first;
1014: LOOP
1015: EXIT WHEN l_originTable.count=0;
1008: END IF;
1009: numTablesOri := 0;
1010: For i IN 0..numTablesCod0 - 1 LOOP
1011: l_table_index_in_gTables := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, arrTablesCod0(i));
1012: l_originTable := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index_in_gTables).originTable, ',');
1013: l_origin_counter := l_originTable.first;
1014: LOOP
1015: EXIT WHEN l_originTable.count=0;
1016: TablaOri := l_originTable(l_origin_counter);
1014: LOOP
1015: EXIT WHEN l_originTable.count=0;
1016: TablaOri := l_originTable(l_origin_counter);
1017: l_table_keys := BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index_in_gTables).keys;
1018: l_origin_index_in_gTables := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, TablaOri);
1019: -- origin table keys
1020: l_origin_table_keys := BSC_METADATA_OPTIMIZER_PKG.gTables(l_origin_index_in_gTables).keys;
1021: l_index2 := l_origin_table_keys.first;
1022: LOOP
1023: EXIT WHEN l_origin_table_keys.count=0;
1024: keyColumn := l_origin_table_keys(l_index2);
1025: --Because this function is just for precalculated kpis,
1026: --we know that there is not change of dissagregation
1027: l_key_index := BSC_MO_HELPER_PKG.findIndex(l_table_keys, keyColumn.keyName);
1028: if (l_key_index<>-1) then
1029: keyColumn.NeedsCode0 := l_table_keys(l_key_index).NeedsCode0;
1030: l_origin_table_keys(l_index2) := keyColumn;
1031: end if;
1032: EXIT WHEN l_index2 = l_origin_table_keys.last;
1033: l_index2 := l_origin_table_keys.next(l_index2);
1034: END LOOP;
1035: BSC_METADATA_OPTIMIZER_PKG.gTables(l_origin_index_in_gTables).keys := l_origin_table_keys;
1036: If Not BSC_MO_HELPER_PKG.searchStringExists(arrTablesOri, numTablesOri, TablaOri) Then
1037: arrTablesOri(numTablesOri) := TablaOri;
1038: numTablesOri := numTablesOri + 1;
1039: End If;
1040: EXIT WHEN l_origin_counter = l_originTable.last;
1044: If numTablesOri > 0 Then
1045: SetNeedCod0InOriTables(arrTablesOri, numTablesOri);
1046: End If;
1047: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1048: bsc_mo_helper_pkg.writeTmp('Completed SetNeedCod0InOriTables', FND_LOG.LEVEL_PROCEDURE);
1049: END IF;
1050: EXCEPTION WHEN OTHERS THEN
1051: g_error := sqlerrm;
1052: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.writeTableDescription :' ||g_error);
1048: bsc_mo_helper_pkg.writeTmp('Completed SetNeedCod0InOriTables', FND_LOG.LEVEL_PROCEDURE);
1049: END IF;
1050: EXCEPTION WHEN OTHERS THEN
1051: g_error := sqlerrm;
1052: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.writeTableDescription :' ||g_error);
1053: raise;
1054: End ;
1055:
1056:
1081: Close c1;
1082: return res;
1083: EXCEPTION WHEN OTHERS THEN
1084: g_error := sqlerrm;
1085: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.GetLevelPKCol :' ||g_error);
1086: raise;
1087: End ;
1088: --****************************************************************************
1089: -- ReplaceStr : ReemplazarStr
1116: END Loop;
1117: l_result_string := l_result_string || l_string;
1118: return l_result_string;
1119: EXCEPTION WHEN OTHERS THEN
1120: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in ReplaceStr, param1= '||p_string||', param2='||p_replace_from||',param3='||p_replace_to);
1121: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
1122: BSC_MO_HELPER_PKG.writeTmp(sqlerrm, fnd_log.level_statement, true);
1123: raise;
1124: End ;
1117: l_result_string := l_result_string || l_string;
1118: return l_result_string;
1119: EXCEPTION WHEN OTHERS THEN
1120: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in ReplaceStr, param1= '||p_string||', param2='||p_replace_from||',param3='||p_replace_to);
1121: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
1122: BSC_MO_HELPER_PKG.writeTmp(sqlerrm, fnd_log.level_statement, true);
1123: raise;
1124: End ;
1125:
1118: return l_result_string;
1119: EXCEPTION WHEN OTHERS THEN
1120: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in ReplaceStr, param1= '||p_string||', param2='||p_replace_from||',param3='||p_replace_to);
1121: BSC_MO_HELPER_PKG.TerminateWithMsg(sqlerrm);
1122: BSC_MO_HELPER_PKG.writeTmp(sqlerrm, fnd_log.level_statement, true);
1123: raise;
1124: End ;
1125:
1126: FUNCTION getIndicsForTable (l_tableName IN VARCHAR2, l_num OUT NOCOPY NUMBER) RETURN VARCHAR2 IS
1167: l_stmt := l_stmt ||' where indicator in (select indicator from bsc_tmp_opt_ui_kpis where process_id =:2)';
1168: end if;
1169: end if;
1170: IF (g_mode=1) and (BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE<>0) then
1171: bsc_mo_helper_pkg.writeTmp('Case1, g_mode='||g_mode||' run_mode='||BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE);
1172: OPEN cv FOR l_stmt using l_tableName, BSC_METADATA_OPTIMIZER_PKG.g_processid;
1173: else
1174: bsc_mo_helper_pkg.writeTmp('Case2, g_mode='||g_mode||' run_mode='||BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE);
1175: OPEN cv for l_stmt using l_tableName;
1170: IF (g_mode=1) and (BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE<>0) then
1171: bsc_mo_helper_pkg.writeTmp('Case1, g_mode='||g_mode||' run_mode='||BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE);
1172: OPEN cv FOR l_stmt using l_tableName, BSC_METADATA_OPTIMIZER_PKG.g_processid;
1173: else
1174: bsc_mo_helper_pkg.writeTmp('Case2, g_mode='||g_mode||' run_mode='||BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE);
1175: OPEN cv for l_stmt using l_tableName;
1176: end if;
1177: LOOP
1178: FETCH CV INTO l_indicator;
1185: END LOOP;
1186: CLOSE cv;
1187: IF (l_num > 100) THEN
1188: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1189: bsc_mo_helper_pkg.writeTmp('# of results = '||l_num);
1190: END IF;
1191: END IF;
1192: return l_result;
1193: exception when others then
1191: END IF;
1192: return l_result;
1193: exception when others then
1194: l_error := sqlerrm;
1195: bsc_mo_helper_pkg.writeTmp(l_stmt);
1196: BSC_MO_HELPER_PKG.TerminateWithMsg('exception in getIndicsForTable : '||l_error) ;
1197: raise;
1198: END;
1199:
1192: return l_result;
1193: exception when others then
1194: l_error := sqlerrm;
1195: bsc_mo_helper_pkg.writeTmp(l_stmt);
1196: BSC_MO_HELPER_PKG.TerminateWithMsg('exception in getIndicsForTable : '||l_error) ;
1197: raise;
1198: END;
1199:
1200: --****************************************************************************
1291:
1292: BEGIN
1293: --Set gTablas = New Collection
1294: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1295: bsc_mo_helper_pkg.writeTmp('Inside inicalltables '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_PROCEDURE);
1296: END IF;
1297: if (g_mode = 1) then --
1298: if (BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE<>0) then
1299: l_stmt := l_stmt||
1336: l_periodicity_id := l_periodicity_id_list(i);
1337: l_edw_flag := l_edw_flag_list(i);
1338: l_target_flag := l_target_flag_list(i);
1339:
1340: l_table := bsc_mo_helper_pkg.new_clsTable;
1341: Table_keys.delete;
1342: Table_data.delete;
1343: l_table.Name := l_TABLE_NAME;
1344: l_table.Type := l_TABLE_TYPE;
1356: FETCH c2 INTO cRow2;
1357: EXIT WHEN c2%NOTFOUND;
1358: If UPPER(cRow2.COLUMN_TYPE) = 'P' Then
1359: --Key column
1360: l_key := bsc_mo_helper_pkg.new_clsKeyField;
1361: l_key.keyName := cRow2.COLUMN_NAME;
1362: l_key.Origin := null;
1363: l_key.NeedsCode0 := False;
1364: l_key.CalculateCode0 := False;
1365: l_key.FilterViewName := null;
1366: Table_Keys(Table_Keys.count) := l_key;
1367: Else
1368: --Data column
1369: l_data := bsc_mo_helper_pkg.new_clsDataField;
1370: l_data.fieldName := cRow2.COLUMN_NAME;
1371: l_data.source := cRow2.source;
1372: l_data.Origin := null;
1373: l_data.aggFunction := null;
1403: --I dont care about indicator and configuration
1404: l_table.Indicator := 0;
1405: l_table.Configuration := 0;
1406: --Add table to collection
1407: bsc_mo_helper_pkg.writeTmp('Adding '||Upper(l_table.Name)||' to collection');
1408: BSC_MO_HELPER_PKG.addTable(l_table, Table_Keys, Table_Data, 'InicAllTables');
1409: If l_table.Type = 0 Then
1410: --Add the input table to array garrNewITables()
1411: BSC_METADATA_OPTIMIZER_PKG.garrNewITables(BSC_METADATA_OPTIMIZER_PKG.gnumNewITables).Name := l_table.Name;
1404: l_table.Indicator := 0;
1405: l_table.Configuration := 0;
1406: --Add table to collection
1407: bsc_mo_helper_pkg.writeTmp('Adding '||Upper(l_table.Name)||' to collection');
1408: BSC_MO_HELPER_PKG.addTable(l_table, Table_Keys, Table_Data, 'InicAllTables');
1409: If l_table.Type = 0 Then
1410: --Add the input table to array garrNewITables()
1411: BSC_METADATA_OPTIMIZER_PKG.garrNewITables(BSC_METADATA_OPTIMIZER_PKG.gnumNewITables).Name := l_table.Name;
1412: BSC_METADATA_OPTIMIZER_PKG.garrNewITables(BSC_METADATA_OPTIMIZER_PKG.gnumNewITables).periodicity := l_table.Periodicity;
1459: FETCH cv INTO Indicator, Configuration, level_comb, TableName, filter_condition;
1460: EXIT WHEN cv%NOTFOUND;
1461: Level_Comb := Trim(LEVEL_COMB);
1462: Filter_Condition := ReplaceStr(Filter_Condition, 'D', null);
1463: numFilterDims := BSC_MO_HELPER_PKG.DecomposeString(Filter_Condition, ',', arrFilterDims );
1464: For i IN 0..numFilterDims - 1 LOOP
1465: TotalSign := substr(Level_Comb, arrFilterDims(i) + 1, 1);
1466: If (TotalSign = '?' Or TotalSign = '1') Then
1467: --This dimension needs zero code
1470: null;
1471: Else
1472: KeyColumn := GetLevelPKCol(Indicator, Configuration, arrFilterDims(i));
1473: If KeyColumn IS NOT NULL Then
1474: l_table_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, TableName);
1475: l_key_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys, keyColumn);
1476: BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys(l_key_index).needsCode0 := true;
1477: --update BSC_TMP_OPT_key_cols set need_zero_code = 1 where table_name = TableName and key_name = keyColumn;
1478: If BSC_MO_HELPER_PKG.findIndexVARCHAR2(arrTablesCod0, TableName)<0 Then
1471: Else
1472: KeyColumn := GetLevelPKCol(Indicator, Configuration, arrFilterDims(i));
1473: If KeyColumn IS NOT NULL Then
1474: l_table_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, TableName);
1475: l_key_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys, keyColumn);
1476: BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys(l_key_index).needsCode0 := true;
1477: --update BSC_TMP_OPT_key_cols set need_zero_code = 1 where table_name = TableName and key_name = keyColumn;
1478: If BSC_MO_HELPER_PKG.findIndexVARCHAR2(arrTablesCod0, TableName)<0 Then
1479: arrTablesCod0(numTablesCod0) := TableName;
1474: l_table_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables, TableName);
1475: l_key_index := BSC_MO_HELPER_PKG.findIndex(BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys, keyColumn);
1476: BSC_METADATA_OPTIMIZER_PKG.gTables(l_table_index).keys(l_key_index).needsCode0 := true;
1477: --update BSC_TMP_OPT_key_cols set need_zero_code = 1 where table_name = TableName and key_name = keyColumn;
1478: If BSC_MO_HELPER_PKG.findIndexVARCHAR2(arrTablesCod0, TableName)<0 Then
1479: arrTablesCod0(numTablesCod0) := TableName;
1480: numTablesCod0 := numTablesCod0 + 1;
1481: End If;
1482: End If;
1486: END Loop;
1487: Close cv;
1488:
1489: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1490: bsc_mo_helper_pkg.writeTmp('numTablesCod0 = '||numTablesCod0 );
1491: END IF;
1492: If numTablesCod0 > 0 Then
1493: SetNeedCod0InOriTables( arrTablesCod0, numTablesCod0);
1494: End If;
1492: If numTablesCod0 > 0 Then
1493: SetNeedCod0InOriTables( arrTablesCod0, numTablesCod0);
1494: End If;
1495: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1496: bsc_mo_helper_pkg.writeTmp('Completed inicalltables '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_PROCEDURE);
1497: END IF;
1498: Exception when others then
1499: bsc_mo_helper_pkg.writeTmp('l_stmt='||l_stmt, fnd_log.level_exception, true);
1500: BSC_MO_HELPER_PKG.TerminateWithMsg(' Exception in inicalltables:'||sqlerrm||', dumping gTables ');
1495: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1496: bsc_mo_helper_pkg.writeTmp('Completed inicalltables '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_PROCEDURE);
1497: END IF;
1498: Exception when others then
1499: bsc_mo_helper_pkg.writeTmp('l_stmt='||l_stmt, fnd_log.level_exception, true);
1500: BSC_MO_HELPER_PKG.TerminateWithMsg(' Exception in inicalltables:'||sqlerrm||', dumping gTables ');
1501: bsc_mo_helper_pkg.write_this(bsc_metadata_optimizer_pkg.gTables, FND_LOG.LEVEL_EXCEPTION, true);
1502: raise;
1503: End;
1496: bsc_mo_helper_pkg.writeTmp('Completed inicalltables '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_PROCEDURE);
1497: END IF;
1498: Exception when others then
1499: bsc_mo_helper_pkg.writeTmp('l_stmt='||l_stmt, fnd_log.level_exception, true);
1500: BSC_MO_HELPER_PKG.TerminateWithMsg(' Exception in inicalltables:'||sqlerrm||', dumping gTables ');
1501: bsc_mo_helper_pkg.write_this(bsc_metadata_optimizer_pkg.gTables, FND_LOG.LEVEL_EXCEPTION, true);
1502: raise;
1503: End;
1504:
1497: END IF;
1498: Exception when others then
1499: bsc_mo_helper_pkg.writeTmp('l_stmt='||l_stmt, fnd_log.level_exception, true);
1500: BSC_MO_HELPER_PKG.TerminateWithMsg(' Exception in inicalltables:'||sqlerrm||', dumping gTables ');
1501: bsc_mo_helper_pkg.write_this(bsc_metadata_optimizer_pkg.gTables, FND_LOG.LEVEL_EXCEPTION, true);
1502: raise;
1503: End;
1504:
1505: --****************************************************************************
1529: cRow c1%ROWTYPE;
1530: l_impl_type number;
1531: BEGIN
1532: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1533: bsc_mo_helper_pkg.writeTmp('Inside InicAllIndicadores', FND_LOG.LEVEL_PROCEDURE);
1534: END IF;
1535:
1536: gDocIndicators.delete;
1537: OPEN C1;
1542: Name := Trim(cRow.NAME);
1543: l_indic_type := cRow.INDICATOR_TYPE;
1544: l_config_type := cRow.CONFIG_TYPE;
1545: Per_Inter := cRow.PERIODICITY_ID;
1546: OptimizationMode := BSC_MO_HELPER_PKG.getKPIPropertyValue(Cod, 'DB_TRANSFORM', 1);
1547: l_impl_type := BSC_MO_HELPER_PKG.getKPIPropertyValue(Cod, BSC_METADATA_OPTIMIZER_PKG.IMPL_TYPE, 1);
1548: Action_Flag := cRow.PROTOTYPE_FLAG;
1549: Share_Flag := cRow.SHARE_FLAG;
1550: If cRow.SOURCE_INDICATOR IS NULL Then
1543: l_indic_type := cRow.INDICATOR_TYPE;
1544: l_config_type := cRow.CONFIG_TYPE;
1545: Per_Inter := cRow.PERIODICITY_ID;
1546: OptimizationMode := BSC_MO_HELPER_PKG.getKPIPropertyValue(Cod, 'DB_TRANSFORM', 1);
1547: l_impl_type := BSC_MO_HELPER_PKG.getKPIPropertyValue(Cod, BSC_METADATA_OPTIMIZER_PKG.IMPL_TYPE, 1);
1548: Action_Flag := cRow.PROTOTYPE_FLAG;
1549: Share_Flag := cRow.SHARE_FLAG;
1550: If cRow.SOURCE_INDICATOR IS NULL Then
1551: Source_Indicator := 0;
1553: Source_Indicator := cRow.SOURCE_INDICATOR;
1554: End If;
1555: EDW_Flag := cRow.EDW_FLAG;
1556:
1557: BSC_MO_HELPER_PKG.AddIndicator(gDocIndicators, Cod, Name, l_indic_type,
1558: l_config_type, Per_Inter, OptimizationMode, Action_Flag,
1559: Share_Flag, Source_Indicator, EDW_Flag, l_impl_type);
1560:
1561: END Loop;
1560:
1561: END Loop;
1562: Close c1;
1563: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1564: bsc_mo_helper_pkg.writeTmp('Completed InicAllIndicadores', FND_LOG.LEVEL_PROCEDURE);
1565: END IF;
1566: EXCEPTION WHEN OTHERS THEN
1567: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in InicAllIndicadores :'||sqlerrm);
1568: bsc_mo_helper_pkg.writeTmp('Exception in InicAllIndicadores, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
1563: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1564: bsc_mo_helper_pkg.writeTmp('Completed InicAllIndicadores', FND_LOG.LEVEL_PROCEDURE);
1565: END IF;
1566: EXCEPTION WHEN OTHERS THEN
1567: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in InicAllIndicadores :'||sqlerrm);
1568: bsc_mo_helper_pkg.writeTmp('Exception in InicAllIndicadores, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
1569: bsc_mo_helper_pkg.TerminateWithError('BSC_KPI_INIT_FAILED', 'InicAllIndicadores');
1570: raise;
1571: End ;
1564: bsc_mo_helper_pkg.writeTmp('Completed InicAllIndicadores', FND_LOG.LEVEL_PROCEDURE);
1565: END IF;
1566: EXCEPTION WHEN OTHERS THEN
1567: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in InicAllIndicadores :'||sqlerrm);
1568: bsc_mo_helper_pkg.writeTmp('Exception in InicAllIndicadores, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
1569: bsc_mo_helper_pkg.TerminateWithError('BSC_KPI_INIT_FAILED', 'InicAllIndicadores');
1570: raise;
1571: End ;
1572:
1565: END IF;
1566: EXCEPTION WHEN OTHERS THEN
1567: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in InicAllIndicadores :'||sqlerrm);
1568: bsc_mo_helper_pkg.writeTmp('Exception in InicAllIndicadores, g_stack = '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
1569: bsc_mo_helper_pkg.TerminateWithError('BSC_KPI_INIT_FAILED', 'InicAllIndicadores');
1570: raise;
1571: End ;
1572:
1573: --****************************************************************************
1588:
1589: l_parents_relcol DBMS_SQL.varchar2_table;
1590: BEGIN
1591:
1592: l_temp := BSC_MO_HELPER_PKG.findIndex( BSC_METADATA_OPTIMIZER_PKG.gMasterTable, dimTable);
1593: l_parents_relcol := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.gMasterTable(l_temp).parent_rel_col, ',');
1594:
1595: IF (l_parents_relcol.count=0) THEN
1596: return -1;
1589: l_parents_relcol DBMS_SQL.varchar2_table;
1590: BEGIN
1591:
1592: l_temp := BSC_MO_HELPER_PKG.findIndex( BSC_METADATA_OPTIMIZER_PKG.gMasterTable, dimTable);
1593: l_parents_relcol := BSC_MO_HELPER_PKG.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.gMasterTable(l_temp).parent_rel_col, ',');
1594:
1595: IF (l_parents_relcol.count=0) THEN
1596: return -1;
1597: END IF;
1608: END LOOP;
1609:
1610: return l_return;
1611: EXCEPTION WHEN OTHERS THEN
1612: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1613: bsc_mo_helper_pkg.WriteTmp ('Exception FindRelationIndex, dimTable is '||dimTable||', CampoRel='||CampoRel, FND_LOG.LEVEL_UNEXPECTED, true);
1614: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1615: raise;
1616: End;
1609:
1610: return l_return;
1611: EXCEPTION WHEN OTHERS THEN
1612: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1613: bsc_mo_helper_pkg.WriteTmp ('Exception FindRelationIndex, dimTable is '||dimTable||', CampoRel='||CampoRel, FND_LOG.LEVEL_UNEXPECTED, true);
1614: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1615: raise;
1616: End;
1617:
1610: return l_return;
1611: EXCEPTION WHEN OTHERS THEN
1612: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1613: bsc_mo_helper_pkg.WriteTmp ('Exception FindRelationIndex, dimTable is '||dimTable||', CampoRel='||CampoRel, FND_LOG.LEVEL_UNEXPECTED, true);
1614: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1615: raise;
1616: End;
1617:
1618:
1633: l_temp NUMBER;
1634: l_auxillaryFields DBMS_SQL.varchar2_table;
1635: BEGIN
1636:
1637: l_temp := BSC_MO_HELPER_PKG.findIndex( BSC_METADATA_OPTIMIZER_PKG.gMasterTable, dimTable);
1638:
1639: IF l_temp = -1 THEN
1640: return -1;
1641: END IF;
1639: IF l_temp = -1 THEN
1640: return -1;
1641: END IF;
1642:
1643: l_auxillaryFields := bsc_mo_helper_pkg.getDecomposedString(BSC_METADATA_OPTIMIZER_PKG.gMasterTable(L_TEMP).auxillaryFields, ',');
1644: IF (l_auxillaryFields.count=0) THEN
1645: return -1;
1646: END IF;
1647:
1647:
1648: i := l_AuxillaryFields.first;
1649: LOOP
1650: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1651: bsc_mo_helper_pkg.writeTmp('looping...');
1652: END IF;
1653:
1654: IF UPPER(l_AuxillaryFields(i)) = UPPER(CampoAuxiliar) Then
1655:
1661:
1662: Return -1;
1663:
1664: EXCEPTION WHEN OTHERS THEN
1665: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1666: bsc_mo_helper_pkg.WriteTmp ('Exception FindAuxillaryIndex, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED,true);
1667: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1668: raise;
1669: End;
1662: Return -1;
1663:
1664: EXCEPTION WHEN OTHERS THEN
1665: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1666: bsc_mo_helper_pkg.WriteTmp ('Exception FindAuxillaryIndex, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED,true);
1667: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1668: raise;
1669: End;
1670:
1663:
1664: EXCEPTION WHEN OTHERS THEN
1665: bsc_mo_helper_pkg.writeTmp(sqlerrm, fnd_log.level_statement, true);
1666: bsc_mo_helper_pkg.WriteTmp ('Exception FindAuxillaryIndex, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED,true);
1667: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'FindAuxillaryIndex');
1668: raise;
1669: End;
1670:
1671: --****************************************************************************
1745: ORDER BY COLUMN_ID;
1746: cRow c1%ROWTYPE;
1747: BEGIN
1748: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1749: bsc_mo_helper_pkg.WriteTmp ('Inside WriteMNDescription', FND_LOG.LEVEL_PROCEDURE);
1750: END IF;
1751: --Table name
1752: If InputTableFlag Then
1753: --Input table
1754: TableName := Tabla.InputTable;
1755: Else
1756: TableName := Tabla.TableRel;
1757: End If;
1758: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') ||
1759: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1760: TableName);
1761: --Input table name.
1762: If Not InputTableFlag Then
1755: Else
1756: TableName := Tabla.TableRel;
1757: End If;
1758: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') ||
1759: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1760: TableName);
1761: --Input table name.
1762: If Not InputTableFlag Then
1763: --This information is only when the description is for the dimension table
1761: --Input table name.
1762: If Not InputTableFlag Then
1763: --This information is only when the description is for the dimension table
1764: WriteLineTextFile('');
1765: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLE_NAME') ||
1766: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1767: Tabla.InputTable);
1768: End If;
1769: --Headers
1762: If Not InputTableFlag Then
1763: --This information is only when the description is for the dimension table
1764: WriteLineTextFile('');
1765: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLE_NAME') ||
1766: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1767: Tabla.InputTable);
1768: End If;
1769: --Headers
1770: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1766: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1767: Tabla.InputTable);
1768: End If;
1769: --Headers
1770: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1771: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1772: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1773: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1774: --Columns
1767: Tabla.InputTable);
1768: End If;
1769: --Headers
1770: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1771: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1772: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1773: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1774: --Columns
1775: OPEN c1 (Upper(TableName), UPPER(BSC_METADATA_OPTIMIZER_PKG.gBSCSchema) );
1768: End If;
1769: --Headers
1770: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1771: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1772: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1773: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1774: --Columns
1775: OPEN c1 (Upper(TableName), UPPER(BSC_METADATA_OPTIMIZER_PKG.gBSCSchema) );
1776: LOOP
1769: --Headers
1770: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1771: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1772: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1773: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1774: --Columns
1775: OPEN c1 (Upper(TableName), UPPER(BSC_METADATA_OPTIMIZER_PKG.gBSCSchema) );
1776: LOOP
1777: FETCH c1 INTO cRow;
1820: ELSE
1821: Linea := Linea || StrFix(rsData_Length, SIZELENGTH);
1822: End If;
1823: If UPPER(substr(rsColumn_Name, -4)) = '_USR' Then
1824: iRel := BSC_MO_HELPER_PKG.findKeyIndex(BSC_METADATA_OPTIMIZER_PKG.gMasterTable, substr(rsColumn_Name, 1, Length(rsColumn_Name) - 4));
1825: If iRel <> -1 Then
1826: fnd_message.set_name('BSC', 'BSC_SEE_TABLE_NAME');
1827: fnd_message.set_token('TABLE_NAME', BSC_METADATA_OPTIMIZER_PKG.gMasterTable(iRel).Name || '.USER_CODE');
1828: msg := fnd_message.get;
1828: msg := fnd_message.get;
1829: Linea := Linea || StrFix(msg, DESCLENGTH);
1830: End If;
1831: Else
1832: iRel := BSC_MO_HELPER_PKG.findKeyIndex(BSC_METADATA_OPTIMIZER_PKG.gMasterTable, rsColumn_Name);
1833: If iRel <> -1 Then
1834: fnd_message.set_name('BSC', 'BSC_SEE_TABLE_NAME');
1835: fnd_message.set_token('TABLE_NAME', BSC_METADATA_OPTIMIZER_PKG.gMasterTable(iRel).Name || '.CODE');
1836: msg := fnd_message.get;
1842: Close c1;
1843: WriteLineTextFile ('');
1844: WriteLineTextFile ('');
1845: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1846: bsc_mo_helper_pkg.WriteTmp ('Completed WriteMNDescription', FND_LOG.LEVEL_PROCEDURE);
1847: END IF;
1848: EXCEPTION WHEN OTHERS THEN
1849: g_error := sqlerrm;
1850: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.WriteMNDescription :' ||g_error);
1846: bsc_mo_helper_pkg.WriteTmp ('Completed WriteMNDescription', FND_LOG.LEVEL_PROCEDURE);
1847: END IF;
1848: EXCEPTION WHEN OTHERS THEN
1849: g_error := sqlerrm;
1850: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.WriteMNDescription :' ||g_error);
1851: raise;
1852: End ;
1853: --****************************************************************************
1854: -- EscribirDescripcionTablaMaestra : WriteDimDescription
1887: l_DATA_SCALE NUMBER;
1888: l_bind_Case number;
1889: BEGIN
1890: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1891: bsc_mo_helper_pkg.writeTmp('Inside WriteDimDescription for '||Tabla.Name);
1892: END IF;
1893: l_parents := bsc_mo_helper_pkg.getDecomposedString(tabla.parent_name, ',');
1894: --BIS DIMENSIONS: We are going to print the documentation only if the view exists.
1895: --Also this procedure is never called with InputTableFlag=true for BIS dimensions
1889: BEGIN
1890: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1891: bsc_mo_helper_pkg.writeTmp('Inside WriteDimDescription for '||Tabla.Name);
1892: END IF;
1893: l_parents := bsc_mo_helper_pkg.getDecomposedString(tabla.parent_name, ',');
1894: --BIS DIMENSIONS: We are going to print the documentation only if the view exists.
1895: --Also this procedure is never called with InputTableFlag=true for BIS dimensions
1896: --BIS DIMENSIONS: Check that the dimension view exists. BIS dimension views are created
1897: --only when it is used by a Kpi.
1895: --Also this procedure is never called with InputTableFlag=true for BIS dimensions
1896: --BIS DIMENSIONS: Check that the dimension view exists. BIS dimension views are created
1897: --only when it is used by a Kpi.
1898: If Tabla.Source = 'PMF' Then
1899: bsc_mo_helper_pkg.writeTmp('Source is PMF');
1900: l_bind_case := 1;
1901: --BIS dimension, the dimension table is a View
1902: l_stmt := 'SELECT COLUMN_NAME, DATA_TYPE, DATA_LENGTH, DATA_PRECISION, DATA_SCALE
1903: FROM USER_TAB_COLUMNS
1902: l_stmt := 'SELECT COLUMN_NAME, DATA_TYPE, DATA_LENGTH, DATA_PRECISION, DATA_SCALE
1903: FROM USER_TAB_COLUMNS
1904: WHERE TABLE_NAME = :1 ORDER BY COLUMN_ID';
1905: Else
1906: bsc_mo_helper_pkg.writeTmp('Source is BSC');
1907: --BSC dimension
1908: -- Bug 3830308 : Added owner clause here itself new GSCC validation isnt smart enough
1909: l_stmt := 'SELECT COLUMN_NAME, DATA_TYPE, DATA_LENGTH, DATA_PRECISION, DATA_SCALE
1910: FROM ALL_TAB_COLUMNS WHERE OWNER = :1 AND ';
1916: l_stmt := l_stmt||' TABLE_NAME = :2';
1917: End If;
1918: l_stmt := l_stmt|| ' ORDER BY COLUMN_ID';
1919: End If;
1920: bsc_mo_helper_pkg.writeTmp('Stmt is '||l_stmt);
1921: if (l_bind_case =1) THEN
1922: OPEN CV for l_stmt using UPPER(Tabla.Name);
1923: ELSIF l_bind_case=2 THEN
1924: OPEN CV for l_stmt using UPPER(BSC_METADATA_OPTIMIZER_PKG.gBscSchema), UPPER(Tabla.InputTable);
1924: OPEN CV for l_stmt using UPPER(BSC_METADATA_OPTIMIZER_PKG.gBscSchema), UPPER(Tabla.InputTable);
1925: ELSE
1926: OPEN CV for l_stmt using UPPER(BSC_METADATA_OPTIMIZER_PKG.gBscSchema), UPPER(Tabla.Name);
1927: END IF;
1928: bsc_mo_helper_pkg.writeTmp('Bind case is '||l_bind_case);
1929: FETCH cv INTO l_COLUMN_NAME, l_DATA_TYPE, l_DATA_LENGTH, l_DATA_PRECISION, l_DATA_SCALE;
1930: If CV%NOTFOUND Then
1931: --The table or view does not exist in the database.
1932: --So we cannot write the documentation
1931: --The table or view does not exist in the database.
1932: --So we cannot write the documentation
1933: Close CV;
1934: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1935: bsc_mo_helper_pkg.writeTmp('Completed WriteDimDescription');
1936: END IF;
1937: return;
1938: End If;
1939: CLOSE CV;
1953: End If;
1954: If InputTableFlag Then
1955: --Input table
1956: WriteLineTextFile('');
1957: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLE_NAME') ||
1958: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1959: TableName);
1960: Else
1961: --BIS DIMENSIONS: Use View instead of Table in the title.
1954: If InputTableFlag Then
1955: --Input table
1956: WriteLineTextFile('');
1957: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'INPUT_TABLE_NAME') ||
1958: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1959: TableName);
1960: Else
1961: --BIS DIMENSIONS: Use View instead of Table in the title.
1962: If Tabla.Source = 'BSC' Then
1959: TableName);
1960: Else
1961: --BIS DIMENSIONS: Use View instead of Table in the title.
1962: If Tabla.Source = 'BSC' Then
1963: WriteLineTextFile( StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') ||
1964: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1965: TableName);
1966: Else
1967: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') ||
1960: Else
1961: --BIS DIMENSIONS: Use View instead of Table in the title.
1962: If Tabla.Source = 'BSC' Then
1963: WriteLineTextFile( StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') ||
1964: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1965: TableName);
1966: Else
1967: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') ||
1968: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1963: WriteLineTextFile( StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TABLE') ||
1964: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1965: TableName);
1966: Else
1967: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') ||
1968: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1969: TableName);
1970: End If;
1971: End If ;
1964: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1965: TableName);
1966: Else
1967: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'VIEW') ||
1968: BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ', TABLELENGTH) ||
1969: TableName);
1970: End If;
1971: End If ;
1972: --Headers
1969: TableName);
1970: End If;
1971: End If ;
1972: --Headers
1973: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1974: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1975: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1976: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1977: --Columns
1970: End If;
1971: End If ;
1972: --Headers
1973: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1974: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1975: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1976: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1977: --Columns
1978: if (l_bind_case =1) THEN
1971: End If ;
1972: --Headers
1973: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1974: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1975: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1976: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1977: --Columns
1978: if (l_bind_case =1) THEN
1979: OPEN CV for l_stmt using UPPER(Tabla.Name);
1972: --Headers
1973: WriteLineTextFile (StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'FIELD'), FIELDLENGTH) ||
1974: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'TYPE'), TYPELENGTH) ||
1975: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'SIZE'), SIZELENGTH) ||
1976: StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'DESCRIPTION'), DESCLENGTH));
1977: --Columns
1978: if (l_bind_case =1) THEN
1979: OPEN CV for l_stmt using UPPER(Tabla.Name);
1980: ELSIF l_bind_case=2 THEN
1983: OPEN CV for l_stmt using UPPER(BSC_METADATA_OPTIMIZER_PKG.gBscSchema), UPPER(Tabla.Name);
1984: END IF;
1985:
1986: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
1987: bsc_mo_helper_pkg.writeTmp('Doc, writing columns ');
1988: END IF;
1989: LOOP
1990: FETCH cv INTO l_COLUMN_NAME, l_DATA_TYPE, l_DATA_LENGTH, l_DATA_PRECISION, l_DATA_SCALE;
1991: EXIT WHEN cv%NOTFOUND;
1999: rsData_Length := null;
2000: End If;
2001: End If;
2002: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2003: bsc_mo_helper_pkg.writeTmp('Columns Name is '||rsColumn_Name||', data type='||rsData_type);
2004: END IF;
2005: If l_DATA_PRECISION IS NULL Then
2006: rsData_Precision := null;
2007: Else
2036: ELSE
2037: Linea := Linea || StrFix(rsData_Length, SIZELENGTH);
2038: End If;
2039: If UPPER(rsColumn_Name) = 'CODE' Then
2040: Linea := Linea || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE'), DESCLENGTH);
2041: ElsIf UPPER(rsColumn_Name) = 'USER_CODE' Then
2042: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
2043: Linea := Linea || StrFix(l_value, DESCLENGTH);
2044: ElsIf UPPER(rsColumn_Name) = 'NAME' Then
2038: End If;
2039: If UPPER(rsColumn_Name) = 'CODE' Then
2040: Linea := Linea || StrFix(BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'CODE'), DESCLENGTH);
2041: ElsIf UPPER(rsColumn_Name) = 'USER_CODE' Then
2042: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
2043: Linea := Linea || StrFix(l_value, DESCLENGTH);
2044: ElsIf UPPER(rsColumn_Name) = 'NAME' Then
2045: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NAME');
2046: Linea := Linea || StrFix(l_value, DESCLENGTH);
2041: ElsIf UPPER(rsColumn_Name) = 'USER_CODE' Then
2042: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'USER_CODE');
2043: Linea := Linea || StrFix(l_value, DESCLENGTH);
2044: ElsIf UPPER(rsColumn_Name) = 'NAME' Then
2045: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NAME');
2046: Linea := Linea || StrFix(l_value, DESCLENGTH);
2047: ElsIf FindAuxillaryIndex(Tabla.Name, rsColumn_Name) <> -1 Then
2048: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'AUXILIARY_FIELD');
2049: Linea := Linea || StrFix(l_value, DESCLENGTH);
2044: ElsIf UPPER(rsColumn_Name) = 'NAME' Then
2045: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'NAME');
2046: Linea := Linea || StrFix(l_value, DESCLENGTH);
2047: ElsIf FindAuxillaryIndex(Tabla.Name, rsColumn_Name) <> -1 Then
2048: l_value := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'AUXILIARY_FIELD');
2049: Linea := Linea || StrFix(l_value, DESCLENGTH);
2050: Else
2051: If UPPER(substr(rsColumn_Name, -4)) = '_USR' Then
2052: iRel := FindRelationIndex(Tabla.Name, substr(rsColumn_Name, 1, Length(rsColumn_Name) - 4));
2069: WriteLineTextFile (Linea);
2070: END Loop;
2071: Close cv;
2072: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2073: bsc_mo_helper_pkg.writeTmp('Doc, done writing columns ');
2074: END IF;
2075: If InputTableFlag Then
2076: --Input table
2077: WriteLineTextFile('');
2082: WriteLineTextFile('');
2083: End If;
2084: End If;
2085: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2086: bsc_mo_helper_pkg.writeTmp('Completed WriteDimDescription');
2087: END IF;
2088: EXCEPTION WHEN OTHERS THEN
2089: BSC_MO_HELPER_PKG.writeTmp('l_stmt = '||l_stmt, FND_LOG.LEVEL_UNEXPECTED, true);
2090: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception WriteDimDescription, Error is '||sqlerrm);
2085: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2086: bsc_mo_helper_pkg.writeTmp('Completed WriteDimDescription');
2087: END IF;
2088: EXCEPTION WHEN OTHERS THEN
2089: BSC_MO_HELPER_PKG.writeTmp('l_stmt = '||l_stmt, FND_LOG.LEVEL_UNEXPECTED, true);
2090: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception WriteDimDescription, Error is '||sqlerrm);
2091: bsc_mo_helper_pkg.WriteTmp ('Exception WriteDimDescription, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
2092: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'WriteDimDescription');
2093: raise;
2086: bsc_mo_helper_pkg.writeTmp('Completed WriteDimDescription');
2087: END IF;
2088: EXCEPTION WHEN OTHERS THEN
2089: BSC_MO_HELPER_PKG.writeTmp('l_stmt = '||l_stmt, FND_LOG.LEVEL_UNEXPECTED, true);
2090: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception WriteDimDescription, Error is '||sqlerrm);
2091: bsc_mo_helper_pkg.WriteTmp ('Exception WriteDimDescription, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
2092: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'WriteDimDescription');
2093: raise;
2094: End ;
2087: END IF;
2088: EXCEPTION WHEN OTHERS THEN
2089: BSC_MO_HELPER_PKG.writeTmp('l_stmt = '||l_stmt, FND_LOG.LEVEL_UNEXPECTED, true);
2090: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception WriteDimDescription, Error is '||sqlerrm);
2091: bsc_mo_helper_pkg.WriteTmp ('Exception WriteDimDescription, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
2092: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'WriteDimDescription');
2093: raise;
2094: End ;
2095: --****************************************************************************
2088: EXCEPTION WHEN OTHERS THEN
2089: BSC_MO_HELPER_PKG.writeTmp('l_stmt = '||l_stmt, FND_LOG.LEVEL_UNEXPECTED, true);
2090: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception WriteDimDescription, Error is '||sqlerrm);
2091: bsc_mo_helper_pkg.WriteTmp ('Exception WriteDimDescription, g_stack is '||g_stack, FND_LOG.LEVEL_UNEXPECTED, true);
2092: bsc_mo_helper_pkg.TerminateWithError('BSC_DIMTABLE_DESCR_FAILED', 'WriteDimDescription');
2093: raise;
2094: End ;
2095: --****************************************************************************
2096: -- DocumentacionTablasMaestras: DocumentDimensionTables
2105: dimMN BSC_METADATA_OPTIMIZER_PKG.clsRelationMN;
2106: title VARCHAR2(300);
2107: BEGIN
2108: --Description of dimension tables
2109: title := BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_BACKEND', 'DIMENSION_TABLES_DESCRIPTION');
2110: WriteLineTextFile(title);
2111: WriteLineTextFile(StrX('-', Length(title)));
2112: WriteLineTextFile ('');
2113: --1N Dimensions
2131: END LOOP;
2132: END IF;
2133: WriteLineTextFile('');
2134: EXCEPTION WHEN OTHERS THEN
2135: BSC_MO_HELPER_PKG.TerminateWithError('BSC_DIMTABLE_DOC_FAILED', 'DocumentDimensionTables');
2136: raise;
2137: End ;
2138: --****************************************************************************
2139: -- Documentacion
2150: --Open file of description of system tables (dimension, input and system tables)
2151: g_mode := pMode;
2152: Initialize;
2153: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2154: BSC_MO_HELPER_PKG.writeTmp('Starting InicAllIndicadores', FND_LOG.LEVEL_STATEMENT);
2155: END IF;
2156: --Initialize collection gIndicadores with ALL indicators
2157: InicAllIndicadores;
2158: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2155: END IF;
2156: --Initialize collection gIndicadores with ALL indicators
2157: InicAllIndicadores;
2158: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2159: BSC_MO_HELPER_PKG.writeTmp('Starting InicAllTables', FND_LOG.LEVEL_STATEMENT);
2160: END IF;
2161: --Initialize collection gTablas with ALL tables
2162: InicAllTables;
2163: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2160: END IF;
2161: --Initialize collection gTablas with ALL tables
2162: InicAllTables;
2163: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2164: BSC_MO_HELPER_PKG.writeTmp('Inside Documentation', FND_LOG.LEVEL_PROCEDURE);
2165: END IF;
2166: writeDocHeader;
2167: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2168: BSC_MO_HELPER_PKG.writeTmp('Wrote Doc Header', FND_LOG.LEVEL_STATEMENT);
2164: BSC_MO_HELPER_PKG.writeTmp('Inside Documentation', FND_LOG.LEVEL_PROCEDURE);
2165: END IF;
2166: writeDocHeader;
2167: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2168: BSC_MO_HELPER_PKG.writeTmp('Wrote Doc Header', FND_LOG.LEVEL_STATEMENT);
2169: END IF;
2170: WriteLineTextFile( '');
2171: WriteLineTextFile( BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TIME') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || to_Char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
2172: WriteLineTextFile( '');
2167: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2168: BSC_MO_HELPER_PKG.writeTmp('Wrote Doc Header', FND_LOG.LEVEL_STATEMENT);
2169: END IF;
2170: WriteLineTextFile( '');
2171: WriteLineTextFile( BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TIME') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || to_Char(sysdate, 'mm/dd/yyyy hh24:mi:ss'));
2172: WriteLineTextFile( '');
2173: --Description of data tables
2174: IF (pMode = 2) THEN
2175: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2172: WriteLineTextFile( '');
2173: --Description of data tables
2174: IF (pMode = 2) THEN
2175: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2176: BSC_MO_HELPER_PKG.writeTmp('Calling DocumentDimensionTables', FND_LOG.LEVEL_STATEMENT);
2177: END IF;
2178: DocumentDimensionTables;
2179: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2180: BSC_MO_HELPER_PKG.writeTmp('Calling WriteInputAndSystemTables', FND_LOG.LEVEL_STATEMENT);
2176: BSC_MO_HELPER_PKG.writeTmp('Calling DocumentDimensionTables', FND_LOG.LEVEL_STATEMENT);
2177: END IF;
2178: DocumentDimensionTables;
2179: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2180: BSC_MO_HELPER_PKG.writeTmp('Calling WriteInputAndSystemTables', FND_LOG.LEVEL_STATEMENT);
2181: END IF;
2182: WriteInputAndSystemTables;
2183: return;
2184: END IF;
2185: If BSC_METADATA_OPTIMIZER_PKG.gGAA_RUN_MODE <> 9 And BSC_METADATA_OPTIMIZER_PKG.gSYSTEM_STAGE = 2 Then
2186: --Result report
2187: --Open the result report file
2188: WriteLineTextFile( '');
2189: WriteLineTextFile( BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TIME') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' || to_char(sysdate, 'MMMM DD, YYYY HH:MM:SS'));
2190: WriteLineTextFile( '');
2191: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2192: BSC_MO_HELPER_PKG.writeTmp('Starting DocResult '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_STATEMENT);
2193: END IF;
2188: WriteLineTextFile( '');
2189: WriteLineTextFile( BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'TIME') || BSC_MO_HELPER_PKG.Get_LookUp_Value('BSC_UI_COMMON', 'SYMBOL_COLON') || ' ' || to_char(sysdate, 'MMMM DD, YYYY HH:MM:SS'));
2190: WriteLineTextFile( '');
2191: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2192: BSC_MO_HELPER_PKG.writeTmp('Starting DocResult '||bsc_mo_helper_pkg.get_time, FND_LOG.LEVEL_STATEMENT);
2193: END IF;
2194: -- to be called from BSC_METADATA_OPTIMIZER_PKG.Documentation
2195: DocResult;
2196: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2193: END IF;
2194: -- to be called from BSC_METADATA_OPTIMIZER_PKG.Documentation
2195: DocResult;
2196: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2197: BSC_MO_HELPER_PKG.writeTmp('Done with DocResult', FND_LOG.LEVEL_STATEMENT);
2198: END IF;
2199: End If;
2200: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2201: BSC_MO_HELPER_PKG.writeTmp('Completed Documentation', FND_LOG.LEVEL_PROCEDURE);
2197: BSC_MO_HELPER_PKG.writeTmp('Done with DocResult', FND_LOG.LEVEL_STATEMENT);
2198: END IF;
2199: End If;
2200: IF BSC_METADATA_OPTIMIZER_PKG.g_log THEN
2201: BSC_MO_HELPER_PKG.writeTmp('Completed Documentation', FND_LOG.LEVEL_PROCEDURE);
2202: END IF;
2203: EXCEPTION WHEN OTHERS THEN
2204: g_error := sqlerrm;
2205: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.Documentation :' ||g_error);
2201: BSC_MO_HELPER_PKG.writeTmp('Completed Documentation', FND_LOG.LEVEL_PROCEDURE);
2202: END IF;
2203: EXCEPTION WHEN OTHERS THEN
2204: g_error := sqlerrm;
2205: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.Documentation :' ||g_error);
2206: BSC_MO_HELPER_PKG.TerminateWithError('BSC_DOC_PRODUCT_FAILED' , 'Documentation');
2207: raise;
2208: End;
2209: END BSC_MO_DOC_PKG;
2202: END IF;
2203: EXCEPTION WHEN OTHERS THEN
2204: g_error := sqlerrm;
2205: BSC_MO_HELPER_PKG.TerminateWithMsg('Exception in Documentation.Documentation :' ||g_error);
2206: BSC_MO_HELPER_PKG.TerminateWithError('BSC_DOC_PRODUCT_FAILED' , 'Documentation');
2207: raise;
2208: End;
2209: END BSC_MO_DOC_PKG;