DBA Data[Home] [Help]

APPS.LNS_FEE_ENGINE dependencies on FND_MSG_PUB

Line 179: FND_MSG_PUB.initialize;

175: SAVEPOINT processDisbursementFees;
176:
177: -- Initialize message list IF p_init_msg_list is set to TRUE.
178: IF FND_API.to_Boolean(p_init_msg_list) THEN
179: FND_MSG_PUB.initialize;
180: END IF;
181:
182: -- Initialize API return status to SUCCESS
183: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 290: FND_MSG_PUB.ADD;

286: ,x_msg_count => l_msg_count
287: ,x_msg_data => l_msg_data);
288: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
289: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_SCHEDULE_READ_ERROR');
290: FND_MSG_PUB.ADD;
291: RAISE FND_API.G_EXC_ERROR;
292: end if;
293: end if;
294:

Line 346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

342: -- ---------------------------------------------------------------------
343: IF FND_API.to_Boolean(p_commit) THEN
344: COMMIT WORK;
345: END IF;
346: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
347:
348: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
349:
350: EXCEPTION

Line 355: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

351: WHEN FND_API.G_EXC_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: x_msg_count := l_msg_count;
354: x_msg_data := l_msg_data;
355: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
356: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
357: ROLLBACK TO processDisbursementFees;
358:
359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 363: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

359: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
360: x_return_status := FND_API.G_RET_STS_ERROR;
361: x_msg_count := l_msg_count;
362: x_msg_data := l_msg_data;
363: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
364: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
365: ROLLBACK TO processDisbursementFees;
366:
367: WHEN OTHERS THEN

Line 371: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

367: WHEN OTHERS THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: x_msg_count := l_msg_count;
370: x_msg_data := l_msg_data;
371: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
372: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
373: ROLLBACK TO processDisbursementFees;
374:
375: end processDisbursementFees;

Line 460: FND_MSG_PUB.initialize;

456: SAVEPOINT reprocessFees;
457:
458: -- Initialize message list IF p_init_msg_list is set to TRUE.
459: IF FND_API.to_Boolean(p_init_msg_list) THEN
460: FND_MSG_PUB.initialize;
461: END IF;
462:
463: -- Initialize API return status to SUCCESS
464: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 518: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

514:
515: -- ---------------------------------------------------------------------
516: -- End of API body
517: -- ---------------------------------------------------------------------
518: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
519:
520: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
521:
522: EXCEPTION

Line 527: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

523: WHEN FND_API.G_EXC_ERROR THEN
524: x_return_status := FND_API.G_RET_STS_ERROR;
525: x_msg_count := l_msg_count;
526: x_msg_data := l_msg_data;
527: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
528: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
529: ROLLBACK TO reprocessFees;
530:
531: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 535: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

531: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
532: x_return_status := FND_API.G_RET_STS_ERROR;
533: x_msg_count := l_msg_count;
534: x_msg_data := l_msg_data;
535: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
536: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
537: ROLLBACK TO reprocessFees;
538:
539: WHEN OTHERS THEN

Line 543: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

539: WHEN OTHERS THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: x_msg_count := l_msg_count;
542: x_msg_data := l_msg_data;
543: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
544: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
545: ROLLBACK TO reprocessFees;
546:
547: end reprocessFees;

Line 1304: --FND_MSG_PUB.ADD;

1300: exception
1301: when no_data_found then
1302: l_fee := -1;
1303: --FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_CALC_ERROR');
1304: --FND_MSG_PUB.ADD;
1305: --RAISE FND_API.G_EXC_ERROR;
1306: end;
1307: end if;
1308:

Line 1448: FND_MSG_PUB.initialize;

1444: SAVEPOINT getFees;
1445:
1446: -- Initialize message list IF p_init_msg_list is set to TRUE.
1447: IF FND_API.to_Boolean(p_init_msg_list) THEN
1448: FND_MSG_PUB.initialize;
1449: END IF;
1450:
1451: -- Initialize API return status to SUCCESS
1452: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1536: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1532:
1533: -- ---------------------------------------------------------------------
1534: -- End of API body
1535: -- ---------------------------------------------------------------------
1536: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1537:
1538: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
1539:
1540: EXCEPTION

