DBA Data[Home] [Help]

APPS.PA_INVOICE_ACTIONS dependencies on FND_API

Line 1433: x_return_status := FND_API.G_RET_STS_SUCCESS;

1429:
1430:
1431: BEGIN
1432:
1433: x_return_status := FND_API.G_RET_STS_SUCCESS;
1434: x_msg_count := 0;
1435:
1436:
1437: /* Get the current record version number in draft invoice table */

Line 1448: l_return_status := FND_API.G_RET_STS_ERROR;

1444:
1445: /* Check that it matches the one passed by the calling process */
1446:
1447: if (nvl(p_rec_version_number,0) <> nvl(l_record_version_number,0)) then
1448: l_return_status := FND_API.G_RET_STS_ERROR;
1449: l_msg_data := 'PA_REC_ALREADY_UPDATED';
1450: /* This means that another session has updated the record_version_number and fired
1451: the concurrent request for invoice processing since the start of the current session.
1452: Hence the current session needs to rollback and restart in order to include the changes

Line 1456: RAISE FND_API.G_EXC_ERROR;

1452: Hence the current session needs to rollback and restart in order to include the changes
1453: from the other session.
1454: */
1455: rollback;
1456: RAISE FND_API.G_EXC_ERROR;
1457: End if;
1458:
1459: /* Check the last request identifier that was run for crediting the current invoice
1460: and get the status of the last run

Line 1508: l_return_status := FND_API.G_RET_STS_ERROR;

1504: if (l_dev_phase = 'PENDING' or
1505: l_dev_phase = 'RUNNING' or
1506: l_dev_phase = 'INACTIVE'
1507: ) then
1508: l_return_status := FND_API.G_RET_STS_ERROR;
1509: l_msg_data := 'PA_CREDIT_IN_PROGRESS';
1510: /* This means that the request for invoice processing fired by another session is still in
1511: progress. Hence the current session needs to rollback and restart after the prior request
1512: has been completed, and no more changes are pending from the prior request, in order to

Line 1516: RAISE FND_API.G_EXC_ERROR;

1512: has been completed, and no more changes are pending from the prior request, in order to
1513: include the changes from the other session.
1514: */
1515: ROLLBACK;
1516: RAISE FND_API.G_EXC_ERROR;
1517: elsif (l_dev_phase = 'COMPLETE') then
1518: null;
1519: end if;
1520:

Line 1525: WHEN FND_API.G_EXC_ERROR THEN

1521: end if; -- (l_last_credit_request_id is not null)
1522:
1523: EXCEPTION
1524:
1525: WHEN FND_API.G_EXC_ERROR THEN
1526: x_return_status := l_return_status;
1527: x_msg_count := l_msg_count;
1528: x_msg_data := l_msg_data;
1529:

Line 1530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1526: x_return_status := l_return_status;
1527: x_msg_count := l_msg_count;
1528: x_msg_data := l_msg_data;
1529:
1530: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1531: x_return_status := l_return_status;
1532: x_msg_count := l_msg_count;
1533: x_msg_data := l_msg_data;
1534:

Line 1536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1532: x_msg_count := l_msg_count;
1533: x_msg_data := l_msg_data;
1534:
1535: WHEN others then
1536: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1537: x_msg_count := l_msg_count;
1538: x_msg_data := SUBSTR(SQLERRM,1,100);
1539:
1540: END check_concurrency_issue;

Line 1642: x_return_status := FND_API.G_RET_STS_SUCCESS;

1638: WHERE typ.cust_trx_type_id = TO_NUMBER(x_trx_type);
1639:
1640: BEGIN
1641:
1642: x_return_status := FND_API.G_RET_STS_SUCCESS;
1643: x_msg_count := 0;
1644: x_tot_credited_amt := 0;
1645:
1646: /* First Check - Check if Invoice Amount is negative.

Line 1651: l_return_status := FND_API.G_RET_STS_ERROR;

1647: Write-Off/Concession cannot be performed when Invoice Amount is negative. */
1648:
1649: IF sign(p_invoice_amount) <> 1 THEN
1650:
1651: l_return_status := FND_API.G_RET_STS_ERROR;
1652: l_msg_data := 'PA_IN_CRD_NOT_POSITIVE';
1653: l_msg_count := 1;
1654:
1655: RAISE FND_API.G_EXC_ERROR;

Line 1655: RAISE FND_API.G_EXC_ERROR;

