126:
127: select_statement := select_clause||' '||where_clause;
128:
129: -- open cursor
130: c := dbms_sql.open_cursor;
131:
132: -- parse cursor
133: dbms_sql.parse(c,select_statement,dbms_sql.v7);
134:
129: -- open cursor
130: c := dbms_sql.open_cursor;
131:
132: -- parse cursor
133: dbms_sql.parse(c,select_statement,dbms_sql.v7);
134:
135: -- bind variables
136: IF p_ovr_where_clause IS NULL THEN
137:
135: -- bind variables
136: IF p_ovr_where_clause IS NULL THEN
137:
138: IF p_add_col_name_1 IS NOT NULL THEN
139: dbms_sql.bind_variable(c,'l_add_col_value_1', p_add_col_value_1);
140: END IF;
141: IF p_add_col_name_2 IS NOT NULL THEN
142: dbms_sql.bind_variable(c,'l_add_col_value_2', p_add_col_value_2);
143: END IF;
138: IF p_add_col_name_1 IS NOT NULL THEN
139: dbms_sql.bind_variable(c,'l_add_col_value_1', p_add_col_value_1);
140: END IF;
141: IF p_add_col_name_2 IS NOT NULL THEN
142: dbms_sql.bind_variable(c,'l_add_col_value_2', p_add_col_value_2);
143: END IF;
144: IF p_trx_hdr_table IS NOT NULL THEN
145: dbms_sql.bind_variable(c,'l_trx_hdr_table', p_trx_hdr_table);
146: END IF;
141: IF p_add_col_name_2 IS NOT NULL THEN
142: dbms_sql.bind_variable(c,'l_add_col_value_2', p_add_col_value_2);
143: END IF;
144: IF p_trx_hdr_table IS NOT NULL THEN
145: dbms_sql.bind_variable(c,'l_trx_hdr_table', p_trx_hdr_table);
146: END IF;
147: IF p_trx_hdr_id IS NOT NULL THEN
148: dbms_sql.bind_variable(c,'l_trx_hdr_id', p_trx_hdr_id);
149: END IF;
144: IF p_trx_hdr_table IS NOT NULL THEN
145: dbms_sql.bind_variable(c,'l_trx_hdr_table', p_trx_hdr_table);
146: END IF;
147: IF p_trx_hdr_id IS NOT NULL THEN
148: dbms_sql.bind_variable(c,'l_trx_hdr_id', p_trx_hdr_id);
149: END IF;
150: IF p_cost_type_id IS NOT NULL THEN
151: dbms_sql.bind_variable(c,'l_cost_type_id', p_cost_type_id);
152: END IF;
147: IF p_trx_hdr_id IS NOT NULL THEN
148: dbms_sql.bind_variable(c,'l_trx_hdr_id', p_trx_hdr_id);
149: END IF;
150: IF p_cost_type_id IS NOT NULL THEN
151: dbms_sql.bind_variable(c,'l_cost_type_id', p_cost_type_id);
152: END IF;
153: END IF;
154:
155: IF p_application_id IS NOT NULL THEN
152: END IF;
153: END IF;
154:
155: IF p_application_id IS NOT NULL THEN
156: dbms_sql.bind_variable(c,'l_appl_id', p_application_id);
157: END IF;
158: IF p_set_of_books_id IS NOT NULL THEN
159: dbms_sql.bind_variable(c,'l_sob_id', p_set_of_books_id);
160: END IF;
155: IF p_application_id IS NOT NULL THEN
156: dbms_sql.bind_variable(c,'l_appl_id', p_application_id);
157: END IF;
158: IF p_set_of_books_id IS NOT NULL THEN
159: dbms_sql.bind_variable(c,'l_sob_id', p_set_of_books_id);
160: END IF;
161:
162: --define columns in select
163: dbms_sql.define_column(c,1,l_total_entered_dr);
159: dbms_sql.bind_variable(c,'l_sob_id', p_set_of_books_id);
160: END IF;
161:
162: --define columns in select
163: dbms_sql.define_column(c,1,l_total_entered_dr);
164: dbms_sql.define_column(c,2,l_total_entered_cr);
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
160: END IF;
161:
162: --define columns in select
163: dbms_sql.define_column(c,1,l_total_entered_dr);
164: dbms_sql.define_column(c,2,l_total_entered_cr);
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
161:
162: --define columns in select
163: dbms_sql.define_column(c,1,l_total_entered_dr);
164: dbms_sql.define_column(c,2,l_total_entered_cr);
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
169: rows := dbms_sql.execute(c);
162: --define columns in select
163: dbms_sql.define_column(c,1,l_total_entered_dr);
164: dbms_sql.define_column(c,2,l_total_entered_cr);
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
169: rows := dbms_sql.execute(c);
170: IF dbms_sql.fetch_rows(c) = 0 THEN
163: dbms_sql.define_column(c,1,l_total_entered_dr);
164: dbms_sql.define_column(c,2,l_total_entered_cr);
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
169: rows := dbms_sql.execute(c);
170: IF dbms_sql.fetch_rows(c) = 0 THEN
171:
165: dbms_sql.define_column(c,3,l_total_accounted_dr);
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
169: rows := dbms_sql.execute(c);
170: IF dbms_sql.fetch_rows(c) = 0 THEN
171:
172: -- No rows retrieved
173: x_total_entered_dr := 0;
166: dbms_sql.define_column(c,4,l_total_accounted_cr);
167: dbms_sql.define_column(c,5,l_count_cur);
168:
169: rows := dbms_sql.execute(c);
170: IF dbms_sql.fetch_rows(c) = 0 THEN
171:
172: -- No rows retrieved
173: x_total_entered_dr := 0;
174: x_total_entered_cr := 0;
176: x_total_accounted_cr := 0;
177:
178: ELSE
179:
180: dbms_sql.column_value(c,1,l_total_entered_dr);
181: dbms_sql.column_value(c,2,l_total_entered_cr);
182: dbms_sql.column_value(c,3,l_total_accounted_dr);
183: dbms_sql.column_value(c,4,l_total_accounted_cr);
184: dbms_sql.column_value(c,5,l_count_cur);
177:
178: ELSE
179:
180: dbms_sql.column_value(c,1,l_total_entered_dr);
181: dbms_sql.column_value(c,2,l_total_entered_cr);
182: dbms_sql.column_value(c,3,l_total_accounted_dr);
183: dbms_sql.column_value(c,4,l_total_accounted_cr);
184: dbms_sql.column_value(c,5,l_count_cur);
185:
178: ELSE
179:
180: dbms_sql.column_value(c,1,l_total_entered_dr);
181: dbms_sql.column_value(c,2,l_total_entered_cr);
182: dbms_sql.column_value(c,3,l_total_accounted_dr);
183: dbms_sql.column_value(c,4,l_total_accounted_cr);
184: dbms_sql.column_value(c,5,l_count_cur);
185:
186: x_total_accounted_dr := l_total_accounted_dr;
179:
180: dbms_sql.column_value(c,1,l_total_entered_dr);
181: dbms_sql.column_value(c,2,l_total_entered_cr);
182: dbms_sql.column_value(c,3,l_total_accounted_dr);
183: dbms_sql.column_value(c,4,l_total_accounted_cr);
184: dbms_sql.column_value(c,5,l_count_cur);
185:
186: x_total_accounted_dr := l_total_accounted_dr;
187: x_total_accounted_cr := l_total_accounted_cr;
180: dbms_sql.column_value(c,1,l_total_entered_dr);
181: dbms_sql.column_value(c,2,l_total_entered_cr);
182: dbms_sql.column_value(c,3,l_total_accounted_dr);
183: dbms_sql.column_value(c,4,l_total_accounted_cr);
184: dbms_sql.column_value(c,5,l_count_cur);
185:
186: x_total_accounted_dr := l_total_accounted_dr;
187: x_total_accounted_cr := l_total_accounted_cr;
188:
196:
197: END IF;
198:
199: --close cursor
200: dbms_sql.close_cursor(c);
201:
202: EXCEPTION
203: WHEN OTHERS THEN
204: if ( dbms_sql.is_open(c) ) then
200: dbms_sql.close_cursor(c);
201:
202: EXCEPTION
203: WHEN OTHERS THEN
204: if ( dbms_sql.is_open(c) ) then
205: dbms_sql.close_cursor(c);
206: end if;
207: fnd_message.set_name('FND', 'FORM_UNHANDLED_EXCEPTION');
208: fnd_message.set_token('PROCEDURE', 'xla_xlaiqacl_total_pkg.calc_sums');
201:
202: EXCEPTION
203: WHEN OTHERS THEN
204: if ( dbms_sql.is_open(c) ) then
205: dbms_sql.close_cursor(c);
206: end if;
207: fnd_message.set_name('FND', 'FORM_UNHANDLED_EXCEPTION');
208: fnd_message.set_token('PROCEDURE', 'xla_xlaiqacl_total_pkg.calc_sums');
209: RAISE;