The following lines contain the word 'select', 'insert', 'update' or 'delete':
Select PROPERTY_VALUE
Into l_system_type
From BSC_SYS_INIT
Where PROPERTY_CODE = 'MODEL_TYPE';
G_PF_Tbl.Delete;
G_PD_Tbl.Delete;
G_PF_Tbl(0).Insert_var := TRUE;
G_PF_Tbl(1).Insert_var := TRUE;
G_PF_Tbl(2).Insert_var := TRUE;
G_PF_Tbl(3).Insert_var := TRUE;
l_debug_stmt := 'Insert Into BSC_SYS_MEASURES .. Measure_id=' ||
to_char(G_PF_Tbl(i_option).Measure_id);
Insert Into BSC_SYS_MEASURES (
MEASURE_ID,
MEASURE_COL,
OPERATION,
TYPE,
MIN_ACTUAL_VALUE,
MAX_ACTUAL_VALUE,
MIN_BUDGET_VALUE,
MAX_BUDGET_VALUE,
RANDOM_STYLE,
CREATED_BY,CREATION_DATE,LAST_UPDATED_BY,LAST_UPDATE_DATE )
Values (
G_PF_Tbl(i_option).Measure_id,
G_PF_Tbl(i_option).Measure_col,
G_PF_Tbl(i_option).Operation,
G_PF_Tbl(i_option).Type,
G_PF_Tbl(i_option).Min_Actual,
G_PF_Tbl(i_option).Max_Actual,
G_PF_Tbl(i_option).Min_Plan,
G_PF_Tbl(i_option).Max_Plan,
G_PF_Tbl(i_option).Style,
1,SYSDATE,1,SYSDATE
);
if (G_PF_Tbl(i_option).insert_var) then
l_debug_stmt := 'Insert Into BSC_DB_MEASURE_COLS_TL .. ' ||
'field_n=' || G_PF_Tbl(i_option).Measure_col;
l_sql := 'INSERT INTO BSC_DB_MEASURE_COLS_TL '||
' (MEASURE_COL,LANGUAGE,SOURCE_LANG,HELP,MEASURE_GROUP_ID,PROJECTION_ID,MEASURE_TYPE) ' ||
'SELECT '||
''''||G_PF_Tbl(i_option).Measure_col||''' AS MEASURE_COL, '||
'FEM.LANGUAGE AS LANGUAGE, '||
'FEM.SOURCE_LANG AS SOURCE_LANG, '||
'SUBSTR(FEM.MEANING,1,50) AS HELP, '||
'-1 AS MEASURE_GROUP_ID, '||
'3 AS PROJECTION_ID, '||
'NULL AS MEASURE_TYPE '||
'FROM '||BSC_TEMPLATE.LOOKUP_VALUES_TABLE||' FEM '||
'WHERE FEM.LOOKUP_TYPE = ''BSC_TPLATE_TAB_DATASET_NAME'' AND '||
'FEM.LOOKUP_CODE = '''||G_PF_Tbl(i_option).Measure_id||'''';
l_debug_stmt := 'Insert Into BSC_SYS_DATASETS_B .. data_code=' ||
to_char(G_PD_Tbl(i_data).Dataset_id);
Insert Into BSC_SYS_DATASETS_B (
DATASET_ID,
MEASURE_ID1,
OPERATION,
MEASURE_ID2,
FORMAT_ID,
COLOR_METHOD,
PROJECTION_FLAG,
CREATED_BY,CREATION_DATE,LAST_UPDATED_BY,LAST_UPDATE_DATE )
Values (
G_PD_Tbl(i_data).Dataset_id,
G_PD_Tbl(i_data).Measure1,
G_PD_Tbl(i_data).Operation,
G_PD_Tbl(i_data).Measure2,
G_PD_Tbl(i_data).Format,
G_PD_Tbl(i_data).Color_Method,
G_PD_Tbl(i_data).Proj_Flag,
1,SYSDATE,1,SYSDATE
);
l_debug_stmt := 'Insert Into BSC_SYS_DATASETS_TL .. data_code=' ||
to_char(G_PD_Tbl(i_data).Dataset_id);
l_sql := 'INSERT INTO BSC_SYS_DATASETS_TL (DATASET_ID, LANGUAGE, SOURCE_LANG,'||
' NAME, HELP) '||
'SELECT '||
G_PD_Tbl(i_data).Dataset_id||' AS DATASET_ID, '||
'FEM.LANGUAGE AS LANGUAGE, '||
'FEM.SOURCE_LANG AS SOURCE_LANG, '||
'SUBSTR(FEM.MEANING,1,20) AS NAME, '||
'SUBSTR(FEM.MEANING,1,80) AS HELP '||
'FROM '||BSC_TEMPLATE.LOOKUP_VALUES_TABLE||' FEM '||
'WHERE FEM.LOOKUP_TYPE = ''BSC_TPLATE_TAB_DATASET_NAME'' AND '||
'FEM.LOOKUP_CODE = '''||G_PD_Tbl(i_data).Dataset_id||'''';
l_debug_stmt := 'Insert Into BSC_SYS_DATASET_CALC .. data_code=' ||
to_char(G_PD_Tbl(i_data).Dataset_id);
Insert Into BSC_SYS_DATASET_CALC (
DATASET_ID,
DISABLED_CALC_ID
)
Values (
G_PD_Tbl(i_data).Dataset_id,
G_Cal_Tbl(i_proj_calc).Calculation
);