1651: l_return_status := FND_API.G_RET_STS_ERROR;
1652: l_msg_data := 'PA_IN_CRD_NOT_POSITIVE';
1653: l_msg_count := 1;
1654:
1655: RAISE FND_API.G_EXC_ERROR;
1656:
1657: END IF;
1658:
1659: /* Second Check - Check if net invoice amount of the selected lines is negative.

Line 1665: l_return_status := FND_API.G_RET_STS_ERROR;

1661: selected lines is negative. */
1662: IF (p_credit_action_type in ('GROUP', 'LINE'))THEN
1663: IF sign(p_net_inv_amount) <> 1 THEN
1664:
1665: l_return_status := FND_API.G_RET_STS_ERROR;
1666: l_msg_data := 'PA_IN_LINE_CRD_NOT_POSITIVE';
1667: l_msg_count := 1;
1668:
1669: RAISE FND_API.G_EXC_ERROR;

Line 1669: RAISE FND_API.G_EXC_ERROR;

1665: l_return_status := FND_API.G_RET_STS_ERROR;
1666: l_msg_data := 'PA_IN_LINE_CRD_NOT_POSITIVE';
1667: l_msg_count := 1;
1668:
1669: RAISE FND_API.G_EXC_ERROR;
1670: END IF;
1671: END IF;
1672:
1673: BEGIN

Line 1747: l_return_status := FND_API.G_RET_STS_ERROR;

1743: P_crmo_trx_type => x_cm_trx_type,
1744: P_error_status => x_error_status,
1745: P_error_message => x_error_message);
1746: IF (x_error_status = 1) THEN
1747: l_return_status := FND_API.G_RET_STS_ERROR;
1748: l_msg_count := 1;
1749: l_msg_data := x_error_message;
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSE

Line 1750: RAISE FND_API.G_EXC_ERROR;

1746: IF (x_error_status = 1) THEN
1747: l_return_status := FND_API.G_RET_STS_ERROR;
1748: l_msg_count := 1;
1749: l_msg_data := x_error_message;
1750: RAISE FND_API.G_EXC_ERROR;
1751: ELSE
1752: -- Get overapplication_flag for x_trx_type
1753: OPEN overapplication_csr_2;
1754: FETCH overapplication_csr_2

Line 1768: l_return_status := FND_API.G_RET_STS_ERROR;

1764: END IF;
1765:
1766: /* Bug 9459594 */
1767:
1768: l_return_status := FND_API.G_RET_STS_ERROR;
1769: IF (NVL(l_overapplication_flag,'N') = 'Y') THEN
1770: l_msg_data := 'PA_OVER_CREDIT_INV';
1771: ELSE
1772: l_msg_data := 'PA_OVER_CREDIT_INV_ERR';

Line 1777: RAISE FND_API.G_EXC_ERROR;

1773: END IF;
1774:
1775: l_msg_count := 1;
1776:
1777: RAISE FND_API.G_EXC_ERROR;
1778:
1779: ELSE
1780: /* The ELSE part is for credit action WRITE-OFF */
1781: /* The balance due in PA should not be <= 0.

Line 1784: l_return_status := FND_API.G_RET_STS_ERROR;

1780: /* The ELSE part is for credit action WRITE-OFF */
1781: /* The balance due in PA should not be <= 0.
1782: Write-Off cannot be performed if balance due <= 0. */
1783: IF sign(p_invoice_amount - l_tot_credited_amt) <> 1 THEN
1784: l_return_status := FND_API.G_RET_STS_ERROR;
1785: --l_msg_data := 'PA_IN_CRD_NOT_POSITIVE';
1786: l_msg_data := 'PA_IN_CRD_NOT_POSITIVE_WO'; --Created new message for Bug3725206
1787: l_msg_count := 1;
1788:

Line 1789: RAISE FND_API.G_EXC_ERROR;

1785: --l_msg_data := 'PA_IN_CRD_NOT_POSITIVE';
1786: l_msg_data := 'PA_IN_CRD_NOT_POSITIVE_WO'; --Created new message for Bug3725206
1787: l_msg_count := 1;
1788:
1789: RAISE FND_API.G_EXC_ERROR;
1790:
1791: ELSE
1792: /* The entered credit amount should not exceed the balance due in PA. */
1793: l_return_status := FND_API.G_RET_STS_ERROR;

Line 1793: l_return_status := FND_API.G_RET_STS_ERROR;

