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_MASS_ADDITIONS_CREATE_PKG dependencies on FND_LOG

Line 5: -- FND_LOG related variables to enable logging for this package

1: PACKAGE BODY Ap_Mass_Additions_Create_Pkg AS
2: /* $Header: apmassab.pls 120.22.12010000.12 2009/02/22 03:27:35 gkarampu ship $ */
3:
4: -- Package global
5: -- FND_LOG related variables to enable logging for this package
6: --
7: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AP_MASS_ADDITIONS_CREATE_PKG';
8: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
9: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;

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

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

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

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

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

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

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

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

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

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

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

17: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
18: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
19: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
20: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
21: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
23: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'AP.PLSQL.AP_MASS_ADDITIONS_CREATE_PKG.';
24:
25: -- Procedure to poulate the Global Temp Table for Mass Addition process.

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

18: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
19: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
20: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
21: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
22: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
23: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'AP.PLSQL.AP_MASS_ADDITIONS_CREATE_PKG.';
24:
25: -- Procedure to poulate the Global Temp Table for Mass Addition process.
26: -- Will populate GT for ledger_id (including ALC)

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

40: --
41: l_debug_info := 'Populate AP_ALC_LEDGER_GT';
42: --
43: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
44: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
45: END IF;
46: --
47: INSERT INTO AP_ALC_LEDGER_GT (
48: source_ledger_id,

Line 78: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, SQLERRM);

74: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
75: END IF;
76: --
77: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
78: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, SQLERRM);
79: END IF;
80: --
81: APP_EXCEPTION.RAISE_EXCEPTION;
82: --

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

108: --
109: l_debug_info := 'Get Accounting Class Code from SLA';
110: --
111: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
112: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
113: END IF;
114: --
115: SELECT XACA.accounting_class_code
116: BULK COLLECT

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

132: --
133: l_debug_info := 'Populate AP_ACCT_CLASS_CODE_GT';
134: --
135: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
136: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
137: END IF;
138: --
139: IF acct_class_code_rec.l_acct_class_code_t.COUNT > 0 THEN
140: --

Line 180: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, SQLERRM);

176: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
177: END IF;
178: --
179: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
180: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name, SQLERRM);
181: END IF;
182: --
183: APP_EXCEPTION.RAISE_EXCEPTION;
184: --

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

205: --
206: l_debug_info := 'Get Accounting Method from Gl_Set_Of_Books';
207: --
208: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
209: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
210: END IF;
211: --
212: SELECT DECODE(NVL(sla_ledger_cash_basis_flag, 'N'), 'Y',
213: 'Cash', 'Accrual')

Line 231: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);

227: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
228: END IF;
229: --
230: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
231: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
232: END IF;
233: --
234: APP_EXCEPTION.RAISE_EXCEPTION;
235: --

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

265: IF p_primary_accounting_method = 'Accrual' THEN
266: l_debug_info := 'Insert Mass if Accounting Method Is Accrual';
267: --
268: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
269: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
270: END IF;
271: --
272:
273: --This insert statement below was added for Bug 7284987 / 7392117

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

665:
666: l_debug_info := 'Insert Mass if Accounting Method Is Cash';
667: --
668: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
669: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
670: END IF;
671: --
672:
673: --This insert statement below was added for Bug 7284987 / 7392117

Line 1096: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);

1092: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
1093: END IF;
1094: --
1095: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1096: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
1097: END IF;
1098: --
1099: APP_EXCEPTION.RAISE_EXCEPTION;
1100: --

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

1187: --
1188: l_debug_info := 'Insert into FA_MASS_ADDITIONS_GT';
1189: --
1190: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1191: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1192: END IF;
1193: --
1194: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1195: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '

Line 1195: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '

1191: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1192: END IF;
1193: --
1194: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1195: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '
1196: ||TO_CHAR(l_invoice_pay_id));
1197: END IF;
1198: --
1199: INSERT INTO FA_MASS_ADDITIONS_GT(

Line 1486: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Inserted: '

1482: AND APIP.invoice_id = 125104; */
1483: l_count := SQL%ROWCOUNT;
1484: --
1485: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1486: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Inserted: '
1487: ||TO_CHAR(l_count));
1488: END IF;
1489: --
1490: l_dis_total := l_count + l_dis_total;

Line 1509: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);

1505: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
1506: END IF;
1507: --
1508: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1509: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
1510: END IF;
1511: --
1512: APP_EXCEPTION.RAISE_EXCEPTION;
1513: --

Line 1560: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Parameters: '

1556: l_current_calling_sequence := P_calling_sequence||'->'||
1557: 'AP_MASS_ADDITIONS_CREATE_PKG.MASS_ADDITIONS_CREATE';
1558: --
1559: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1560: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Parameters: '
1561: ||' Book Type Code: '|| P_bt_code
1562: ||', Accounting Date: '||P_acctg_date);
1563: END IF;
1564: --

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

