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.

[Home] [Help]

APPS.AR_LATE_CHARGE_PKG dependencies on FND_API

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

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

Line 783: x_return_status := FND_API.G_RET_STS_SUCCESS;

779: l_stop VARCHAR2(1) := 'N';
780: BEGIN
781: outandlog( message => 'call_invoice_api +');
782:
783: x_return_status := FND_API.G_RET_STS_SUCCESS;
784: --
785: -- Execution of the invoice api
786: --
787: AR_INVOICE_API_PUB.create_invoice(

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

804: INSERT_DIST;
805: END IF;
806:
807: --
808: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
809: -- if none standard errors are found
810: --
811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
812: RAISE fnd_api.g_exc_error;

Line 811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

807: --
808: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
809: -- if none standard errors are found
810: --
811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
812: RAISE fnd_api.g_exc_error;
813: END IF;
814:
815: --

Line 812: RAISE fnd_api.g_exc_error;

808: -- Note Invoice API only return status <> FND_API.G_RET_STS_SUCCESS
809: -- if none standard errors are found
810: --
811: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
812: RAISE fnd_api.g_exc_error;
813: END IF;
814:
815: --
816: -- Error at header

Line 828: x_return_status := fnd_api.g_ret_sts_error;

824: --
825: -- Invoice api caller will return error is functional setup incorrect
826: --
827: IF l_trx_header_id.COUNT > 0 THEN
828: x_return_status := fnd_api.g_ret_sts_error;
829: x_msg_count := 0;
830:
831: FOR i IN 1..l_trx_header_id.COUNT LOOP
832:

Line 890: x_return_status := fnd_api.g_ret_sts_error;

886: --
887: -- Invoice api caller will return error is functional setup incorrect
888: --
889: IF l_trx_line_id.COUNT > 0 THEN
890: x_return_status := fnd_api.g_ret_sts_error;
891:
892: FOR i IN 1..l_trx_line_id.COUNT LOOP
893:
894: IF l_trx_line_id(i) <> l_curr_line_id THEN

Line 972: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

968: iv_line_num := 0;
969: iv_create_flag := 'N';
970:
971:
972: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
973: x_msg_data := 'Error are set back in the ar_interest_headers and lines table,
974: please retrieve from table with the interest_batch_id:'||g_interest_batch_id;
975: END IF;
976:

Line 980: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

976:
977: --
978: -- All errors at lines - return number of header in error
979: --
980: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
981: OPEN c_nb_inv_in_err;
982: FETCH c_nb_inv_in_err INTO x_msg_count;
983: CLOSE c_nb_inv_in_err;
984: END IF;

Line 990: WHEN FND_API.G_EXC_ERROR THEN

986:
987: outandlog( message => 'call_invoice_api -');
988:
989: EXCEPTION
990: WHEN FND_API.G_EXC_ERROR THEN
991: --
992: -- Error from invoice api directly out
993: --
994: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,

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

990: WHEN FND_API.G_EXC_ERROR THEN
991: --
992: -- Error from invoice api directly out
993: --
994: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
995: p_count => x_msg_count,
996: p_data => x_msg_data );
997:
998: outandlog( message => x_msg_data);

Line 1003: x_return_status := fnd_api.g_ret_sts_unexp_error;

999:
1000: WHEN OTHERS THEN
1001:
1002: outandlog( message => 'EXCEPTION OTHERS in call_invoice_api:'||SQLERRM);
1003: x_return_status := fnd_api.g_ret_sts_unexp_error;
1004: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1005: fnd_message.set_token('ERROR',SQLERRM);
1006: fnd_msg_pub.add;
1007:

Line 1009: p_encoded => fnd_api.g_false,

1005: fnd_message.set_token('ERROR',SQLERRM);
1006: fnd_msg_pub.add;
1007:
1008: fnd_msg_pub.count_and_get(
1009: p_encoded => fnd_api.g_false,
1010: p_count => x_msg_count,
1011: p_data => x_msg_data);
1012: outandlog( message => ' EXCEPTION OTHERS call_invoice_api :'||SQLERRM);
1013:

Line 1345: x_return_status := FND_API.G_RET_STS_SUCCESS;

1341:
1342: l_inv_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'INV');
1343: l_dm_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'DM');
1344:
1345: x_return_status := FND_API.G_RET_STS_SUCCESS;
1346: x_msg_count := 0;
1347:
1348: IF p_api_bulk_size IS NULL OR p_api_bulk_size = 0 THEN
1349: l_bulk_size := g_bulk_fetch_rows;

Line 1364: x_return_status := FND_API.G_RET_STS_ERROR;

1360: arp_standard.debug(' Late Charge Batch GL date and calculate interest date is required');
1361: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1362: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
1363: FND_MSG_PUB.ADD;
1364: x_return_status := FND_API.G_RET_STS_ERROR;
1365: END IF;
1366: IF c_gl_date%NOTFOUND OR s_cal_int_date IS NULL THEN
1367: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1368: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 1371: x_return_status := FND_API.G_RET_STS_ERROR;