1789: RAISE FND_API.G_EXC_ERROR;
1790:
1791: ELSE
1792: /* The entered credit amount should not exceed the balance due in PA. */
1793: l_return_status := FND_API.G_RET_STS_ERROR;
1794: l_msg_data := 'PA_IN_CRD_NOT_EXCEED_BAL';
1795: l_msg_count := 1;
1796:
1797: RAISE FND_API.G_EXC_ERROR;

Line 1797: RAISE FND_API.G_EXC_ERROR;

1793: l_return_status := FND_API.G_RET_STS_ERROR;
1794: l_msg_data := 'PA_IN_CRD_NOT_EXCEED_BAL';
1795: l_msg_count := 1;
1796:
1797: RAISE FND_API.G_EXC_ERROR;
1798:
1799: END IF;
1800:
1801: END IF;

Line 1809: l_return_status := FND_API.G_RET_STS_ERROR;

1805: /* Fourth check - The entered credit amount should not exceed the balance due in AR
1806: for credit action Write-Off. */
1807: IF p_credit_action = 'WRITE_OFF' THEN
1808: IF p_credit_amount > p_balance_due THEN
1809: l_return_status := FND_API.G_RET_STS_ERROR;
1810: l_msg_data := 'PA_IN_CRD_EXCEED';
1811: l_msg_count := 1;
1812:
1813: RAISE FND_API.G_EXC_ERROR;

Line 1813: RAISE FND_API.G_EXC_ERROR;

1809: l_return_status := FND_API.G_RET_STS_ERROR;
1810: l_msg_data := 'PA_IN_CRD_EXCEED';
1811: l_msg_count := 1;
1812:
1813: RAISE FND_API.G_EXC_ERROR;
1814: END IF;
1815: END IF;
1816:
1817: /* Initialises the credit related columns as previous credit data might have not been wiped out */

Line 1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1822: x_return_status => l_return_status,
1823: x_msg_count => l_msg_count,
1824: x_msg_data => l_msg_data );
1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827:
1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1829:
1830: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1824: x_msg_data => l_msg_data );
1825:
1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827:
1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1829:
1830: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1831:
1832: RAISE FND_API.G_EXC_ERROR;

Line 1830: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1826: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1827:
1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1829:
1830: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1831:
1832: RAISE FND_API.G_EXC_ERROR;
1833:
1834: END IF;

Line 1832: RAISE FND_API.G_EXC_ERROR;

1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1829:
1830: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1831:
1832: RAISE FND_API.G_EXC_ERROR;
1833:
1834: END IF;
1835:
1836:

Line 1848: l_return_status := FND_API.G_RET_STS_ERROR;

1844:
1845: if p_credit_action_type = 'LINE' then
1846: null;
1847: else
1848: l_return_status := FND_API.G_RET_STS_ERROR;
1849: l_msg_data := 'PA_IN_ENT_CREDIT_AMT';
1850: l_msg_count := 1;
1851:
1852: RAISE FND_API.G_EXC_ERROR;

Line 1852: RAISE FND_API.G_EXC_ERROR;

1848: l_return_status := FND_API.G_RET_STS_ERROR;
1849: l_msg_data := 'PA_IN_ENT_CREDIT_AMT';
1850: l_msg_count := 1;
1851:
1852: RAISE FND_API.G_EXC_ERROR;
1853:
1854: end if;
1855: END IF;
1856:

Line 1861: l_return_status := FND_API.G_RET_STS_ERROR;

1857: /* Sixth check - the total credit amount should not be negative */
1858: --For bug 4231721 :Changing the if condition from <>1 to <0 So that check is valid only is Credit amount <0
1859: IF sign(nvl(p_credit_amount,0)) < 0 THEN
1860:
1861: l_return_status := FND_API.G_RET_STS_ERROR;
1862: l_msg_data := 'PA_SU_NEGATIVE_NUM_NOT_ALLOWED';
1863: l_msg_count := 1;
1864:
1865: RAISE FND_API.G_EXC_ERROR;

Line 1865: RAISE FND_API.G_EXC_ERROR;

1861: l_return_status := FND_API.G_RET_STS_ERROR;
1862: l_msg_data := 'PA_SU_NEGATIVE_NUM_NOT_ALLOWED';
1863: l_msg_count := 1;
1864:
1865: RAISE FND_API.G_EXC_ERROR;
1866:
1867: END IF;
1868:
1869:

