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.AR_LATE_CHARGE_PKG dependencies on FND_API

Line 167: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );

163: BEGIN
164: FND_MSG_PUB.Reset;
165:
166: FOR I IN 1..FND_MSG_PUB.Count_Msg LOOP
167: l_msg_data := l_msg_data || FND_MSG_PUB.Get(p_encoded => FND_API.G_FALSE );
168: END LOOP;
169: IF (SQLERRM IS NOT NULL) THEN
170: l_msg_data := l_msg_data || SQLERRM;
171: END IF;

Line 806: x_return_status := FND_API.G_RET_STS_SUCCESS;

802: l_stop VARCHAR2(1) := 'N';
803: BEGIN
804: outandlog( message => 'call_invoice_api +');
805:
806: x_return_status := FND_API.G_RET_STS_SUCCESS;
807: --
808: -- Execution of the invoice api
809: --
810: ar_late_charge_pkg.g_invoice_api_called_from_lc := 'Y';

Line 832: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS

828: INSERT_DIST;
829: END IF;
830:
831: --
832: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
833: -- if none standard errors are found
834: --
835: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
836: RAISE fnd_api.g_exc_error;

Line 835: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

831: --
832: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
833: -- if none standard errors are found
834: --
835: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
836: RAISE fnd_api.g_exc_error;
837: END IF;
838:
839: --

Line 836: RAISE fnd_api.g_exc_error;

832: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
833: -- if none standard errors are found
834: --
835: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
836: RAISE fnd_api.g_exc_error;
837: END IF;
838:
839: --
840: -- Error at header

Line 852: x_return_status := fnd_api.g_ret_sts_error;

848: --
849: -- Invoice api caller will return error is functional setup incorrect
850: --
851: IF l_trx_header_id.COUNT > 0 THEN
852: x_return_status := fnd_api.g_ret_sts_error;
853: x_msg_count := 0;
854:
855: FOR i IN 1..l_trx_header_id.COUNT LOOP
856:

Line 914: x_return_status := fnd_api.g_ret_sts_error;

910: --
911: -- Invoice api caller will return error is functional setup incorrect
912: --
913: IF l_trx_line_id.COUNT > 0 THEN
914: x_return_status := fnd_api.g_ret_sts_error;
915:
916: FOR i IN 1..l_trx_line_id.COUNT LOOP
917:
918: IF l_trx_line_id(i) <> l_curr_line_id THEN

Line 996: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

992: iv_line_num := 0;
993: iv_create_flag := 'N';
994:
995:
996: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
997: x_msg_data := 'Error are set back in the ar_interest_headers and lines table,
998: please retrieve from table with the interest_batch_id:'||g_interest_batch_id;
999: END IF;
1000:

Line 1004: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1000:
1001: --
1002: -- All errors at lines - return number of header in error
1003: --
1004: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1005: OPEN c_nb_inv_in_err;
1006: FETCH c_nb_inv_in_err INTO x_msg_count;
1007: CLOSE c_nb_inv_in_err;
1008: END IF;

Line 1014: WHEN FND_API.G_EXC_ERROR THEN

1010:
1011: outandlog( message => 'call_invoice_api -');
1012:
1013: EXCEPTION
1014: WHEN FND_API.G_EXC_ERROR THEN
1015: --
1016: -- Error from invoice api directly out
1017: --
1018: ar_late_charge_pkg.g_invoice_api_called_from_lc := 'N';

Line 1020: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

1016: -- Error from invoice api directly out
1017: --
1018: ar_late_charge_pkg.g_invoice_api_called_from_lc := 'N';
1019:
1020: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1021: p_count => x_msg_count,
1022: p_data => x_msg_data );
1023:
1024: outandlog( message => x_msg_data);

Line 1031: x_return_status := fnd_api.g_ret_sts_unexp_error;

1027:
1028: ar_late_charge_pkg.g_invoice_api_called_from_lc := 'N';
1029:
1030: outandlog( message => 'EXCEPTION OTHERS in call_invoice_api:'||SQLERRM);
1031: x_return_status := fnd_api.g_ret_sts_unexp_error;
1032: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1033: fnd_message.set_token('ERROR',SQLERRM);
1034: fnd_msg_pub.add;
1035:

Line 1037: p_encoded => fnd_api.g_false,

1033: fnd_message.set_token('ERROR',SQLERRM);
1034: fnd_msg_pub.add;
1035:
1036: fnd_msg_pub.count_and_get(
1037: p_encoded => fnd_api.g_false,
1038: p_count => x_msg_count,
1039: p_data => x_msg_data);
1040: outandlog( message => ' EXCEPTION OTHERS call_invoice_api :'||SQLERRM);
1041:

