eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AP_IMPORT_UTILITIES_PKG dependencies on AP_IMPORT_UTILITIES_PKG

Line 1: PACKAGE BODY AP_IMPORT_UTILITIES_PKG AS

1: PACKAGE BODY AP_IMPORT_UTILITIES_PKG AS
2: /* $Header: apiimutb.pls 120.100.12020000.3 2012/12/18 12:37:00 nbshaik ship $ */
3:
4: -- Bug 3929697
5: -- Declared two global variables for getting the value of

Line 141: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

137: IF (p_cascade_flag = 'Y' AND (p_quantity > 0 OR p_amount > 0)) THEN
138:
139: debug_info := '(Receipt Matching 3a) Matching to receipts by Cascading';
140: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
141: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
142: END IF;
143:
144: OPEN rcv_txn_cur;
145:

Line 161: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

157:
158: LOOP
159: debug_info := '(Receipt Matching 3a) Fetch into cursor rcv_txn_cur';
160: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
161: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
162: End if;
163:
164: FETCH rcv_txn_cur INTO
165: l_rcv_txn_id,

Line 170: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

166: l_rcv_uom,
167: l_match_basis;
168:
169: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
170: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
171: '------------------> l_rcv_txn_id = '||to_char(l_rcv_txn_id)
172: ||' l_rcv_uom = ' ||l_rcv_uom
173: ||' l_remain_qty = '||to_char(l_remain_qty));
174: end if;

Line 191: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

187: end if;
188:
189: debug_info := '(Receipt Matching 3a) Get quantities on the rcv_transaction ';
190: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
191: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
192: End if;
193:
194: IF (l_match_basis ='QUANTITY') THEN
195:

Line 199: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

195:
196: IF NVL(l_po_uom, 'X') <> NVL(l_rcv_uom, 'X') then
197: debug_info := '(Get Item Line Info 13.7-1) Get uom conv rate';
198: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
199: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
200: End if;
201:
202: l_uom_conv_rate :=
203: po_uom_s.po_uom_convert

Line 218: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

214: END IF;
215:
216: debug_info := '(Get Item Line Info 13.7-1) call get_quantities';
217: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
218: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
219: End if;
220:
221: RCV_INVOICE_MATCHING_SV.get_quantities
222: (

Line 253: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

249: - nvl(l_rtv_txn_qty,0)
250: - nvl(l_billed_txn_qty,0);
251:
252: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
253: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
254: '------------------> ordered_txn_qty = '||to_char(l_ordered_txn_qty)
255: ||' cancelled_txn_qty = '||to_char(l_cancelled_txn_qty)
256: ||' received_txn_qty = '||to_char(l_received_txn_qty)
257: ||' corrected_txn_qty = '||to_char(l_corrected_txn_qty)

Line 278: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

274: ap_utilities_pkg.ap_round_currency ((l_match_qty * (p_price * l_uom_conv_rate)), p_invoice_currency);
275:
276: debug_info := '(Receipt Match 3a) Call the receipt match package ';
277: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
278: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
279: End if;
280:
281: p_invoice_lines_tab(p_invoice_lines_tab.LAST+1):= p_invoice_lines_tab(l_index);
282:

Line 349: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

345: - nvl(l_cancelled_amt,0)
346: - nvl(l_billed_amt,0);
347:
348: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
349: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
350: '------------------> ordered_amount = '||to_char(l_ordered_amt)
351: ||' cancelled_amount = '||to_char(l_cancelled_amt)
352: ||' received_amount = ' ||to_char(l_received_amt)
353: ||' corrected_amount = '||to_char(l_corrected_amt)

Line 400: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

396: If (l_remain_qty > 0 and l_match_basis ='QUANTITY') Then
397:
398: debug_info := '(Receipt Match 3a) Assign the receipt number for the overbill - Quantity Match';
399: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
400: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
401: End if;
402:
403: l_match_qty := l_remain_qty;
404: l_match_amt :=

Line 426: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

422: Elsif (l_remain_amt > 0 and l_match_basis ='AMOUNT') Then
423:
424: debug_info := '(Receipt Match 3a) Assign the receipt number for the overbill - Amount Match';
425: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
426: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
427: End if;
428:
429: l_match_amt := l_remain_amt;
430: p_invoice_lines_tab(l_index-1).amount := p_invoice_lines_tab(l_index-1).amount + l_match_amt;

Line 446: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

442: -- to bill would reduce the total quantity billed , 0
443: ------------------------------------------------------------------------------
444: debug_info := '(Receipt match 3b) Matching to receipts by Cascading';
445: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
446: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
447: End if;
448:
449: Open rcv_txn_cur;
450:

Line 458: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

454:
455: Loop
456: debug_info := 'Fetch into cursor rcv_txn_cur';
457: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
458: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
459: End if;
460:
461: Fetch rcv_txn_cur INTO
462: l_rcv_txn_id,

Line 467: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

463: l_rcv_uom,
464: l_match_basis;
465:
466: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
467: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
468: '------------------> l_rcv_txn_id = '||to_char(l_rcv_txn_id)
469: ||' l_rcv_uom = '||l_rcv_uom
470: ||' l_remain_qty '||to_char(l_remain_qty)
471: ||' l_match_basis = '||l_match_basis);