Line 1872: WHEN FND_API.G_EXC_ERROR THEN

1868:
1869:
1870: EXCEPTION
1871:
1872: WHEN FND_API.G_EXC_ERROR THEN
1873: x_return_status := l_return_status;
1874: x_msg_count := l_msg_count;
1875: x_msg_data := l_msg_data;
1876:

Line 1880: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1876:
1877: /* ATG Changes */
1878: x_tot_credited_amt := null;
1879:
1880: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1881: x_return_status := l_return_status;
1882: x_msg_count := l_msg_count;
1883: x_msg_data := l_msg_data;
1884:

Line 1889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1885: /* ATG Changes */
1886: x_tot_credited_amt := null;
1887:
1888: WHEN others then
1889: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1890: x_msg_count := l_msg_count;
1891: x_msg_data := SUBSTR(SQLERRM,1,100);
1892:
1893: /* ATG Changes */

Line 1927: x_return_status := FND_API.G_RET_STS_SUCCESS;

1923: l_msg_data VARCHAR2(250) := NULL;
1924:
1925: BEGIN
1926:
1927: x_return_status := FND_API.G_RET_STS_SUCCESS;
1928: x_msg_count := 0;
1929:
1930: /* Update credit_process_flag, credit_amount to NULL */
1931:

Line 1941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1937:
1938: EXCEPTION
1939:
1940: WHEN others then
1941: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1942: x_msg_count := l_msg_count;
1943: x_msg_data := SUBSTR(SQLERRM,1,100);
1944:
1945:

Line 1987: x_return_status := FND_API.G_RET_STS_SUCCESS;

1983: l_msg_data VARCHAR2(250) := NULL;
1984:
1985: BEGIN
1986:
1987: x_return_status := FND_API.G_RET_STS_SUCCESS;
1988: x_msg_count := 0;
1989:
1990: /* In the case of credit action type at
1991:

Line 2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2059:
2060: EXCEPTION
2061:
2062: WHEN others then
2063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2064: x_msg_count := l_msg_count;
2065: x_msg_data := SUBSTR(SQLERRM,1,100);
2066:
2067: END update_credit_qual_lines;

Line 2109: x_return_status := FND_API.G_RET_STS_SUCCESS;

2105:
2106:
2107: BEGIN
2108:
2109: x_return_status := FND_API.G_RET_STS_SUCCESS;
2110: x_msg_count := 0;
2111:
2112: /* If credit is performed at GROUP, the total credit amount passed should not exceed the
2113: total selected line invoice amount for credit action WRITE-OFF. For Concession, we allow

Line 2124: l_return_status := FND_API.G_RET_STS_ERROR;

2120: IF p_credit_action = 'CONCESSION' THEN
2121: NULL;
2122: ELSE
2123: IF p_credit_amount > p_inv_amount THEN
2124: l_return_status := FND_API.G_RET_STS_ERROR;
2125: l_msg_data := 'PA_IN_CRD_NOT_EXCEED_BAL';
2126:
2127: RAISE FND_API.G_EXC_ERROR;
2128: END IF;

Line 2127: RAISE FND_API.G_EXC_ERROR;

2123: IF p_credit_amount > p_inv_amount THEN
2124: l_return_status := FND_API.G_RET_STS_ERROR;
2125: l_msg_data := 'PA_IN_CRD_NOT_EXCEED_BAL';
2126:
2127: RAISE FND_API.G_EXC_ERROR;
2128: END IF;
2129: END IF;
2130:
2131: ELSE

Line 2138: l_return_status := FND_API.G_RET_STS_ERROR;

2134:
2135: /* First check - Line credit amount should be greater than zero */
2136:
2137: IF p_credit_amount = 0 THEN
2138: l_return_status := FND_API.G_RET_STS_ERROR;
2139: l_msg_data := 'PA_IN_ENT_CREDIT_AMT';
2140: l_msg_count := 1;
2141:
2142: RAISE FND_API.G_EXC_ERROR;

Line 2142: RAISE FND_API.G_EXC_ERROR;

2138: l_return_status := FND_API.G_RET_STS_ERROR;
2139: l_msg_data := 'PA_IN_ENT_CREDIT_AMT';
2140: l_msg_count := 1;
2141:
2142: RAISE FND_API.G_EXC_ERROR;
2143:
2144: END IF;
2145:
2146: /* Second check - Line credit amount should be of the same sign as the line invoice amount */