Line 1380: x_return_status := FND_API.G_RET_STS_SUCCESS;

1376:
1377: l_inv_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'INV');
1378: l_dm_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'DM');
1379:
1380: x_return_status := FND_API.G_RET_STS_SUCCESS;
1381: x_msg_count := 0;
1382:
1383: IF p_api_bulk_size IS NULL OR p_api_bulk_size = 0 THEN
1384: l_bulk_size := g_bulk_fetch_rows;

Line 1399: x_return_status := FND_API.G_RET_STS_ERROR;

1395: arp_standard.debug(' Late Charge Batch GL date and calculate interest date is required');
1396: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1397: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
1398: FND_MSG_PUB.ADD;
1399: x_return_status := FND_API.G_RET_STS_ERROR;
1400: END IF;
1401: IF c_gl_date%NOTFOUND OR s_cal_int_date IS NULL THEN
1402: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1403: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 1406: x_return_status := FND_API.G_RET_STS_ERROR;

1402: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1403: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1404: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'calculate_interest_to_date' );
1405: FND_MSG_PUB.ADD;
1406: x_return_status := FND_API.G_RET_STS_ERROR;
1407: END IF;
1408: CLOSE c_gl_date;
1409: ELSE
1410: s_gl_date := p_gl_date;

Line 1416: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1412: END IF;
1413:
1414: g_int_cal_date := s_cal_int_date;
1415:
1416: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1417: RAISE FND_API.G_EXC_ERROR;
1418: END IF;
1419:
1420: iv_batch_source_rec.batch_source_id := p_batch_source_id;

Line 1417: RAISE FND_API.G_EXC_ERROR;

1413:
1414: g_int_cal_date := s_cal_int_date;
1415:
1416: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1417: RAISE FND_API.G_EXC_ERROR;
1418: END IF;
1419:
1420: iv_batch_source_rec.batch_source_id := p_batch_source_id;
1421: iv_batch_source_rec.default_date := s_gl_date;

Line 1469: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1465: call_invoice_api(x_return_status => l_return_status,
1466: x_msg_count => l_msg_count,
1467: x_msg_data => l_msg_data);
1468:
1469: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1470: IF x_msg_count IS NULL THEN
1471: x_msg_count := l_msg_count;
1472: ELSE
1473: x_msg_count := x_msg_count + l_msg_count;

Line 1490: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1486: call_invoice_api(x_return_status => l_return_status,
1487: x_msg_count => l_msg_count,
1488: x_msg_data => l_msg_data);
1489:
1490: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1491:
1492: IF x_msg_count IS NULL THEN
1493: x_msg_count := l_msg_count;
1494: ELSE

Line 1553: WHEN FND_API.G_EXC_ERROR THEN

1549:
1550: outandlog( message => 'create_charge_inv_dm -');
1551:
1552: EXCEPTION
1553: WHEN FND_API.G_EXC_ERROR THEN
1554: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1555: p_count => x_msg_count,
1556: p_data => x_msg_data );
1557:

Line 1554: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

1550: outandlog( message => 'create_charge_inv_dm -');
1551:
1552: EXCEPTION
1553: WHEN FND_API.G_EXC_ERROR THEN
1554: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1555: p_count => x_msg_count,
1556: p_data => x_msg_data );
1557:
1558: outandlog( message => x_msg_data);

Line 1564: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

1560: WHEN OTHERS THEN
1561: FND_MESSAGE.Set_Name('AR','HZ_API_OTHERS_EXCEP');
1562: FND_MESSAGE.Set_Token('ERROR',SQLERRM);
1563: fnd_msg_pub.add;
1564: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1565: p_count => x_msg_count,
1566: p_data => x_msg_data );
1567: outandlog( message => x_msg_data);
1568: END;

Line 1739: x_return_status := FND_API.G_RET_STS_SUCCESS;

1735: arp_standard.debug('g_interest_batch_id:'||g_interest_batch_id);
1736:
1737: l_adj_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'ADJ');
1738:
1739: x_return_status := FND_API.G_RET_STS_SUCCESS;
1740: x_msg_count := 0;
1741: x_num_adj_created := 0;
1742: x_num_adj_error := 0;
1743:

Line 1767: x_return_status := FND_API.G_RET_STS_ERROR;

1763: arp_standard.debug(' Late Charge Batch GL date and calculate interest date is required');
1764: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1765: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
1766: FND_MSG_PUB.ADD;
1767: x_return_status := FND_API.G_RET_STS_ERROR;
1768: END IF;
1769: IF c_gl_date%NOTFOUND OR s_cal_int_date IS NULL THEN
1770: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1771: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 1774: x_return_status := FND_API.G_RET_STS_ERROR;