Line 1545: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1541: WHEN FND_API.G_EXC_ERROR THEN
1542: x_return_status := FND_API.G_RET_STS_ERROR;
1543: x_msg_count := l_msg_count;
1544: x_msg_data := l_msg_data;
1545: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1546: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1547: ROLLBACK TO getFees;
1548:
1549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1553: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1549: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1550: x_return_status := FND_API.G_RET_STS_ERROR;
1551: x_msg_count := l_msg_count;
1552: x_msg_data := l_msg_data;
1553: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1554: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1555: ROLLBACK TO getFees;
1556:
1557: WHEN OTHERS THEN

Line 1561: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1557: WHEN OTHERS THEN
1558: x_return_status := FND_API.G_RET_STS_ERROR;
1559: x_msg_count := l_msg_count;
1560: x_msg_data := l_msg_data;
1561: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1562: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1563: ROLLBACK TO getFees;
1564: end getFeeSchedule;
1565:

Line 1644: FND_MSG_PUB.initialize;

1640: SAVEPOINT getFeeDetails;
1641:
1642: -- Initialize message list IF p_init_msg_list is set to TRUE.
1643: IF FND_API.to_Boolean(p_init_msg_list) THEN
1644: FND_MSG_PUB.initialize;
1645: END IF;
1646:
1647: -- Initialize API return status to SUCCESS
1648: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1743: FND_MSG_PUB.ADD;

1739: ,x_msg_data => l_msg_data);
1740:
1741: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1742: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_SCHEDULE_READ_ERROR');
1743: FND_MSG_PUB.ADD;
1744: RAISE FND_API.G_EXC_ERROR;
1745: end if;
1746:
1747: iFeeCount := l_fees_tbl.count;

Line 1872: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1868:
1869: -- ---------------------------------------------------------------------
1870: -- End of API body
1871: -- ---------------------------------------------------------------------
1872: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1873:
1874: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
1875:
1876: EXCEPTION

Line 1881: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1877: WHEN FND_API.G_EXC_ERROR THEN
1878: x_return_status := FND_API.G_RET_STS_ERROR;
1879: x_msg_count := l_msg_count;
1880: x_msg_data := l_msg_data;
1881: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1882: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1883: ROLLBACK TO getFeeDetails;
1884:
1885: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1889: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1885: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1886: x_return_status := FND_API.G_RET_STS_ERROR;
1887: x_msg_count := l_msg_count;
1888: x_msg_data := l_msg_data;
1889: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1890: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1891: ROLLBACK TO getFeeDetails;
1892:
1893: WHEN OTHERS THEN

Line 1897: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

1893: WHEN OTHERS THEN
1894: x_return_status := FND_API.G_RET_STS_ERROR;
1895: x_msg_count := l_msg_count;
1896: x_msg_data := l_msg_data;
1897: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
1898: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
1899: ROLLBACK TO getFeeDetails;
1900:
1901: end getFeeDetails;

Line 1979: FND_MSG_PUB.initialize;

1975: SAVEPOINT updateFeeSchedule;
1976:
1977: -- Initialize message list IF p_init_msg_list is set to TRUE.
1978: IF FND_API.to_Boolean(p_init_msg_list) THEN
1979: FND_MSG_PUB.initialize;
1980: END IF;
1981:
1982: -- Initialize API return status to SUCCESS
1983: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2007: FND_MSG_PUB.ADD;

2003: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2004: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2005: FND_MESSAGE.SET_TOKEN('PARAMETER', 'LOAN_ID');
2006: FND_MESSAGE.SET_TOKEN('VALUE', p_loan_ID);
2007: FND_MSG_PUB.ADD;
2008: RAISE FND_API.G_EXC_ERROR;
2009: end if;
2010:
2011: open c_phase(p_loan_id);

Line 2025: FND_MSG_PUB.ADD;

2021:
2022: -- first validation as per june : do not add fees far into the future
2023: if p_fees_tbl(k).fee_installment > l_loan_details.LAST_INSTALLMENT_BILLED + 1 then
2024: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR3');
2025: FND_MSG_PUB.ADD;
2026: RAISE FND_API.G_EXC_ERROR;
2027: end if;
2028:
2029:

Line 2032: FND_MSG_PUB.ADD;

2028:
2029:
2030: if p_fees_tbl(k).fee_installment < l_loan_details.LAST_INSTALLMENT_BILLED then
2031: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR1');
2032: FND_MSG_PUB.ADD;
2033: RAISE FND_API.G_EXC_ERROR;
2034: end if;
2035:
2036: if p_fees_tbl(k).fee_installment > l_loan_details.NUMBER_INSTALLMENTS then