Line 2149: l_return_status := FND_API.G_RET_STS_ERROR;

2145:
2146: /* Second check - Line credit amount should be of the same sign as the line invoice amount */
2147:
2148: IF sign(p_inv_amount) <> sign(p_credit_amount) THEN
2149: l_return_status := FND_API.G_RET_STS_ERROR;
2150: l_msg_data := 'PA_IN_CRD_SIGN_INV';
2151: l_msg_count := 1;
2152:
2153: RAISE FND_API.G_EXC_ERROR;

Line 2153: RAISE FND_API.G_EXC_ERROR;

2149: l_return_status := FND_API.G_RET_STS_ERROR;
2150: l_msg_data := 'PA_IN_CRD_SIGN_INV';
2151: l_msg_count := 1;
2152:
2153: RAISE FND_API.G_EXC_ERROR;
2154:
2155: END IF;
2156: END IF;
2157:

Line 2167: WHEN FND_API.G_EXC_ERROR THEN

2163:
2164:
2165: EXCEPTION
2166:
2167: WHEN FND_API.G_EXC_ERROR THEN
2168: x_return_status := l_return_status;
2169: x_msg_count := l_msg_count;
2170: x_msg_data := l_msg_data;
2171:

Line 2172: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2168: x_return_status := l_return_status;
2169: x_msg_count := l_msg_count;
2170: x_msg_data := l_msg_data;
2171:
2172: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2173: x_return_status := l_return_status;
2174: x_msg_count := l_msg_count;
2175: x_msg_data := l_msg_data;
2176:

Line 2178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2174: x_msg_count := l_msg_count;
2175: x_msg_data := l_msg_data;
2176:
2177: WHEN others then
2178: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2179: x_msg_count := l_msg_count;
2180: x_msg_data := SUBSTR(SQLERRM,1,100);
2181:
2182: END validate_line_credit_amount;

Line 2223: x_return_status := FND_API.G_RET_STS_SUCCESS;

2219: l_msg_data VARCHAR2(250) := NULL;
2220:
2221: BEGIN
2222:
2223: x_return_status := FND_API.G_RET_STS_SUCCESS;
2224: x_msg_count := 0;
2225:
2226: -- insert into bss_conc (serial_no, proc_ind) values (1, 'DIST_CREDIT_AMT');
2227:

Line 2271: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2267: x_return_status => l_return_status,
2268: x_msg_count => l_msg_count,
2269: x_msg_data => l_msg_data );
2270:
2271: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2272:
2273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2274:
2275: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 2273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2269: x_msg_data => l_msg_data );
2270:
2271: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2272:
2273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2274:
2275: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2276:
2277: RAISE FND_API.G_EXC_ERROR;

Line 2275: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2271: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2272:
2273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2274:
2275: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2276:
2277: RAISE FND_API.G_EXC_ERROR;
2278:
2279: END IF;

Line 2277: RAISE FND_API.G_EXC_ERROR;

2273: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2274:
2275: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2276:
2277: RAISE FND_API.G_EXC_ERROR;
2278:
2279: END IF;
2280:
2281:

Line 2285: WHEN FND_API.G_EXC_ERROR THEN

2281:
2282:
2283: EXCEPTION
2284:
2285: WHEN FND_API.G_EXC_ERROR THEN
2286: ROLLBACK;
2287: x_return_status := l_return_status;
2288: x_msg_count := l_msg_count;
2289: x_msg_data := l_msg_data;

Line 2291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2287: x_return_status := l_return_status;
2288: x_msg_count := l_msg_count;
2289: x_msg_data := l_msg_data;
2290:
2291: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2292: ROLLBACK;
2293: x_return_status := l_return_status;
2294: x_msg_count := l_msg_count;
2295: x_msg_data := l_msg_data;

Line 2299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2295: x_msg_data := l_msg_data;
2296:
2297: WHEN others then
2298: ROLLBACK;
2299: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2300: x_msg_count := l_msg_count;
2301: x_msg_data := SUBSTR(SQLERRM,1,100);
2302:
2303: END distribute_credit_amount;

Line 2348: x_return_status := FND_API.G_RET_STS_SUCCESS;