1367: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1368: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1369: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'calculate_interest_to_date' );
1370: FND_MSG_PUB.ADD;
1371: x_return_status := FND_API.G_RET_STS_ERROR;
1372: END IF;
1373: CLOSE c_gl_date;
1374: ELSE
1375: s_gl_date := p_gl_date;

Line 1381: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1377: END IF;
1378:
1379: g_int_cal_date := s_cal_int_date;
1380:
1381: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384:
1385: iv_batch_source_rec.batch_source_id := p_batch_source_id;

Line 1382: RAISE FND_API.G_EXC_ERROR;

1378:
1379: g_int_cal_date := s_cal_int_date;
1380:
1381: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1382: RAISE FND_API.G_EXC_ERROR;
1383: END IF;
1384:
1385: iv_batch_source_rec.batch_source_id := p_batch_source_id;
1386: iv_batch_source_rec.default_date := s_gl_date;

Line 1434: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1430: call_invoice_api(x_return_status => l_return_status,
1431: x_msg_count => l_msg_count,
1432: x_msg_data => l_msg_data);
1433:
1434: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1435: IF x_msg_count IS NULL THEN
1436: x_msg_count := l_msg_count;
1437: ELSE
1438: x_msg_count := x_msg_count + l_msg_count;

Line 1455: IF l_return_status <> fnd_api.g_ret_sts_success THEN

1451: call_invoice_api(x_return_status => l_return_status,
1452: x_msg_count => l_msg_count,
1453: x_msg_data => l_msg_data);
1454:
1455: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1456:
1457: IF x_msg_count IS NULL THEN
1458: x_msg_count := l_msg_count;
1459: ELSE

Line 1518: WHEN FND_API.G_EXC_ERROR THEN

1514:
1515: outandlog( message => 'create_charge_inv_dm -');
1516:
1517: EXCEPTION
1518: WHEN FND_API.G_EXC_ERROR THEN
1519: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1520: p_count => x_msg_count,
1521: p_data => x_msg_data );
1522:

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

1515: outandlog( message => 'create_charge_inv_dm -');
1516:
1517: EXCEPTION
1518: WHEN FND_API.G_EXC_ERROR THEN
1519: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1520: p_count => x_msg_count,
1521: p_data => x_msg_data );
1522:
1523: outandlog( message => x_msg_data);

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

1525: WHEN OTHERS THEN
1526: FND_MESSAGE.Set_Name('AR','HZ_API_OTHERS_EXCEP');
1527: FND_MESSAGE.Set_Token('ERROR',SQLERRM);
1528: fnd_msg_pub.add;
1529: FND_MSG_PUB.Count_And_Get( p_encoded => FND_API.G_FALSE,
1530: p_count => x_msg_count,
1531: p_data => x_msg_data );
1532: outandlog( message => x_msg_data);
1533: END;

Line 1699: x_return_status := FND_API.G_RET_STS_SUCCESS;

1695: arp_standard.debug('g_interest_batch_id:'||g_interest_batch_id);
1696:
1697: l_adj_meaning := ARPT_SQL_FUNC_UTIL.get_lookup_meaning('AR_LATE_CHARGE_TYPE', 'ADJ');
1698:
1699: x_return_status := FND_API.G_RET_STS_SUCCESS;
1700: x_msg_count := 0;
1701: x_num_adj_created := 0;
1702: x_num_adj_error := 0;
1703:

Line 1727: x_return_status := FND_API.G_RET_STS_ERROR;

1723: arp_standard.debug(' Late Charge Batch GL date and calculate interest date is required');
1724: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1725: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
1726: FND_MSG_PUB.ADD;
1727: x_return_status := FND_API.G_RET_STS_ERROR;
1728: END IF;
1729: IF c_gl_date%NOTFOUND OR s_cal_int_date IS NULL THEN
1730: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1731: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 1734: x_return_status := FND_API.G_RET_STS_ERROR;

1730: arp_standard.debug(' Late Charge Batch calculate interest date is required');
1731: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
1732: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'calculate_interest_to_date' );
1733: FND_MSG_PUB.ADD;
1734: x_return_status := FND_API.G_RET_STS_ERROR;
1735: END IF;
1736: CLOSE c_gl_date;
1737: ELSE
1738: s_gl_date := p_gl_date;

Line 1742: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1738: s_gl_date := p_gl_date;
1739: s_cal_int_date := p_cal_int_date;
1740: END IF;
1741:
1742: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1743: RAISE FND_API.G_EXC_ERROR;
1744: END IF;
1745:
1746:

Line 1743: RAISE FND_API.G_EXC_ERROR;

