[Home] [Help]
1: PACKAGE BODY qa_chart_generic_pkg AS
2: /* $Header: qacgenb.pls 120.2 2006/03/20 12:08:39 bso noship $ */
3:
4: --
5: -- Tracking Bug 4939897
8:
9: PROCEDURE populate_data(
10: --
11: -- A simple procedure to execute a SQL and populate the
12: -- qa_chart_generic table with the resulting values. The SQL
13: -- should always select two columns: x-axis ticker label and
14: -- numeric y-value and should almost ways have an ORDER BY clause
15: -- so that the leftmost x-axis ticker as appear on the resultant
16: -- graph comes first and so forth.
34: -- becuase rownum cannot be used as SELECT when there is GB.
35: --
36: -- Constructed a simple SQL by using the input p_sql string
37: -- so to query all all data selected by it and populate
38: -- the qa_chart_generic table with the results.
39: --
40: -- l_sql :=
41: -- 'INSERT INTO qa_chart_generic(
42: -- created_by,
37: -- so to query all all data selected by it and populate
38: -- the qa_chart_generic table with the results.
39: --
40: -- l_sql :=
41: -- 'INSERT INTO qa_chart_generic(
42: -- created_by,
43: -- creation_date,
44: -- last_updated_by,
45: -- last_update_date,
105: l_line_values(i) := i;
106: END LOOP;
107:
108: --
109: -- Notice, currently the legend column of qa_chart_generic
110: -- is unused. In future expansion, we may introduce a new
111: -- procedure populate_data_with_legend where the input SQL
112: -- string selects a third (legend) column to populate it.
113: --
112: -- string selects a third (legend) column to populate it.
113: --
114: IF l_row_count > 0 THEN
115: FORALL i IN 1 .. l_row_count
116: INSERT INTO qa_chart_generic(
117: created_by,
118: creation_date,
119: last_updated_by,
120: last_update_date,
159:
160:
161: PROCEDURE delete_data(p_chart_id NUMBER) IS
162: BEGIN
163: DELETE FROM qa_chart_generic
164: WHERE chart_id = p_chart_id;
165: END delete_data;
166:
167:
173: END delete_data_autonomous;
174:
175:
176:
177: END qa_chart_generic_pkg;