'0') then return (FALSE); end if; return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> column -> row -> cell -- meaning, id cell has a style id defined, use cell style info -- JK Jan 28 2009 9(1): -- This snippet *was* cloned from ChartSummary.rdf file, F_Data field, but it got changed today - big time. -- all styles are being retrieved here -- JK Jan 28 2009 (2): add handler for BORDER attribute style_num := 0; select cl3.style_id into l_cell_style from m_chart c3, chart_column co3, chart_row ro3, chart_cell cl3 where c3.id = :basic_chart_id and co3.chart_data_id = c3.chart_data_id and co3.column_number = l_this_column and ro3.chart_data_id = c3.chart_data_id and ro3.row_number = :chart_row_number and cl3.chart_data_id = c3.chart_data_id and cl3.chart_row_id = ro3.id and cl3.chart_column_id = co3.id; IF l_cell_style is not null AND l_cell_style > 0 THEN style_num := l_cell_style; END IF; -- if we have style defined, retrieve the attributes from M_STYLE table IF style_num is not null AND style_num > 0 THEN SELECT map1.REPORT_COLOR_CODE as BG_COLOR, map2.REPORT_COLOR_CODE as TEXT_COLOR, BOLD , ITALIC , UNDERLINE , ALIGNMENT , BORDER INTO l_BG_COLOR, l_TEXT_COLOR, l_BOLD , l_ITALIC , l_UNDERLINE , l_ALIGNMENT , l_BORDER FROM chart_STYLE , M_COLORS_MAP map1 , M_COLORS_MAP map2 WHERE id = style_num and lower(trim(map1.RGB_COLOR_CODE(+))) = lower(trim(BG_COLOR)) and lower(trim(map2.RGB_COLOR_CODE(+))) = lower(trim(TEXT_COLOR)) ; --SRW.MESSAGE(999, 'values are ' || l_BG_COLOR || l_TEXT_COLOR || l_BOLD || l_ITALIC || l_UNDERLINE || l_ALIGNMENT ); -- take the style retrieved and do SRW.SET calls IF l_BG_COLOR is not null and LENGTH(l_BG_COLOR) >0 THEN SRW.SET_FOREGROUND_FILL_COLOR(l_BG_COLOR); srw.set_fill_pattern('solid'); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ', changing BG color to ' || l_BG_COLOR ); END IF; IF l_TEXT_COLOR is not null AND LENGTH(l_TEXT_COLOR) > 0 THEN SRW.SET_TEXT_COLOR(l_TEXT_COLOR); --SRW.MESSAGE(999, 'row ' || to_char(:row_number) || ' column number ' || to_char(:column_number) || ' changing color to ' || l_TEXT_COLOR ); END IF; IF l_BOLD is not null AND l_BOLD = 1 THEN SRW.SET_FONT_WEIGHT(SRW.BOLD_WEIGHT); END IF; IF l_ITALIC is not null AND l_ITALIC = 1 THEN SRW.SET_FONT_STYLE(SRW.ITALIC_STYLE); END IF; IF l_UNDERLINE is not null AND l_UNDERLINE = 1 THEN SRW.SET_FONT_STYLE(SRW.UNDERLINE_STYLE); END IF; IF l_ALIGNMENT is not null AND LENGTH(l_ALIGNMENT) > 0 THEN SRW.SET_JUSTIFICATION( SRW.CENTER_HJUST ); END IF; IF l_BORDER is not null and l_BORDER = 1 THEN srw.set_foreground_border_color('black'); srw.set_border_pattern('solid'); END IF; END IF; -- no style is defined, exit from here and leave everything at its defaults return (TRUE); exception when no_data_found then return (TRUE); end;]]> '0') then return (FALSE); end if; return (TRUE); end;]]> of &]]> <%@ page language="java" import="java.io.*" errorPage="/rwerror.jsp" session="false" %> <%@ page contentType="text/html;charset=ISO-8859-1" %>

Title F_strategy
Business Number F_BUSINESS_NUMBER
Description F_strat_desc
Title F_title

> Acronym > Dn > F_ACRONYM > F_unit_name > St Objective > F_st_objective

]]>