DBA Data[Home] [Help]

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.57.12020000.7 2012/12/31 03:14:59 wywong 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 382: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);

378: IF p_primary_accounting_method = 'Accrual' THEN
379: l_debug_info := 'Insert Mass if Accounting Method Is Accrual';
380: --
381: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
382: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
383: END IF;
384: --
385:
386: --This insert statement below was added for Bug 7284987 / 7392117

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

877:
878: l_debug_info := 'Insert Mass if Accounting Method Is Cash';
879: --
880: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
881: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
882: END IF;
883: --
884:
885: --This insert statement below was added for Bug 7284987 / 7392117

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

1463: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
1464: END IF;
1465: --
1466: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1467: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
1468: END IF;
1469: --
1470: APP_EXCEPTION.RAISE_EXCEPTION;
1471: --

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

1557: --
1558: l_debug_info := 'Insert into FA_MASS_ADDITIONS_GT';
1559: --
1560: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1561: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1562: END IF;
1563: --
1564: --Bug 12703009: commented the below FND logging as it will be no more in use.
1565: /*IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN

Line 1564: --Bug 12703009: commented the below FND logging as it will be no more in use.

1560: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1561: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1562: END IF;
1563: --
1564: --Bug 12703009: commented the below FND logging as it will be no more in use.
1565: /*IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1566: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '
1567: ||TO_CHAR(l_invoice_pay_id));
1568: END IF;*/

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

1562: END IF;
1563: --
1564: --Bug 12703009: commented the below FND logging as it will be no more in use.
1565: /*IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1566: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Invoice Payment_Id: '
1567: ||TO_CHAR(l_invoice_pay_id));
1568: END IF;*/
1569: --
1570: INSERT INTO FA_MASS_ADDITIONS_GT(

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

1894: AND APIP.invoice_id = 125104; */
1895: l_count := SQL%ROWCOUNT;
1896: --
1897: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1898: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Inserted: '
1899: ||TO_CHAR(l_count));
1900: END IF;
1901: --
1902:

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

1919: FND_MESSAGE.SET_TOKEN('DEBUG_INFO', l_debug_info );
1920: END IF;
1921: --
1922: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1923: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
1924: END IF;
1925: --
1926: APP_EXCEPTION.RAISE_EXCEPTION;
1927: --

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

1970: l_current_calling_sequence := P_calling_sequence||'->'||
1971: 'AP_MASS_ADDITIONS_CREATE_PKG.MASS_ADDITIONS_CREATE';
1972: --
1973: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1974: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'Parameters: '
1975: ||' Book Type Code: '|| P_bt_code
1976: ||', Accounting Date: '||P_acctg_date);
1977: END IF;
1978: --

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

1986: --
1987: l_debug_info := 'Get FA Book ledger id based on FA API';
1988: --
1989: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
1990: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
1991: END IF;
1992: --
1993: /* l_ledger_id :=
1994: FA_MASSADD_CREATE_PKG.Get_Ledger_Id (

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

2003: --
2004: l_debug_info := 'Populate Global Temp Table for All Related Ledgers ';
2005: --
2006: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2007: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2008: END IF;
2009: --
2010: Populate_Mass_Ledger_Gt(
2011: l_ledger_id,

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

2013: --
2014: l_debug_info := 'Populate Global Temp Table for Accounting Class Code ';
2015: --
2016: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2017: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2018: END IF;
2019: --
2020: Populate_Mass_Acct_Code_Gt(
2021: l_ledger_id,

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

2023: --
2024: l_debug_info := 'Derive Accounting Method from Gl Sets Of Books ';
2025: --
2026: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2027: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2028: END IF;
2029: --
2030: l_primary_accounting_method := Derive_Acct_Method(
2031: l_ledger_id,

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

2031: l_ledger_id,
2032: l_current_calling_sequence);
2033: --
2034: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2035: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2036: 'Primary Acct Method: '||l_primary_accounting_method||
2037: ' , Ledger_Id: '||TO_CHAR(l_ledger_id));
2038: END IF;
2039: --

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

2037: ' , Ledger_Id: '||TO_CHAR(l_ledger_id));
2038: END IF;
2039: --
2040: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2041: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2042: 'Request Id: '||TO_CHAR(l_request_id)||
2043: ' , User Id: '||TO_CHAR(l_user_id)||
2044: ' , Login Id: '||TO_CHAR(l_login_id));
2045: END IF;

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

2044: ' , Login Id: '||TO_CHAR(l_login_id));
2045: END IF;
2046: --
2047: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2048: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2049: 'Updating AID records to N which EIB sends to FA ');
2050: END IF;
2051: --
2052: UPDATE /*+ INDEX(apid ap_invoice_distributions_n6) */ -- Bug 8305129

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

2078: --
2079: l_count := SQL%ROWCOUNT;
2080: --
2081: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2082: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'No of Records Updated: ' ||TO_CHAR(l_count));
2083: END IF;
2084: --
2085: -- bug 7215835: add start : update self assessed table also
2086: UPDATE ap_self_assessed_tax_dist_all APID

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

2114: --
2115: l_debug_info := ' Calling Insert_Mass';
2116: --
2117: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2118: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2119: END IF;
2120: --
2121: Insert_Mass(
2122: l_acctg_date,

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

2130: --
2131: l_total := nvl(l_count,0) + l_total;
2132: --
2133: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2134: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2135: 'Total Non-Discount Records Inserted into FA Temp Table: '
2136: ||TO_CHAR(l_total));
2137: END IF;
2138: --

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