Line 494: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

490: IF (l_match_basis ='QUANTITY') THEN
491:
492: debug_info := '(Receipt Match 3b) Get quantities on the rcv_transaction ';
493: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
494: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
495: End if;
496:
497: RCV_INVOICE_MATCHING_SV.get_quantities
498: (

Line 524: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

520: -- Calculate the billed quantity on the rcv transaction
521: l_billed_qty := nvl(l_billed_txn_qty,0);
522:
523: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
524: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
525: '------------------> ordered_txn_qty = '||to_char(l_ordered_txn_qty)
526: ||' cancelled_txn_qty = '||to_char(l_cancelled_txn_qty)
527: ||' received_txn_qty = '||to_char(l_received_txn_qty)
528: ||' corrected_txn_qty = '||to_char(l_corrected_txn_qty)

Line 583: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);

579: ELSIF (l_match_basis ='AMOUNT') THEN
580:
581: debug_info := '(Receipt Match 3b) Get amounts on the rcv_transaction ';
582: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
583: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
584: End if;
585:
586: RCV_INVOICE_MATCHING_SV.Get_ReceiveAmount
587: (

Line 615: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,

611: -- Calculate the billed amount on the rcv transaction
612: l_billed_amt := nvl(l_billed_amt,0);
613:
614: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
615: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,
616: '------------------> ordered_amount = '||to_char(l_ordered_amt)
617: ||' cancelled_amount = '||to_char(l_cancelled_amt)
618: ||' received_amount = '||to_char(l_received_amt)
619: ||' corrected_amount = '||to_char(l_corrected_amt)

Line 670: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

666: RETURN(TRUE);
667: EXCEPTION
668: WHEN OTHERS THEN
669: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
670: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
671: End if;
672: -- Get Error from Matching Package
673:
674: AP_UTILITIES_PKG.AP_GET_MESSAGE(l_matching_error);

Line 676: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,l_matching_error);

672: -- Get Error from Matching Package
673:
674: AP_UTILITIES_PKG.AP_GET_MESSAGE(l_matching_error);
675: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
676: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,l_matching_error);
677: end if;
678:
679: IF (SQLCODE < 0) then
680: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then

Line 681: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,SQLERRM);

677: end if;
678:
679: IF (SQLCODE < 0) then
680: If AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' then
681: AP_IMPORT_UTILITIES_PKG.Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,SQLERRM);
682: End if;
683: END IF;
684:
685: RETURN(FALSE);