Line 2038: FND_MSG_PUB.ADD;

2034: end if;
2035:
2036: if p_fees_tbl(k).fee_installment > l_loan_details.NUMBER_INSTALLMENTS then
2037: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR2');
2038: FND_MSG_PUB.ADD;
2039: RAISE FND_API.G_EXC_ERROR;
2040: end if;
2041:
2042: if p_fees_tbl(k).FEE_AMOUNT is null or p_fees_tbl(k).FEE_AMOUNT < 0 then

Line 2044: FND_MSG_PUB.ADD;

2040: end if;
2041:
2042: if p_fees_tbl(k).FEE_AMOUNT is null or p_fees_tbl(k).FEE_AMOUNT < 0 then
2043: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_FEE_AMOUNT');
2044: FND_MSG_PUB.ADD;
2045: RAISE FND_API.G_EXC_ERROR;
2046: end if;
2047:
2048: if p_fees_tbl(k).FEE_ID is not null then

Line 2062: FND_MSG_PUB.ADD;

2058: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2059: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2060: FND_MESSAGE.SET_TOKEN('PARAMETER', 'FEE_ID');
2061: FND_MESSAGE.SET_TOKEN('VALUE', p_fees_tbl(k).FEE_ID);
2062: FND_MSG_PUB.ADD;
2063: RAISE FND_API.G_EXC_ERROR;
2064: end if;
2065:
2066: end if;

Line 2104: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2100: IF FND_API.to_Boolean(p_commit) THEN
2101: COMMIT WORK;
2102: END IF;
2103:
2104: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2105:
2106: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
2107:
2108: EXCEPTION

Line 2113: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2109: WHEN FND_API.G_EXC_ERROR THEN
2110: x_return_status := FND_API.G_RET_STS_ERROR;
2111: x_msg_count := l_msg_count;
2112: x_msg_data := l_msg_data;
2113: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2114: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2115: ROLLBACK TO updateFeeSchedule;
2116:
2117: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2121: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2117: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2118: x_return_status := FND_API.G_RET_STS_ERROR;
2119: x_msg_count := l_msg_count;
2120: x_msg_data := l_msg_data;
2121: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2122: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2123: ROLLBACK TO updateFeeSchedule;
2124:
2125: WHEN OTHERS THEN

Line 2129: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2125: WHEN OTHERS THEN
2126: x_return_status := FND_API.G_RET_STS_ERROR;
2127: x_msg_count := l_msg_count;
2128: x_msg_data := l_msg_data;
2129: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2130: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2131: ROLLBACK TO updateFeeSchedule;
2132:
2133: end updateFeeSchedule;

Line 2194: FND_MSG_PUB.initialize;

2190: SAVEPOINT writeFeeSchedule;
2191:
2192: -- Initialize message list IF p_init_msg_list is set to TRUE.
2193: IF FND_API.to_Boolean(p_init_msg_list) THEN
2194: FND_MSG_PUB.initialize;
2195: END IF;
2196:
2197: -- Initialize API return status to SUCCESS
2198: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2217: FND_MSG_PUB.ADD;

2213: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2214: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2215: FND_MESSAGE.SET_TOKEN('PARAMETER', 'LOAN_ID');
2216: FND_MESSAGE.SET_TOKEN('VALUE', p_loan_ID);
2217: FND_MSG_PUB.ADD;
2218: RAISE FND_API.G_EXC_ERROR;
2219: end if;
2220:
2221: open c_phase(p_loan_id);

Line 2237: FND_MSG_PUB.ADD;

2233: if p_fees_tbl(k).disb_header_id is null then
2234: -- first validation as per june : do not add fees far into the future
2235: if p_fees_tbl(k).fee_installment > l_loan_details.LAST_INSTALLMENT_BILLED + 1 then
2236: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR3');
2237: FND_MSG_PUB.ADD;
2238: RAISE FND_API.G_EXC_ERROR;
2239: end if;
2240:
2241: if p_fees_tbl(k).fee_installment < l_loan_details.LAST_INSTALLMENT_BILLED then

Line 2243: FND_MSG_PUB.ADD;

2239: end if;
2240:
2241: if p_fees_tbl(k).fee_installment < l_loan_details.LAST_INSTALLMENT_BILLED then
2242: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR1');
2243: FND_MSG_PUB.ADD;
2244: RAISE FND_API.G_EXC_ERROR;
2245: end if;
2246:
2247: if p_fees_tbl(k).fee_installment > l_loan_details.NUMBER_INSTALLMENTS then