2138: --
2139: l_debug_info := 'Calling Project API for Inserting PA Adjustments';
2140: --
2141: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2142: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2143: END IF;
2144: --
2145:
2146: PA_MASS_ADDITIONS_CREATE_PKG.Insert_Mass(

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

2164: --
2165: l_total1 := l_total + nvl(l_count1, 0);
2166: --
2167: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2168: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2169: 'Total Non-Discount Records Inserted into FA Temp Table '
2170: ||'including PA Adjustment Lines: '
2171: ||TO_CHAR(l_total1));
2172: END IF;

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

2183: END LOOP;
2184: END IF;
2185: --
2186: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2187: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
2188: END IF;
2189: --
2190: END IF;
2191:

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

2192: --
2193: l_debug_info := ' Calling Insert_Discount';
2194: --
2195: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2196: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2197: END IF;
2198: --
2199: Insert_Discount(
2200: l_acctg_date,

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

2207: --
2208: l_total := nvl(l_count,0);
2209: --
2210: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2211: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2212: 'Total Discount Records Inserted into FA Temp Table: '
2213: ||TO_CHAR(l_total));
2214: END IF;
2215: --

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

2232: p_primary_accounting_method => l_primary_accounting_method,
2233: p_calling_sequence => 'Oracle Payables Mass Addition Process');
2234: --
2235: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2236: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2237: END IF;
2238: --
2239: IF l_pa_return_status = FND_API.G_RET_STS_SUCCESS THEN
2240: --

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

2240: --
2241: l_total := l_total + nvl(l_count1,0);
2242: --
2243: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2244: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2245: 'Total Discount Records Inserted into FA Temp Table '
2246: ||'including PA Adjustment Lines: '
2247: ||TO_CHAR(l_total));
2248: END IF;

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

2258: END LOOP;
2259: END IF;
2260: --
2261: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2262: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
2263: END IF;
2264: --
2265: END IF;
2266:

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

2267:
2268: l_total1 := l_total1 + l_total;
2269:
2270: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2271: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2272: 'Grand Total of Records Inserted into FA Temp Table: '
2273: ||TO_CHAR(l_total1));
2274: END IF;
2275: --

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

2275: --
2276: l_debug_info := 'Calling FA API for inserting Discount Assets ';
2277: --
2278: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2279: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2280: END IF;
2281: --
2282: -- Some Discount record is inserted
2283: IF l_total1 > 0 THEN -- bug 9001504

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

2297: -- bug 9001504
2298: l_debug_info := 'Update Invoice Distributions which are transferred to Asset ';
2299: --
2300: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2301: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2302: END IF;
2303: --
2304:
2305: /*10368924: Extra debug message to debug duplicate rows in FA GT table*/

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

2328: EXCEPTION
2329: WHEN OTHERS THEN
2330: l_debug_info := 'Error '||SQLERRM||' in Debug for dup rows in FA for dist id '||i.invoice_distribution_id;
2331:
2332: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2333:
2334: END;
2335:
2336: l_debug_info := 'Debug for duplicate rows in FA table for inv id: '||L_debug_inv_id;

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

2334: END;
2335:
2336: l_debug_info := 'Debug for duplicate rows in FA table for inv id: '||L_debug_inv_id;
2337:
2338: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2339: end loop;
2340:
2341: END IF;
2342: /*10368924 end*/

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

2377:
2378: l_debug_info := 'Update Invoice Distributions which are not transferred to Asset ';
2379: --
2380: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2381: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2382: END IF;
2383: --
2384: UPDATE ap_invoice_distributions_all APID
2385: SET APID.assets_addition_flag = 'N',

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

2417:
2418: l_debug_info := 'Update Invoice Payments which are transferred to Asset ';
2419: --
2420: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2421: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2422: END IF;
2423: --
2424: UPDATE ap_invoice_payments_all APIP
2425: SET APIP.assets_addition_flag = 'Y'

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

2442: --
2443: l_count := SQL%ROWCOUNT;
2444: --
2445: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2446: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2447: 'No of Invoice Payment Record Updated '
2448: ||'after successfully transferred to Asset: '
2449: ||TO_CHAR(l_count));
2450: END IF;

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

2470: --
2471: l_count := SQL%ROWCOUNT;
2472: --
2473: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2474: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,
2475: 'No of Invoice Payment Record Updated '
2476: ||'after failed to transfer to Asset: '
2477: ||TO_CHAR(l_count));
2478: END IF;

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

2480: l_debug_info := 'Update PA Adjustments which are processed
2481: or rejected by FA API ';
2482: --
2483: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2484: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2485: END IF;
2486: --
2487: PA_MASS_ADDITIONS_CREATE_PKG.Update_Mass(
2488: p_api_version => 1.0,

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

2505: END LOOP;
2506: END IF;
2507: --
2508: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2509: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'PA_API_ERROR');
2510: END IF;
2511: --
2512: END IF;
2513:

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

2515:
2516: l_debug_info := 'FA API returned with error';
2517: --
2518: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2519: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,l_debug_info);
2520: END IF;
2521: --
2522: RAISE FA_API_ERROR;
2523:

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

2540: FND_MESSAGE.SET_TOKEN('PARAMETERS','P_acctg_date: '||P_acctg_date
2541: ||',P_bt_code: '||P_bt_code);
2542: --
2543: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2544: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,'FA_API_ERROR');
2545: END IF;
2546: --
2547: WHEN OTHERS THEN
2548: IF (SQLCODE <> -20001 ) THEN

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

2554: ||',P_bt_code: '||P_bt_code);
2555: END IF;
2556: --
2557: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL) THEN
2558: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_api_name,SQLERRM);
2559: END IF;
2560: --
2561: errbuf := FND_MESSAGE.GET;
2562: retcode := 2;