1770: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1771: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1772: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'calculate_interest_to_date' );
1773: FND_MSG_PUB.ADD;
1774: x_return_status := FND_API.G_RET_STS_ERROR;
1775: END IF;
1776: CLOSE c_gl_date;
1777: ELSE
1778: s_gl_date := p_gl_date;

Line 1782: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1778: s_gl_date := p_gl_date;
1779: s_cal_int_date := p_cal_int_date;
1780: END IF;
1781:
1782: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1783: RAISE FND_API.G_EXC_ERROR;
1784: END IF;
1785:
1786:

Line 1783: RAISE FND_API.G_EXC_ERROR;

1779: s_cal_int_date := p_cal_int_date;
1780: END IF;
1781:
1782: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1783: RAISE FND_API.G_EXC_ERROR;
1784: END IF;
1785:
1786:
1787: OPEN cadj;

Line 1843: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1839: p_new_adjust_number => l_new_adjust_number,
1840: p_new_adjust_id => l_new_adjust_id);
1841:
1842:
1843: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1844:
1845:
1846: l_process_status(i) := 'E';
1847: x_num_adj_error := x_num_adj_error + 1;

Line 1849: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1845:
1846: l_process_status(i) := 'E';
1847: x_num_adj_error := x_num_adj_error + 1;
1848:
1849: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1850: x_return_status := l_return_status;
1851: x_msg_data := l_msg_data;
1852: x_msg_count := l_msg_count;
1853: END IF;

Line 1862: FND_API.G_FALSE);

1858: IF l_msg_count > 1 THEN
1859: ll_msg_data := NULL;
1860: FOR cnt IN 1..l_msg_count LOOP
1861: ll_msg_data := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
1862: FND_API.G_FALSE);
1863: log(' error text : '|| ll_msg_data);
1864: l_msg_data := SUBSTRB(l_msg_data||ll_msg_data,1,2000);
1865: END LOOP;
1866: END IF;

Line 1982: WHEN FND_API.G_EXC_ERROR THEN

1978:
1979: EXCEPTION
1980: WHEN no_adj_to_process THEN
1981: NULL;
1982: WHEN FND_API.G_EXC_ERROR THEN
1983: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1984: fnd_msg_pub.count_and_get(
1985: p_encoded => fnd_api.g_false,
1986: p_count => x_msg_count,

Line 1985: p_encoded => fnd_api.g_false,

1981: NULL;
1982: WHEN FND_API.G_EXC_ERROR THEN
1983: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1984: fnd_msg_pub.count_and_get(
1985: p_encoded => fnd_api.g_false,
1986: p_count => x_msg_count,
1987: p_data => x_msg_data);
1988: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1989:

Line 1988: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);

1984: fnd_msg_pub.count_and_get(
1985: p_encoded => fnd_api.g_false,
1986: p_count => x_msg_count,
1987: p_data => x_msg_data);
1988: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1989:
1990: WHEN OTHERS THEN
1991: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1992: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1992: x_return_status := fnd_api.g_ret_sts_unexp_error;

1988: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1989:
1990: WHEN OTHERS THEN
1991: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1992: x_return_status := fnd_api.g_ret_sts_unexp_error;
1993: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1994: fnd_message.set_token('ERROR',SQLERRM);
1995: fnd_msg_pub.add;
1996:

Line 1998: p_encoded => fnd_api.g_false,

1994: fnd_message.set_token('ERROR',SQLERRM);
1995: fnd_msg_pub.add;
1996:
1997: fnd_msg_pub.count_and_get(
1998: p_encoded => fnd_api.g_false,
1999: p_count => x_msg_count,
2000: p_data => x_msg_data);
2001: outandlog( message => ' EXCEPTION OTHERS create_charge_adj :'||SQLERRM);
2002: END;

Line 2193: x_return_status := fnd_api.g_ret_sts_success;

2189: outandlog( message =>' p_cal_int_date :'||p_cal_int_date);
2190: outandlog( message =>' p_cal_int_date :'||p_cal_int_date);
2191: outandlog( message =>' p_api_bulk_size :'||p_api_bulk_size);
2192:
2193: x_return_status := fnd_api.g_ret_sts_success;
2194: log('1 create_charge_adj...');
2195:
2196: create_charge_adj
2197: (p_batch_id => p_batch_id,

Line 2207: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2203: x_return_status => x_return_status,
2204: x_msg_count => x_msg_count,
2205: x_msg_data => x_msg_data);
2206:
2207: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2208: retcode := 1;
2209: errbuf := 'Some Charge Adjustments have failed,
2210: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2211: log(errbuf);

Line 2214: x_return_status := fnd_api.g_ret_sts_success;