1572: --
1573: l_debug_info := 'Get FA Book ledger id based on FA API';
1574: --
1575: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1576: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1577: END IF;
1578: --
1579: /* l_ledger_id :=
1580: FA_MASSADD_CREATE_PKG.Get_Ledger_Id (

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

1589: --
1590: l_debug_info := 'Populate Global Temp Table for All Related Ledgers ';
1591: --
1592: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1593: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1594: END IF;
1595: --
1596: Populate_Mass_Ledger_Gt(
1597: l_ledger_id,

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

1599: --
1600: l_debug_info := 'Populate Global Temp Table for Accounting Class Code ';
1601: --
1602: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1603: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1604: END IF;
1605: --
1606: Populate_Mass_Acct_Code_Gt(
1607: l_ledger_id,

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

1609: --
1610: l_debug_info := 'Derive Accounting Method from Gl Sets Of Books ';
1611: --
1612: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1613: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1614: END IF;
1615: --
1616: l_primary_accounting_method := Derive_Acct_Method(
1617: l_ledger_id,

Line 1621: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1617: l_ledger_id,
1618: l_current_calling_sequence);
1619: --
1620: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1621: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1622: 'Primary Acct Method: '||l_primary_accounting_method||
1623: ' , Ledger_Id: '||TO_CHAR(l_ledger_id));
1624: END IF;
1625: --

Line 1627: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1623: ' , Ledger_Id: '||TO_CHAR(l_ledger_id));
1624: END IF;
1625: --
1626: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1627: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1628: 'Request Id: '||TO_CHAR(l_request_id)||
1629: ' , User Id: '||TO_CHAR(l_user_id)||
1630: ' , Login Id: '||TO_CHAR(l_login_id));
1631: END IF;

Line 1634: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1630: ' , Login Id: '||TO_CHAR(l_login_id));
1631: END IF;
1632: --
1633: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1634: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1635: 'Updating AID records to N which EIB sends to FA ');
1636: END IF;
1637: --
1638: UPDATE ap_invoice_distributions_all APID

Line 1664: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Updated: ' ||TO_CHAR(l_count));

1660: --
1661: l_count := SQL%ROWCOUNT;
1662: --
1663: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1664: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Updated: ' ||TO_CHAR(l_count));
1665: END IF;
1666: --
1667: l_count := 0;
1668: --

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

1668: --
1669: l_debug_info := ' Calling Insert_Mass';
1670: --
1671: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1672: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1673: END IF;
1674: --
1675: Insert_Mass(
1676: l_acctg_date,

Line 1688: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1684: --
1685: l_total := nvl(l_count,0) + l_total;
1686: --
1687: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1688: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1689: 'Total Non-Discount Records Inserted into FA Temp Table: '
1690: ||TO_CHAR(l_total));
1691: END IF;
1692: --

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

1692: --
1693: l_debug_info := 'Calling Project API for Inserting PA Adjustments';
1694: --
1695: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1696: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1697: END IF;
1698: --
1699:
1700: PA_MASS_ADDITIONS_CREATE_PKG.Insert_Mass(

Line 1722: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1718: --
1719: l_total1 := l_total + nvl(l_count1, 0);
1720: --
1721: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1722: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1723: 'Total Non-Discount Records Inserted into FA Temp Table '
1724: ||'including PA Adjustment Lines: '
1725: ||TO_CHAR(l_total1));
1726: END IF;

Line 1741: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');

1737: END LOOP;
1738: END IF;
1739: --
1740: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1741: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
1742: END IF;
1743: --
1744: END IF;
1745: --

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

1745: --
1746: l_debug_info := 'Calling FA API for inserting Non-Discount Assets ';
1747: --
1748: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1749: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1750: END IF;
1751: --
1752: -- Mass Record Insreted into GT table
1753: IF l_total1 > 0 THEN

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

1767: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1768: l_debug_info := 'Update Invoice Distributions which are transferred to Asset ';
1769: --
1770: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1771: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1772: END IF;
1773: --
1774: /* BUG 8236268
1775: UPDATE ap_invoice_distributions_all APID

Line 1814: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1810: --
1811: l_count := SQL%ROWCOUNT;
1812: --
1813: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1814: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1815: 'No of Invoice Distribution Record Updated '
1816: ||'after successfully transferred to Asset: '
1817: ||TO_CHAR(l_count));
1818: END IF;

Line 1837: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1833: --
1834: l_count := SQL%ROWCOUNT;
1835: --
1836: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1837: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1838: 'No of Invoice Distribution Record Updated '
1839: ||'after failed to transfer to Asset: '
1840: ||TO_CHAR(l_count));
1841: END IF;

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

1842:
1843: l_debug_info := 'Update PA Adjustments which are processed or rejected by FA API ';
1844: --
1845: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1846: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1847: END IF;
1848: --
1849: PA_MASS_ADDITIONS_CREATE_PKG.Update_Mass(
1850: p_api_version => 1.0,

Line 1871: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');

1867: END LOOP;
1868: END IF;
1869: --
1870: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1871: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
1872: END IF;
1873: --
1874: END IF;
1875:

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

1876: ELSE
1877: l_debug_info := 'FA API returned with error for Non Discount ';
1878: --
1879: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1880: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1881: END IF;
1882: --
1883: RAISE FA_API_ERROR;
1884:

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

1891: --
1892: l_debug_info := ' Calling Insert_Discount';
1893: --
1894: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1895: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1896: END IF;
1897: --
1898: Insert_Discount(
1899: l_acctg_date,

Line 1910: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1906: --
1907: l_total := nvl(l_count,0);
1908: --
1909: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1910: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1911: 'Total Discount Records Inserted into FA Temp Table: '
1912: ||TO_CHAR(l_total));
1913: END IF;
1914: --

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

1931: p_primary_accounting_method => l_primary_accounting_method,
1932: p_calling_sequence => 'Oracle Payables Mass Addition Process');
1933: --
1934: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1935: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1936: END IF;
1937: --
1938: IF l_pa_return_status = FND_API.G_RET_STS_SUCCESS THEN
1939: --

Line 1943: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1939: --
1940: l_total := l_total + nvl(l_count1,0);
1941: --
1942: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1943: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1944: 'Total Discount Records Inserted into FA Temp Table '
1945: ||'including PA Adjustment Lines: '
1946: ||TO_CHAR(l_total1));
1947: END IF;

Line 1961: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');

1957: END LOOP;
1958: END IF;
1959: --
1960: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1961: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
1962: END IF;
1963: --
1964: END IF;
1965:

Line 1970: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

1966:
1967: l_total1 := l_total1 + l_total;
1968:
1969: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1970: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
1971: 'Grand Total of Records Inserted into FA Temp Table: '
1972: ||TO_CHAR(l_total1));
1973: END IF;
1974: --

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

1974: --
1975: l_debug_info := 'Calling FA API for inserting Discount Assets ';
1976: --
1977: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1978: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1979: END IF;
1980: --
1981: -- Some Discount record is inserted
1982: IF l_total > 0 THEN

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

1996:
1997: l_debug_info := 'Update Invoice Payments which are transferred to Asset ';
1998: --
1999: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2000: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2001: END IF;
2002: --
2003: UPDATE ap_invoice_payments_all APIP
2004: SET APIP.assets_addition_flag = 'Y'

Line 2025: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

2021: --
2022: l_count := SQL%ROWCOUNT;
2023: --
2024: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2025: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2026: 'No of Invoice Payment Record Updated '
2027: ||'after successfully transferred to Asset: '
2028: ||TO_CHAR(l_count));
2029: END IF;

Line 2053: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,

2049: --
2050: l_count := SQL%ROWCOUNT;
2051: --
2052: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2053: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2054: 'No of Invoice Payment Record Updated '
2055: ||'after failed to transfer to Asset: '
2056: ||TO_CHAR(l_count));
2057: END IF;

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

2059: l_debug_info := 'Update PA Adjustments Discount which are processed
2060: or rejected by FA API ';
2061: --
2062: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2063: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2064: END IF;
2065: --
2066: PA_MASS_ADDITIONS_CREATE_PKG.Update_Mass(
2067: p_api_version => 1.0,

Line 2088: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');

2084: END LOOP;
2085: END IF;
2086: --
2087: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2088: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
2089: END IF;
2090: --
2091: END IF;
2092:

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

2094:
2095: l_debug_info := 'FA API returned with error for Discount ';
2096: --
2097: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2098: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2099: END IF;
2100: --
2101: RAISE FA_API_ERROR;
2102:

Line 2123: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'FA_API_ERROR');

2119: FND_MESSAGE.SET_TOKEN('PARAMETERS','P_acctg_date: '||P_acctg_date
2120: ||',P_bt_code: '||P_bt_code);
2121: --
2122: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2123: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'FA_API_ERROR');
2124: END IF;
2125: --
2126: WHEN OTHERS THEN
2127: IF (SQLCODE <> -20001 ) THEN

Line 2137: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);

2133: ||',P_bt_code: '||P_bt_code);
2134: END IF;
2135: --
2136: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2137: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
2138: END IF;
2139: --
2140: errbuf := FND_MESSAGE.GET;
2141: retcode := 2;