2344: l_msg_data VARCHAR2(250) := NULL;
2345:
2346: BEGIN
2347:
2348: x_return_status := FND_API.G_RET_STS_SUCCESS;
2349: x_msg_count := 0;
2350:
2351: /* insert into bss_conc
2352: (serial_no, proc_ind)

Line 2462: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2458: x_return_status => l_return_status,
2459: x_msg_count => l_msg_count,
2460: x_msg_data => l_msg_data );
2461:
2462: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2463:
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465:
2466: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2460: x_msg_data => l_msg_data );
2461:
2462: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2463:
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465:
2466: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2467:
2468: RAISE FND_API.G_EXC_ERROR;

Line 2466: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2462: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2463:
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465:
2466: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2467:
2468: RAISE FND_API.G_EXC_ERROR;
2469:
2470: END IF;

Line 2468: RAISE FND_API.G_EXC_ERROR;

2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465:
2466: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2467:
2468: RAISE FND_API.G_EXC_ERROR;
2469:
2470: END IF;
2471:
2472: end if; -- retained_amount <> 0

Line 2512: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2508: x_msg_count => l_msg_count,
2509: x_msg_data => l_msg_data );
2510:
2511:
2512: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2513:
2514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2515:
2516: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 2514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2510:
2511:
2512: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2513:
2514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2515:
2516: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2517:
2518: RAISE FND_API.G_EXC_ERROR;

Line 2516: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2512: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2513:
2514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2515:
2516: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2517:
2518: RAISE FND_API.G_EXC_ERROR;
2519:
2520: END IF;

Line 2518: RAISE FND_API.G_EXC_ERROR;

2514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2515:
2516: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2517:
2518: RAISE FND_API.G_EXC_ERROR;
2519:
2520: END IF;
2521:
2522: end if; -- l_retained_amunt <> 0

Line 2563: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2559: x_return_status => l_return_status,
2560: x_msg_count => l_msg_count,
2561: x_msg_data => l_msg_data );
2562:
2563: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2564:
2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2566:
2567: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

Line 2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2561: x_msg_data => l_msg_data );
2562:
2563: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2564:
2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2566:
2567: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2568:
2569: RAISE FND_API.G_EXC_ERROR;

Line 2567: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2563: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2564:
2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2566:
2567: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2568:
2569: RAISE FND_API.G_EXC_ERROR;
2570:
2571: END IF;

Line 2569: RAISE FND_API.G_EXC_ERROR;

2565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2566:
2567: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2568:
2569: RAISE FND_API.G_EXC_ERROR;
2570:
2571: END IF;
2572:
2573: end if; -- l_retained_amunt <> 0

Line 2598: WHEN FND_API.G_EXC_ERROR THEN

2594:
2595: WHEN no_data_found then
2596: pa_mcb_invoice_pkg.log_message('No retention lines');
2597:
2598: WHEN FND_API.G_EXC_ERROR THEN
2599: ROLLBACK;
2600: x_return_status := l_return_status;
2601: x_msg_count := l_msg_count;
2602: x_msg_data := l_msg_data;

Line 2604: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2600: x_return_status := l_return_status;
2601: x_msg_count := l_msg_count;
2602: x_msg_data := l_msg_data;
2603:
2604: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2605: ROLLBACK;
2606: x_return_status := l_return_status;
2607: x_msg_count := l_msg_count;
2608: x_msg_data := l_msg_data;

Line 2612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2608: x_msg_data := l_msg_data;
2609:
2610: WHEN others then
2611: ROLLBACK;
2612: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2613: x_msg_count := l_msg_count;
2614: x_msg_data := SUBSTR(SQLERRM,1,100);
2615:
2616: END distribute_credit_amount_retn;

Line 2665: x_return_status := FND_API.G_RET_STS_SUCCESS;

2661: l_msg_count NUMBER := NULL;
2662: l_msg_data VARCHAR2(250) := NULL;
2663: BEGIN
2664:
2665: x_return_status := FND_API.G_RET_STS_SUCCESS;
2666: x_msg_count := 0;
2667:
2668: /* If the retention setup defines only the retention % (no threshold_amount, no retention amount)
2669: then this percentage will be applied on the line credit amount (p_credit_amount) to get retention

Line 2707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2703: WHEN no_data_found then
2704: pa_mcb_invoice_pkg.log_message('No retention lines');
2705:
2706: WHEN others then
2707: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2708: x_msg_count := l_msg_count;
2709: x_msg_data := SUBSTR(SQLERRM,1,100);
2710:
2711: END compute_retn_credit_amount;