DBA Data[Home] [Help]

APPS.ARP_ARXCOQIT dependencies on DBMS_SQL

Line 51: l_select_cursor := dbms_sql.open_cursor;

47: Else, continues to work just as the way it did before this fix*/
48:
49: IF instr(p_where_clause,'PAYMENT_SCHEDULE_ID=') = 0 THEN
50:
51: l_select_cursor := dbms_sql.open_cursor;
52: dbms_sql.parse(l_select_cursor,
53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);

Line 52: dbms_sql.parse(l_select_cursor,

48:
49: IF instr(p_where_clause,'PAYMENT_SCHEDULE_ID=') = 0 THEN
50:
51: l_select_cursor := dbms_sql.open_cursor;
52: dbms_sql.parse(l_select_cursor,
53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);

Line 54: where'|| p_where_clause,dbms_sql.v7);

50:
51: l_select_cursor := dbms_sql.open_cursor;
52: dbms_sql.parse(l_select_cursor,
53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);
57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);

Line 55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);

51: l_select_cursor := dbms_sql.open_cursor;
52: dbms_sql.parse(l_select_cursor,
53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);
57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
59: else

Line 56: l_ignore := dbms_sql.execute(l_select_cursor);

52: dbms_sql.parse(l_select_cursor,
53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);
57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
59: else
60: IF PG_DEBUG in ('Y', 'C') THEN

Line 57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then

53: 'select count(distinct(currency)) from ar_app_adj_v
54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);
57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
59: else
60: IF PG_DEBUG in ('Y', 'C') THEN
61: arp_standard.debug('Build_And_Bind: ' || 'no rows');

Line 58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);

54: where'|| p_where_clause,dbms_sql.v7);
55: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
56: l_ignore := dbms_sql.execute(l_select_cursor);
57: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
58: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
59: else
60: IF PG_DEBUG in ('Y', 'C') THEN
61: arp_standard.debug('Build_And_Bind: ' || 'no rows');
62: END IF;

Line 65: dbms_sql.close_cursor(l_select_cursor);

61: arp_standard.debug('Build_And_Bind: ' || 'no rows');
62: END IF;
63: end if;
64: if (l_cur_count = 1) then
65: dbms_sql.close_cursor(l_select_cursor);
66: /* 1806931 Code added ends. */
67:
68: l_select_cursor := dbms_sql.open_cursor;
69: dbms_sql.parse(l_select_cursor,

Line 68: l_select_cursor := dbms_sql.open_cursor;

64: if (l_cur_count = 1) then
65: dbms_sql.close_cursor(l_select_cursor);
66: /* 1806931 Code added ends. */
67:
68: l_select_cursor := dbms_sql.open_cursor;
69: dbms_sql.parse(l_select_cursor,
70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);

Line 69: dbms_sql.parse(l_select_cursor,

65: dbms_sql.close_cursor(l_select_cursor);
66: /* 1806931 Code added ends. */
67:
68: l_select_cursor := dbms_sql.open_cursor;
69: dbms_sql.parse(l_select_cursor,
70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);

Line 71: where'|| p_where_clause, dbms_sql.v7);

67:
68: l_select_cursor := dbms_sql.open_cursor;
69: dbms_sql.parse(l_select_cursor,
70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);
74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
75: dbms_sql.column_value(l_select_cursor, 1, l_amount);

Line 72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);

68: l_select_cursor := dbms_sql.open_cursor;
69: dbms_sql.parse(l_select_cursor,
70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);
74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
75: dbms_sql.column_value(l_select_cursor, 1, l_amount);
76: else

Line 73: l_ignore := dbms_sql.execute(l_select_cursor);

69: dbms_sql.parse(l_select_cursor,
70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);
74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
75: dbms_sql.column_value(l_select_cursor, 1, l_amount);
76: else
77: IF PG_DEBUG in ('Y', 'C') THEN

Line 74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then

70: 'select sum(total_amount) from ar_app_adj_v
71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);
74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
75: dbms_sql.column_value(l_select_cursor, 1, l_amount);
76: else
77: IF PG_DEBUG in ('Y', 'C') THEN
78: arp_standard.debug('Build_And_Bind: ' || 'no rows');

Line 75: dbms_sql.column_value(l_select_cursor, 1, l_amount);