1739: s_cal_int_date := p_cal_int_date;
1740: END IF;
1741:
1742: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1743: RAISE FND_API.G_EXC_ERROR;
1744: END IF;
1745:
1746:
1747: OPEN cadj;

Line 1803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1799: p_new_adjust_number => l_new_adjust_number,
1800: p_new_adjust_id => l_new_adjust_id);
1801:
1802:
1803: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1804:
1805:
1806: l_process_status(i) := 'E';
1807: x_num_adj_error := x_num_adj_error + 1;

Line 1809: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1805:
1806: l_process_status(i) := 'E';
1807: x_num_adj_error := x_num_adj_error + 1;
1808:
1809: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1810: x_return_status := l_return_status;
1811: x_msg_data := l_msg_data;
1812: x_msg_count := l_msg_count;
1813: END IF;

Line 1822: FND_API.G_FALSE);

1818: IF l_msg_count > 1 THEN
1819: ll_msg_data := NULL;
1820: FOR cnt IN 1..l_msg_count LOOP
1821: ll_msg_data := FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,
1822: FND_API.G_FALSE);
1823: log(' error text : '|| ll_msg_data);
1824: l_msg_data := SUBSTRB(l_msg_data||ll_msg_data,1,2000);
1825: END LOOP;
1826: END IF;

Line 1942: WHEN FND_API.G_EXC_ERROR THEN

1938:
1939: EXCEPTION
1940: WHEN no_adj_to_process THEN
1941: NULL;
1942: WHEN FND_API.G_EXC_ERROR THEN
1943: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1944: fnd_msg_pub.count_and_get(
1945: p_encoded => fnd_api.g_false,
1946: p_count => x_msg_count,

Line 1945: p_encoded => fnd_api.g_false,

1941: NULL;
1942: WHEN FND_API.G_EXC_ERROR THEN
1943: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1944: fnd_msg_pub.count_and_get(
1945: p_encoded => fnd_api.g_false,
1946: p_count => x_msg_count,
1947: p_data => x_msg_data);
1948: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1949:

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

1944: fnd_msg_pub.count_and_get(
1945: p_encoded => fnd_api.g_false,
1946: p_count => x_msg_count,
1947: p_data => x_msg_data);
1948: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1949:
1950: WHEN OTHERS THEN
1951: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1952: x_return_status := fnd_api.g_ret_sts_unexp_error;

Line 1952: x_return_status := fnd_api.g_ret_sts_unexp_error;

1948: outandlog( message => ' EXCEPTION FND_API.G_EXC_ERROR create_charge_adj :'||x_msg_data);
1949:
1950: WHEN OTHERS THEN
1951: IF cadj%ISOPEN THEN CLOSE cadj; END IF;
1952: x_return_status := fnd_api.g_ret_sts_unexp_error;
1953: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
1954: fnd_message.set_token('ERROR',SQLERRM);
1955: fnd_msg_pub.add;
1956:

Line 1958: p_encoded => fnd_api.g_false,

1954: fnd_message.set_token('ERROR',SQLERRM);
1955: fnd_msg_pub.add;
1956:
1957: fnd_msg_pub.count_and_get(
1958: p_encoded => fnd_api.g_false,
1959: p_count => x_msg_count,
1960: p_data => x_msg_data);
1961: outandlog( message => ' EXCEPTION OTHERS create_charge_adj :'||SQLERRM);
1962: END;

Line 2153: x_return_status := fnd_api.g_ret_sts_success;

2149: outandlog( message =>' p_cal_int_date :'||p_cal_int_date);
2150: outandlog( message =>' p_cal_int_date :'||p_cal_int_date);
2151: outandlog( message =>' p_api_bulk_size :'||p_api_bulk_size);
2152:
2153: x_return_status := fnd_api.g_ret_sts_success;
2154: log('1 create_charge_adj...');
2155:
2156: create_charge_adj
2157: (p_batch_id => p_batch_id,

Line 2167: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2163: x_return_status => x_return_status,
2164: x_msg_count => x_msg_count,
2165: x_msg_data => x_msg_data);
2166:
2167: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2168: retcode := 1;
2169: errbuf := 'Some Charge Adjustments have failed,
2170: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2171: log(errbuf);

Line 2174: x_return_status := fnd_api.g_ret_sts_success;

2170: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2171: log(errbuf);
2172: END IF;
2173:
2174: x_return_status := fnd_api.g_ret_sts_success;
2175:
2176: log('2 create_charge_inv_dm...');
2177: create_charge_inv_dm
2178: (p_batch_source_id => p_batch_source_id,

Line 2188: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2184: x_msg_count => x_msg_count,
2185: x_msg_data => x_msg_data);
2186:
2187:
2188: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2189: retcode := 1;
2190: errbuf := 'Some Charge invoice, debit memo have failed
2191: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id;
2192: log(errbuf);

Line 2240: WHEN fnd_Api.g_exc_error THEN

2236: write_exec_report;
2237:
2238: FND_FILE.close;
2239: EXCEPTION
2240: WHEN fnd_Api.g_exc_error THEN
2241: fnd_msg_pub.count_and_get(
2242: p_encoded => fnd_api.g_false,
2243: p_count => x_msg_count,
2244: p_data => x_msg_data);

Line 2242: p_encoded => fnd_api.g_false,

2238: FND_FILE.close;
2239: EXCEPTION
2240: WHEN fnd_Api.g_exc_error THEN
2241: fnd_msg_pub.count_and_get(
2242: p_encoded => fnd_api.g_false,
2243: p_count => x_msg_count,
2244: p_data => x_msg_data);
2245: retcode := 1;
2246: outandlog('Error: ' || FND_MESSAGE.GET);

Line 2483: x_return_status := fnd_api.g_ret_sts_success;

2479:
2480: outandlog( message =>'create_late_charge for the batch:'||p_batch_id );
2481: outandlog( message =>' Starting at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2482:
2483: x_return_status := fnd_api.g_ret_sts_success;
2484:
2485: IF p_batch_source_id IS NULL THEN
2486: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2487: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );

Line 2489: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2485: IF p_batch_source_id IS NULL THEN
2486: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2487: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
2488: FND_MSG_PUB.ADD;
2489: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2490: ELSE
2491: OPEN c_batch_source;
2492: FETCH c_batch_source INTO l_test;
2493: IF c_batch_source%NOTFOUND THEN

Line 2499: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2495: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_source_id' );
2496: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
2497: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_batch_sources');
2498: FND_MSG_PUB.ADD;
2499: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2500: END IF;
2501: CLOSE c_batch_source;
2502: END IF;
2503:

Line 2516: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2512: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_id' );
2513: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_id' );
2514: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches');
2515: FND_MSG_PUB.ADD;
2516: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2517: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
2518: ELSE
2519: IF l_BATCH_STATUS <> 'F' OR l_BATCH_STATUS IS NULL THEN
2520: fnd_message.set_name('AR', 'AR_ONLY_VALUE_ALLOWED');

Line 2525: x_return_status := fnd_api.g_ret_sts_error;

2521: fnd_message.set_token('COLUMN', 'BATCH_STATUS');
2522: fnd_message.set_token('VALUES', 'F');
2523: fnd_msg_pub.add;
2524: retcode := 2;
2525: x_return_status := fnd_api.g_ret_sts_error;
2526: outandlog('Interest Batch batch_status should be Final to import interest_batch_id :'||p_batch_id);
2527: END IF;
2528: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
2529: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 2532: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2528: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
2529: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2530: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'CALCULATE_INTEREST_TO_DATE' );
2531: FND_MSG_PUB.ADD;
2532: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2533: outandlog('Interest Batch calculation interest to date is mandatory interest_batch_id :'||p_batch_id);
2534: END IF;
2535: IF l_GL_DATE IS NULL THEN
2536: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 2539: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2535: IF l_GL_DATE IS NULL THEN
2536: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
2537: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
2538: FND_MSG_PUB.ADD;
2539: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2540: outandlog('Interest Batch GL date is mandatory interest_batch_id :'||p_batch_id);
2541: END IF;
2542: IF l_transferred_status = 'S' THEN
2543: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 2547: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

