DBA Data[Home] [Help]

APPS.PN_DISTRIBUTION_ACCOUNT dependencies on DBMS_SQL

Line 11: -- 25-OCT-05 Hareesha o ATG mandated changes for SQL literals using dbms_sql.

7: -- PURPOSE :
8: -- HISTORY :
9: -- 14-JUL-05 hareesha o Bug 4284035 - Replaced pn_payment_terms,pn_leases,
10: -- pn_locations with _ALL table.
11: -- 25-OCT-05 Hareesha o ATG mandated changes for SQL literals using dbms_sql.
12: -------------------------------------------------------------------------------
13: PROCEDURE create_accounts (
14: errbuf OUT NOCOPY VARCHAR2 ,
15: retcode OUT NOCOPY VARCHAR2 ,

Line 97: l_cursor := dbms_sql.open_cursor;

93:
94:
95: l_context := 'forming where clause';
96:
97: l_cursor := dbms_sql.open_cursor;
98: l_statement :=
99: 'SELECT ppt.payment_term_id,
100: ppt.normalize,
101: pl.lease_num,

Line 151: dbms_sql.parse(l_cursor, l_statement, dbms_sql.native);

147: l_statement || ' AND location_code <= :l_locn_code_to ';
148:
149: END IF;
150:
151: dbms_sql.parse(l_cursor, l_statement, dbms_sql.native);
152:
153: dbms_sql.bind_variable
154: (l_cursor,'x_primary_flag',x_primary_flag );
155: dbms_sql.bind_variable

Line 153: dbms_sql.bind_variable

149: END IF;
150:
151: dbms_sql.parse(l_cursor, l_statement, dbms_sql.native);
152:
153: dbms_sql.bind_variable
154: (l_cursor,'x_primary_flag',x_primary_flag );
155: dbms_sql.bind_variable
156: (l_cursor,'x_lease_class',x_lease_class );
157:

Line 155: dbms_sql.bind_variable

151: dbms_sql.parse(l_cursor, l_statement, dbms_sql.native);
152:
153: dbms_sql.bind_variable
154: (l_cursor,'x_primary_flag',x_primary_flag );
155: dbms_sql.bind_variable
156: (l_cursor,'x_lease_class',x_lease_class );
157:
158: IF p_lease_num_from IS NOT NULL THEN
159: dbms_sql.bind_variable

Line 159: dbms_sql.bind_variable

155: dbms_sql.bind_variable
156: (l_cursor,'x_lease_class',x_lease_class );
157:
158: IF p_lease_num_from IS NOT NULL THEN
159: dbms_sql.bind_variable
160: (l_cursor,'l_lease_num_from',l_lease_num_from );
161: END IF;
162:
163: IF p_lease_num_to IS NOT NULL THEN

Line 164: dbms_sql.bind_variable

160: (l_cursor,'l_lease_num_from',l_lease_num_from );
161: END IF;
162:
163: IF p_lease_num_to IS NOT NULL THEN
164: dbms_sql.bind_variable
165: (l_cursor,'l_lease_num_to',l_lease_num_to );
166: END IF;
167:
168: IF p_locn_code_from IS NOT NULL THEN

Line 169: dbms_sql.bind_variable

165: (l_cursor,'l_lease_num_to',l_lease_num_to );
166: END IF;
167:
168: IF p_locn_code_from IS NOT NULL THEN
169: dbms_sql.bind_variable
170: (l_cursor,'l_locn_code_from',l_locn_code_from );
171: END IF;
172:
173: IF p_locn_code_to IS NOT NULL THEN

Line 174: dbms_sql.bind_variable

170: (l_cursor,'l_locn_code_from',l_locn_code_from );
171: END IF;
172:
173: IF p_locn_code_to IS NOT NULL THEN
174: dbms_sql.bind_variable
175: (l_cursor,'l_locn_code_to',l_locn_code_to );
176: END IF;
177:
178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);

Line 178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);

174: dbms_sql.bind_variable
175: (l_cursor,'l_locn_code_to',l_locn_code_to );
176: END IF;
177:
178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);
179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);

Line 179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);

175: (l_cursor,'l_locn_code_to',l_locn_code_to );
176: END IF;
177:
178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);
179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);