71: where'|| p_where_clause, dbms_sql.v7);
72: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
73: l_ignore := dbms_sql.execute(l_select_cursor);
74: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
75: dbms_sql.column_value(l_select_cursor, 1, l_amount);
76: else
77: IF PG_DEBUG in ('Y', 'C') THEN
78: arp_standard.debug('Build_And_Bind: ' || 'no rows');
79: END IF;

Line 87: dbms_sql.close_cursor(l_select_cursor);

83: IF PG_DEBUG in ('Y', 'C') THEN
84: arp_standard.debug('Build_And_Bind: ' || 'p_total =' || to_char(p_total) );
85: arp_standard.debug('Build_And_Bind: ' || 'l_amount =' || to_char(l_amount) );
86: END IF;
87: dbms_sql.close_cursor(l_select_cursor);
88:
89: /*1806931 Code Added Begins */
90: else
91: p_total := 0;

Line 95: dbms_sql.close_cursor(l_select_cursor);

91: p_total := 0;
92: IF PG_DEBUG in ('Y', 'C') THEN
93: arp_standard.debug('Build_And_Bind: ' || 'p_total =' || to_char(p_total) );
94: END IF;
95: dbms_sql.close_cursor(l_select_cursor);
96: end if;
97: /* 1806931 Code Added Ends */
98: ELSE
99: /* Bugfix for 2112098 begins here. Re-do the cursor with bind var for ps_id

Line 113: l_select_cursor := dbms_sql.open_cursor;

109:
110: l_select_stmt := 'select count(distinct(currency)) from ar_app_adj_v
111: where PAYMENT_SCHEDULE_ID= :ps_id ';
112:
113: l_select_cursor := dbms_sql.open_cursor;
114:
115: dbms_sql.parse(l_select_cursor, l_select_stmt ,dbms_sql.v7);
116:
117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;

Line 115: dbms_sql.parse(l_select_cursor, l_select_stmt ,dbms_sql.v7);

111: where PAYMENT_SCHEDULE_ID= :ps_id ';
112:
113: l_select_cursor := dbms_sql.open_cursor;
114:
115: dbms_sql.parse(l_select_cursor, l_select_stmt ,dbms_sql.v7);
116:
117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;
118:
119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);

Line 117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;

113: l_select_cursor := dbms_sql.open_cursor;
114:
115: dbms_sql.parse(l_select_cursor, l_select_stmt ,dbms_sql.v7);
116:
117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;
118:
119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
120: l_ignore := dbms_sql.execute(l_select_cursor);
121:

Line 119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);

115: dbms_sql.parse(l_select_cursor, l_select_stmt ,dbms_sql.v7);
116:
117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;
118:
119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
120: l_ignore := dbms_sql.execute(l_select_cursor);
121:
122: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
123: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);

Line 120: l_ignore := dbms_sql.execute(l_select_cursor);

116:
117: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id) ;
118:
119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
120: l_ignore := dbms_sql.execute(l_select_cursor);
121:
122: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
123: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
124: else

Line 122: if dbms_sql.fetch_rows(l_select_cursor) > 0 then

118:
119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
120: l_ignore := dbms_sql.execute(l_select_cursor);
121:
122: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
123: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
124: else
125: IF PG_DEBUG in ('Y', 'C') THEN
126: arp_standard.debug('Build_And_Bind: ' || 'no rows');

Line 123: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);

119: dbms_sql.define_column(l_select_cursor, 1 , l_cur_count);
120: l_ignore := dbms_sql.execute(l_select_cursor);
121:
122: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
123: dbms_sql.column_value(l_select_cursor, 1, l_cur_count);
124: else
125: IF PG_DEBUG in ('Y', 'C') THEN
126: arp_standard.debug('Build_And_Bind: ' || 'no rows');
127: END IF;

Line 130: dbms_sql.close_cursor(l_select_cursor);

126: arp_standard.debug('Build_And_Bind: ' || 'no rows');
127: END IF;
128: end if;
129: if (l_cur_count = 1) then
130: dbms_sql.close_cursor(l_select_cursor);
131:
132: l_select_stmt := 'select sum(total_amount) from ar_app_adj_v
133: where PAYMENT_SCHEDULE_ID= :ps_id ';
134: IF PG_DEBUG in ('Y', 'C') THEN

Line 138: l_select_cursor := dbms_sql.open_cursor;

134: IF PG_DEBUG in ('Y', 'C') THEN
135: arp_standard.debug('Build_And_Bind: ' || l_select_stmt);
136: END IF;
137:
138: l_select_cursor := dbms_sql.open_cursor;
139:
140: dbms_sql.parse(l_select_cursor,l_select_stmt , dbms_sql.v7);
141:
142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );

Line 140: dbms_sql.parse(l_select_cursor,l_select_stmt , dbms_sql.v7);

136: END IF;
137:
138: l_select_cursor := dbms_sql.open_cursor;
139:
140: dbms_sql.parse(l_select_cursor,l_select_stmt , dbms_sql.v7);
141:
142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );
143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);

Line 142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );

138: l_select_cursor := dbms_sql.open_cursor;
139:
140: dbms_sql.parse(l_select_cursor,l_select_stmt , dbms_sql.v7);
141:
142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );
143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
145: l_ignore := dbms_sql.execute(l_select_cursor);
146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then

Line 144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);

140: dbms_sql.parse(l_select_cursor,l_select_stmt , dbms_sql.v7);
141:
142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );
143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
145: l_ignore := dbms_sql.execute(l_select_cursor);
146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
147: dbms_sql.column_value(l_select_cursor, 1, l_amount);
148: else

Line 145: l_ignore := dbms_sql.execute(l_select_cursor);

141:
142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );
143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
145: l_ignore := dbms_sql.execute(l_select_cursor);
146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
147: dbms_sql.column_value(l_select_cursor, 1, l_amount);
148: else
149: IF PG_DEBUG in ('Y', 'C') THEN

Line 146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then

142: dbms_sql.bind_variable ( l_select_cursor , ':ps_id' , l_bind_ps_id );
143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
145: l_ignore := dbms_sql.execute(l_select_cursor);
146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
147: dbms_sql.column_value(l_select_cursor, 1, l_amount);
148: else
149: IF PG_DEBUG in ('Y', 'C') THEN
150: arp_standard.debug('Build_And_Bind: ' || 'no rows');

Line 147: dbms_sql.column_value(l_select_cursor, 1, l_amount);

143:
144: dbms_sql.define_column(l_select_cursor, 1 , l_amount);
145: l_ignore := dbms_sql.execute(l_select_cursor);
146: if dbms_sql.fetch_rows(l_select_cursor) > 0 then
147: dbms_sql.column_value(l_select_cursor, 1, l_amount);
148: else
149: IF PG_DEBUG in ('Y', 'C') THEN
150: arp_standard.debug('Build_And_Bind: ' || 'no rows');
151: END IF;

Line 159: dbms_sql.close_cursor(l_select_cursor);

155: IF PG_DEBUG in ('Y', 'C') THEN
156: arp_standard.debug('Build_And_Bind: ' || 'p_total =' || to_char(p_total) );
157: arp_standard.debug('Build_And_Bind: ' || 'l_amount =' || to_char(l_amount) );
158: END IF;
159: dbms_sql.close_cursor(l_select_cursor);
160: else
161: p_total := 0;
162: IF PG_DEBUG in ('Y', 'C') THEN
163: arp_standard.debug('Build_And_Bind: ' || 'p_total =' || to_char(p_total) );

Line 165: dbms_sql.close_cursor(l_select_cursor);

161: p_total := 0;
162: IF PG_DEBUG in ('Y', 'C') THEN
163: arp_standard.debug('Build_And_Bind: ' || 'p_total =' || to_char(p_total) );
164: END IF;
165: dbms_sql.close_cursor(l_select_cursor);
166: end if;
167: END;
168: END IF;
169: /* End of bugfix 2112438 */