2543: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2544: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2545: fnd_msg_pub.add;
2546: retcode := 1;
2547: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
2548: outandlog('Interest Batch already successfully transferred interest_batch_id :'||p_batch_id);
2549: ELSIF l_transferred_status = 'E' THEN
2550: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2551: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );

Line 2554: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2550: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2551: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2552: fnd_msg_pub.add;
2553: retcode := 1;
2554: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2555: outandlog('Interest Batch is in Error, please fix it before submitting interest_batch_id :'||p_batch_id);
2556: ELSIF l_transferred_status = 'P' THEN
2557: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2558: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );

Line 2561: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2557: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
2558: FND_MESSAGE.SET_TOKEN( 'STATUS', l_transferred_status );
2559: fnd_msg_pub.add;
2560: retcode := 1;
2561: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2562: outandlog('Interest Batch is in process, can not resubmit interest_batch_id :'||p_batch_id);
2563: ELSIF l_transferred_status = 'N' THEN
2564: outandlog('Processing the batch interest_batch_id :'||p_batch_id);
2565: ELSIF l_transferred_status IS NOT NULL THEN

Line 2574: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

2570: fnd_message.set_token('COLUMN', 'TRANSFERRED_STATUS');
2571: fnd_message.set_token('VALUES', 'P,E,N,S');
2572: fnd_msg_pub.add;
2573: retcode := 2;
2574: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
2575: outandlog('Interest Batch transferred flag should be in (NULL,S,E) no other value permitted interest_batch_id :'||p_batch_id);
2576: END IF;
2577: END IF;
2578: CLOSE c;

