325:
326:
327: /*================================================================
328:
329: PROCEDURE NAME: create_ap_batches()
330:
331: ==================================================================*/
332:
333: -- Bug 4723269 : Added parameter p_org_id
331: ==================================================================*/
332:
333: -- Bug 4723269 : Added parameter p_org_id
334:
335: PROCEDURE create_ap_batches( X_batch_source IN VARCHAR2,
336: X_currency_code IN VARCHAR2,
337: p_org_id IN NUMBER,
338: X_batch_id OUT NOCOPY NUMBER
339: )
341: IS
342:
343: X_progress VARCHAR2(3) := NULL;
344: X_tmp_batch_id NUMBER;
345: X_batch_name ap_batches.batch_name%TYPE;
346:
347: BEGIN
348: IF (g_asn_debug = 'Y') THEN
349: asn_debug.put_line('Creating AP Invoice Batch ... ');
364: X_batch_name := X_batch_source;
365: END IF;
366:
367: X_progress := '030';
368: SELECT ap_batches_s.nextval
369: INTO X_tmp_batch_id
370: FROM dual;
371:
372: -- Bug 4723269 : Populate org_id in ap_batches_all
368: SELECT ap_batches_s.nextval
369: INTO X_tmp_batch_id
370: FROM dual;
371:
372: -- Bug 4723269 : Populate org_id in ap_batches_all
373:
374: X_progress := '040';
375: INSERT INTO ap_batches_all
376: ( batch_id,
371:
372: -- Bug 4723269 : Populate org_id in ap_batches_all
373:
374: X_progress := '040';
375: INSERT INTO ap_batches_all
376: ( batch_id,
377: batch_name,
378: batch_date,
379: invoice_currency_code,
406: WHEN others THEN
407: IF (g_asn_debug = 'Y') THEN
408: asn_debug.put_line('Error in creating AP Invoice Batch ... ');
409: END IF;
410: po_message_s.sql_error('create_ap_batches', x_progress,sqlcode);
411: RAISE;
412: END create_ap_batches;
413:
414:
408: asn_debug.put_line('Error in creating AP Invoice Batch ... ');
409: END IF;
410: po_message_s.sql_error('create_ap_batches', x_progress,sqlcode);
411: RAISE;
412: END create_ap_batches;
413:
414:
415: /*================================================================
416:
413:
414:
415: /*================================================================
416:
417: PROCEDURE NAME: update_ap_batches()
418:
419: ==================================================================*/
420: PROCEDURE update_ap_batches( X_batch_id IN NUMBER,
421: X_invoice_count IN NUMBER,
416:
417: PROCEDURE NAME: update_ap_batches()
418:
419: ==================================================================*/
420: PROCEDURE update_ap_batches( X_batch_id IN NUMBER,
421: X_invoice_count IN NUMBER,
422: X_invoice_total IN NUMBER)
423:
424: IS
435: * control total originally. These need to be popluated
436: * to be the same as the actual count and actual total.
437: */
438:
439: -- Bug 4723269 : Changed ap_batches to ap_batches_all
440:
441: UPDATE ap_batches_all
442: SET actual_invoice_count = X_invoice_count,
443: actual_invoice_total = X_invoice_total,
437: */
438:
439: -- Bug 4723269 : Changed ap_batches to ap_batches_all
440:
441: UPDATE ap_batches_all
442: SET actual_invoice_count = X_invoice_count,
443: actual_invoice_total = X_invoice_total,
444: control_invoice_count = X_invoice_count,
445: control_invoice_total = X_invoice_total,
452: WHEN others THEN
453: IF (g_asn_debug = 'Y') THEN
454: asn_debug.put_line('Error in Updating current invoice batch ... ');
455: END IF;
456: po_message_s.sql_error('update_ap_batches', x_progress,sqlcode);
457: RAISE;
458: END update_ap_batches;
459:
460:
454: asn_debug.put_line('Error in Updating current invoice batch ... ');
455: END IF;
456: po_message_s.sql_error('update_ap_batches', x_progress,sqlcode);
457: RAISE;
458: END update_ap_batches;
459:
460:
461:
462: /*================================================================