Line 721: AP_IMPORT_UTILITIES_PKG.Print(

717: WHEN OTHERS then
718:
719: IF (SQLCODE < 0) then
720: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
721: AP_IMPORT_UTILITIES_PKG.Print(
722: AP_IMPORT_INVOICES_PKG.g_debug_switch, SQLERRM);
723: END IF;
724: END IF;
725: RETURN 0;

Line 775: 'AP_Import_Utilities_Pkg.Check_control_table<-'||P_calling_sequence;

771:
772: -- Update the calling sequence
773:
774: current_calling_sequence :=
775: 'AP_Import_Utilities_Pkg.Check_control_table<-'||P_calling_sequence;
776:
777: -----------------------------------------------------------------------
778: -- Step 1,
779: -- Lock the control table, in case some other concurrent process try to

Line 1064: current_calling_sequence := 'AP_Import_Utilities_Pkg.Insert_rejections<-'

1060:
1061: BEGIN
1062: -- Update the calling sequence
1063:
1064: current_calling_sequence := 'AP_Import_Utilities_Pkg.Insert_rejections<-'
1065: ||P_calling_sequence;
1066:
1067: --------------------------------------------------------------------------
1068: -- Step1

Line 1234: 'AP_Import_Utilities_Pkg.get_overbill_for_shipment<-'

1230: BEGIN
1231: -- Update the calling sequence
1232:
1233: current_calling_sequence :=
1234: 'AP_Import_Utilities_Pkg.get_overbill_for_shipment<-'
1235: ||P_calling_sequence;
1236:
1237: --------------------------------------------------------------------------
1238: -- Step 1

Line 1358: 'AP_Import_Utilities_Pkg.get_batch_id<-'||P_calling_sequence;

1354: BEGIN
1355: -- Update the calling sequence
1356:
1357: current_calling_sequence :=
1358: 'AP_Import_Utilities_Pkg.get_batch_id<-'||P_calling_sequence;
1359:
1360: ------------------------------------------------------------------
1361: -- Find the old batch_id if it's existing batch, or use sequence
1362: -- find the next available batch_id

Line 1435: 'AP_Import_Utilities_Pkg.get_auto_batch_name<-' ||p_calling_sequence;

1431: BEGIN
1432: -- Update the calling sequence
1433: --
1434: current_calling_sequence :=
1435: 'AP_Import_Utilities_Pkg.get_auto_batch_name<-' ||p_calling_sequence;
1436:
1437: debug_info := '(Get_auto_batch_name 1) automatically create batch name';
1438:
1439: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN

Line 1520: 'AP_Import_Utilities_Pkg.Get_info<-'||P_calling_sequence;

1516: BEGIN
1517: -- Update the calling sequence
1518:
1519: current_calling_sequence :=
1520: 'AP_Import_Utilities_Pkg.Get_info<-'||P_calling_sequence;
1521:
1522: debug_info := '(Get_info 1) Read from ap_system_parameters';
1523: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
1524: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);

Line 2003: 'AP_IMPORT_UTILITIES_PKG.find_vendor_primary_paysite<-'

1999: BEGIN
2000: -- Update the calling sequence
2001:
2002: current_calling_sequence :=
2003: 'AP_IMPORT_UTILITIES_PKG.find_vendor_primary_paysite<-'
2004: ||P_calling_sequence;
2005:
2006: debug_info := '(Find vendor primary paysite 1) Get the primary paysite';
2007: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then

Line 2436: 'AP_IMPORT_UTILITIES_PKG.pa_flexbuild<-'||P_calling_sequence;

2432:
2433: -- Update the calling sequence
2434:
2435: current_calling_sequence :=
2436: 'AP_IMPORT_UTILITIES_PKG.pa_flexbuild<-'||P_calling_sequence;
2437:
2438: ----------------------------------------------------------------------------
2439: -- Step 1
2440: ----------------------------------------------------------------------------

Line 2538: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

2534: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2535: END IF;
2536:
2537:
2538: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
2539: AP_IMPORT_INVOICES_PKG.g_invoice_lines_table,
2540: p_invoice_lines_rec.invoice_line_id,
2541: 'PA FLEXBUILD FAILED',
2542: p_default_last_updated_by,

Line 2662: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

2658: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
2659: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2660: END IF;
2661:
2662: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
2663: AP_IMPORT_INVOICES_PKG.g_invoice_lines_table,
2664: p_invoice_lines_rec.invoice_line_id,
2665: 'PA FLEXBUILD FAILED',
2666: p_default_last_updated_by,

Line 2857: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