Line 2580: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2576: END IF;
2577: END IF;
2578: CLOSE c;
2579:
2580: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2581: RAISE fnd_Api.g_exc_unexpected_error;
2582: END IF;
2583:
2584: log('Updating the batch status to Pending to start the process...');

Line 2581: RAISE fnd_Api.g_exc_unexpected_error;

2577: END IF;
2578: CLOSE c;
2579:
2580: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2581: RAISE fnd_Api.g_exc_unexpected_error;
2582: END IF;
2583:
2584: log('Updating the batch status to Pending to start the process...');
2585: AR_INTEREST_BATCHES_PKG.update_batch

Line 2596: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2592: x_return_status => x_return_status,
2593: x_msg_count => x_msg_count,
2594: x_msg_data => x_msg_data);
2595:
2596: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2597: RAISE fnd_Api.g_exc_error;
2598: END IF;
2599:
2600: OPEN c_site;

Line 2597: RAISE fnd_Api.g_exc_error;

2593: x_msg_count => x_msg_count,
2594: x_msg_data => x_msg_data);
2595:
2596: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2597: RAISE fnd_Api.g_exc_error;
2598: END IF;
2599:
2600: OPEN c_site;
2601: FETCH c_site BULK COLLECT INTO l_customer_site_use_id;

Line 2663: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2659: errbuf := 'Some documents are in error in in the batch :'||g_interest_batch_id;
2660: retcode := 1;
2661: END IF;
2662:
2663: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2664: RAISE fnd_Api.g_exc_error;
2665: END IF;
2666:
2667: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );

Line 2664: RAISE fnd_Api.g_exc_error;

2660: retcode := 1;
2661: END IF;
2662:
2663: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2664: RAISE fnd_Api.g_exc_error;
2665: END IF;
2666:
2667: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2668: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );

Line 2670: WHEN fnd_Api.g_exc_unexpected_error THEN

2666:
2667: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
2668: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );
2669: EXCEPTION
2670: WHEN fnd_Api.g_exc_unexpected_error THEN
2671: fnd_msg_pub.count_and_get(
2672: p_encoded => fnd_api.g_false,
2673: p_count => x_msg_count,
2674: p_data => x_msg_data);

Line 2672: p_encoded => fnd_api.g_false,

2668: outandlog( message =>'End create_late_charge for the batch:'||p_batch_id||' Please check log files' );
2669: EXCEPTION
2670: WHEN fnd_Api.g_exc_unexpected_error THEN
2671: fnd_msg_pub.count_and_get(
2672: p_encoded => fnd_api.g_false,
2673: p_count => x_msg_count,
2674: p_data => x_msg_data);
2675:
2676: outandlog('Error: ' || FND_MESSAGE.GET);

Line 2681: WHEN fnd_Api.g_exc_error THEN

2677: log('Batch en error ' || x_msg_data);
2678: errbuf := errbuf || logerror || x_msg_data;
2679: outandlog('Aborting concurrent program execution');
2680: FND_FILE.close;
2681: WHEN fnd_Api.g_exc_error THEN
2682: outandlog('Error: ' || FND_MESSAGE.GET);
2683: log('Batch en error ' || x_msg_data);
2684: errbuf := errbuf || logerror || x_msg_data;
2685: outandlog('Aborting concurrent program execution');

Line 2770: x_return_status := fnd_api.g_ret_sts_success;