Line 180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);

176: END IF;
177:
178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);
179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);

Line 181: dbms_sql.define_column (l_cursor, 4,l_org_id);

177:
178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);
179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);
185:

Line 182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);

178: dbms_sql.define_column (l_cursor, 1,l_payment_term_id);
179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);
185:
186: l_rows := dbms_sql.execute(l_cursor);

Line 183: dbms_sql.define_column (l_cursor, 6,l_project_id);

179: dbms_sql.define_column (l_cursor, 2,l_normalize,1);
180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);
185:
186: l_rows := dbms_sql.execute(l_cursor);
187:

Line 184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);

180: dbms_sql.define_column (l_cursor, 3,l_lease_num,30);
181: dbms_sql.define_column (l_cursor, 4,l_org_id);
182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);
185:
186: l_rows := dbms_sql.execute(l_cursor);
187:
188: LOOP

Line 186: l_rows := dbms_sql.execute(l_cursor);

182: dbms_sql.define_column (l_cursor, 5,l_distribution_set_id);
183: dbms_sql.define_column (l_cursor, 6,l_project_id);
184: dbms_sql.define_column (l_cursor, 7,l_lease_class_code,30);
185:
186: l_rows := dbms_sql.execute(l_cursor);
187:
188: LOOP
189:
190: l_count1 := dbms_sql.fetch_rows( l_cursor );

Line 190: l_count1 := dbms_sql.fetch_rows( l_cursor );

186: l_rows := dbms_sql.execute(l_cursor);
187:
188: LOOP
189:
190: l_count1 := dbms_sql.fetch_rows( l_cursor );
191:
192: EXIT WHEN l_count1 <> 1;
193:
194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);

Line 194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);

190: l_count1 := dbms_sql.fetch_rows( l_cursor );
191:
192: EXIT WHEN l_count1 <> 1;
193:
194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);
195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);

Line 195: dbms_sql.column_value (l_cursor, 2,l_normalize);

191:
192: EXIT WHEN l_count1 <> 1;
193:
194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);
195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);

Line 196: dbms_sql.column_value (l_cursor, 3,l_lease_num);

192: EXIT WHEN l_count1 <> 1;
193:
194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);
195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);
200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);

Line 197: dbms_sql.column_value (l_cursor, 4,l_org_id);

193:
194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);
195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);
200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);
201:

Line 198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);

194: dbms_sql.column_value (l_cursor, 1,l_payment_term_id);
195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);
200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);
201:
202: pnp_debug_pkg.log('Processing ... ' );

Line 199: dbms_sql.column_value (l_cursor, 6,l_project_id);

195: dbms_sql.column_value (l_cursor, 2,l_normalize);
196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);
200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);
201:
202: pnp_debug_pkg.log('Processing ... ' );
203: pnp_debug_pkg.log('Lease Num :' || l_lease_num );

Line 200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);

196: dbms_sql.column_value (l_cursor, 3,l_lease_num);
197: dbms_sql.column_value (l_cursor, 4,l_org_id);
198: dbms_sql.column_value (l_cursor, 5,l_distribution_set_id);
199: dbms_sql.column_value (l_cursor, 6,l_project_id);
200: dbms_sql.column_value (l_cursor, 7,l_lease_class_code);
201:
202: pnp_debug_pkg.log('Processing ... ' );
203: pnp_debug_pkg.log('Lease Num :' || l_lease_num );
204: pnp_debug_pkg.log('Payment Term Id :' || l_payment_term_id );

Line 281: IF dbms_sql.is_open (l_cursor) THEN

277: END LOOP;
278:
279: l_context := 'exiting from loop';
280:
281: IF dbms_sql.is_open (l_cursor) THEN
282: dbms_sql.close_cursor (l_cursor);
283: END IF;
284:
285: COMMIT;

Line 282: dbms_sql.close_cursor (l_cursor);

278:
279: l_context := 'exiting from loop';
280:
281: IF dbms_sql.is_open (l_cursor) THEN
282: dbms_sql.close_cursor (l_cursor);
283: END IF;
284:
285: COMMIT;
286: fnd_message.set_name ('PN','PN_UPGAC_PROC');