2853: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
2854: Print( AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
2855: END IF;
2856:
2857: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
2858: 'AP_INVOICE_INTERFACE',
2859: p_invoice_rec.invoice_id,
2860: 'DOC CAT NOT REQD',
2861: p_default_last_updated_by,

Line 2942: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

2938: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
2939: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
2940: END IF;
2941:
2942: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
2943: AP_IMPORT_INVOICES_PKG.g_invoices_table,
2944: p_invoice_rec.invoice_id,
2945: 'INVALID DOC CATEGORY',
2946: p_default_last_updated_by,

Line 2981: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

2977: debug_info := debug_info || 'Reject->Doc cat does not exist';
2978: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
2979: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
2980: END IF;
2981: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
2982: AP_IMPORT_INVOICES_PKG.g_invoices_table,
2983: p_invoice_rec.invoice_id,
2984: 'INVALID DOC CATEGORY',
2985: p_default_last_updated_by,

Line 3009: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

3005: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
3006: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
3007: END IF;
3008:
3009: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
3010: AP_IMPORT_INVOICES_PKG.g_invoices_table,
3011: p_invoice_rec.invoice_id,
3012: 'OVERRIDE DISALLOWED',
3013: p_default_last_updated_by,

Line 3107: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections( AP_IMPORT_INVOICES_PKG.g_invoices_table,

3103: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
3104: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
3105: END IF;
3106:
3107: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections( AP_IMPORT_INVOICES_PKG.g_invoices_table,
3108: p_invoice_rec.invoice_id,
3109: 'INCONSISTENT VOUCHER INFO',
3110: p_default_last_updated_by,
3111: p_default_last_update_login,

Line 3139: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

3135: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
3136: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
3137: END IF;
3138:
3139: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
3140: AP_IMPORT_INVOICES_PKG.g_invoices_table,
3141: p_invoice_rec.invoice_id,
3142: 'INVALID ASSIGNMENT',
3143: p_default_last_updated_by,

Line 3197: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(

3193: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
3194: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
3195: END IF;
3196:
3197: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections(
3198: AP_IMPORT_INVOICES_PKG.g_invoices_table,
3199: p_invoice_rec.invoice_id,
3200: 'INVALID SEQUENCE',
3201: p_default_last_updated_by,

Line 3228: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections( AP_IMPORT_INVOICES_PKG.g_invoices_table,

3224: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
3225: Print(AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
3226: END IF;
3227:
3228: IF (AP_IMPORT_UTILITIES_PKG.insert_rejections( AP_IMPORT_INVOICES_PKG.g_invoices_table,
3229: p_invoice_rec.invoice_id,
3230: 'INCONSISTENT VOUCHER INFO',
3231: p_default_last_updated_by,
3232: p_default_last_update_login,

Line 4630: AP_IMPORT_UTILITIES_PKG.Print(

4626: debug_info := '(Create Lines 3.1) Check for quantity overbill '
4627: ||'for PO Shipment';
4628:
4629: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') then
4630: AP_IMPORT_UTILITIES_PKG.Print(
4631: AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
4632: END IF;
4633:
4634: IF (AP_IMPORT_UTILITIES_PKG.get_overbill_for_shipment(

Line 4634: IF (AP_IMPORT_UTILITIES_PKG.get_overbill_for_shipment(

4630: AP_IMPORT_UTILITIES_PKG.Print(
4631: AP_IMPORT_INVOICES_PKG.g_debug_switch, debug_info);
4632: END IF;
4633:
4634: IF (AP_IMPORT_UTILITIES_PKG.get_overbill_for_shipment(
4635: p_invoice_lines_tab(i).po_line_location_id, -- IN
4636: p_invoice_lines_tab(i).quantity_invoiced, -- IN
4637: p_invoice_lines_tab(i).amount, -- IN
4638: l_overbill_flag, -- OUT NOCOPY

Line 4648: AP_IMPORT_UTILITIES_PKG.Print(

4644: l_amt_already_billed, -- OUT NOCOPY
4645: current_calling_sequence) <> TRUE) THEN
4646:
4647: IF (AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y') THEN
4648: AP_IMPORT_UTILITIES_PKG.Print(
4649: AP_IMPORT_INVOICES_PKG.g_debug_switch,
4650: 'get_overbill_for_shipment<-'||current_calling_sequence);
4651: END IF;
4652: RAISE create_lines_failure;

Line 4750: AP_IMPORT_UTILITIES_PKG.Print(

4746: --------------------------------------------------------------------------
4747:
4748: debug_info := '(Insert Holds 1) Insert invoice holds FROM the import batch';
4749: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4750: AP_IMPORT_UTILITIES_PKG.Print(
4751: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
4752: END IF;
4753:
4754: IF (p_hold_code is NOT NULL) THEN

Line 4771: AP_IMPORT_UTILITIES_PKG.Print(

4767: ---------------------------------------------------------------------------
4768:
4769: debug_info := '(Insert Holds 2) Insert Suppler holds';
4770: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4771: AP_IMPORT_UTILITIES_PKG.Print(
4772: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
4773: END IF;
4774:
4775: iF (NVL(p_hold_future_payments_flag,'N') = 'Y') THEN

Line 4795: AP_IMPORT_UTILITIES_PKG.Print(

4791: --------------------------------------------------------------------------
4792: debug_info := '(Insert Holds 3) Insert Hold IF invoice_base_amount > '||
4793: 'invoice_amount_limit';
4794: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4795: AP_IMPORT_UTILITIES_PKG.Print(
4796: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
4797: END IF;
4798:
4799: ap_holds_pkg.insert_single_hold(

Line 4813: AP_IMPORT_UTILITIES_PKG.Print(

4809:
4810: EXCEPTION
4811: WHEN OTHERS THEN
4812: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4813: AP_IMPORT_UTILITIES_PKG.Print(
4814: AP_IMPORT_INVOICES_PKG.g_debug_switch,debug_info);
4815: END IF;
4816:
4817: IF (SQLCODE < 0) THEN

Line 4819: AP_IMPORT_UTILITIES_PKG.Print(

4815: END IF;
4816:
4817: IF (SQLCODE < 0) THEN
4818: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4819: AP_IMPORT_UTILITIES_PKG.Print(
4820: AP_IMPORT_INVOICES_PKG.g_debug_switch,SQLERRM);
4821: END IF;
4822: END IF;
4823:

Line 4946: AP_IMPORT_UTILITIES_PKG.Print(

4942: BEGIN
4943:
4944: l_curr_calling_sequence := 'Is_Product_Registered <-'||p_calling_sequence;
4945: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4946: AP_IMPORT_UTILITIES_PKG.Print(
4947: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
4948: END IF;
4949:
4950: l_debug_info := 'Check if the other application is registered for Distribution Generation';

Line 4952: AP_IMPORT_UTILITIES_PKG.Print(

4948: END IF;
4949:
4950: l_debug_info := 'Check if the other application is registered for Distribution Generation';
4951: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
4952: AP_IMPORT_UTILITIES_PKG.Print(
4953: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
4954: END IF;
4955:
4956:

Line 5014: AP_IMPORT_UTILITIES_PKG.Print(

5010: BEGIN
5011:
5012: l_curr_calling_sequence := 'Cache_Org_Id_Name <- '||P_calling_sequence;
5013: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5014: AP_IMPORT_UTILITIES_PKG.Print(
5015: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5016: END IF;
5017:
5018: l_debug_info := 'Caching Org_id , Name from MO: Security Profile';

Line 5020: AP_IMPORT_UTILITIES_PKG.Print(

5016: END IF;
5017:
5018: l_debug_info := 'Caching Org_id , Name from MO: Security Profile';
5019: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5020: AP_IMPORT_UTILITIES_PKG.Print(
5021: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5022: END IF;
5023:
5024: OPEN moac_org;

Line 5031: AP_IMPORT_UTILITIES_PKG.Print(

5027: CLOSE moac_org;
5028:
5029: l_debug_info := 'Caching Org_id from Financials Systems';
5030: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5031: AP_IMPORT_UTILITIES_PKG.Print(
5032: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5033: END IF;
5034:
5035: OPEN fsp_org;

Line 5079: 'AP_IMPORT_UTILITIES_PKG.Check_For_Calendar_Term<-'||p_calling_sequence;

5075: BEGIN
5076: -- Update the calling sequence
5077: --
5078: l_curr_calling_sequence :=
5079: 'AP_IMPORT_UTILITIES_PKG.Check_For_Calendar_Term<-'||p_calling_sequence;
5080: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5081: AP_IMPORT_UTILITIES_PKG.Print(
5082: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5083: END IF;

Line 5081: AP_IMPORT_UTILITIES_PKG.Print(

5077: --
5078: l_curr_calling_sequence :=
5079: 'AP_IMPORT_UTILITIES_PKG.Check_For_Calendar_Term<-'||p_calling_sequence;
5080: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5081: AP_IMPORT_UTILITIES_PKG.Print(
5082: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5083: END IF;
5084:
5085: --------------------------------------------------------

Line 5089: AP_IMPORT_UTILITIES_PKG.Print(

5085: --------------------------------------------------------
5086: l_debug_info := 'OPEN cursor c';
5087: --------------------------------------------------------
5088: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5089: AP_IMPORT_UTILITIES_PKG.Print(
5090: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5091: END IF;
5092:
5093: l_cal_exists := '';

Line 5101: AP_IMPORT_UTILITIES_PKG.Print(

5097: --------------------------------------------------------
5098: l_debug_info := 'Fetch cursor C';
5099: --------------------------------------------------------
5100: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5101: AP_IMPORT_UTILITIES_PKG.Print(
5102: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5103: END IF;
5104:
5105: FETCH c INTO l_calendar;

Line 5112: AP_IMPORT_UTILITIES_PKG.Print(

5108: --------------------------------------------------------
5109: l_debug_info := 'Check for calendar';
5110: --------------------------------------------------------
5111: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5112: AP_IMPORT_UTILITIES_PKG.Print(
5113: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5114: END IF;
5115:
5116: BEGIN

Line 5145: AP_IMPORT_UTILITIES_PKG.Print(

5141: --------------------------------------------------------
5142: l_debug_info := 'CLOSE cursor c';
5143: --------------------------------------------------------
5144: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5145: AP_IMPORT_UTILITIES_PKG.Print(
5146: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5147: END IF;
5148:
5149: CLOSE c;

Line 5188: AP_IMPORT_UTILITIES_PKG.Print(

5184: BEGIN
5185:
5186: l_curr_calling_sequence := 'Cache_Pay_group <- '||P_calling_sequence;
5187: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5188: AP_IMPORT_UTILITIES_PKG.Print(
5189: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5190: END IF;
5191:
5192: l_debug_info := 'Caching Pay Group from PO Lookup Codes';

Line 5194: AP_IMPORT_UTILITIES_PKG.Print(

5190: END IF;
5191:
5192: l_debug_info := 'Caching Pay Group from PO Lookup Codes';
5193: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5194: AP_IMPORT_UTILITIES_PKG.Print(
5195: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5196: END IF;
5197:
5198: OPEN pay_group;

Line 5235: AP_IMPORT_UTILITIES_PKG.Print(

5231: BEGIN
5232:
5233: l_curr_calling_sequence := 'Cache_Payment_Method <- '||P_calling_sequence;
5234: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5235: AP_IMPORT_UTILITIES_PKG.Print(
5236: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5237: END IF;
5238:
5239: l_debug_info := 'Caching Payment Method from IBY';

Line 5241: AP_IMPORT_UTILITIES_PKG.Print(

5237: END IF;
5238:
5239: l_debug_info := 'Caching Payment Method from IBY';
5240: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5241: AP_IMPORT_UTILITIES_PKG.Print(
5242: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5243: END IF;
5244:
5245: OPEN payment_method;

Line 5286: AP_IMPORT_UTILITIES_PKG.Print(

5282: BEGIN
5283:
5284: l_curr_calling_sequence := 'Cache_Fnd_Currency <- '||P_calling_sequence;
5285: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5286: AP_IMPORT_UTILITIES_PKG.Print(
5287: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_curr_calling_sequence);
5288: END IF;
5289:
5290: l_debug_info := 'Caching Currency from Fnd Currency';

Line 5292: AP_IMPORT_UTILITIES_PKG.Print(

5288: END IF;
5289:
5290: l_debug_info := 'Caching Currency from Fnd Currency';
5291: IF AP_IMPORT_INVOICES_PKG.g_debug_switch = 'Y' THEN
5292: AP_IMPORT_UTILITIES_PKG.Print(
5293: AP_IMPORT_INVOICES_PKG.g_debug_switch,l_debug_info);
5294: END IF;
5295:
5296: OPEN currency_code_cur;

Line 5315: END AP_IMPORT_UTILITIES_PKG;

5311: APP_EXCEPTION.RAISE_EXCEPTION;
5312:
5313: END Cache_Fnd_Currency;
5314:
5315: END AP_IMPORT_UTILITIES_PKG;