2766: AND display_flag = 'Y' -- Document generating a Late Charges Document
2767: AND worker_num = p_worker_num);
2768:
2769: retcode := 0;
2770: x_return_status := fnd_api.g_ret_sts_success;
2771: log('1 create_charge_adj...');
2772:
2773: create_charge_adj
2774: (p_batch_id => p_batch_id,

Line 2785: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2781: x_return_status => x_return_status,
2782: x_msg_count => x_msg_count,
2783: x_msg_data => x_msg_data);
2784:
2785: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2786: retcode := 1;
2787: errbuf := SUBSTRB('Some Charge Adjustments have failed,
2788: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2789: log(errbuf);

Line 2792: x_return_status := fnd_api.g_ret_sts_success;

2788: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2789: log(errbuf);
2790: END IF;
2791:
2792: x_return_status := fnd_api.g_ret_sts_success;
2793:
2794: log('2 create_charge_inv_dm...');
2795: create_charge_inv_dm
2796: (p_batch_source_id => p_batch_source_id,

Line 2807: IF x_return_status <> fnd_api.g_ret_sts_success THEN

2803: x_msg_count => x_msg_count,
2804: x_msg_data => x_msg_data);
2805:
2806:
2807: IF x_return_status <> fnd_api.g_ret_sts_success THEN
2808: retcode := 1;
2809: errbuf := SUBSTRB('Some Charge invoice, debit memo have failed
2810: please verify the data in ar_interest_headers and lines tables with the batch_id :'||g_interest_batch_id,1,239);
2811: log(errbuf);

Line 2876: WHEN fnd_Api.g_exc_error THEN

2872:
2873:
2874: FND_FILE.close;
2875: EXCEPTION
2876: WHEN fnd_Api.g_exc_error THEN
2877: fnd_msg_pub.count_and_get(
2878: p_encoded => fnd_api.g_false,
2879: p_count => x_msg_count,
2880: p_data => x_msg_data);

Line 2878: p_encoded => fnd_api.g_false,

2874: FND_FILE.close;
2875: EXCEPTION
2876: WHEN fnd_Api.g_exc_error THEN
2877: fnd_msg_pub.count_and_get(
2878: p_encoded => fnd_api.g_false,
2879: p_count => x_msg_count,
2880: p_data => x_msg_data);
2881: retcode := 1;
2882: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3038: p_encoded => fnd_api.g_false,

3034: log('Calling create_late_charge_per_worker -');
3035: --{Message Stack
3036: IF retcode <> '0' THEN
3037: fnd_msg_pub.count_and_get(
3038: p_encoded => fnd_api.g_false,
3039: p_count => x_msg_count,
3040: p_data => x_msg_data);
3041: IF x_msg_count > 1 THEN
3042: i := 0;

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

3042: i := 0;
3043: LOOP
3044: IF i < x_msg_count THEN
3045: i := i + 1 ;
3046: x_msg_data :=FND_MSG_PUB.Get(FND_MSG_PUB.G_NEXT,FND_API.G_FALSE);
3047: log(x_msg_data);
3048: ELSE
3049: EXIT;
3050: END IF;

Line 3089: x_return_status := fnd_api.g_ret_sts_success;

3085: BEGIN
3086: log('prepare_header_for_worker +');
3087: log(' p_interest_batch_id '||p_interest_batch_id);
3088: log(' p_max_workers '||p_max_workers);
3089: x_return_status := fnd_api.g_ret_sts_success;
3090: IF p_interest_batch_id IS NULL THEN
3091: log('p_interest_batch_id required ');
3092: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3093: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'interest_batch_id' );

Line 3095: x_return_status := fnd_Api.G_RET_STS_ERROR;

3091: log('p_interest_batch_id required ');
3092: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3093: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'interest_batch_id' );
3094: FND_MSG_PUB.ADD;
3095: x_return_status := fnd_Api.G_RET_STS_ERROR;
3096: END IF;
3097:
3098: IF NOT(p_max_workers > 0) THEN
3099: log('p_max_worker should be greater than 0');

Line 3102: x_return_status := fnd_Api.G_RET_STS_ERROR;

3098: IF NOT(p_max_workers > 0) THEN
3099: log('p_max_worker should be greater than 0');
3100: FND_MESSAGE.SET_NAME( 'AR', 'AR_NB_WORKER_GREATER_ZERO' );
3101: FND_MSG_PUB.ADD;
3102: x_return_status := fnd_Api.G_RET_STS_ERROR;
3103: END IF;
3104:
3105: IF x_return_status = fnd_api.g_ret_sts_success THEN
3106:

Line 3105: IF x_return_status = fnd_api.g_ret_sts_success THEN

3101: FND_MSG_PUB.ADD;
3102: x_return_status := fnd_Api.G_RET_STS_ERROR;
3103: END IF;
3104:
3105: IF x_return_status = fnd_api.g_ret_sts_success THEN
3106:
3107: log('updating worker_num');
3108: --{HYU CDI this update statement includes Credit Item
3109: UPDATE ar_interest_headers

Line 3128: x_return_status := fnd_Api.G_RET_STS_ERROR;

3124: log('worker_cpt :'|| worker_cpt);
3125: IF NOT (worker_cpt > 0) THEN
3126: FND_MESSAGE.SET_NAME( 'AR', 'AR_NO_HEADER_TO_PROCESS' );
3127: FND_MSG_PUB.ADD;
3128: x_return_status := fnd_Api.G_RET_STS_ERROR;
3129: END IF;
3130: END IF;
3131: log('prepare_header_for_worker -');
3132: EXCEPTION

Line 3136: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3132: EXCEPTION
3133: WHEN OTHERS THEN
3134: outandlog('Error: ' || FND_MESSAGE.GET);
3135: log('SQL Error in prepare_header_for_worker' || SQLERRM);
3136: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3137: END;
3138:
3139:
3140:

Line 3219: x_return_status := fnd_api.g_ret_sts_success;

3215: outandlog( message =>' p_batch_id '|| p_batch_id);
3216:
3217:
3218:
3219: x_return_status := fnd_api.g_ret_sts_success;
3220:
3221: IF p_batch_source_id IS NULL THEN
3222: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3223: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );

Line 3226: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3222: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3223: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
3224: FND_MSG_PUB.ADD;
3225: retcode := 2;
3226: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3227: ELSE
3228: OPEN c_batch_source;
3229: FETCH c_batch_source INTO l_test;
3230: IF c_batch_source%NOTFOUND THEN

Line 3236: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3232: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_source_id' );
3233: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'batch_source_id' );
3234: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ra_batch_sources');
3235: FND_MSG_PUB.ADD;
3236: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3237: END IF;
3238: CLOSE c_batch_source;
3239: END IF;
3240:

