160: selectstmt := selectstmt||' AND ai.last_update_date <= :p_end_date';
161: END IF;
162:
163: -- Open the cursor for processing
164: cursor_id := dbms_sql.open_cursor;
165:
166: -- Parse the query
167: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
168:
163: -- Open the cursor for processing
164: cursor_id := dbms_sql.open_cursor;
165:
166: -- Parse the query
167: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
168:
169: -- Bind input variables
170: IF p_vendor_id IS NOT NULL THEN
171: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
167: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
168:
169: -- Bind input variables
170: IF p_vendor_id IS NOT NULL THEN
171: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
172: END IF;
173:
174: IF p_invoice_id IS NOT NULL THEN
175: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
171: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
172: END IF;
173:
174: IF p_invoice_id IS NOT NULL THEN
175: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
176: END IF;
177:
178: IF p_prepay_id IS NOT NULL THEN
179: dbms_sql.bind_variable(cursor_id,':p_prepay_id',p_prepay_id);
175: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
176: END IF;
177:
178: IF p_prepay_id IS NOT NULL THEN
179: dbms_sql.bind_variable(cursor_id,':p_prepay_id',p_prepay_id);
180: END IF;
181:
182: IF p_start_date IS NOT NULL THEN
183: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
179: dbms_sql.bind_variable(cursor_id,':p_prepay_id',p_prepay_id);
180: END IF;
181:
182: IF p_start_date IS NOT NULL THEN
183: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
184: END IF;
185:
186: IF p_end_date IS NOT NULL THEN
187: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
183: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
184: END IF;
185:
186: IF p_end_date IS NOT NULL THEN
187: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
188: END IF;
189:
190: -- Define the output variable
191: dbms_sql.define_column(cursor_id,1,l_language,4);
187: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
188: END IF;
189:
190: -- Define the output variable
191: dbms_sql.define_column(cursor_id,1,l_language,4);
192:
193: -- Execute the query
194: dummy := dbms_sql.execute(cursor_id);
195:
190: -- Define the output variable
191: dbms_sql.define_column(cursor_id,1,l_language,4);
192:
193: -- Execute the query
194: dummy := dbms_sql.execute(cursor_id);
195:
196: -- Create string of languages to be returned
197: LOOP
198:
195:
196: -- Create string of languages to be returned
197: LOOP
198:
199: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
200: EXIT;
201: END IF;
202: dbms_sql.column_value( cursor_id, 1, l_language );
203:
198:
199: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
200: EXIT;
201: END IF;
202: dbms_sql.column_value( cursor_id, 1, l_language );
203:
204: IF (lang_str IS NULL) THEN
205: lang_str := l_language;
206: ELSE
207: lang_str := lang_str||','||l_language;
208: END IF;
209: END LOOP;
210:
211: dbms_sql.close_cursor(cursor_id);
212:
213: RETURN(lang_str);
214:
215: END APXPPREM;
285: selectstmt := selectstmt||' AND ai.invoice_date <= :p_end_date';
286: END IF;
287:
288: -- Open the cursor for processing
289: cursor_id := dbms_sql.open_cursor;
290:
291: -- Parse the query
292: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
293:
288: -- Open the cursor for processing
289: cursor_id := dbms_sql.open_cursor;
290:
291: -- Parse the query
292: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
293:
294: -- Bind input variables
295: IF p_vendor_type IS NOT NULL THEN
296: dbms_sql.bind_variable(cursor_id,':p_vendor_type',p_vendor_type);
292: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
293:
294: -- Bind input variables
295: IF p_vendor_type IS NOT NULL THEN
296: dbms_sql.bind_variable(cursor_id,':p_vendor_type',p_vendor_type);
297: END IF;
298:
299: IF p_pay_group IS NOT NULL THEN
300: dbms_sql.bind_variable(cursor_id,':p_pay_group',p_pay_group);
296: dbms_sql.bind_variable(cursor_id,':p_vendor_type',p_vendor_type);
297: END IF;
298:
299: IF p_pay_group IS NOT NULL THEN
300: dbms_sql.bind_variable(cursor_id,':p_pay_group',p_pay_group);
301: END IF;
302:
303: IF p_vendor_id IS NOT NULL THEN
304: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
300: dbms_sql.bind_variable(cursor_id,':p_pay_group',p_pay_group);
301: END IF;
302:
303: IF p_vendor_id IS NOT NULL THEN
304: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
305: END IF;
306:
307: IF p_invoice_type IS NOT NULL THEN
308: dbms_sql.bind_variable(cursor_id,':p_invoice_type',p_invoice_type);
304: dbms_sql.bind_variable(cursor_id,':p_vendor_id',p_vendor_id);
305: END IF;
306:
307: IF p_invoice_type IS NOT NULL THEN
308: dbms_sql.bind_variable(cursor_id,':p_invoice_type',p_invoice_type);
309: END IF;
310:
311: IF p_invoice_id IS NOT NULL THEN
312: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
308: dbms_sql.bind_variable(cursor_id,':p_invoice_type',p_invoice_type);
309: END IF;
310:
311: IF p_invoice_id IS NOT NULL THEN
312: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
313: END IF;
314:
315: IF p_start_date IS NOT NULL THEN
316: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
312: dbms_sql.bind_variable(cursor_id,':p_invoice_id',p_invoice_id);
313: END IF;
314:
315: IF p_start_date IS NOT NULL THEN
316: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
317: END IF;
318:
319: IF p_end_date IS NOT NULL THEN
320: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
316: dbms_sql.bind_variable(cursor_id,':p_start_date',p_start_date);
317: END IF;
318:
319: IF p_end_date IS NOT NULL THEN
320: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
321: END IF;
322:
323: -- Define the output variable
324: dbms_sql.define_column(cursor_id,1,l_language,4);
320: dbms_sql.bind_variable(cursor_id,':p_end_date',p_end_date);
321: END IF;
322:
323: -- Define the output variable
324: dbms_sql.define_column(cursor_id,1,l_language,4);
325:
326: -- Execute the query
327: dummy := dbms_sql.execute(cursor_id);
328:
323: -- Define the output variable
324: dbms_sql.define_column(cursor_id,1,l_language,4);
325:
326: -- Execute the query
327: dummy := dbms_sql.execute(cursor_id);
328:
329: -- Create string of languages to be returned
330: LOOP
331:
328:
329: -- Create string of languages to be returned
330: LOOP
331:
332: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
333: EXIT;
334: END IF;
335: dbms_sql.column_value( cursor_id, 1, l_language );
336:
331:
332: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
333: EXIT;
334: END IF;
335: dbms_sql.column_value( cursor_id, 1, l_language );
336:
337: IF (lang_str IS NULL) THEN
338: lang_str := l_language;
339: ELSE
340: lang_str := lang_str||','||l_language;
341: END IF;
342: END LOOP;
343:
344: dbms_sql.close_cursor(cursor_id);
345:
346: RETURN(lang_str);
347:
348: END APXINPRT;
389: ' AND pvd.vendor_name between nvl(:p_vendor_name_from,''A'') and nvl(:p_vendor_name_to,''Z'')';
390:
391: -- add to where clause if other parameters are specified
392: -- Open the cursor for processing
393: cursor_id := dbms_sql.open_cursor;
394:
395: -- Parse the query
396: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
397: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_from',P_VENDOR_NAME_FROM);
392: -- Open the cursor for processing
393: cursor_id := dbms_sql.open_cursor;
394:
395: -- Parse the query
396: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
397: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_from',P_VENDOR_NAME_FROM);
398: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_to',P_VENDOR_NAME_TO);
399: -- Bind input variables
400:
393: cursor_id := dbms_sql.open_cursor;
394:
395: -- Parse the query
396: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
397: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_from',P_VENDOR_NAME_FROM);
398: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_to',P_VENDOR_NAME_TO);
399: -- Bind input variables
400:
401: -- Define the output variable
394:
395: -- Parse the query
396: dbms_sql.parse(cursor_id, selectstmt, dbms_sql.v7);
397: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_from',P_VENDOR_NAME_FROM);
398: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_to',P_VENDOR_NAME_TO);
399: -- Bind input variables
400:
401: -- Define the output variable
402: dbms_sql.define_column(cursor_id,1,l_language,4);
398: DBMS_SQL.BIND_VARIABLE(cursor_id,':p_vendor_name_to',P_VENDOR_NAME_TO);
399: -- Bind input variables
400:
401: -- Define the output variable
402: dbms_sql.define_column(cursor_id,1,l_language,4);
403:
404: -- Execute the query
405: dummy := dbms_sql.execute(cursor_id);
406:
401: -- Define the output variable
402: dbms_sql.define_column(cursor_id,1,l_language,4);
403:
404: -- Execute the query
405: dummy := dbms_sql.execute(cursor_id);
406:
407: -- Create string of languages to be returned
408: LOOP
409:
406:
407: -- Create string of languages to be returned
408: LOOP
409:
410: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
411: EXIT;
412: END IF;
413: dbms_sql.column_value( cursor_id, 1, l_language );
414:
409:
410: IF dbms_sql.fetch_rows(cursor_id) = 0 THEN
411: EXIT;
412: END IF;
413: dbms_sql.column_value( cursor_id, 1, l_language );
414:
415: IF (lang_str IS NULL) THEN
416: lang_str := l_language;
417: ELSE
418: lang_str := lang_str||','||l_language;
419: END IF;
420: END LOOP;
421:
422: dbms_sql.close_cursor(cursor_id);
423:
424: RETURN(lang_str);
425:
426: END APXSOBLX;