2210: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2211: log(errbuf);
2212: END IF;
2213:
2214: x_return_status := fnd_api.g_ret_sts_success;
2215:
2216: log('2 create_charge_inv_dm...');
2217: create_charge_inv_dm
2218: (p_batch_source_id => p_batch_source_id,

Line 2228: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2224: x_msg_count => x_msg_count,
2225: x_msg_data => x_msg_data);
2226:
2227:
2228: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2229: retcode := 1;
2230: errbuf := 'Some Charge invoice, debit memo have failed
2231: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2232: log(errbuf);

Line 2280: WHEN fnd_Api.g_exc_error THEN

2276: write_exec_report;
2277:
2278: FND_FILE.close;
2279: EXCEPTION
2280: WHEN fnd_Api.g_exc_error THEN
2281: fnd_msg_pub.count_and_get(
2282: p_encoded => fnd_api.g_false,
2283: p_count => x_msg_count,
2284: p_data => x_msg_data);

Line 2282: p_encoded => fnd_api.g_false,

2278: FND_FILE.close;
2279: EXCEPTION
2280: WHEN fnd_Api.g_exc_error THEN
2281: fnd_msg_pub.count_and_get(
2282: p_encoded => fnd_api.g_false,
2283: p_count => x_msg_count,
2284: p_data => x_msg_data);
2285: retcode := 1;
2286: outandlog('Error: ' || FND_MESSAGE.GET);

Line 2523: x_return_status := fnd_api.g_ret_sts_success;

2519:
2520: outandlog( message =>'create_late_charge for the batch:'||p_batch_id );
2521: outandlog( message =>' Starting at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2522:
2523: x_return_status := fnd_api.g_ret_sts_success;
2524:
2525: IF p_batch_source_id IS NULL THEN
2526: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2527: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );

Line 2529: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2525: IF p_batch_source_id IS NULL THEN
2526: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2527: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
2528: FND_MSG_PUB.ADD;
2529: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2530: ELSE
2531: OPEN c_batch_source;
2532: FETCH c_batch_source INTO l_test;
2533: IF c_batch_source%NOTFOUND THEN

Line 2539: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2535: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_source_id' );
2536: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
2537: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_batch_sources');
2538: FND_MSG_PUB.ADD;
2539: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2540: END IF;
2541: CLOSE c_batch_source;
2542: END IF;
2543:

Line 2556: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2552: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_id' );
2553: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_id' );
2554: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches');
2555: FND_MSG_PUB.ADD;
2556: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2557: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
2558: ELSE
2559: IF l_BATCH_STATUS <> 'F' OR l_BATCH_STATUS IS NULL THEN
2560: fnd_message.set_name('AR', 'AR_ONLY_VALUE_ALLOWED');

Line 2565: x_return_status := fnd_api.g_ret_sts_error;

2561: fnd_message.set_token('COLUMN', 'BATCH_STATUS');
2562: fnd_message.set_token('VALUES', 'F');
2563: fnd_msg_pub.add;
2564: retcode := 2;
2565: x_return_status := fnd_api.g_ret_sts_error;
2566: outandlog('Interest Batch batch_status should be Final to import interest_batch_id :'||p_batch_id);
2567: END IF;
2568: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
2569: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 2572: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2568: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
2569: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2570: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'CALCULATE_INTEREST_TO_DATE' );
2571: FND_MSG_PUB.ADD;
2572: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2573: outandlog('Interest Batch calculation interest to date is mandatory interest_batch_id :'||p_batch_id);
2574: END IF;
2575: IF l_GL_DATE IS NULL THEN
2576: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 2579: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2575: IF l_GL_DATE IS NULL THEN
2576: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2577: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
2578: FND_MSG_PUB.ADD;
2579: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2580: outandlog('Interest Batch GL date is mandatory interest_batch_id :'||p_batch_id);
2581: END IF;
2582: IF l_transferred_status = 'S' THEN
2583: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 2587: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2583: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2584: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2585: fnd_msg_pub.add;
2586: retcode := 1;
2587: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2588: outandlog('Interest Batch already successfully transferred interest_batch_id :'||p_batch_id);
2589: ELSIF l_transferred_status = 'E' THEN
2590: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2591: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );

Line 2594: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2590: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2591: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2592: fnd_msg_pub.add;
2593: retcode := 1;
2594: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2595: outandlog('Interest Batch is in Error, please fix it before submitting interest_batch_id :'||p_batch_id);
2596: ELSIF l_transferred_status = 'P' THEN
2597: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2598: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );

Line 2601: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2597: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2598: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2599: fnd_msg_pub.add;
2600: retcode := 1;
2601: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2602: outandlog('Interest Batch is in process, can not resubmit interest_batch_id :'||p_batch_id);
2603: ELSIF l_transferred_status = 'N' THEN
2604: outandlog('Processing the batch interest_batch_id :'||p_batch_id);
2605: ELSIF l_transferred_status IS NOT NULL THEN

Line 2614: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2610: fnd_message.set_token('COLUMN', 'TRANSFERRED_STATUS');
2611: fnd_message.set_token('VALUES', 'P,E,N,S');
2612: fnd_msg_pub.add;
2613: retcode := 2;
2614: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2615: outandlog('Interest Batch transferred flag should be in (NULL,S,E) no other value permitted interest_batch_id :'||p_batch_id);
2616: END IF;
2617: END IF;
2618: CLOSE c;

Line 2620: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2616: END IF;
2617: END IF;
2618: CLOSE c;
2619:
2620: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2621: RAISE fnd_Api.g_exc_unexpected_error;
2622: END IF;
2623:
2624: log('Updating the batch status to Pending to start the process...');

Line 2621: RAISE fnd_Api.g_exc_unexpected_error;

2617: END IF;
2618: CLOSE c;
2619:
2620: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2621: RAISE fnd_Api.g_exc_unexpected_error;
2622: END IF;
2623:
2624: log('Updating the batch status to Pending to start the process...');
2625: AR_INTEREST_BATCHES_PKG.update_batch

Line 2636: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2632: x_return_status => x_return_status,
2633: x_msg_count => x_msg_count,
2634: x_msg_data => x_msg_data);
2635:
2636: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2637: RAISE fnd_Api.g_exc_error;
2638: END IF;
2639:
2640: OPEN c_site;

Line 2637: RAISE fnd_Api.g_exc_error;

2633: x_msg_count => x_msg_count,
2634: x_msg_data => x_msg_data);
2635:
2636: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2637: RAISE fnd_Api.g_exc_error;
2638: END IF;
2639:
2640: OPEN c_site;
2641: FETCH c_site BULK COLLECT INTO l_customer_site_use_id;

Line 2703: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2699: errbuf := 'Some documents are in error in in the batch :'||g_interest_batch_id;
2700: retcode := 1;
2701: END IF;
2702:
2703: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2704: RAISE fnd_Api.g_exc_error;
2705: END IF;
2706:
2707: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );

Line 2704: RAISE fnd_Api.g_exc_error;

2700: retcode := 1;
2701: END IF;
2702:
2703: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2704: RAISE fnd_Api.g_exc_error;
2705: END IF;
2706:
2707: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2708: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );

Line 2710: WHEN fnd_Api.g_exc_unexpected_error THEN

2706:
2707: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2708: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );
2709: EXCEPTION
2710: WHEN fnd_Api.g_exc_unexpected_error THEN
2711: fnd_msg_pub.count_and_get(
2712: p_encoded => fnd_api.g_false,
2713: p_count => x_msg_count,
2714: p_data => x_msg_data);

Line 2712: p_encoded => fnd_api.g_false,

2708: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );
2709: EXCEPTION
2710: WHEN fnd_Api.g_exc_unexpected_error THEN
2711: fnd_msg_pub.count_and_get(
2712: p_encoded => fnd_api.g_false,
2713: p_count => x_msg_count,
2714: p_data => x_msg_data);
2715:
2716: outandlog('Error: ' || FND_MESSAGE.GET);

Line 2721: WHEN fnd_Api.g_exc_error THEN

2717: log('Batch en error ' || x_msg_data);
2718: errbuf := errbuf || logerror || x_msg_data;
2719: outandlog('Aborting concurrent program execution');
2720: FND_FILE.close;
2721: WHEN fnd_Api.g_exc_error THEN
2722: outandlog('Error: ' || FND_MESSAGE.GET);
2723: log('Batch en error ' || x_msg_data);
2724: errbuf := errbuf || logerror || x_msg_data;
2725: outandlog('Aborting concurrent program execution');

Line 2810: x_return_status := fnd_api.g_ret_sts_success;