Line 3253: x_return_status := FND_API.G_RET_STS_ERROR;

3249: FND_MESSAGE.SET_TOKEN( 'FK', 'batch_id' );
3250: FND_MESSAGE.SET_TOKEN( 'COLUMN',p_batch_id );
3251: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches' );
3252: FND_MSG_PUB.ADD;
3253: x_return_status := FND_API.G_RET_STS_ERROR;
3254: retcode := 2;
3255: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3256: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
3257: ELSE

Line 3255: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3251: FND_MESSAGE.SET_TOKEN( 'TABLE', 'ar_interest_batches' );
3252: FND_MSG_PUB.ADD;
3253: x_return_status := FND_API.G_RET_STS_ERROR;
3254: retcode := 2;
3255: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3256: outandlog('Interest Batch not found with the interest_batch_id :'||p_batch_id);
3257: ELSE
3258: IF l_BATCH_STATUS <> 'F' OR l_BATCH_STATUS IS NULL THEN
3259: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 3263: x_return_status := fnd_api.g_ret_sts_error;

3259: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3260: fnd_message.set_token('STATE', l_BATCH_STATUS);
3261: fnd_msg_pub.add;
3262: retcode := 2;
3263: x_return_status := fnd_api.g_ret_sts_error;
3264: outandlog('Interest Batch batch_status should be Final to import interest_batch_id :'||p_batch_id);
3265: END IF;
3266: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
3267: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 3270: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3266: IF l_CALCULATE_INTEREST_TO_DATE IS NULL THEN
3267: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3268: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'CALCULATE_INTEREST_TO_DATE' );
3269: FND_MSG_PUB.ADD;
3270: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3271: outandlog('Interest Batch calculation interest to date is mandatory interest_batch_id :'||p_batch_id);
3272: END IF;
3273: IF l_GL_DATE IS NULL THEN
3274: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );

Line 3277: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3273: IF l_GL_DATE IS NULL THEN
3274: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_MISSING_COLUMN' );
3275: FND_MESSAGE.SET_TOKEN( 'COLUMN', 'GL_DATE' );
3276: FND_MSG_PUB.ADD;
3277: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3278: outandlog('Interest Batch GL date is mandatory interest_batch_id :'||p_batch_id);
3279: END IF;
3280: IF l_transferred_status = 'S' THEN
3281: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');

Line 3285: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;

3281: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3282: fnd_message.set_token('STATE', l_BATCH_STATUS);
3283: fnd_msg_pub.add;
3284: retcode := 1;
3285: x_return_status := fnd_Api.G_RET_STS_UNEXP_ERROR;
3286: outandlog('Interest Batch already successfully transferred interest_batch_id :'||p_batch_id);
3287: ELSIF l_transferred_status = 'E' THEN
3288: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3289: fnd_message.set_token('STATE', l_BATCH_STATUS);

Line 3292: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3288: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3289: fnd_message.set_token('STATE', l_BATCH_STATUS);
3290: fnd_msg_pub.add;
3291: retcode := 1;
3292: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3293: outandlog('Interest Batch is in Error, please fix it before submitting interest_batch_id :'||p_batch_id);
3294: ELSIF l_transferred_status = 'P' THEN
3295: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3296: fnd_message.set_token('STATE', l_BATCH_STATUS);

Line 3299: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3295: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3296: fnd_message.set_token('STATE', l_BATCH_STATUS);
3297: fnd_msg_pub.add;
3298: retcode := 1;
3299: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3300: outandlog('Interest Batch is in process, can not resubmit interest_batch_id :'||p_batch_id);
3301: ELSIF l_transferred_status = 'N' THEN
3302: outandlog('Processing the batch interest_batch_id :'||p_batch_id);
3303: ELSIF l_transferred_status IS NOT NULL THEN

Line 3308: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;

3304: fnd_message.set_name('AR', 'AR_INT_BATCH_STATUS');
3305: fnd_message.set_token('STATE', l_BATCH_STATUS);
3306: fnd_msg_pub.add;
3307: retcode := 2;
3308: x_return_status := fnd_api.G_RET_STS_UNEXP_ERROR;
3309: outandlog('Interest Batch transferred flag should be in (NULL,S,E) no other value permitted interest_batch_id :'||p_batch_id);
3310: END IF;
3311: END IF;
3312: CLOSE c;

