APPS.AP_PREPAY_PKG dependencies on FND_LOG

Line 14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

10: G_MSG_MEDIUM CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM;
11: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
12: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
13:
14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

11: G_MSG_LOW CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW;
12: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
13:
14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

12: G_LINES_PER_FETCH CONSTANT NUMBER := 1000;
13:
14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

13:
14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
21: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_PREPAY_PKG.';

Line 18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

14: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
21: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_PREPAY_PKG.';
22:

Line 19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

15: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
21: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_PREPAY_PKG.';
22:
23: FUNCTION Check_Supplier_Consistency (

Line 20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

16: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
17: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
18: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
19: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
20: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
21: G_MODULE_NAME CONSTANT VARCHAR2(100) := 'AP.PLSQL.AP_PREPAY_PKG.';
22:
23: FUNCTION Check_Supplier_Consistency (
24: p_prepay_num IN VARCHAR2,

Line 130: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepayment_Invoice(+)');

126:
127: BEGIN
128: l_api_name := 'Check_Prepayment_Invoice';
129: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
130: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepayment_Invoice(+)');
131: END IF;
132:
133:
134: l_debug_info := 'Check if the prepayment invoice is a valid invoice ';

Line 136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

132:
133:
134: l_debug_info := 'Check if the prepayment invoice is a valid invoice ';
135: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
137: END IF;
138:
139: SELECT count(*)
140: INTO l_count

Line 154: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

150: END IF;
151:
152: l_debug_info := 'Get prepay_invoice_id ';
153: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
154: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
155: END IF;
156:
157: IF l_reject_code IS NULL THEN
158: SELECT invoice_id

Line 166: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepayment_Invoice(-)');

162: AND vendor_id = p_vendor_id;
163: END IF;
164:
165: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
166: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepayment_Invoice(-)');
167: END IF;
168:
169: RETURN (l_reject_code);
170:

Line 459: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Validate_Prepay_Info(+)');

455: BEGIN
456: l_api_name := 'Validate_Prepay_Info';
457:
458: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
459: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Validate_Prepay_Info(+)');
460: END IF;
461:
462: IF p_prepay_case_name = 'DO_NOTHING_CASE' THEN
463:

Line 467: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

463:
464: l_debug_info := 'Import - No Prepay related information is given and '||
465: 'apply advances flag is set to N';
466: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
467: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
468: END IF;
469:
470: l_reject_code := NULL;
471: RETURN (l_reject_code);

Line 477: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

473: ELSIF p_prepay_case_name = 'INVALID_CASE' THEN
474:
475: l_debug_info := 'Import - Insufficient Prepayment information provided';
476: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
477: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
478: END IF;
479:
480: l_reject_code := 'INSUFFICIENT PREPAY INFO';
481: RETURN (l_reject_code);

Line 494: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

490: IF p_prepay_apply_amount <= 0 THEN
491:
492: l_debug_info := 'Import - Apply amount should be positive and non zero';
493: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
494: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
495: END IF;
496:
497: l_reject_code := 'CANNOT APPLY ZERO OR NEG';
498:

Line 512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

508: 'INV_PREPAY_APPL_WITHOUT_AMOUNT') THEN
509:
510: l_debug_info := 'Import - Check Supplier Consistency';
511: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
512: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
513: END IF;
514:
515: l_reject_code := Check_Supplier_Consistency
516: (p_prepay_num,

Line 525: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

521: END IF;
522:
523: l_debug_info := 'Import - Check Currency Consistency';
524: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
525: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
526: END IF;
527:
528: l_reject_code := Check_Currency_Consistency
529: (p_prepay_num,

Line 541: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

537: END IF;
538:
539: l_debug_info := 'Import - Check Prepayment Validity';
540: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
541: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
542: END IF;
543:
544: l_reject_code := Check_Prepayment_Invoice
545: (p_prepay_num,

Line 560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

556: --'INV_PREPAY_APPL_WITHOUT_AMOUNT', Bug5506845
557: 'LINE_PREPAY_APPL_WITHOUT_AMOUNT') THEN
558: l_debug_info := 'Import - Check Prepayment Line Validity';
559: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
560: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
561: END IF;
562:
563: l_reject_code := Check_Prepayment_Line
564: (p_prepay_num,

Line 579: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

575: 'LINE_PREPAY_APPL_WITHOUT_AMOUNT',
576: 'LINE_PREPAY_APPL_WITH_AMOUNT') THEN
577: l_debug_info := 'Import - Check Nothing to Apply in this Prepay Line';
578: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
579: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
580: END IF;
581:
582: l_reject_code := Check_Nothing_To_Apply_Line
583: (p_prepay_invoice_id,

Line 591: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

587: IF p_invoice_type_lookup_code = 'EXPENSE REPORT' -- Bug 7004765
588: or p_source in ('SelfService', 'XpenseXpress') THEN
589: l_debug_info := 'Import - Nothing to Apply in this Prepay Line. But not REJECTING an ER invoice';
590: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
591: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
592: END IF;
593: p_prepay_apply_amount := null;
594: p_prepay_line_num := null;
595: p_prepay_num := null;

Line 607: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

603: 'INV_PREPAY_APPL_WITHOUT_AMOUNT',
604: 'INV_PREPAY_APPL_WITH_AMOUNT') THEN
605: l_debug_info := 'Import - Check Nothing to Apply in this Prepay Invoice';
606: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
607: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
608: END IF;
609:
610: l_reject_code := Check_Nothing_To_Apply_Invoice
611: (p_prepay_invoice_id);

Line 618: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

614: IF p_invoice_type_lookup_code = 'EXPENSE REPORT' -- Bug 7004765
615: or p_source in ('SelfService', 'XpenseXpress') THEN
616: l_debug_info := 'Import - Nothing to Apply in this Prepay Line. But not REJECTING an ER invoice';
617: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
618: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
619: END IF;
620: p_prepay_apply_amount := null;
621: p_prepay_num := null;
622: ELSE

Line 634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

630: 'VND_PREPAY_APPL_WITHOUT_AMOUNT',
631: 'VND_PREPAY_APPL_WITH_AMOUNT') THEN
632: l_debug_info := 'Import - Check Nothing to Apply for this vendor';
633: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
635: END IF;
636:
637: l_reject_code := Check_Nothing_To_Apply_Vendor (p_vendor_id);
638:

Line 644: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

640: IF p_invoice_type_lookup_code = 'EXPENSE REPORT' -- Bug 7004765
641: or p_source in ('SelfService', 'XpenseXpress') THEN
642: l_debug_info := 'Import - Nothing to Apply in this Prepay Line. But not REJECTING an ER invoice';
643: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
644: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
645: END IF;
646: p_prepay_apply_amount := null;
647: ELSE
648: RETURN (l_reject_code);

Line 655: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

651: END IF;
652:
653: l_debug_info := 'Import - Check Period Status';
654: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
655: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
656: END IF;
657:
658: l_reject_code := Check_Period_Status
659: (p_prepay_gl_date,

Line 667: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Validate_Prepay_Info(-)');

663: RETURN (l_reject_code);
664: END IF;
665:
666: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
667: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Validate_Prepay_Info(-)');
668: END IF;
669:
670: RETURN (l_reject_code);
671:

Line 694: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Get_Prepay_Case_Name(+)');

690:
691: BEGIN
692: l_api_name := 'Get_Prepay_Case_Name';
693: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
694: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Get_Prepay_Case_Name(+)');
695: END IF;
696:
697: l_debug_info := 'Derive case name';
698: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 699: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

695: END IF;
696:
697: l_debug_info := 'Derive case name';
698: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
699: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
700: END IF;
701:
702: IF (p_prepay_num IS NOT NULL AND
703: p_prepay_line_num IS NOT NULL AND

Line 761: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Get_Prepay_Case_Name(-)');

757:
758: END IF;
759:
760: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
761: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Get_Prepay_Case_Name(-)');
762: END IF;
763:
764: RETURN (l_prepay_case_name);
765:

Line 1206: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepay_Info_Import(+)');

1202:
1203: l_api_name := 'Check_Prepay_Info_Import';
1204:
1205: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1206: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepay_Info_Import(+)');
1207: END IF;
1208:
1209: p_prepay_invoice_id := p_import_invoice_id;
1210:

Line 1216: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1212: -- Step 1: Identify the case name based on the prepayment information provided.
1213: -- ============================================================================
1214: l_debug_info := 'Call Get_Prepay_Case_Name';
1215: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1216: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1217: END IF;
1218:
1219: p_prepay_case_name := Get_Prepay_Case_Name (
1220: p_prepay_num,

Line 1233: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1229: -- ============================================================================
1230:
1231: l_debug_info := 'Call Validate_Prepay_Info';
1232: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1233: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1234: END IF;
1235:
1236: l_reject_code := Validate_Prepay_Info (
1237: p_prepay_case_name,

Line 1261: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepay_Info_Import(-)');

1257: RETURN (l_reject_code);
1258: END IF;
1259:
1260: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1261: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Check_Prepay_Info_Import(-)');
1262: END IF;
1263:
1264: RETURN (l_reject_code);
1265:

Line 1668: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Apply_Prepay_Line(+)');

1664:
1665: l_api_name := 'Apply_Prepay_Line';
1666:
1667: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1668: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Apply_Prepay_Line(+)');
1669: END IF;
1670:
1671: -- ==========================================================
1672: -- Step 0: Get Base Currency Code

Line 1677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1673: -- ==========================================================
1674:
1675: l_debug_info := 'Get Base Currency Code';
1676: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1677: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1678: END IF;
1679:
1680: OPEN C_SYS_PARAMS;
1681:

Line 1693: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1689: -- ==========================================================
1690:
1691: l_debug_info := 'Get Required Information from the STANDARD INVOICE';
1692: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1693: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1694: END IF;
1695:
1696: OPEN C_STD_INVOICE_INFO (P_INVOICE_ID);
1697:

Line 1716: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1712: -- =============================================================
1713:
1714: l_debug_info := 'Get Required Information from the PREPAYMENT INVOICE';
1715: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1716: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1717: END IF;
1718:
1719: OPEN C_PPAY_INVOICE_INFO (P_PREPAY_INVOICE_ID);
1720:

Line 1740: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1736:
1737: l_debug_info := 'Get the Required Line Information for the Selected '||
1738: 'Prepayment Invoice Line';
1739: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1740: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1741: END IF;
1742:
1743: OPEN C_PPAY_LINE_INFO (P_PREPAY_INVOICE_ID,
1744: P_PREPAY_LINE_NUM);

Line 1769: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1765: /*Bug 14213367: Added input parameter to the debug info*/
1766: l_debug_info := 'Call Upgrade Po Shipment by passing l_ppay_ln_po_line_location_id '||
1767: l_ppay_ln_po_line_location_id||' as an input parameter';
1768: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1769: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1770: END IF;
1771:
1772: AP_MATCHING_UTILS_PKG.AP_Upgrade_Po_Shipment(
1773: l_ppay_ln_po_line_location_id,

Line 1784: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1780: -- ==========================================================
1781:
1782: l_debug_info := 'Get the Prepayment Payment Related Information';
1783: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1784: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1785: END IF;
1786:
1787: OPEN C_PPAY_PAY_INFO (P_PREPAY_INVOICE_ID);
1788:

Line 1804: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1800: /*Bug 14213367: Added input parameters to the debug info*/
1801: l_debug_info := 'Round the Apply Amount '||l_apply_amount||
1802: ' with standard invoice currency code '||l_std_inv_curr_code;
1803: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1804: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1805: END IF;
1806: l_apply_amount := AP_Utilities_PKG.AP_Round_Currency (
1807: l_apply_amount,
1808: l_std_inv_curr_code);

Line 1812: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1808: l_std_inv_curr_code);
1809: /*Bug 14213367:Start */
1810: l_debug_info := 'l_apply_amount: '||l_apply_amount;
1811: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1812: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1813: END IF;
1814: /*Bug 14213367:end */
1815:
1816: -- ==========================================================

Line 1827: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1823: /*Bug 14213367: Added parameters to the debug info*/
1824: l_debug_info := 'Get Line Level Apply Base Amount.l_base_currency_code: '||
1825: l_base_currency_code|| ',l_std_inv_xdate: '||l_std_inv_xdate;
1826: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1827: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1828: END IF;
1829: l_debug_info := 'l_std_inv_xrate_type: '||l_std_inv_xrate_type||
1830: ',l_std_inv_xrate: '||l_std_inv_xrate;
1831: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1832: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1828: END IF;
1829: l_debug_info := 'l_std_inv_xrate_type: '||l_std_inv_xrate_type||
1830: ',l_std_inv_xrate: '||l_std_inv_xrate;
1831: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1832: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1833: END IF;
1834:
1835: IF (l_std_inv_curr_code <> l_base_currency_code) THEN
1836:

Line 1848: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1844: l_std_inv_curr_code||' to '||l_base_currency_code|| ' on '||
1845: l_std_inv_xdate||' for '||l_std_inv_xrate_type||' exchange rate type' ;
1846:
1847: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1848: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1849: END IF;
1850: /*Bug 14592297:End*/
1851:
1852: l_prepay_ln_base_amount := GL_Currency_API.Convert_Amount(

Line 1862: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1858: /*Bug 14592297:Start*/
1859:
1860: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
1861: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1862: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1863: END IF;
1864: /*Bug 14592297:End*/
1865: END IF;
1866: END IF;

Line 1870: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1866: END IF;
1867: /*Bug 14213367:Start */
1868: l_debug_info := 'l_prepay_ln_base_amount: '||l_prepay_ln_base_amount;
1869: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1870: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1871: END IF;
1872: /*Bug 14213367:end */
1873:
1874: -- ==========================================================

Line 1883: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1879: /*Bug 14213367: Added parameters to the debug info*/
1880: l_debug_info := 'Get Line Level Quantity Invoiced, Stat Amount and '||
1881: 'PA Quantity. l_ppay_ln_amount_remaining: '||l_ppay_ln_amount_remaining;
1882: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1883: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1884: END IF;
1885:
1886: IF (l_apply_amount = l_ppay_ln_amount_remaining) THEN
1887:

Line 1961: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1957: l_debug_info := 'l_prepay_ln_quantity_invoiced: '||l_prepay_ln_quantity_invoiced||
1958: ',l_prepay_ln_stat_amount: '||l_prepay_ln_stat_amount||',l_prepay_ln_pa_quantity: '||
1959: l_prepay_ln_pa_quantity;
1960: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1961: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1962: END IF;
1963: /*Bug 14213367:end */
1964:
1965: -- ==========================================================

Line 1974: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1970:
1971: l_debug_info := 'Get Next Line Number for the PREPAY Line from the '||
1972: 'STANDARD Invoice';
1973: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1974: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1975: END IF;
1976:
1977: --Contract Payments: Added the IF condition
1978: IF (P_calling_mode = 'PREPAYMENT APPLICATION') THEN

Line 1997: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

1993: l_debug_info := 'Call Ap_Prepay_Pkg.Insert_Prepay_Line. p_prepay_invoice_id: '||
1994: p_prepay_invoice_id|| ',p_prepay_line_num: '||p_prepay_line_num||',p_invoice_id: '||
1995: p_invoice_id||',l_prepay_ln_number: '||l_prepay_ln_number;
1996: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1997: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
1998: END IF;
1999:
2000: l_dummy := AP_PREPAY_PKG.INSERT_PREPAY_LINE(
2001: p_prepay_invoice_id,

Line 2034: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2030: -- Call eTax service.
2031: -- ===========================================================
2032: l_debug_info := 'Call to calculate tax';
2033: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2034: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2035: END IF;
2036:
2037: IF NOT (ap_etax_pkg.calling_etax(
2038: p_invoice_id => p_invoice_id,

Line 2059: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2055: -- ===========================================================
2056: l_debug_info := 'Get inclusive tax amount from the PREPAY line '||
2057: 'after tax calculation';
2058: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2059: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2060: END IF;
2061:
2062: BEGIN
2063: SELECT NVL(included_tax_amount, 0)

Line 2092: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2088: /*Bug 14213367: Added parameters to the debug info*/
2089: l_debug_info := 'Reduce inclusive tax amount if any from PREPAY '||
2090: 'line amount. l_inclusive_tax_amount: '||l_inclusive_tax_amount;
2091: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2092: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2093: END IF;
2094:
2095: IF (l_inclusive_tax_amount <> 0) THEN
2096: --Bugfix: 5577707 added the ABS for l_inclusive_tax_amount.

Line 2109: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2105: /*Bug 14213367:Start */
2106: l_debug_info := 'l_apply_amount_no_tax_incl: '||l_apply_amount_no_tax_incl||
2107: ',l_ppay_ln_amt_remaining_no_tax: '||l_ppay_ln_amt_remaining_no_tax;
2108: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2109: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2110: END IF;
2111: /*Bug 14213367:end */
2112:
2113: END IF; /* P_calling_mode = 'PREPAYMENT APPLICATION' */

Line 2141: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2137:
2138: l_debug_info := 'Get maximum distribution line number from '||
2139: 'the standard invoice';
2140: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2141: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2142: END IF;
2143:
2144: --From the Prepay line
2145: IF (P_calling_mode = 'PREPAYMENT APPLICATION') THEN

Line 2166: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2162: END IF;
2163: /*Bug 14213367:Start */
2164: l_debug_info := 'P_calling_mode: '||P_calling_mode|| ',l_max_dist_number: '||l_max_dist_number;
2165: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2166: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2167: END IF;
2168: /*Bug 14213367:end */
2169:
2170: -- ===========================================================

Line 2179: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2175:
2176: l_debug_info := 'Populate the PL/SQL table with the basic '||
2177: 'distribution information p_calling_mode'||p_calling_mode;
2178: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2179: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2180: END IF;
2181:
2182: -- IF p_prepay_dist_info is not empty then assign it to
2183: -- l_prepay_dist_info, otherwise populate l_prepay_dist_info

Line 2190: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2186:
2187: IF (p_prorate_flag = 'Y') THEN -- p_prepay_dist_info is Empty
2188: l_debug_info := 'Open Cursor C_PPay_Dist_Info';
2189: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2190: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2191: END IF;
2192: OPEN C_PPAY_DIST_INFO(
2193: p_prepay_invoice_id,
2194: p_prepay_line_num);

Line 2294: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2290: ELSIF (P_calling_mode = 'RECOUPMENT') THEN
2291:
2292: l_debug_info := 'Open Cursor C_PPay_Dist_Info_Recoup l_ppay_invoice_id, l_ppay_line_number'||p_prepay_invoice_id||','||p_prepay_line_num;
2293: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2294: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2295: END IF;
2296:
2297: OPEN C_PPAY_DIST_INFO_RECOUP(
2298: p_prepay_invoice_id,

Line 2306: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2302:
2303: LOOP
2304: l_debug_info := 'Fetch C_PPay_Dist_Info_Recoup into local variables';
2305: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2306: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2307: END IF;
2308:
2309: FETCH C_PPAY_DIST_INFO_RECOUP INTO
2310: l_prepay_dist_info(l_loop_counter).PREPAY_DISTRIBUTION_ID,

Line 2333: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2329:
2330: IF (l_apply_amount = l_ppay_ln_amount_remaining) THEN
2331: l_debug_info := 'Test1';
2332: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2333: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2334: END IF;
2335:
2336: l_prepay_dist_info(l_loop_counter).PREPAY_APPLY_AMOUNT :=
2337: l_prepay_dist_info(l_loop_counter).PPAY_AMOUNT_REMAINING;

Line 2344: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2340: ELSE
2341:
2342: l_debug_info := 'Test2';
2343: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2344: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2345: END IF;
2346:
2347: --Contract Payments:
2348: --Proration for both exclusive and inclusive tax cases, since

Line 2420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2416:
2417: l_debug_info := 'Populate the PL/SQL table with the PREPAY Distributions '||
2418: 'information';
2419: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2420: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2421: END IF;
2422:
2423:
2424: FOR l_loop_variable IN nvl(l_prepay_dist_info.FIRST,0)..nvl(l_prepay_dist_info.LAST,0) LOOP

Line 2430: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2426: -- Get the Next Distribution Line Number
2427:
2428: l_debug_info := 'Populate other generic info for the prepay dists';
2429: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2430: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2431: END IF;
2432:
2433: l_prepay_dist_info(l_loop_variable).PREPAY_DIST_LINE_NUMBER :=
2434: l_max_dist_number + l_dist_line_counter;

Line 2454: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2450: l_std_inv_xdate||' for '||l_std_inv_xrate_type||' exchange rate type' ;
2451:
2452:
2453: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2454: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2455: END IF;
2456: /*Bug 14592297:End*/
2457: l_prepay_dist_info(l_loop_variable).PREPAY_BASE_AMOUNT :=
2458: GL_Currency_API.Convert_Amount(

Line 2468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2464: /*Bug 14592297:Start*/
2465:
2466: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
2467: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2468: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2469: END IF;
2470: /*Bug 14592297:End*/
2471: END IF;
2472:

Line 2487: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2483: l_ppay_inv_curr_code||' to '||l_base_currency_code|| ' on '||
2484: l_ppay_inv_xdate||' for '||l_ppay_inv_xrate_type||' exchange rate type' ;
2485:
2486: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2487: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2488: END IF;
2489: /*Bug 14592297:End*/
2490:
2491: l_prepay_dist_info(l_loop_variable).PREPAY_BASE_AMT_PPAY_XRATE :=

Line 2502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2498: /*Bug 14592297:Start*/
2499:
2500: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
2501: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2502: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2503: END IF;
2504: /*Bug 14592297:End*/
2505: END IF;
2506:

Line 2521: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2517: l_ppay_pay_curr_code||' to '||l_base_currency_code|| ' on '||
2518: l_ppay_pay_xdate||' for '||l_ppay_pay_xrate_type||' exchange rate type' ;
2519:
2520: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2521: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2522: END IF;
2523: /*Bug 14592297:End*/
2524: l_prepay_dist_info(l_loop_variable).PREPAY_BASE_AMT_PPAY_PAY_XRATE :=
2525: GL_Currency_API.Convert_Amount(

Line 2535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2531: /*Bug 14592297:Start*/
2532:
2533: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
2534: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2536: END IF;
2537: /*Bug 14592297:End*/
2538:
2539: END IF;

Line 2549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2545: IF (l_apply_amount = l_ppay_ln_amount_remaining) THEN
2546:
2547: l_debug_info := 'Get Quantity_Invoiced, PA_Quantity, Stat_Amount';
2548: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2549: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2550: END IF;
2551:
2552: SELECT NVL( ABS(SUM(quantity_invoiced)), 0 ),
2553: NVL( ABS(SUM(stat_amount)), 0 ),

Line 2629: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2625: l_debug_info := 'l_prepay_dist_info(l_loop_variable).PREPAY_QUANTITY_INVOICED: '||
2626: l_prepay_dist_info(l_loop_variable).PREPAY_QUANTITY_INVOICED||
2627: ',l_prepay_dist_info(l_loop_variable).PREPAY_STAT_AMOUNT: '||l_prepay_dist_info(l_loop_variable).PREPAY_STAT_AMOUNT;
2628: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2629: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2630: END IF;
2631: l_debug_info := 'l_prepay_dist_info(l_loop_variable).PREPAY_PA_QUANTITY: '||
2632: l_prepay_dist_info(l_loop_variable).PREPAY_PA_QUANTITY;
2633: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 2634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2630: END IF;
2631: l_debug_info := 'l_prepay_dist_info(l_loop_variable).PREPAY_PA_QUANTITY: '||
2632: l_prepay_dist_info(l_loop_variable).PREPAY_PA_QUANTITY;
2633: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2634: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2635: END IF;
2636: /*Bug 14213367:end */
2637:
2638: END LOOP;

Line 2656: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2652: /*Bug 14213367:Added input parameter to the debug info */
2653: l_debug_info := 'Call Ap_Prepay_Pkg.Insert_Prepay_Dists. l_invoice_line_number: '||
2654: l_invoice_line_number;
2655: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2656: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2657: END IF;
2658:
2659: l_dummy := AP_PREPAY_PKG.INSERT_PREPAY_DISTS(
2660: p_prepay_invoice_id,

Line 2690: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2686: IF (P_calling_mode = 'PREPAYMENT APPLICATION') THEN
2687:
2688: l_debug_info := 'Distribute tax';
2689: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2690: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2691: END IF;
2692:
2693: IF NOT (ap_etax_pkg.calling_etax(
2694: p_invoice_id => p_invoice_id,

Line 2716: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2712: -- inclusive case.
2713: -- ===========================================================
2714: l_debug_info := 'Update parent PREPAY line amount if required';
2715: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2716: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2717: END IF;
2718:
2719: IF (l_inclusive_tax_amount <> 0) THEN
2720: -- We need to update the PREPAY line amount only in the case the

Line 2728: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2724:
2725: l_debug_info := 'Get prepay tax difference amount from non-rec '||
2726: 'tax distributions';
2727: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2728: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2729: END IF;
2730:
2731: BEGIN
2732:

Line 2767: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2763: l_std_inv_curr_code||' to '||l_base_currency_code|| ' on '||
2764: l_std_inv_xdate||' for '||l_std_inv_xrate_type||' exchange rate type' ;
2765:
2766: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2767: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2768: END IF;
2769: /*Bug 14592297:End*/
2770: l_prepay_ln_base_amount := GL_Currency_API.Convert_Amount(
2771: l_std_inv_curr_code,

Line 2780: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2776: /*Bug 14592297:Start*/
2777:
2778: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
2779: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2780: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2781: END IF;
2782: /*Bug 14592297:End*/
2783:
2784: END IF;

Line 2790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2786:
2787: l_debug_info := 'Update PREPAY line amount and base amount '||
2788: 'including the prepay tax difference';
2789: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2790: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2791: END IF;
2792:
2793: BEGIN
2794: UPDATE ap_invoice_lines_all ail

Line 2821: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2817: -- ===========================================================
2818:
2819: l_debug_info := 'Update Prepayment distributions';
2820: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2821: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2822: END IF;
2823:
2824: l_dummy := AP_PREPAY_PKG.Update_Prepayment(
2825: l_prepay_dist_info,

Line 2838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2834:
2835: IF l_dummy = FALSE THEN
2836: l_debug_info := 'Unlock Line';
2837: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2838: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2839: END IF;
2840:
2841: l_result:= AP_PREPAY_UTILS_PKG.Unlock_Line(
2842: p_prepay_invoice_id,

Line 2855: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2851: -- ===========================================================
2852:
2853: l_debug_info := 'Update_PO_Receipt_Info';
2854: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2855: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2856: END IF;
2857:
2858:
2859: l_dummy := AP_PREPAY_PKG.Update_PO_Receipt_Info(

Line 2909: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2905: /*Bug 14213367:Added input parameter to the debug info */
2906: l_debug_info := 'Get Apply Amount in Payment Currency. l_prepay_excl_tax_amt: '||
2907: l_prepay_excl_tax_amt|| ',l_apply_amount: '||l_apply_amount;
2908: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2909: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2910: END IF;
2911: l_debug_info := 'l_ppay_inv_curr_code: '||l_ppay_inv_curr_code||',l_ppay_inv_pay_curr_code: '||
2912: l_ppay_inv_pay_curr_code;
2913: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 2914: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2910: END IF;
2911: l_debug_info := 'l_ppay_inv_curr_code: '||l_ppay_inv_curr_code||',l_ppay_inv_pay_curr_code: '||
2912: l_ppay_inv_pay_curr_code;
2913: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2914: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2915: END IF;
2916:
2917: IF (l_ppay_inv_curr_code <> l_ppay_inv_pay_curr_code) THEN
2918: /*Bug 14592297:Start*/

Line 2923: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);

2919: l_debug_info:='There might not be a defined Currency Exchange Rate available for '||l_ppay_inv_curr_code||' to '||
2920: l_ppay_inv_pay_curr_code|| ' on '||l_ppay_inv_pay_cross_rate_date||' for '||
2921: l_ppay_inv_pay_cross_rate_type||' exchange rate type' ;
2922: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2923: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);
2924: END IF;
2925: /*Bug 14592297:End*/
2926:
2927: l_ppay_apply_amt_in_pay_curr :=

Line 2938: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);

2934: /*Bug 14592297:Start*/
2935: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
2936:
2937: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2938: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);
2939: END IF;
2940: /*Bug 14592297:End*/
2941: ELSE
2942: l_ppay_apply_amt_in_pay_curr := l_apply_amount;

Line 2954: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2950: IF NVL(p_prepay_included, 'N') = 'N' THEN
2951: --Contract Payments: No modification needed for this api.
2952: l_debug_info := 'Update Payment Schedules';
2953: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2954: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2955: END IF;
2956:
2957: l_dummy := AP_PREPAY_PKG.Update_Payment_Schedule(
2958: p_invoice_id,

Line 2987: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

2983: -- ===========================================================
2984:
2985: -- l_debug_info := 'Calculate/Update Rounding Amounts';
2986: -- IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
2987: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
2988: --END IF;
2989: -- ===========================================================
2990: -- Step 21.1: Identify if this application is the final
2991: -- application for this prepayment invoice line. If so then

Line 3007: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3003:
3004: --IF l_base_currency_code <> l_std_inv_curr_code THEN
3005: --l_debug_info := 'Update Rounding Amounts';
3006: --IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3007: -- FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3008: --END IF;
3009:
3010: -- l_dummy := AP_PREPAY_PKG.Update_Rounding_Amounts(
3011: -- p_prepay_invoice_id,

Line 3033: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3029: -- ===========================================================
3030:
3031: l_debug_info := 'Unlock the Locked Line';
3032: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3033: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3034: END IF;
3035:
3036: l_result := AP_PREPAY_UTILS_PKG.Unlock_Line(
3037: p_prepay_invoice_id,

Line 3046: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Apply_Prepay_Line(-)');

3042: -- Hence we can return TRUE to the calling module.
3043: -- ===========================================================
3044:
3045: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3046: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Apply_Prepay_Line(-)');
3047: END IF;
3048:
3049: RETURN (TRUE);
3050:

Line 3131: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Line(+)');

3127: l_current_calling_sequence := 'Insert_Prepay_Line<-'
3128: ||p_calling_sequence;
3129:
3130: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3131: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Line(+)');
3132: END IF;
3133:
3134: l_debug_info := 'Insert PREPAY Line';
3135: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 3136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3132: END IF;
3133:
3134: l_debug_info := 'Insert PREPAY Line';
3135: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3136: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3137: END IF;
3138:
3139: INSERT INTO AP_Invoice_Lines(
3140: INVOICE_ID,

Line 3456: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Line(-)');

3452: WHERE invoice_id = p_prepay_invoice_id
3453: AND line_number = p_prepay_line_num;
3454:
3455: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3456: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Line(-)');
3457: END IF;
3458:
3459: RETURN (TRUE);
3460: EXCEPTION

Line 3530: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Dists(+)');

3526: l_api_name := 'Insert_Prepay_Dists';
3527: l_calling_program := p_calling_sequence;
3528:
3529: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
3530: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Dists(+)');
3531: END IF;
3532:
3533: l_debug_info := 'Insert PREPAY Distributions';
3534: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 3535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3531: END IF;
3532:
3533: l_debug_info := 'Insert PREPAY Distributions';
3534: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3535: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3536: END IF;
3537:
3538: --Bug5224996 Added following select stmt
3539: SELECT invoice_includes_prepay_flag

Line 3554: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3550:
3551:
3552: l_debug_info := 'Derive the charge_applicable_to_dist_id and related_id for Tax Dists and Tax variances';
3553: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3554: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3555: END IF;
3556:
3557: --Note: Need to derive it only after the 'PREPAY' distributions have been created as
3558: --part of the loop, hence ordered the cursor C_PPAY_DIST_INFO_RECOUP by line_type_lookup_code

Line 3567: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3563: IF (p_prepay_dist_info(l_loop_counter).line_type_lookup_code IN ('REC_TAX','NONREC_TAX')) THEN
3564:
3565: l_debug_info := 'Derive Charge_Applicable_to_Dist_Id for the Tax distributions';
3566: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3567: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3568: END IF;
3569:
3570: SELECT invoice_distribution_id
3571: INTO p_prepay_dist_info(l_loop_counter).charge_applicable_to_dist_id

Line 3582: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3578: ELSIF (p_prepay_dist_info(l_loop_counter).line_type_lookup_code IN ('TERV','TIPV','TRV')) THEN
3579:
3580: l_debug_info := 'Derive Related_Id for the Tax Variance distributions';
3581: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3582: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3583: END IF;
3584:
3585:
3586: SELECT invoice_distribution_id

Line 3600: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3596: END IF;
3597:
3598: l_debug_info := 'Insert into ap_invoice_distributions';
3599: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3600: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3601: END IF;
3602:
3603: l_debug_info := 'Prepay Distribution Id is '||p_prepay_dist_info(l_loop_counter).prepay_distribution_id;
3604:

Line 3606: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3602:
3603: l_debug_info := 'Prepay Distribution Id is '||p_prepay_dist_info(l_loop_counter).prepay_distribution_id;
3604:
3605: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3606: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3607: END IF;
3608:
3609:
3610:

Line 4006: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

4002: -- ===============================================================
4003:
4004: l_debug_info := 'Update global context code';
4005: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4006: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4007: END IF;
4008:
4009: l_global_attr_category := p_prepay_dist_info(l_loop_counter).PREPAY_global_attr_category;
4010:

Line 4023: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Dists(-)');

4019: -- END IF;
4020: END LOOP;
4021:
4022: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4023: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Insert_Prepay_Dists(-)');
4024: END IF;
4025:
4026: RETURN (TRUE);
4027: EXCEPTION

Line 4084: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Prepayment(+)');

4080: BEGIN
4081:
4082: l_api_name := 'Update_Prepayment';
4083: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4084: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Prepayment(+)');
4085: END IF;
4086:
4087: l_current_calling_sequence := 'update_prepayment<-' ||p_calling_sequence;
4088:

Line 4091: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

4087: l_current_calling_sequence := 'update_prepayment<-' ||p_calling_sequence;
4088:
4089: l_debug_info := 'Update Prepayment Info';
4090: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4091: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4092: END IF;
4093:
4094: -- 7338249
4095: UPDATE ap_invoice_distributions_all dp

Line 4114: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Prepayment(-)');

4110: AND arl.chrg_invoice_line_number = dp.invoice_line_number));
4111:
4112:
4113: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4114: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Prepayment(-)');
4115: END IF;
4116:
4117: RETURN (TRUE);
4118:

Line 4229: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_PO_Receipt_Info(+)');

4225:
4226: l_current_calling_sequence := 'update_po_receipt_info<-'||
4227: p_calling_sequence;
4228: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4229: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_PO_Receipt_Info(+)');
4230: END IF;
4231:
4232: l_debug_info := 'Create l_po_ap_dist_rec object';
4233: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 4234: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

4230: END IF;
4231:
4232: l_debug_info := 'Create l_po_ap_dist_rec object';
4233: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4234: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4235: END IF;
4236:
4237: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
4238:

Line 4241: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

4237: l_po_ap_dist_rec := PO_AP_DIST_REC_TYPE.create_object();
4238:
4239: l_debug_info := 'Create l_po_ap_line_loc_rec object and populate the data';
4240: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4241: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4242: END IF;
4243:
4244:
4245: IF p_appl_type = 'APPLICATION' THEN

Line 4380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

4376: END IF; /* IF p_appl_type = ... */
4377:
4378: l_debug_info := 'Call the PO_AP_INVOICE_MATCH_GRP to update the Po Distributions and Po Line Locations';
4379: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4380: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
4381: END IF;
4382:
4383: PO_AP_INVOICE_MATCH_GRP.Update_Document_Ap_Values(
4384: P_Api_Version => 1.0,

Line 4391: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_PO_Receipt_Info(-)');

4387: X_Return_Status => l_return_status,
4388: X_Msg_Data => l_msg_data);
4389:
4390: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4391: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_PO_Receipt_Info(-)');
4392: END IF;
4393:
4394: RETURN (TRUE);
4395: EXCEPTION

Line 4484: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Payment_Schedule(+)');

4480: l_current_calling_sequence := 'update_payment_schedule<-'||
4481: p_calling_sequence;
4482:
4483: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4484: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Payment_Schedule(+)');
4485: END IF;
4486:
4487: IF (p_invoice_id IS NULL OR
4488: p_apply_amount IS NULL OR

Line 4503: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4499: l_apply_amount_remaining := p_apply_amount;
4500:
4501: l_debug_info := 'Open Payment Schedule Cursor';
4502: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4503: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4504: END IF;
4505:
4506: OPEN SCHEDULES;
4507:

Line 4512: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4508: LOOP
4509:
4510: l_debug_info := 'Fetch Schedules into local variables';
4511: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4512: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4513: END IF;
4514:
4515: FETCH SCHEDULES INTO
4516: l_cursor_payment_num, l_cursor_amount,l_total_gross_amount; --Bug10012482:Added l_total_gross_amount

Line 4523: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4519: --Bug 8891266 Changes Start here
4520: IF (p_calling_mode = 'RECOUPMENT') THEN
4521: l_debug_info := 'Update ap_payment_schedule for the recoupments';
4522: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4523: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4524: END IF;
4525:
4526: UPDATE ap_payment_schedules
4527: SET amount_remaining = amount_remaining -

Line 4574: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4570: +---------------------------------------------------------------------------*/
4571:
4572: l_debug_info := 'Update ap_payment_schedule for the invoice, case 1';
4573: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4574: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4575: END IF;
4576:
4577: UPDATE ap_payment_schedules
4578: SET amount_remaining = (amount_remaining -

Line 4611: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4607: *----------------------------------------------------------------------*/
4608:
4609: l_debug_info := 'Update ap_payment_schedule for the invoice, case 2';
4610: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4611: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4612: END IF;
4613:
4614: UPDATE ap_payment_schedules
4615: SET amount_remaining = DECODE(p_appl_type,

Line 4642: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4638: END LOOP;
4639:
4640: l_debug_info := 'Close Schedule Cursor';
4641: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4642: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4643: END IF;
4644: CLOSE SCHEDULES;
4645:
4646: --------------------------------------------------------------------------

Line 4653: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

4649: -- to reflect the prepayment application
4650: --------------------------------------------------------------------------
4651: l_debug_info := 'Update ap_invoices to reflect the amount applied p_apply_amount, p_invoice_id '||p_apply_amount||','||p_invoice_id;
4652: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4653: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
4654: END IF;
4655: --Bug8414549 : Update the amount_paid column for Recoupment
4656: --IF nvl(p_calling_mode,'X') <> 'RECOUPMENT' THEN
4657:

Line 4686: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Payment_Schedule(-)');

4682:
4683: --END IF;
4684:
4685: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
4686: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'AP_PREPAY_PKG.Update_Payment_Schedule(-)');
4687: END IF;
4688:
4689: RETURN (TRUE);
4690:

Line 4849: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);

4845: l_debug_info:='There might not be a defined Currency Exchange Rate available for '||l_ppay_inv_curr_code||' to '||
4846: l_ppay_inv_pay_curr_code|| ' on '||l_ppay_inv_pay_cross_rate_date||' for '||
4847: l_ppay_inv_pay_cross_rate_type||' exchange rate type' ;
4848: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4849: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);
4850: END IF;
4851: /*Bug 14592297:End*/
4852:
4853: l_ppay_apply_amt_in_pay_curr :=

Line 4864: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);

4860: /*Bug 14592297:Start*/
4861: l_debug_info:='Successfull call returned from GL_CURRENCY_API';
4862:
4863: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
4864: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME,l_debug_info);
4865: END IF;
4866: /*Bug 14592297:End*/
4867:
4868: ELSE