2806: AND display_flag = 'Y' -- Document generating a Late Charges Document
2807: AND worker_num = p_worker_num);
2808:
2809: retcode := 0;
2810: x_return_status := fnd_api.g_ret_sts_success;
2811: log('1 create_charge_adj...');
2812:
2813: create_charge_adj
2814: (p_batch_id => p_batch_id,

Line 2825: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2821: x_return_status => x_return_status,
2822: x_msg_count => x_msg_count,
2823: x_msg_data => x_msg_data);
2824:
2825: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2826: retcode := 1;
2827: errbuf := SUBSTRB('Some Charge Adjustments have failed,
2828: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2829: log(errbuf);

Line 2832: x_return_status := fnd_api.g_ret_sts_success;

2828: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2829: log(errbuf);
2830: END IF;
2831:
2832: x_return_status := fnd_api.g_ret_sts_success;
2833:
2834: log('2 create_charge_inv_dm...');
2835: create_charge_inv_dm
2836: (p_batch_source_id => p_batch_source_id,

Line 2847: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2843: x_msg_count => x_msg_count,
2844: x_msg_data => x_msg_data);
2845:
2846:
2847: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2848: retcode := 1;
2849: errbuf := SUBSTRB('Some Charge invoice, debit memo have failed
2850: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2851: log(errbuf);

Line 2916: WHEN fnd_Api.g_exc_error THEN

2912:
2913:
2914: FND_FILE.close;
2915: EXCEPTION
2916: WHEN fnd_Api.g_exc_error THEN
2917: fnd_msg_pub.count_and_get(
2918: p_encoded => fnd_api.g_false,
2919: p_count => x_msg_count,
2920: p_data => x_msg_data);

Line 2918: p_encoded => fnd_api.g_false,

2914: FND_FILE.close;
2915: EXCEPTION
2916: WHEN fnd_Api.g_exc_error THEN
2917: fnd_msg_pub.count_and_get(
2918: p_encoded => fnd_api.g_false,
2919: p_count => x_msg_count,
2920: p_data => x_msg_data);
2921: retcode := 1;
2922: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3078: p_encoded => fnd_api.g_false,

3074: log('Calling create_late_charge_per_worker -');
3075: --{Message Stack
3076: IF retcode <> '0' THEN
3077: fnd_msg_pub.count_and_get(
3078: p_encoded => fnd_api.g_false,
3079: p_count => x_msg_count,
3080: p_data => x_msg_data);
3081: IF x_msg_count > 1 THEN
3082: i := 0;

Line 3086: x_msg_data :=FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,FND_API.G_FALSE);

3082: i := 0;
3083: LOOP
3084: IF i < x_msg_count THEN
3085: i := i + 1 ;
3086: x_msg_data :=FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,FND_API.G_FALSE);
3087: log(x_msg_data);
3088: ELSE
3089: EXIT;
3090: END IF;

Line 3129: x_return_status := fnd_api.g_ret_sts_success;

3125: BEGIN
3126: log('prepare_header_for_worker +');
3127: log(' p_interest_batch_id '||p_interest_batch_id);
3128: log(' p_max_workers '||p_max_workers);
3129: x_return_status := fnd_api.g_ret_sts_success;
3130: IF p_interest_batch_id IS NULL THEN
3131: log('p_interest_batch_id required ');
3132: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3133: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'interest_batch_id' );

Line 3135: x_return_status := fnd_Api.G_RET_STS_ERROR;

3131: log('p_interest_batch_id required ');
3132: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3133: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'interest_batch_id' );
3134: FND_MSG_PUB.ADD;
3135: x_return_status := fnd_Api.G_RET_STS_ERROR;
3136: END IF;
3137:
3138: IF NOT(p_max_workers > 0) THEN
3139: log('p_max_worker should be greater than 0');

Line 3142: x_return_status := fnd_Api.G_RET_STS_ERROR;

3138: IF NOT(p_max_workers > 0) THEN
3139: log('p_max_worker should be greater than 0');
3140: FND_MESSAGE.SET_NAME( 'AR', 'AR_NB_WORKER_GREATER_ZERO' );
3141: FND_MSG_PUB.ADD;
3142: x_return_status := fnd_Api.G_RET_STS_ERROR;
3143: END IF;
3144:
3145: IF x_return_status = fnd_api.g_ret_sts_success THEN
3146:

Line 3145: IF x_return_status = fnd_api.g_ret_sts_success THEN

3141: FND_MSG_PUB.ADD;
3142: x_return_status := fnd_Api.G_RET_STS_ERROR;
3143: END IF;
3144:
3145: IF x_return_status = fnd_api.g_ret_sts_success THEN
3146:
3147: log('updating worker_num');
3148: --{HYU CDI this update statement includes Credit Item
3149: UPDATE ar_interest_headers

Line 3168: x_return_status := fnd_Api.G_RET_STS_ERROR;

3164: log('worker_cpt :'|| worker_cpt);
3165: IF NOT (worker_cpt > 0) THEN
3166: FND_MESSAGE.SET_NAME( 'AR', 'AR_NO_HEADER_TO_PROCESS' );
3167: FND_MSG_PUB.ADD;
3168: x_return_status := fnd_Api.G_RET_STS_ERROR;
3169: END IF;
3170: END IF;
3171: log('prepare_header_for_worker -');
3172: EXCEPTION

Line 3176: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3172: EXCEPTION
3173: WHEN OTHERS THEN
3174: outandlog('Error: ' || FND_MESSAGE.GET);
3175: log('SQL Error in prepare_header_for_worker' || SQLERRM);
3176: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3177: END;
3178:
3179:
3180:

Line 3259: x_return_status := fnd_api.g_ret_sts_success;

3255: outandlog( message =>' p_batch_id '|| p_batch_id);
3256:
3257:
3258:
3259: x_return_status := fnd_api.g_ret_sts_success;
3260:
3261: IF p_batch_source_id IS NULL THEN
3262: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3263: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );

Line 3266: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3262: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3263: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
3264: FND_MSG_PUB.ADD;
3265: retcode := 2;
3266: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3267: ELSE
3268: OPEN c_batch_source;
3269: FETCH c_batch_source INTO l_test;
3270: IF c_batch_source%NOTFOUND THEN

Line 3276: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3272: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_source_id' );
3273: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
3274: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_batch_sources');
3275: FND_MSG_PUB.ADD;
3276: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3277: END IF;
3278: CLOSE c_batch_source;
3279: END IF;
3280:

Line 3293: x_return_status := FND_API.G_RET_STS_ERROR;

3289: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_id' );
3290: FND_MESSAGE.SET_TOKEN( 'COLUMN',p_batch_id );
3291: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches' );
3292: FND_MSG_PUB.ADD;
3293: x_return_status := FND_API.G_RET_STS_ERROR;
3294: retcode := 2;
3295: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3296: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
3297: ELSE

Line 3295: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3291: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches' );
3292: FND_MSG_PUB.ADD;
3293: x_return_status := FND_API.G_RET_STS_ERROR;
3294: retcode := 2;
3295: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3296: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
3297: ELSE
3298: IF l_BATCH_STATUS <> 'F' OR l_BATCH_STATUS IS NULL THEN
3299: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 3303: x_return_status := fnd_api.g_ret_sts_error;

3299: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3300: fnd_message.set_token('STATE', l_BATCH_STATUS);
3301: fnd_msg_pub.add;
3302: retcode := 2;
3303: x_return_status := fnd_api.g_ret_sts_error;
3304: outandlog('Interest Batch batch_status should be Final to import interest_batch_id :'||p_batch_id);
3305: END IF;
3306: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
3307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 3310: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3306: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
3307: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3308: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'CALCULATE_INTEREST_TO_DATE' );
3309: FND_MSG_PUB.ADD;
3310: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3311: outandlog('Interest Batch calculation interest to date is mandatory interest_batch_id :'||p_batch_id);
3312: END IF;
3313: IF l_GL_DATE IS NULL THEN
3314: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 3317: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3313: IF l_GL_DATE IS NULL THEN
3314: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3315: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
3316: FND_MSG_PUB.ADD;
3317: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3318: outandlog('Interest Batch GL date is mandatory interest_batch_id :'||p_batch_id);
3319: END IF;
3320: IF l_transferred_status = 'S' THEN
3321: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 3325: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3321: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3322: fnd_message.set_token('STATE', l_BATCH_STATUS);
3323: fnd_msg_pub.add;
3324: retcode := 1;
3325: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3326: outandlog('Interest Batch already successfully transferred interest_batch_id :'||p_batch_id);
3327: ELSIF l_transferred_status = 'E' THEN
3328: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3329: fnd_message.set_token('STATE', l_BATCH_STATUS);

Line 3332: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3328: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3329: fnd_message.set_token('STATE', l_BATCH_STATUS);
3330: fnd_msg_pub.add;
3331: retcode := 1;
3332: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3333: outandlog('Interest Batch is in Error, please fix it before submitting interest_batch_id :'||p_batch_id);
3334: ELSIF l_transferred_status = 'P' THEN
3335: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3336: fnd_message.set_token('STATE', l_BATCH_STATUS);

Line 3339: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3335: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3336: fnd_message.set_token('STATE', l_BATCH_STATUS);
3337: fnd_msg_pub.add;
3338: retcode := 1;
3339: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3340: outandlog('Interest Batch is in process, can not resubmit interest_batch_id :'||p_batch_id);
3341: ELSIF l_transferred_status = 'N' THEN
3342: outandlog('Processing the batch interest_batch_id :'||p_batch_id);
3343: ELSIF l_transferred_status IS NOT NULL THEN

Line 3348: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3344: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3345: fnd_message.set_token('STATE', l_BATCH_STATUS);
3346: fnd_msg_pub.add;
3347: retcode := 2;
3348: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3349: outandlog('Interest Batch transferred flag should be in (NULL,S,E) no other value permitted interest_batch_id :'||p_batch_id);
3350: END IF;
3351: END IF;
3352: CLOSE c;