Line 3314: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3310: END IF;
3311: END IF;
3312: CLOSE c;
3313:
3314: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3315: RAISE fnd_Api.g_exc_unexpected_error;
3316: END IF;
3317:
3318: OPEN c_hdr;

Line 3315: RAISE fnd_Api.g_exc_unexpected_error;

3311: END IF;
3312: CLOSE c;
3313:
3314: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3315: RAISE fnd_Api.g_exc_unexpected_error;
3316: END IF;
3317:
3318: OPEN c_hdr;
3319: FETCH c_hdr INTO l_ihid;

Line 3338: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3334: x_nb_doc_list => x_nb_doc_list,
3335: x_return_status => x_return_status);
3336:
3337:
3338: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3339: retcode := 2;
3340: RAISE fnd_Api.g_exc_unexpected_error;
3341: END IF;
3342:

Line 3340: RAISE fnd_Api.g_exc_unexpected_error;

3336:
3337:
3338: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3339: retcode := 2;
3340: RAISE fnd_Api.g_exc_unexpected_error;
3341: END IF;
3342:
3343: log('Updating the batch status to Pending to start the process...');
3344: AR_INTEREST_BATCHES_PKG.update_batch

Line 3355: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3351: x_return_status => x_return_status,
3352: x_msg_count => x_msg_count,
3353: x_msg_data => x_msg_data);
3354:
3355: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3356: RAISE fnd_Api.g_exc_error;
3357: END IF;
3358:
3359: FOR i IN x_worker_list.FIRST..x_worker_list.LAST LOOP

Line 3356: RAISE fnd_Api.g_exc_error;

3352: x_msg_count => x_msg_count,
3353: x_msg_data => x_msg_data);
3354:
3355: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3356: RAISE fnd_Api.g_exc_error;
3357: END IF;
3358:
3359: FOR i IN x_worker_list.FIRST..x_worker_list.LAST LOOP
3360: submit_late_charge_worker

Line 3420: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3416: errbuf := 'Some documents are in error in in the batch :'||g_interest_batch_id;
3417: retcode := 1;
3418: END IF;
3419:
3420: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3421: RAISE fnd_Api.g_exc_error;
3422: END IF;
3423:
3424: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );

Line 3421: RAISE fnd_Api.g_exc_error;

3417: retcode := 1;
3418: END IF;
3419:
3420: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3421: RAISE fnd_Api.g_exc_error;
3422: END IF;
3423:
3424: outandlog( message =>' End at ' || to_char(SYSDATE, 'HH24:MI:SS') );
3425: outandlog( message =>'End create_late_charge_by_worker for the batch:'||p_batch_id||' Please check log files' );

Line 3440: IF x_return_status <> fnd_api.g_ret_sts_success THEN

3436: x_return_status => x_return_status,
3437: x_msg_count => x_msg_count,
3438: x_msg_data => x_msg_data);
3439:
3440: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3441: retcode := 2;
3442: fnd_msg_pub.count_and_get(
3443: p_encoded => fnd_api.g_false,
3444: p_count => x_msg_count,

Line 3443: p_encoded => fnd_api.g_false,

3439:
3440: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3441: retcode := 2;
3442: fnd_msg_pub.count_and_get(
3443: p_encoded => fnd_api.g_false,
3444: p_count => x_msg_count,
3445: p_data => x_msg_data);
3446:
3447: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3455: WHEN fnd_Api.g_exc_unexpected_error THEN

3451: END IF;
3452:
3453: FND_FILE.close;
3454:
3455: WHEN fnd_Api.g_exc_unexpected_error THEN
3456: fnd_msg_pub.count_and_get(
3457: p_encoded => fnd_api.g_false,
3458: p_count => x_msg_count,
3459: p_data => x_msg_data);

Line 3457: p_encoded => fnd_api.g_false,

3453: FND_FILE.close;
3454:
3455: WHEN fnd_Api.g_exc_unexpected_error THEN
3456: fnd_msg_pub.count_and_get(
3457: p_encoded => fnd_api.g_false,
3458: p_count => x_msg_count,
3459: p_data => x_msg_data);
3460:
3461: outandlog('Error: ' || FND_MESSAGE.GET);

Line 3466: WHEN fnd_Api.g_exc_error THEN

3462: log('Batch en error ' || x_msg_data);
3463: errbuf := errbuf || logerror || x_msg_data;
3464: outandlog('Aborting concurrent program execution');
3465: FND_FILE.close;
3466: WHEN fnd_Api.g_exc_error THEN
3467: outandlog('Error: ' || FND_MESSAGE.GET);
3468: log('Batch en error ' || x_msg_data);
3469: errbuf := errbuf || logerror || x_msg_data;
3470: outandlog('Aborting concurrent program execution');