Line 2249: FND_MSG_PUB.ADD;

2245: end if;
2246:
2247: if p_fees_tbl(k).fee_installment > l_loan_details.NUMBER_INSTALLMENTS then
2248: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_INSTALLMENT_ERROR2');
2249: FND_MSG_PUB.ADD;
2250: RAISE FND_API.G_EXC_ERROR;
2251: end if;
2252:
2253: if p_fees_tbl(k).FEE_AMOUNT is null or p_fees_tbl(k).FEE_AMOUNT <= 0 then

Line 2255: FND_MSG_PUB.ADD;

2251: end if;
2252:
2253: if p_fees_tbl(k).FEE_AMOUNT is null or p_fees_tbl(k).FEE_AMOUNT <= 0 then
2254: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_FEE_AMOUNT');
2255: FND_MSG_PUB.ADD;
2256: RAISE FND_API.G_EXC_ERROR;
2257: end if;
2258:
2259: if p_fees_tbl(k).FEE_ID is not null then

Line 2273: FND_MSG_PUB.ADD;

2269: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2270: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2271: FND_MESSAGE.SET_TOKEN('PARAMETER', 'FEE_ID');
2272: FND_MESSAGE.SET_TOKEN('VALUE', p_fees_tbl(k).FEE_ID);
2273: FND_MSG_PUB.ADD;
2274: RAISE FND_API.G_EXC_ERROR;
2275: end if;
2276:
2277: end if;

Line 2318: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2314: IF FND_API.to_Boolean(p_commit) THEN
2315: COMMIT WORK;
2316: END IF;
2317:
2318: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2319:
2320: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
2321:
2322: EXCEPTION

Line 2327: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2323: WHEN FND_API.G_EXC_ERROR THEN
2324: x_return_status := FND_API.G_RET_STS_ERROR;
2325: x_msg_count := l_msg_count;
2326: x_msg_data := l_msg_data;
2327: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2328: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2329: ROLLBACK TO writeFeeSchedule;
2330:
2331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2335: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2331: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2332: x_return_status := FND_API.G_RET_STS_ERROR;
2333: x_msg_count := l_msg_count;
2334: x_msg_data := l_msg_data;
2335: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2336: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2337: ROLLBACK TO writeFeeSchedule;
2338:
2339: WHEN OTHERS THEN

Line 2343: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2339: WHEN OTHERS THEN
2340: x_return_status := FND_API.G_RET_STS_ERROR;
2341: x_msg_count := l_msg_count;
2342: x_msg_data := l_msg_data;
2343: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2344: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2345: ROLLBACK TO writeFeeSchedule;
2346:
2347: end writeFeeSchedule;

Line 2432: FND_MSG_PUB.initialize;

2428: SAVEPOINT processFees;
2429:
2430: -- Initialize message list IF p_init_msg_list is set to TRUE.
2431: IF FND_API.to_Boolean(p_init_msg_list) THEN
2432: FND_MSG_PUB.initialize;
2433: END IF;
2434:
2435: -- Initialize API return status to SUCCESS
2436: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2466: FND_MSG_PUB.ADD;

2462: l_fee_type := p_fee_structures(i).fee_type;
2463:
2464: if p_fee_structures(i).fee_category is null AND p_fee_structures(i).fee_type is null then
2465: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_CAT_TYPE_MISSING');
2466: FND_MSG_PUB.ADD;
2467: RAISE FND_API.G_EXC_ERROR;
2468: end if;
2469:
2470: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - fee category ' || l_fee_category);

Line 2489: FND_MSG_PUB.ADD;

2485: ,x_msg_count => l_msg_count
2486: ,x_msg_data => l_msg_data);
2487: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2488: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_CALCULATION_FAILURE');
2489: FND_MSG_PUB.ADD;
2490: RAISE FND_API.G_EXC_ERROR;
2491: end if;
2492:
2493: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - calculated fees count is ' || l_fee_calc_tbl.count);

Line 2503: FND_MSG_PUB.ADD;

2499: ,x_msg_count => l_msg_count
2500: ,x_msg_data => l_msg_data);
2501: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2502: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_WRITE_FAILURE');
2503: FND_MSG_PUB.ADD;
2504: RAISE FND_API.G_EXC_ERROR;
2505: end if;
2506: end loop;
2507: end if;