Line 232: l_select_cursor := dbms_sql.open_cursor;

228: arp_standard.debug('Build_And_Bind: ' || 'where clause:' || p_where_clause );
229: arp_standard.debug('Build_And_Bind: ' || 'Opening Cursor');
230: END IF;
231:
232: l_select_cursor := dbms_sql.open_cursor;
233:
234: /*-----------------------------------------------------------------------+
235: |Call the Build and Bind routine to strip where clause from literals and|
236: |numeric constants and replace them with bind variables. |

Line 272: dbms_sql.parse(l_select_cursor,

268:
269: /* 3988361 :If the customer_id is used for selection the use n6 index */
270:
271: IF p_from_clause = 'AR_PAYMENT_SCHEDULES_TRX2_V' AND INSTR(l_out_where_clause,'CUSTOMER_ID=') <> 0 THEN
272: dbms_sql.parse(l_select_cursor,
273: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N6) */
274: count( distinct invoice_currency_code ),
275: sum(amount_due_remaining),
276: sum(acctd_amount_due_remaining)

Line 277: from '||p_from_clause||' '||l_out_where_clause, dbms_sql.v7);

273: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N6) */
274: count( distinct invoice_currency_code ),
275: sum(amount_due_remaining),
276: sum(acctd_amount_due_remaining)
277: from '||p_from_clause||' '||l_out_where_clause, dbms_sql.v7);
278: ELSE
279: dbms_sql.parse(l_select_cursor,
280: 'select count( distinct invoice_currency_code ),
281: sum(amount_due_remaining),

Line 279: dbms_sql.parse(l_select_cursor,

275: sum(amount_due_remaining),
276: sum(acctd_amount_due_remaining)
277: from '||p_from_clause||' '||l_out_where_clause, dbms_sql.v7);
278: ELSE
279: dbms_sql.parse(l_select_cursor,
280: 'select count( distinct invoice_currency_code ),
281: sum(amount_due_remaining),
282: sum(acctd_amount_due_remaining)
283: from '||p_from_clause||' '||l_out_where_clause,

Line 284: dbms_sql.v7);

280: 'select count( distinct invoice_currency_code ),
281: sum(amount_due_remaining),
282: sum(acctd_amount_due_remaining)
283: from '||p_from_clause||' '||l_out_where_clause,
284: dbms_sql.v7);
285: END IF;
286:
287: /*-----------------------------------------------------------------------+
288: |Define columns for the select statement. |

Line 294: dbms_sql.define_column(l_select_cursor, 1 , l_count);

290: IF PG_DEBUG in ('Y', 'C') THEN
291: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
292: END IF;
293:
294: dbms_sql.define_column(l_select_cursor, 1 , l_count);
295: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
296: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
297:
298: IF PG_DEBUG in ('Y', 'C') THEN

Line 295: dbms_sql.define_column(l_select_cursor, 2 , l_amount);

291: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
292: END IF;
293:
294: dbms_sql.define_column(l_select_cursor, 1 , l_count);
295: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
296: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
297:
298: IF PG_DEBUG in ('Y', 'C') THEN
299: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');

Line 296: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);

292: END IF;
293:
294: dbms_sql.define_column(l_select_cursor, 1 , l_count);
295: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
296: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
297:
298: IF PG_DEBUG in ('Y', 'C') THEN
299: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');
300: END IF;

Line 327: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);

323: IF PG_DEBUG in ('Y', 'C') THEN
324: arp_standard.debug('Build_And_Bind: ' || 'l_actual_bind_var = '||l_actual_bind_var);
325: END IF;
326:
327: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);
328:
329: END LOOP;
330:
331: IF PG_DEBUG in ('Y', 'C') THEN

Line 345: l_ignore := dbms_sql.execute(l_select_cursor);

341: IF PG_DEBUG in ('Y', 'C') THEN
342: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement +');
343: END IF;
344:
345: l_ignore := dbms_sql.execute(l_select_cursor);
346:
347: IF PG_DEBUG in ('Y', 'C') THEN
348: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
349: END IF;

Line 351: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then

347: IF PG_DEBUG in ('Y', 'C') THEN
348: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
349: END IF;
350:
351: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then
352:
353: /*-----------------------------------------------------------------------+
354: |Fetch the column values, into actual variables |
355: +-----------------------------------------------------------------------*/

Line 360: dbms_sql.column_value(l_select_cursor, 1, l_count);

356: IF PG_DEBUG in ('Y', 'C') THEN
357: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
358: END IF;
359:
360: dbms_sql.column_value(l_select_cursor, 1, l_count);
361: dbms_sql.column_value(l_select_cursor, 2, l_amount);
362: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
363:
364: IF PG_DEBUG in ('Y', 'C') THEN

Line 361: dbms_sql.column_value(l_select_cursor, 2, l_amount);

357: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
358: END IF;
359:
360: dbms_sql.column_value(l_select_cursor, 1, l_count);
361: dbms_sql.column_value(l_select_cursor, 2, l_amount);
362: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
363:
364: IF PG_DEBUG in ('Y', 'C') THEN
365: arp_standard.debug('Build_And_Bind: ' || 'l_count '||l_count);

Line 362: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);

358: END IF;
359:
360: dbms_sql.column_value(l_select_cursor, 1, l_count);
361: dbms_sql.column_value(l_select_cursor, 2, l_amount);
362: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
363:
364: IF PG_DEBUG in ('Y', 'C') THEN
365: arp_standard.debug('Build_And_Bind: ' || 'l_count '||l_count);
366: arp_standard.debug('Build_And_Bind: ' || 'l_amount'||l_amount);

Line 397: dbms_sql.close_cursor(l_select_cursor);

393: +-----------------------------------------------------------------------*/
394: IF PG_DEBUG in ('Y', 'C') THEN
395: arp_standard.debug('Build_And_Bind: ' || 'Closing Cursor');
396: END IF;
397: dbms_sql.close_cursor(l_select_cursor);
398:
399: -- arp_standard.enable_debug;
400: EXCEPTION
401: WHEN OTHERS THEN

Line 437: l_select_cursor := dbms_sql.open_cursor;

433: arp_standard.debug('Build_And_Bind: ' || 'where clause:' || p_where_clause );
434: arp_standard.debug('Build_And_Bind: ' || 'Opening Cursor');
435: END IF;
436:
437: l_select_cursor := dbms_sql.open_cursor;
438:
439: /*-----------------------------------------------------------------------+
440: |Call the Build and Bind routine to strip where clause from literals and|
441: |numeric constants and replace them with bind variables. |

Line 454: dbms_sql.parse(l_select_cursor,

450: IF PG_DEBUG in ('Y', 'C') THEN
451: arp_standard.debug('Build_And_Bind: ' || 'Parsing statement ');
452: arp_standard.debug('Build_And_Bind: ' || l_out_where_clause);
453: END IF;
454: dbms_sql.parse(l_select_cursor,
455: 'select invoice_currency_code from '||p_from_clause||' '||l_out_where_clause,
456: dbms_sql.v7);
457:
458: /*-----------------------------------------------------------------------+

Line 456: dbms_sql.v7);

452: arp_standard.debug('Build_And_Bind: ' || l_out_where_clause);
453: END IF;
454: dbms_sql.parse(l_select_cursor,
455: 'select invoice_currency_code from '||p_from_clause||' '||l_out_where_clause,
456: dbms_sql.v7);
457:
458: /*-----------------------------------------------------------------------+
459: |Define columns for the select statement. |
460: +-----------------------------------------------------------------------*/