Line 3354: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3350: END IF;
3351: END IF;
3352: CLOSE c;
3353:
3354: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3355: RAISE fnd_Api.g_exc_unexpected_error;
3356: END IF;
3357:
3358: OPEN c_hdr;

Line 3355: RAISE fnd_Api.g_exc_unexpected_error;

3351: END IF;
3352: CLOSE c;
3353:
3354: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3355: RAISE fnd_Api.g_exc_unexpected_error;
3356: END IF;
3357:
3358: OPEN c_hdr;
3359: FETCH c_hdr INTO l_ihid;

Line 3378: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3374: x_nb_doc_list => x_nb_doc_list,
3375: x_return_status => x_return_status);
3376:
3377:
3378: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3379: retcode := 2;
3380: RAISE fnd_Api.g_exc_unexpected_error;
3381: END IF;
3382:

Line 3380: RAISE fnd_Api.g_exc_unexpected_error;

3376:
3377:
3378: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3379: retcode := 2;
3380: RAISE fnd_Api.g_exc_unexpected_error;
3381: END IF;
3382:
3383: log('Updating the batch status to Pending to start the process...');
3384: AR_INTEREST_BATCHES_PKG.update_batch

Line 3395: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3391: x_return_status => x_return_status,
3392: x_msg_count => x_msg_count,
3393: x_msg_data => x_msg_data);
3394:
3395: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3396: RAISE fnd_Api.g_exc_error;
3397: END IF;
3398:
3399: FOR i IN x_worker_list.FIRST..x_worker_list.LAST LOOP

Line 3396: RAISE fnd_Api.g_exc_error;

3392: x_msg_count => x_msg_count,
3393: x_msg_data => x_msg_data);
3394:
3395: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3396: RAISE fnd_Api.g_exc_error;
3397: END IF;
3398:
3399: FOR i IN x_worker_list.FIRST..x_worker_list.LAST LOOP
3400: submit_late_charge_worker

Line 3460: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3456: errbuf := 'Some documents are in error in in the batch :'||g_interest_batch_id;
3457: retcode := 1;
3458: END IF;
3459:
3460: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3461: RAISE fnd_Api.g_exc_error;
3462: END IF;
3463:
3464: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );

Line 3461: RAISE fnd_Api.g_exc_error;

3457: retcode := 1;
3458: END IF;
3459:
3460: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3461: RAISE fnd_Api.g_exc_error;
3462: END IF;
3463:
3464: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
3465: outandlog( message =>'End create_late_charge_by_worker for the batch:'||p_batch_id||' Please check log files' );

Line 3480: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3476: x_return_status => x_return_status,
3477: x_msg_count => x_msg_count,
3478: x_msg_data => x_msg_data);
3479:
3480: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3481: retcode := 2;
3482: fnd_msg_pub.count_and_get(
3483: p_encoded => fnd_api.g_false,
3484: p_count => x_msg_count,

Line 3483: p_encoded => fnd_api.g_false,

3479:
3480: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3481: retcode := 2;
3482: fnd_msg_pub.count_and_get(
3483: p_encoded => fnd_api.g_false,
3484: p_count => x_msg_count,
3485: p_data => x_msg_data);
3486:
3487: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3495: WHEN fnd_Api.g_exc_unexpected_error THEN

3491: END IF;
3492:
3493: FND_FILE.close;
3494:
3495: WHEN fnd_Api.g_exc_unexpected_error THEN
3496: fnd_msg_pub.count_and_get(
3497: p_encoded => fnd_api.g_false,
3498: p_count => x_msg_count,
3499: p_data => x_msg_data);

Line 3497: p_encoded => fnd_api.g_false,

3493: FND_FILE.close;
3494:
3495: WHEN fnd_Api.g_exc_unexpected_error THEN
3496: fnd_msg_pub.count_and_get(
3497: p_encoded => fnd_api.g_false,
3498: p_count => x_msg_count,
3499: p_data => x_msg_data);
3500:
3501: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3506: WHEN fnd_Api.g_exc_error THEN

3502: log('Batch en error ' || x_msg_data);
3503: errbuf := errbuf || logerror || x_msg_data;
3504: outandlog('Aborting concurrent program execution');
3505: FND_FILE.close;
3506: WHEN fnd_Api.g_exc_error THEN
3507: outandlog('Error: ' || FND_MESSAGE.GET);
3508: log('Batch en error ' || x_msg_data);
3509: errbuf := errbuf || logerror || x_msg_data;
3510: outandlog('Aborting concurrent program execution');