Line 2521: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2517: IF FND_API.to_Boolean(p_commit) THEN
2518: COMMIT WORK;
2519: END IF;
2520:
2521: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2522:
2523: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
2524:
2525: EXCEPTION

Line 2530: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2526: WHEN FND_API.G_EXC_ERROR THEN
2527: x_return_status := FND_API.G_RET_STS_ERROR;
2528: x_msg_count := l_msg_count;
2529: x_msg_data := l_msg_data;
2530: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2531: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2532: ROLLBACK TO processFees;
2533:
2534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2538: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2535: x_return_status := FND_API.G_RET_STS_ERROR;
2536: x_msg_count := l_msg_count;
2537: x_msg_data := l_msg_data;
2538: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2539: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2540: ROLLBACK TO processFees;
2541:
2542: WHEN OTHERS THEN

Line 2546: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2542: WHEN OTHERS THEN
2543: x_return_status := FND_API.G_RET_STS_ERROR;
2544: x_msg_count := l_msg_count;
2545: x_msg_data := l_msg_data;
2546: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2547: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2548: ROLLBACK TO processFees;
2549:
2550: end processFees;

Line 2614: FND_MSG_PUB.initialize;

2610: SAVEPOINT waiveFee;
2611:
2612: -- Initialize message list IF p_init_msg_list is set to TRUE.
2613: IF FND_API.to_Boolean(p_init_msg_list) THEN
2614: FND_MSG_PUB.initialize;
2615: END IF;
2616:
2617: -- Initialize API return status to SUCCESS
2618: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2636: FND_MSG_PUB.ADD;

2632: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2633: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2634: FND_MESSAGE.SET_TOKEN('PARAMETER', 'LOAN_ID');
2635: FND_MESSAGE.SET_TOKEN('VALUE', p_loan_ID);
2636: FND_MSG_PUB.ADD;
2637: RAISE FND_API.G_EXC_ERROR;
2638: end if;
2639:
2640: lns_utility_pub.validate_any_id(p_api_version => 1.0

Line 2653: FND_MSG_PUB.ADD;

2649: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2650: FND_MESSAGE.SET_NAME('LNS', 'LNS_INVALID_VALUE');
2651: FND_MESSAGE.SET_TOKEN('PARAMETER', 'FEE_SCHEDULE_ID');
2652: FND_MESSAGE.SET_TOKEN('VALUE', p_fee_schedule_ID);
2653: FND_MSG_PUB.ADD;
2654: RAISE FND_API.G_EXC_ERROR;
2655: end if;
2656:
2657: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - amount to waive ' || p_waive_amount);

Line 2661: FND_MSG_PUB.ADD;

2657: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - amount to waive ' || p_waive_amount);
2658:
2659: if p_waive_amount is null then
2660: FND_MESSAGE.SET_NAME('LNS', 'LNS_WAIVE_AMOUNT_INVALID');
2661: FND_MSG_PUB.ADD;
2662: RAISE FND_API.G_EXC_ERROR;
2663: else
2664: open c_fee_waive_amount(p_fee_schedule_id);
2665: fetch c_fee_waive_amount into l_fee_amount_remaining, l_waived_amount;

Line 2671: FND_MSG_PUB.ADD;

2667:
2668: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - amount remain ' || l_fee_amount_remaining);
2669: if p_waive_amount > l_fee_amount_remaining or p_waive_amount < 0 then
2670: FND_MESSAGE.SET_NAME('LNS', 'LNS_WAIVE_AMOUNT_INVALID');
2671: FND_MSG_PUB.ADD;
2672: RAISE FND_API.G_EXC_ERROR;
2673: end if;
2674:
2675: -- fee is valid and waive amount is valid. update the fee schedule

Line 2704: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2700: IF FND_API.to_Boolean(p_commit) THEN
2701: COMMIT WORK;
2702: END IF;
2703:
2704: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2705:
2706: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
2707:
2708: EXCEPTION

Line 2713: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2709: WHEN FND_API.G_EXC_ERROR THEN
2710: x_return_status := FND_API.G_RET_STS_ERROR;
2711: x_msg_count := l_msg_count;
2712: x_msg_data := l_msg_data;
2713: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2714: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2715: ROLLBACK TO waiveFee;
2716:
2717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2721: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2718: x_return_status := FND_API.G_RET_STS_ERROR;
2719: x_msg_count := l_msg_count;
2720: x_msg_data := l_msg_data;
2721: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2722: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2723: ROLLBACK TO waiveFee;
2724:
2725: WHEN OTHERS THEN

Line 2729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

2725: WHEN OTHERS THEN
2726: x_return_status := FND_API.G_RET_STS_ERROR;
2727: x_msg_count := l_msg_count;
2728: x_msg_data := l_msg_data;
2729: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2730: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
2731: ROLLBACK TO waiveFee;
2732:
2733: end waiveFee;

Line 2873: FND_MSG_PUB.initialize;

2869: SAVEPOINT processLateFees;
2870:
2871: -- Initialize message list IF p_init_msg_list is set to TRUE.
2872: IF FND_API.to_Boolean(p_init_msg_list) THEN
2873: FND_MSG_PUB.initialize;
2874: END IF;
2875:
2876: -- Initialize API return status to SUCCESS
2877: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2974: FND_MSG_PUB.ADD;

2970: ,x_msg_count => l_msg_count
2971: ,x_msg_data => l_msg_data);
2972: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2973: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_CALCULATION_FAILURE');
2974: FND_MSG_PUB.ADD;
2975: RAISE FND_API.G_EXC_ERROR;
2976: end if;
2977:
2978: -- assign this so we can write the fee

