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 AND INSTR(l_out_where_clause,'TRX_NUMBER=') <> 0 THEN
272: dbms_sql.parse(l_select_cursor,
273: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N11) */
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_N11) */
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: ELSIF p_from_clause = 'AR_PAYMENT_SCHEDULES_TRX2_V' AND INSTR(l_out_where_clause,'CUSTOMER_ID=') <> 0 THEN
279: dbms_sql.parse(l_select_cursor,
280: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N6) */
281: count( distinct invoice_currency_code ),

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: ELSIF p_from_clause = 'AR_PAYMENT_SCHEDULES_TRX2_V' AND INSTR(l_out_where_clause,'CUSTOMER_ID=') <> 0 THEN
279: dbms_sql.parse(l_select_cursor,
280: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N6) */
281: count( distinct invoice_currency_code ),
282: sum(amount_due_remaining),
283: sum(acctd_amount_due_remaining)

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

280: 'select /*+ INDEX(AR_PAYMENT_SCHEDULES_TRX2_V.ps AR_PAYMENT_SCHEDULES_N6) */
281: count( distinct invoice_currency_code ),
282: sum(amount_due_remaining),
283: sum(acctd_amount_due_remaining)
284: from '||p_from_clause||' '||l_out_where_clause, dbms_sql.v7);
285: ELSE
286: dbms_sql.parse(l_select_cursor,
287: 'select count( distinct invoice_currency_code ),
288: sum(amount_due_remaining),

Line 286: dbms_sql.parse(l_select_cursor,

282: sum(amount_due_remaining),
283: sum(acctd_amount_due_remaining)
284: from '||p_from_clause||' '||l_out_where_clause, dbms_sql.v7);
285: ELSE
286: dbms_sql.parse(l_select_cursor,
287: 'select count( distinct invoice_currency_code ),
288: sum(amount_due_remaining),
289: sum(acctd_amount_due_remaining)
290: from '||p_from_clause||' '||l_out_where_clause,

Line 291: dbms_sql.v7);

287: 'select count( distinct invoice_currency_code ),
288: sum(amount_due_remaining),
289: sum(acctd_amount_due_remaining)
290: from '||p_from_clause||' '||l_out_where_clause,
291: dbms_sql.v7);
292: END IF;
293:
294: /*-----------------------------------------------------------------------+
295: |Define columns for the select statement. |

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

297: IF PG_DEBUG in ('Y', 'C') THEN
298: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
299: END IF;
300:
301: dbms_sql.define_column(l_select_cursor, 1 , l_count);
302: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
303: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
304:
305: IF PG_DEBUG in ('Y', 'C') THEN

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

298: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
299: END IF;
300:
301: dbms_sql.define_column(l_select_cursor, 1 , l_count);
302: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
303: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
304:
305: IF PG_DEBUG in ('Y', 'C') THEN
306: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');

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

299: END IF;
300:
301: dbms_sql.define_column(l_select_cursor, 1 , l_count);
302: dbms_sql.define_column(l_select_cursor, 2 , l_amount);
303: dbms_sql.define_column(l_select_cursor, 3 , l_func_amount);
304:
305: IF PG_DEBUG in ('Y', 'C') THEN
306: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');
307: END IF;

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

330: IF PG_DEBUG in ('Y', 'C') THEN
331: arp_standard.debug('Build_And_Bind: ' || 'l_actual_bind_var = '||l_actual_bind_var);
332: END IF;
333:
334: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);
335:
336: END LOOP;
337:
338: IF PG_DEBUG in ('Y', 'C') THEN

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

348: IF PG_DEBUG in ('Y', 'C') THEN
349: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement +');
350: END IF;
351:
352: l_ignore := dbms_sql.execute(l_select_cursor);
353:
354: IF PG_DEBUG in ('Y', 'C') THEN
355: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
356: END IF;

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

354: IF PG_DEBUG in ('Y', 'C') THEN
355: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
356: END IF;
357:
358: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then
359:
360: /*-----------------------------------------------------------------------+
361: |Fetch the column values, into actual variables |
362: +-----------------------------------------------------------------------*/

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

363: IF PG_DEBUG in ('Y', 'C') THEN
364: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
365: END IF;
366:
367: dbms_sql.column_value(l_select_cursor, 1, l_count);
368: dbms_sql.column_value(l_select_cursor, 2, l_amount);
369: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
370:
371: IF PG_DEBUG in ('Y', 'C') THEN

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

364: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
365: END IF;
366:
367: dbms_sql.column_value(l_select_cursor, 1, l_count);
368: dbms_sql.column_value(l_select_cursor, 2, l_amount);
369: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
370:
371: IF PG_DEBUG in ('Y', 'C') THEN
372: arp_standard.debug('Build_And_Bind: ' || 'l_count '||l_count);

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

365: END IF;
366:
367: dbms_sql.column_value(l_select_cursor, 1, l_count);
368: dbms_sql.column_value(l_select_cursor, 2, l_amount);
369: dbms_sql.column_value(l_select_cursor, 3, l_func_amount);
370:
371: IF PG_DEBUG in ('Y', 'C') THEN
372: arp_standard.debug('Build_And_Bind: ' || 'l_count '||l_count);
373: arp_standard.debug('Build_And_Bind: ' || 'l_amount'||l_amount);

Line 404: dbms_sql.close_cursor(l_select_cursor);

400: +-----------------------------------------------------------------------*/
401: IF PG_DEBUG in ('Y', 'C') THEN
402: arp_standard.debug('Build_And_Bind: ' || 'Closing Cursor');
403: END IF;
404: dbms_sql.close_cursor(l_select_cursor);
405:
406: -- arp_standard.enable_debug;
407: EXCEPTION
408: WHEN OTHERS THEN

Line 444: l_select_cursor := dbms_sql.open_cursor;

440: arp_standard.debug('Build_And_Bind: ' || 'where clause:' || p_where_clause );
441: arp_standard.debug('Build_And_Bind: ' || 'Opening Cursor');
442: END IF;
443:
444: l_select_cursor := dbms_sql.open_cursor;
445:
446: /*-----------------------------------------------------------------------+
447: |Call the Build and Bind routine to strip where clause from literals and|
448: |numeric constants and replace them with bind variables. |

Line 461: dbms_sql.parse(l_select_cursor,

457: IF PG_DEBUG in ('Y', 'C') THEN
458: arp_standard.debug('Build_And_Bind: ' || 'Parsing statement ');
459: arp_standard.debug('Build_And_Bind: ' || l_out_where_clause);
460: END IF;
461: dbms_sql.parse(l_select_cursor,
462: 'select invoice_currency_code from '||p_from_clause||' '||l_out_where_clause,
463: dbms_sql.v7);
464:
465: /*-----------------------------------------------------------------------+

Line 463: dbms_sql.v7);

459: arp_standard.debug('Build_And_Bind: ' || l_out_where_clause);
460: END IF;
461: dbms_sql.parse(l_select_cursor,
462: 'select invoice_currency_code from '||p_from_clause||' '||l_out_where_clause,
463: dbms_sql.v7);
464:
465: /*-----------------------------------------------------------------------+
466: |Define columns for the select statement. |
467: +-----------------------------------------------------------------------*/

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

468:
469: IF PG_DEBUG in ('Y', 'C') THEN
470: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns +');
471: END IF;
472: dbms_sql.define_column(l_select_cursor, 1 ,l_currency_code,15);
473: IF PG_DEBUG in ('Y', 'C') THEN
474: arp_standard.debug('Build_And_Bind: ' || 'Defining Columns -');
475: END IF;
476:

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

497: IF PG_DEBUG in ('Y', 'C') THEN
498: arp_standard.debug('Build_And_Bind: ' || 'l_actual_bind_var = '||l_actual_bind_var);
499: END IF;
500:
501: dbms_sql.bind_variable(l_select_cursor, l_actual_bind_var, l_literal_tbl(l_ctr).stripped_value);
502:
503: END LOOP;
504:
505: IF PG_DEBUG in ('Y', 'C') THEN

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

515: IF PG_DEBUG in ('Y', 'C') THEN
516: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement +');
517: END IF;
518:
519: l_ignore := dbms_sql.execute(l_select_cursor);
520:
521: IF PG_DEBUG in ('Y', 'C') THEN
522: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
523: END IF;

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

521: IF PG_DEBUG in ('Y', 'C') THEN
522: arp_standard.debug('Build_And_Bind: ' || 'Executing Statement -');
523: END IF;
524:
525: IF dbms_sql.fetch_rows(l_select_cursor) > 0 then
526:
527: /*-----------------------------------------------------------------------+
528: |Fetch the column values, into actual variables |
529: +-----------------------------------------------------------------------*/

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

530: IF PG_DEBUG in ('Y', 'C') THEN
531: arp_standard.debug('Build_And_Bind: ' || 'Fetching column values +');
532: END IF;
533:
534: dbms_sql.column_value(l_select_cursor, 1, l_currency_code);
535:
536: IF PG_DEBUG in ('Y', 'C') THEN
537: arp_standard.debug('Build_And_Bind: ' || 'l_currency_code '||l_currency_code);
538: END IF;

Line 559: dbms_sql.close_cursor(l_select_cursor);

555: +-----------------------------------------------------------------------*/
556: IF PG_DEBUG in ('Y', 'C') THEN
557: arp_standard.debug('Build_And_Bind: ' || 'Closing Cursor');
558: END IF;
559: dbms_sql.close_cursor(l_select_cursor);
560:
561: -- arp_standard.enable_debug;
562: EXCEPTION
563: WHEN OTHERS THEN