Line 465: dbms_sql.define_column(l_select_cursor, 1 ,l_currency_code,15);

461:
462: IF PG_DEBUG in ('Y', 'C') THEN
463: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
464: END IF;
465: dbms_sql.define_column(l_select_cursor, 1 ,l_currency_code,15);
466: IF PG_DEBUG in ('Y', 'C') THEN
467: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');
468: END IF;
469:

Line 494: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);

490: IF PG_DEBUG in ('Y', 'C') THEN
491: arp_standard.debug('Build_And_Bind: ' || 'l_actual_bind_var = '||l_actual_bind_var);
492: END IF;
493:
494: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);
495:
496: END LOOP;
497:
498: IF PG_DEBUG in ('Y', 'C') THEN

Line 512: l_ignore := dbms_sql.execute(l_select_cursor);

508: IF PG_DEBUG in ('Y', 'C') THEN
509: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement +');
510: END IF;
511:
512: l_ignore := dbms_sql.execute(l_select_cursor);
513:
514: IF PG_DEBUG in ('Y', 'C') THEN
515: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
516: END IF;

Line 518: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then

514: IF PG_DEBUG in ('Y', 'C') THEN
515: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
516: END IF;
517:
518: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then
519:
520: /*-----------------------------------------------------------------------+
521: |Fetch the column values, into actual variables |
522: +-----------------------------------------------------------------------*/

Line 527: dbms_sql.column_value(l_select_cursor, 1, l_currency_code);

523: IF PG_DEBUG in ('Y', 'C') THEN
524: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
525: END IF;
526:
527: dbms_sql.column_value(l_select_cursor, 1, l_currency_code);
528:
529: IF PG_DEBUG in ('Y', 'C') THEN
530: arp_standard.debug('Build_And_Bind: ' || 'l_currency_code '||l_currency_code);
531: END IF;

Line 552: dbms_sql.close_cursor(l_select_cursor);

548: +-----------------------------------------------------------------------*/
549: IF PG_DEBUG in ('Y', 'C') THEN
550: arp_standard.debug('Build_And_Bind: ' || 'Closing Cursor');
551: END IF;
552: dbms_sql.close_cursor(l_select_cursor);
553:
554: -- arp_standard.enable_debug;
555: EXCEPTION
556: WHEN OTHERS THEN