Line 2996: FND_MSG_PUB.ADD;

2992: ,x_msg_count => l_msg_count
2993: ,x_msg_data => l_msg_data);
2994: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2995: FND_MESSAGE.SET_NAME('LNS', 'LNS_FEE_WRITE_FAILURE');
2996: FND_MSG_PUB.ADD;
2997: RAISE FND_API.G_EXC_ERROR;
2998: end if;
2999:
3000: end if; -- l_last_installment > 1

Line 3009: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

3005: IF FND_API.to_Boolean(p_commit) THEN
3006: COMMIT WORK;
3007: END IF;
3008:
3009: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3010:
3011: logMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME, l_api_name || ' - END');
3012:
3013: EXCEPTION

Line 3018: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

3014: WHEN FND_API.G_EXC_ERROR THEN
3015: x_return_status := FND_API.G_RET_STS_ERROR;
3016: x_msg_count := l_msg_count;
3017: x_msg_data := l_msg_data;
3018: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3019: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
3020: ROLLBACK TO processLateFees;
3021:
3022: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3026: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

3022: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3023: x_return_status := FND_API.G_RET_STS_ERROR;
3024: x_msg_count := l_msg_count;
3025: x_msg_data := l_msg_data;
3026: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3027: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
3028: ROLLBACK TO processLateFees;
3029:
3030: WHEN OTHERS THEN

Line 3034: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);

3030: WHEN OTHERS THEN
3031: x_return_status := FND_API.G_RET_STS_ERROR;
3032: x_msg_count := l_msg_count;
3033: x_msg_data := l_msg_data;
3034: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
3035: logMessage(FND_LOG.LEVEL_ERROR, G_PKG_NAME, sqlerrm);
3036: ROLLBACK TO processLateFees;
3037:
3038:

Line 3152: my_message := FND_MSG_PUB.Get(p_msg_index => l_index, p_encoded => 'F');

3148: ERRBUF := l_msg_data;
3149: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR IN FAP: ' || sqlerrm || ERRBUF);
3150: if l_msg_count > 0 then
3151: FOR l_index IN 1..l_msg_count LOOP
3152: my_message := FND_MSG_PUB.Get(p_msg_index => l_index, p_encoded => 'F');
3153: FND_FILE.PUT_LINE(FND_FILE.LOG, my_message);
3154: END LOOP;
3155: end if;
3156:

Line 3163: my_message := FND_MSG_PUB.Get(p_msg_index => l_index, p_encoded => 'F');

3159: ERRBUF := l_msg_data;
3160: FND_FILE.PUT_LINE(FND_FILE.LOG, 'ERROR IN FAP: ' || sqlerrm || ERRBUF);
3161: if l_msg_count > 0 then
3162: FOR l_index IN 1..l_msg_count LOOP
3163: my_message := FND_MSG_PUB.Get(p_msg_index => l_index, p_encoded => 'F');
3164: FND_FILE.PUT_LINE(FND_FILE.LOG, my_message);
3165: END LOOP;
3166: end if;
3167: