260: END IF;
261: /*-----------------------------------------------+
262: | Set the message |
263: +-----------------------------------------------*/
264: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_OPEN_FUTURE_PERIOD');
265: FND_MESSAGE.SET_TOKEN ( 'SET_OF_BOOKS_ID', to_char(arp_global.set_of_books_id)) ;
266: FND_MSG_PUB.ADD ;
267:
268: p_return_status := FND_API.G_RET_STS_ERROR;
261: /*-----------------------------------------------+
262: | Set the message |
263: +-----------------------------------------------*/
264: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_OPEN_FUTURE_PERIOD');
265: FND_MESSAGE.SET_TOKEN ( 'SET_OF_BOOKS_ID', to_char(arp_global.set_of_books_id)) ;
266: FND_MSG_PUB.ADD ;
267:
268: p_return_status := FND_API.G_RET_STS_ERROR;
269:
302: END IF;
303: /*-----------------------------------------------+
304: | Set the message |
305: +-----------------------------------------------*/
306: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_OPEN_FUTURE_PERIOD');
307: FND_MESSAGE.SET_TOKEN ( 'SET_OF_BOOKS_ID', to_char(arp_global.set_of_books_id)) ;
308: FND_MSG_PUB.ADD ;
309:
310: p_return_status := FND_API.G_RET_STS_ERROR;
303: /*-----------------------------------------------+
304: | Set the message |
305: +-----------------------------------------------*/
306: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_OPEN_FUTURE_PERIOD');
307: FND_MESSAGE.SET_TOKEN ( 'SET_OF_BOOKS_ID', to_char(arp_global.set_of_books_id)) ;
308: FND_MSG_PUB.ADD ;
309:
310: p_return_status := FND_API.G_RET_STS_ERROR;
311: WHEN OTHERS THEN
379: /*-----------------------------------------------+
380: | Set the message |
381: +-----------------------------------------------*/
382:
383: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_APPROVAL_CODES');
384: FND_MSG_PUB.ADD ;
385:
386: p_return_status := FND_API.G_RET_STS_ERROR ;
387:
454: END IF;
455: /*-----------------------------------------------+
456: | Set the message |
457: +-----------------------------------------------*/
458: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_TYPE_CODES');
459: FND_MSG_PUB.ADD ;
460:
461: p_return_status := FND_API.G_RET_STS_ERROR ;
462:
529: END IF;
530: /*-----------------------------------------------+
531: | Set the message |
532: +-----------------------------------------------*/
533: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_REASON_CODES');
534: FND_MSG_PUB.ADD ;
535:
536: p_return_status := FND_API.G_RET_STS_ERROR ;
537:
628: /*-----------------------------------------------+
629: | Set the message |
630: +-----------------------------------------------*/
631:
632: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_RECEIVABLES_TRX');
633: FND_MSG_PUB.ADD ;
634:
635: p_return_status := FND_API.G_RET_STS_ERROR ;
636:
722: /*-----------------------------------------------+
723: | Set the message |
724: +-----------------------------------------------*/
725:
726: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_USSGL_CODES');
727: FND_MSG_PUB.ADD ;
728:
729: p_return_status := FND_API.G_RET_STS_SUCCESS ;
730:
818: /*-----------------------------------------------+
819: | Set the message |
820: +-----------------------------------------------*/
821:
822: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CCID');
823: FND_MSG_PUB.ADD ;
824:
825: p_return_status := FND_API.G_RET_STS_ERROR ;
826:
1162: p_inv_curr_code, G_MSG_HIGH
1163: );
1164: END IF;
1165:
1166: FND_MESSAGE.SET_NAME ('AR', 'AR_VAL_USER_LIMIT');
1167: FND_MESSAGE.SET_TOKEN ( 'CURRENCY', p_inv_curr_code ) ;
1168: FND_MSG_PUB.ADD ;
1169: p_approved_flag := FND_API.G_FALSE;
1170:
1163: );
1164: END IF;
1165:
1166: FND_MESSAGE.SET_NAME ('AR', 'AR_VAL_USER_LIMIT');
1167: FND_MESSAGE.SET_TOKEN ( 'CURRENCY', p_inv_curr_code ) ;
1168: FND_MSG_PUB.ADD ;
1169: p_approved_flag := FND_API.G_FALSE;
1170:
1171: WHEN OTHERS THEN
1205: /*--------------------------------------+
1206: | Add a message. But do not signal error|
1207: +--------------------------------------*/
1208:
1209: FND_MESSAGE.SET_NAME ('AR', 'AR_VAL_AMT_APPROVAL_LIMIT');
1210: FND_MSG_PUB.ADD ;
1211:
1212: p_approved_flag := FND_API.G_FALSE;
1213:
1297:
1298: IF (p_adj_rec.line_adjusted is NULL
1299: AND p_ps_rec.amount_line_items_remaining <> 0)
1300: THEN
1301: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1302: FND_MESSAGE.SET_TOKEN('BUCKET','LINE');
1303: FND_MSG_PUB.ADD;
1304:
1305: p_return_status := FND_API.G_RET_STS_ERROR;
1298: IF (p_adj_rec.line_adjusted is NULL
1299: AND p_ps_rec.amount_line_items_remaining <> 0)
1300: THEN
1301: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1302: FND_MESSAGE.SET_TOKEN('BUCKET','LINE');
1303: FND_MSG_PUB.ADD;
1304:
1305: p_return_status := FND_API.G_RET_STS_ERROR;
1306: ELSIF (p_adj_rec.line_adjusted + p_ps_rec.amount_line_items_remaining <> 0)
1304:
1305: p_return_status := FND_API.G_RET_STS_ERROR;
1306: ELSIF (p_adj_rec.line_adjusted + p_ps_rec.amount_line_items_remaining <> 0)
1307: THEN
1308: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1309: FND_MESSAGE.SET_TOKEN('BUCKET','LINE');
1310: FND_MSG_PUB.ADD;
1311:
1312: p_return_status := FND_API.G_RET_STS_ERROR;
1305: p_return_status := FND_API.G_RET_STS_ERROR;
1306: ELSIF (p_adj_rec.line_adjusted + p_ps_rec.amount_line_items_remaining <> 0)
1307: THEN
1308: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1309: FND_MESSAGE.SET_TOKEN('BUCKET','LINE');
1310: FND_MSG_PUB.ADD;
1311:
1312: p_return_status := FND_API.G_RET_STS_ERROR;
1313: END IF;
1316:
1317: IF (p_adj_rec.tax_adjusted is NULL
1318: AND p_ps_rec.tax_remaining <> 0)
1319: THEN
1320: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1321: FND_MESSAGE.SET_TOKEN('BUCKET','TAX');
1322: FND_MSG_PUB.ADD;
1323:
1324: p_return_status := FND_API.G_RET_STS_ERROR;
1317: IF (p_adj_rec.tax_adjusted is NULL
1318: AND p_ps_rec.tax_remaining <> 0)
1319: THEN
1320: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1321: FND_MESSAGE.SET_TOKEN('BUCKET','TAX');
1322: FND_MSG_PUB.ADD;
1323:
1324: p_return_status := FND_API.G_RET_STS_ERROR;
1325: ELSIF (p_adj_rec.tax_adjusted + p_ps_rec.tax_remaining <> 0)
1323:
1324: p_return_status := FND_API.G_RET_STS_ERROR;
1325: ELSIF (p_adj_rec.tax_adjusted + p_ps_rec.tax_remaining <> 0)
1326: THEN
1327: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1328: FND_MESSAGE.SET_TOKEN('BUCKET','TAX');
1329: FND_MSG_PUB.ADD;
1330:
1331: p_return_status := FND_API.G_RET_STS_ERROR;
1324: p_return_status := FND_API.G_RET_STS_ERROR;
1325: ELSIF (p_adj_rec.tax_adjusted + p_ps_rec.tax_remaining <> 0)
1326: THEN
1327: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1328: FND_MESSAGE.SET_TOKEN('BUCKET','TAX');
1329: FND_MSG_PUB.ADD;
1330:
1331: p_return_status := FND_API.G_RET_STS_ERROR;
1332: END IF;
1335:
1336: IF (p_adj_rec.freight_adjusted is NULL
1337: AND p_ps_rec.freight_remaining <> 0)
1338: THEN
1339: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1340: FND_MESSAGE.SET_TOKEN('BUCKET','FREIGHT');
1341: FND_MSG_PUB.ADD;
1342:
1343: p_return_status := FND_API.G_RET_STS_ERROR;
1336: IF (p_adj_rec.freight_adjusted is NULL
1337: AND p_ps_rec.freight_remaining <> 0)
1338: THEN
1339: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1340: FND_MESSAGE.SET_TOKEN('BUCKET','FREIGHT');
1341: FND_MSG_PUB.ADD;
1342:
1343: p_return_status := FND_API.G_RET_STS_ERROR;
1344: ELSIF (p_adj_rec.freight_adjusted + p_ps_rec.freight_remaining <> 0)
1342:
1343: p_return_status := FND_API.G_RET_STS_ERROR;
1344: ELSIF (p_adj_rec.freight_adjusted + p_ps_rec.freight_remaining <> 0)
1345: THEN
1346: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1347: FND_MESSAGE.SET_TOKEN('BUCKET','FREIGHT');
1348: FND_MSG_PUB.ADD;
1349:
1350: p_return_status := FND_API.G_RET_STS_ERROR;
1343: p_return_status := FND_API.G_RET_STS_ERROR;
1344: ELSIF (p_adj_rec.freight_adjusted + p_ps_rec.freight_remaining <> 0)
1345: THEN
1346: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1347: FND_MESSAGE.SET_TOKEN('BUCKET','FREIGHT');
1348: FND_MSG_PUB.ADD;
1349:
1350: p_return_status := FND_API.G_RET_STS_ERROR;
1351: END IF;
1354:
1355: IF (p_adj_rec.receivables_charges_adjusted is NULL
1356: AND p_ps_rec.receivables_charges_remaining <> 0)
1357: THEN
1358: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1359: FND_MESSAGE.SET_TOKEN('BUCKET','CHARGES');
1360: FND_MSG_PUB.ADD;
1361:
1362: p_return_status := FND_API.G_RET_STS_ERROR;
1355: IF (p_adj_rec.receivables_charges_adjusted is NULL
1356: AND p_ps_rec.receivables_charges_remaining <> 0)
1357: THEN
1358: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_INC_BUCKET');
1359: FND_MESSAGE.SET_TOKEN('BUCKET','CHARGES');
1360: FND_MSG_PUB.ADD;
1361:
1362: p_return_status := FND_API.G_RET_STS_ERROR;
1363: ELSIF (p_adj_rec.receivables_charges_adjusted + p_ps_rec.receivables_charges_remaining <> 0)
1361:
1362: p_return_status := FND_API.G_RET_STS_ERROR;
1363: ELSIF (p_adj_rec.receivables_charges_adjusted + p_ps_rec.receivables_charges_remaining <> 0)
1364: THEN
1365: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1366: FND_MESSAGE.SET_TOKEN('BUCKET','CHARGES');
1367: FND_MSG_PUB.ADD;
1368:
1369: p_return_status := FND_API.G_RET_STS_ERROR;
1362: p_return_status := FND_API.G_RET_STS_ERROR;
1363: ELSIF (p_adj_rec.receivables_charges_adjusted + p_ps_rec.receivables_charges_remaining <> 0)
1364: THEN
1365: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_BUCKETS');
1366: FND_MESSAGE.SET_TOKEN('BUCKET','CHARGES');
1367: FND_MSG_PUB.ADD;
1368:
1369: p_return_status := FND_API.G_RET_STS_ERROR;
1370: END IF;
1463: /*-----------------------------------------------+
1464: | Set the message |
1465: +-----------------------------------------------*/
1466:
1467: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_ADJUSTMENT_TYPE');
1468: FND_MESSAGE.SET_TOKEN ( 'TYPE', p_adj_rec.type ) ;
1469: FND_MSG_PUB.ADD ;
1470:
1471: END IF;
1464: | Set the message |
1465: +-----------------------------------------------*/
1466:
1467: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_ADJUSTMENT_TYPE');
1468: FND_MESSAGE.SET_TOKEN ( 'TYPE', p_adj_rec.type ) ;
1469: FND_MSG_PUB.ADD ;
1470:
1471: END IF;
1472:
1580: /*-----------------------------------------------+
1581: | Set the message and return |
1582: +-----------------------------------------------*/
1583:
1584: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_PAYSCHD');
1585: FND_MESSAGE.SET_TOKEN ( 'PAYMENT_SCHEDULE_ID', to_char(p_adj_rec.payment_schedule_id)) ;
1586: FND_MSG_PUB.ADD ;
1587:
1588: p_return_status := FND_API.G_RET_STS_ERROR;
1581: | Set the message and return |
1582: +-----------------------------------------------*/
1583:
1584: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_PAYSCHD');
1585: FND_MESSAGE.SET_TOKEN ( 'PAYMENT_SCHEDULE_ID', to_char(p_adj_rec.payment_schedule_id)) ;
1586: FND_MSG_PUB.ADD ;
1587:
1588: p_return_status := FND_API.G_RET_STS_ERROR;
1589:
1612: | Payment schedule Id does not exist |
1613: | Set the message and status accordingly |
1614: +-----------------------------------------------*/
1615:
1616: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_PAYSCHD');
1617: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id)) ;
1618: FND_MSG_PUB.ADD ;
1619: p_return_status := FND_API.G_RET_STS_ERROR;
1620: IF PG_DEBUG in ('Y', 'C') THEN
1613: | Set the message and status accordingly |
1614: +-----------------------------------------------*/
1615:
1616: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_PAYSCHD');
1617: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id)) ;
1618: FND_MSG_PUB.ADD ;
1619: p_return_status := FND_API.G_RET_STS_ERROR;
1620: IF PG_DEBUG in ('Y', 'C') THEN
1621: arp_util.debug('Validate_Payschd: ' || 'payment schedule id is invalid');
1631: --snambiar added chargeback also in the list for adjustment
1632: IF ( p_ps_rec.class NOT IN ( 'INV','DM','CM','DEP','GUAR','BR','CB') )
1633: THEN
1634:
1635: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_TRX_CLASS');
1636: FND_MESSAGE.SET_TOKEN ( 'CLASS', p_ps_rec.class ) ;
1637: FND_MSG_PUB.ADD ;
1638:
1639: p_return_status := FND_API.G_RET_STS_ERROR;
1632: IF ( p_ps_rec.class NOT IN ( 'INV','DM','CM','DEP','GUAR','BR','CB') )
1633: THEN
1634:
1635: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_TRX_CLASS');
1636: FND_MESSAGE.SET_TOKEN ( 'CLASS', p_ps_rec.class ) ;
1637: FND_MSG_PUB.ADD ;
1638:
1639: p_return_status := FND_API.G_RET_STS_ERROR;
1640: IF PG_DEBUG in ('Y', 'C') THEN
1653: /*-----------------------------------------------+
1654: | Set the message accordingly |
1655: +-----------------------------------------------*/
1656:
1657: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_ID');
1658: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id));
1659: FND_MSG_PUB.ADD ;
1660: p_return_status := FND_API.G_RET_STS_ERROR;
1661: IF PG_DEBUG in ('Y', 'C') THEN
1654: | Set the message accordingly |
1655: +-----------------------------------------------*/
1656:
1657: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_ID');
1658: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id));
1659: FND_MSG_PUB.ADD ;
1660: p_return_status := FND_API.G_RET_STS_ERROR;
1661: IF PG_DEBUG in ('Y', 'C') THEN
1662: arp_util.debug('Validate_Payschd: ' || 'there is no valid customer trx id for the paysch id');
1675: /*-----------------------------------------------+
1676: | Set the message accordingly |
1677: +-----------------------------------------------*/
1678:
1679: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_ID');
1680: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id));
1681: FND_MSG_PUB.ADD ;
1682:
1683: p_return_status := FND_API.G_RET_STS_ERROR;
1676: | Set the message accordingly |
1677: +-----------------------------------------------*/
1678:
1679: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_ID');
1680: FND_MESSAGE.SET_TOKEN('PAYMENT_SCHEDULE_ID',to_char(p_adj_rec.payment_schedule_id));
1681: FND_MSG_PUB.ADD ;
1682:
1683: p_return_status := FND_API.G_RET_STS_ERROR;
1684: IF PG_DEBUG in ('Y', 'C') THEN
1752: /*-----------------------------------------------+
1753: | Set error message and status |
1754: +-----------------------------------------------*/
1755: IF p_from_llca_call <> 'Y' THEN
1756: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1757: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1758: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1759: FND_MSG_PUB.ADD ;
1760:
1753: | Set error message and status |
1754: +-----------------------------------------------*/
1755: IF p_from_llca_call <> 'Y' THEN
1756: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1757: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1758: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1759: FND_MSG_PUB.ADD ;
1760:
1761: p_return_status := FND_API.G_RET_STS_ERROR;
1754: +-----------------------------------------------*/
1755: IF p_from_llca_call <> 'Y' THEN
1756: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1757: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1758: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1759: FND_MSG_PUB.ADD ;
1760:
1761: p_return_status := FND_API.G_RET_STS_ERROR;
1762: IF PG_DEBUG in ('Y', 'C') THEN
1796: ELSE
1797:
1798: -- Set error message when the type is line and the |
1799: -- customer_trx_line_id is null |
1800: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1801: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1802: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1803: FND_MSG_PUB.ADD ;
1804:
1797:
1798: -- Set error message when the type is line and the |
1799: -- customer_trx_line_id is null |
1800: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1801: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1802: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1803: FND_MSG_PUB.ADD ;
1804:
1805: p_return_status := FND_API.G_RET_STS_ERROR;
1798: -- Set error message when the type is line and the |
1799: -- customer_trx_line_id is null |
1800: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CUSTOMER_TRX_LINEID');
1801: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',to_char(p_adj_rec.customer_trx_line_id) ) ;
1802: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',to_char(p_adj_rec.customer_trx_id));
1803: FND_MSG_PUB.ADD ;
1804:
1805: p_return_status := FND_API.G_RET_STS_ERROR;
1806:
1819: IF ( p_adj_rec.customer_trx_line_id IS NOT NULL OR
1820: p_adj_rec.customer_trx_line_id <> 0 )
1821: THEN
1822:
1823: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_LINE_ID_FOR_NONLINE');
1824: FND_MESSAGE.SET_TOKEN ( 'CUSTOMER_TRX_LINE_ID', to_char(p_adj_rec.customer_trx_line_id) ) ;
1825: FND_MESSAGE.SET_TOKEN ( 'TYPE', p_ps_rec.class ) ;
1826: FND_MSG_PUB.ADD ;
1827:
1820: p_adj_rec.customer_trx_line_id <> 0 )
1821: THEN
1822:
1823: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_LINE_ID_FOR_NONLINE');
1824: FND_MESSAGE.SET_TOKEN ( 'CUSTOMER_TRX_LINE_ID', to_char(p_adj_rec.customer_trx_line_id) ) ;
1825: FND_MESSAGE.SET_TOKEN ( 'TYPE', p_ps_rec.class ) ;
1826: FND_MSG_PUB.ADD ;
1827:
1828: p_return_status := FND_API.G_RET_STS_ERROR;
1821: THEN
1822:
1823: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_LINE_ID_FOR_NONLINE');
1824: FND_MESSAGE.SET_TOKEN ( 'CUSTOMER_TRX_LINE_ID', to_char(p_adj_rec.customer_trx_line_id) ) ;
1825: FND_MESSAGE.SET_TOKEN ( 'TYPE', p_ps_rec.class ) ;
1826: FND_MSG_PUB.ADD ;
1827:
1828: p_return_status := FND_API.G_RET_STS_ERROR;
1829: IF PG_DEBUG in ('Y', 'C') THEN
1968: +-----------------------------------------------*/
1969: IF ( p_ps_rec.amount_due_remaining = 0 )
1970: THEN
1971:
1972: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_ADR_ZERO_INV');
1973: FND_MSG_PUB.ADD ;
1974:
1975: p_return_status := FND_API.G_RET_STS_ERROR ;
1976: END IF;
1986: ELSE
1987: IF ( p_adj_rec.amount + p_ps_rec.amount_due_remaining <> 0 )
1988: THEN
1989:
1990: FND_MESSAGE.SET_NAME ('AR', 'AR_TW_VAL_AMT_ADJ_INV');
1991: FND_MSG_PUB.ADD ;
1992:
1993: p_return_status := FND_API.G_RET_STS_ERROR;
1994: END IF;
2022: /*--------------------------------------------+
2023: | Set the message and return |
2024: +--------------------------------------------*/
2025:
2026: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_ADJ_AMOUNT_ZERO');
2027: FND_MSG_PUB.ADD ;
2028:
2029: p_return_status := FND_API.G_RET_STS_ERROR;
2030: END IF;
2081: IF (p_adj_rec.status <> 'A' AND p_adj_rec.status <> 'W' AND
2082: p_adj_rec.status <> 'M' )
2083: THEN
2084:
2085: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_CREATE_STATUS');
2086: FND_MESSAGE.SET_TOKEN ( 'STATUS', p_adj_rec.status ) ;
2087: FND_MSG_PUB.ADD ;
2088:
2089: p_return_status := FND_API.G_RET_STS_ERROR ;
2082: p_adj_rec.status <> 'M' )
2083: THEN
2084:
2085: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_CREATE_STATUS');
2086: FND_MESSAGE.SET_TOKEN ( 'STATUS', p_adj_rec.status ) ;
2087: FND_MSG_PUB.ADD ;
2088:
2089: p_return_status := FND_API.G_RET_STS_ERROR ;
2090: END IF;
2243: should be of type ENDORSEMENT or -15',G_MSG_HIGH);
2244: END IF;
2245:
2246: IF p_from_llca_call <> 'Y' THEN
2247: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RCVABLE_TRX_ID');
2248: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2249: FND_MSG_PUB.ADD ;
2250: p_return_status := FND_API.G_RET_STS_ERROR;
2251: ELSE
2244: END IF;
2245:
2246: IF p_from_llca_call <> 'Y' THEN
2247: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RCVABLE_TRX_ID');
2248: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2249: FND_MSG_PUB.ADD ;
2250: p_return_status := FND_API.G_RET_STS_ERROR;
2251: ELSE
2252: insert into ar_llca_adj_trx_errors_gt
2290: | Set the message |
2291: +-----------------------------------------------*/
2292: IF p_from_llca_call <> 'Y' THEN
2293:
2294: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RCVABLE_TRX_ID');
2295: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2296: FND_MSG_PUB.ADD ;
2297: p_return_status := FND_API.G_RET_STS_ERROR;
2298:
2291: +-----------------------------------------------*/
2292: IF p_from_llca_call <> 'Y' THEN
2293:
2294: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RCVABLE_TRX_ID');
2295: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2296: FND_MSG_PUB.ADD ;
2297: p_return_status := FND_API.G_RET_STS_ERROR;
2298:
2299: ELSE
2348:
2349: IF ( (l_cc_id IS NULL OR l_cc_id = 0) and l_gl_account_source = 'ACTIVITY_GL_ACCOUNT')
2350: THEN
2351: IF p_from_llca_call <> 'Y' THEN
2352: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CCID_FOR_ACTIVITY');
2353: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2354: FND_MSG_PUB.ADD ;
2355: p_return_status := FND_API.G_RET_STS_ERROR;
2356: ELSE
2349: IF ( (l_cc_id IS NULL OR l_cc_id = 0) and l_gl_account_source = 'ACTIVITY_GL_ACCOUNT')
2350: THEN
2351: IF p_from_llca_call <> 'Y' THEN
2352: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CCID_FOR_ACTIVITY');
2353: FND_MESSAGE.SET_TOKEN ( 'RECEIVABLES_TRX_ID', to_char(p_adj_rec.receivables_trx_id) ) ;
2354: FND_MSG_PUB.ADD ;
2355: p_return_status := FND_API.G_RET_STS_ERROR;
2356: ELSE
2357: insert into ar_llca_adj_trx_errors_gt
2430: /*-------------------------------------------+
2431: | Set the message |
2432: +-------------------------------------------*/
2433: IF p_from_llca_call <> 'Y' THEN
2434: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_CCID');
2435: FND_MESSAGE.SET_TOKEN ( 'CCID', p_adj_rec.code_combination_id ) ;
2436: FND_MSG_PUB.ADD ;
2437: p_return_status := FND_API.G_RET_STS_ERROR;
2438: ELSE
2431: | Set the message |
2432: +-------------------------------------------*/
2433: IF p_from_llca_call <> 'Y' THEN
2434: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_CCID');
2435: FND_MESSAGE.SET_TOKEN ( 'CCID', p_adj_rec.code_combination_id ) ;
2436: FND_MSG_PUB.ADD ;
2437: p_return_status := FND_API.G_RET_STS_ERROR;
2438: ELSE
2439: insert into ar_llca_adj_trx_errors_gt
2470: THEN
2471: IF ( p_adj_rec.code_combination_id <> l_cc_id )
2472: THEN
2473: IF p_from_llca_call <> 'Y' THEN
2474: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_OVERRIDE_CCID_DISALLOW');
2475: FND_MSG_PUB.ADD ;
2476: p_return_status := FND_API.G_RET_STS_ERROR;
2477: ELSE
2478: insert into ar_llca_adj_trx_errors_gt
2580:
2581: IF ( p_apply_date IS NULL )
2582: THEN
2583:
2584: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_APPLY_DATE');
2585: FND_MSG_PUB.ADD ;
2586: p_return_status := FND_API.G_RET_STS_ERROR;
2587: END IF;
2588:
2588:
2589: IF ( p_gl_date IS NULL )
2590: THEN
2591:
2592: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_GL_DATE');
2593: FND_MSG_PUB.ADD ;
2594: p_return_status := FND_API.G_RET_STS_ERROR;
2595: END IF;
2596:
2657: +------------------------------------------*/
2658:
2659: IF ( NOT l_found_flag )
2660: THEN
2661: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_GLDATE_INVALID_PERIOD');
2662: FND_MESSAGE.SET_TOKEN ( 'GL_DATE', to_char(p_gl_date,'DD-MON-YYYY') ) ;
2663: FND_MSG_PUB.ADD ;
2664: p_return_status := FND_API.G_RET_STS_ERROR;
2665: END IF;
2658:
2659: IF ( NOT l_found_flag )
2660: THEN
2661: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_GLDATE_INVALID_PERIOD');
2662: FND_MESSAGE.SET_TOKEN ( 'GL_DATE', to_char(p_gl_date,'DD-MON-YYYY') ) ;
2663: FND_MSG_PUB.ADD ;
2664: p_return_status := FND_API.G_RET_STS_ERROR;
2665: END IF;
2666:
2670: +---------------------------------------*/
2671:
2672: IF ( trunc(p_apply_date) < trunc(p_ps_rec.trx_date) )
2673: THEN
2674: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_APPLYDATE_LT_TRXDATE');
2675: FND_MESSAGE.SET_TOKEN ( 'APPLY_DATE', to_char(p_apply_date,'DD-MON-YYYY') ) ;
2676: FND_MESSAGE.SET_TOKEN ( 'TRX_DATE', to_char(p_ps_rec.trx_date,'DD-MON-YYYY') ) ;
2677: FND_MSG_PUB.ADD ;
2678: p_return_status := FND_API.G_RET_STS_ERROR;
2671:
2672: IF ( trunc(p_apply_date) < trunc(p_ps_rec.trx_date) )
2673: THEN
2674: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_APPLYDATE_LT_TRXDATE');
2675: FND_MESSAGE.SET_TOKEN ( 'APPLY_DATE', to_char(p_apply_date,'DD-MON-YYYY') ) ;
2676: FND_MESSAGE.SET_TOKEN ( 'TRX_DATE', to_char(p_ps_rec.trx_date,'DD-MON-YYYY') ) ;
2677: FND_MSG_PUB.ADD ;
2678: p_return_status := FND_API.G_RET_STS_ERROR;
2679:
2672: IF ( trunc(p_apply_date) < trunc(p_ps_rec.trx_date) )
2673: THEN
2674: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_APPLYDATE_LT_TRXDATE');
2675: FND_MESSAGE.SET_TOKEN ( 'APPLY_DATE', to_char(p_apply_date,'DD-MON-YYYY') ) ;
2676: FND_MESSAGE.SET_TOKEN ( 'TRX_DATE', to_char(p_ps_rec.trx_date,'DD-MON-YYYY') ) ;
2677: FND_MSG_PUB.ADD ;
2678: p_return_status := FND_API.G_RET_STS_ERROR;
2679:
2680: END IF;
2685: +---------------------------------------*/
2686:
2687: IF ( trunc(p_gl_date) < trunc(p_ps_rec.gl_date) )
2688: THEN
2689: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_GLDATE_LT_TRXGLDATE');
2690: FND_MESSAGE.SET_TOKEN ( 'GL_DATE', to_char(p_gl_date,'DD-MON-YYYY') ) ;
2691: FND_MESSAGE.SET_TOKEN ( 'TRX_GL_DATE', to_char(p_ps_rec.gl_date,'DD-MON-YYYY') ) ;
2692: FND_MSG_PUB.ADD ;
2693: p_return_status := FND_API.G_RET_STS_ERROR;
2686:
2687: IF ( trunc(p_gl_date) < trunc(p_ps_rec.gl_date) )
2688: THEN
2689: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_GLDATE_LT_TRXGLDATE');
2690: FND_MESSAGE.SET_TOKEN ( 'GL_DATE', to_char(p_gl_date,'DD-MON-YYYY') ) ;
2691: FND_MESSAGE.SET_TOKEN ( 'TRX_GL_DATE', to_char(p_ps_rec.gl_date,'DD-MON-YYYY') ) ;
2692: FND_MSG_PUB.ADD ;
2693: p_return_status := FND_API.G_RET_STS_ERROR;
2694: END IF;
2687: IF ( trunc(p_gl_date) < trunc(p_ps_rec.gl_date) )
2688: THEN
2689: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_GLDATE_LT_TRXGLDATE');
2690: FND_MESSAGE.SET_TOKEN ( 'GL_DATE', to_char(p_gl_date,'DD-MON-YYYY') ) ;
2691: FND_MESSAGE.SET_TOKEN ( 'TRX_GL_DATE', to_char(p_ps_rec.gl_date,'DD-MON-YYYY') ) ;
2692: FND_MSG_PUB.ADD ;
2693: p_return_status := FND_API.G_RET_STS_ERROR;
2694: END IF;
2695:
2797: p_adj_rec.doc_sequence_id <> 0 OR
2798: p_adj_rec.doc_sequence_value IS NOT NULL OR
2799: p_adj_rec.doc_sequence_value <> 0 )
2800: THEN
2801: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_DOC_SEQ_NOT_REQD');
2802: FND_MESSAGE.SET_TOKEN ( 'DOCUMENT_SEQ',
2803: to_char(nvl(p_adj_rec.doc_sequence_id,p_adj_rec.doc_sequence_value ))) ;
2804: FND_MSG_PUB.ADD ;
2805: p_return_status := FND_API.G_RET_STS_ERROR;
2798: p_adj_rec.doc_sequence_value IS NOT NULL OR
2799: p_adj_rec.doc_sequence_value <> 0 )
2800: THEN
2801: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_DOC_SEQ_NOT_REQD');
2802: FND_MESSAGE.SET_TOKEN ( 'DOCUMENT_SEQ',
2803: to_char(nvl(p_adj_rec.doc_sequence_id,p_adj_rec.doc_sequence_value ))) ;
2804: FND_MSG_PUB.ADD ;
2805: p_return_status := FND_API.G_RET_STS_ERROR;
2806: END IF;
2850: /*-----------------------------------------+
2851: | Automatic Document Numbering case |
2852: | Document seuqence value should not exist|
2853: +-----------------------------------------*/
2854: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_DOC_SEQ_NOT_REQD');
2855: FND_MESSAGE.SET_TOKEN ( 'DOCUMENT_SEQ',
2856: to_char(p_adj_rec.doc_sequence_value) ) ;
2857: FND_MSG_PUB.ADD ;
2858:
2851: | Automatic Document Numbering case |
2852: | Document seuqence value should not exist|
2853: +-----------------------------------------*/
2854: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_DOC_SEQ_NOT_REQD');
2855: FND_MESSAGE.SET_TOKEN ( 'DOCUMENT_SEQ',
2856: to_char(p_adj_rec.doc_sequence_value) ) ;
2857: FND_MSG_PUB.ADD ;
2858:
2859: p_return_status := FND_API.G_RET_STS_ERROR;
2896: AND p_adj_rec.doc_sequence_id IS NULL
2897: AND p_adj_rec.doc_sequence_value IS NULL )
2898: THEN
2899:
2900: FND_MESSAGE.SET_NAME ('FND', 'UNIQUE-ALWAYS USED');
2901: FND_MSG_PUB.ADD ;
2902:
2903: p_return_status := FND_API.G_RET_STS_ERROR;
2904: END IF;
2923: +-----------------------------------------*/
2924: IF (g_context_rec.unique_seq_numbers = 'A' )
2925: THEN
2926:
2927: FND_MESSAGE.SET_NAME ('FND', 'UNIQUE-ALWAYS USED');
2928: FND_MSG_PUB.ADD ;
2929:
2930: p_return_status := FND_API.G_RET_STS_ERROR;
2931: ELSE
3028: THEN
3029: /*-----------------------------------------------+
3030: | Set the message |
3031: +-----------------------------------------------*/
3032: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_REASON_CODE');
3033: FND_MESSAGE.SET_TOKEN ( 'REASON_CODE', p_adj_rec.reason_code ) ;
3034: FND_MSG_PUB.ADD ;
3035: p_return_status := FND_API.G_RET_STS_ERROR;
3036:
3029: /*-----------------------------------------------+
3030: | Set the message |
3031: +-----------------------------------------------*/
3032: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_REASON_CODE');
3033: FND_MESSAGE.SET_TOKEN ( 'REASON_CODE', p_adj_rec.reason_code ) ;
3034: FND_MSG_PUB.ADD ;
3035: p_return_status := FND_API.G_RET_STS_ERROR;
3036:
3037: END IF;
3167: THEN
3168: IF PG_DEBUG in ('Y', 'C') THEN
3169: arp_util.debug('arp_util.Validate_Desc_Flexfield - Failed', G_MSG_UERROR);
3170: END IF;
3171: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_DESC_FLEX');
3172: FND_MSG_PUB.ADD ;
3173: p_return_status := FND_API.G_RET_STS_ERROR;
3174: END IF;
3175:
3266: THEN
3267: /*------------------------------------------+
3268: | Set the message |
3269: +------------------------------------------*/
3270: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_NO_CREATED_FROM');
3271: FND_MSG_PUB.ADD ;
3272: p_return_status := FND_API.G_RET_STS_ERROR;
3273: END IF;
3274:
3376: THEN
3377: /*-----------------------------------------------+
3378: | Set the message |
3379: +-----------------------------------------------*/
3380: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_USSGL_CODE');
3381: FND_MESSAGE.SET_TOKEN ( 'USSGL_CODE', p_adj_rec.ussgl_transaction_code ) ;
3382: FND_MSG_PUB.ADD ;
3383:
3384: END IF;
3377: /*-----------------------------------------------+
3378: | Set the message |
3379: +-----------------------------------------------*/
3380: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_USSGL_CODE');
3381: FND_MESSAGE.SET_TOKEN ( 'USSGL_CODE', p_adj_rec.ussgl_transaction_code ) ;
3382: FND_MSG_PUB.ADD ;
3383:
3384: END IF;
3385:
3390: +------------------------------------------*/
3391: IF ( p_adj_rec.ussgl_transaction_code IS NOT NULL AND
3392: p_adj_rec.ussgl_transaction_code <> ' ' )
3393: THEN
3394: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_USSGL_CODE_DISALLOW');
3395: FND_MESSAGE.SET_TOKEN ( 'USSGL_CODE', p_adj_rec.ussgl_transaction_code ) ;
3396: FND_MSG_PUB.ADD ;
3397:
3398: ELSE
3391: IF ( p_adj_rec.ussgl_transaction_code IS NOT NULL AND
3392: p_adj_rec.ussgl_transaction_code <> ' ' )
3393: THEN
3394: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_USSGL_CODE_DISALLOW');
3395: FND_MESSAGE.SET_TOKEN ( 'USSGL_CODE', p_adj_rec.ussgl_transaction_code ) ;
3396: FND_MSG_PUB.ADD ;
3397:
3398: ELSE
3399: p_return_status := FND_API.G_RET_STS_SUCCESS;
3496: THEN
3497: /*------------------------------------------+
3498: | Set the message |
3499: +------------------------------------------*/
3500: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RECEIPT_ID');
3501: FND_MESSAGE.SET_TOKEN ( 'ASSOCIATED_CASH_RECEIPT_ID', to_char(p_adj_rec.associated_cash_receipt_id) ) ;
3502: FND_MSG_PUB.ADD ;
3503:
3504: p_return_status := FND_API.G_RET_STS_ERROR;
3497: /*------------------------------------------+
3498: | Set the message |
3499: +------------------------------------------*/
3500: FND_MESSAGE.SET_NAME ('AR', 'AR_AAPI_INVALID_RECEIPT_ID');
3501: FND_MESSAGE.SET_TOKEN ( 'ASSOCIATED_CASH_RECEIPT_ID', to_char(p_adj_rec.associated_cash_receipt_id) ) ;
3502: FND_MSG_PUB.ADD ;
3503:
3504: p_return_status := FND_API.G_RET_STS_ERROR;
3505: END IF;
3637: /*
3638: IF ( l_type_adr + p_adj_rec.amount <> 0 )
3639: THEN
3640: p_return_status := FND_API.G_RET_STS_ERROR;
3641: FND_MESSAGE.SET_NAME('AR','AR_TW_VAL_AMT_ADJ_INV');
3642: FND_MSG_PUB.Add;
3643: END IF;*/
3644:
3645:
3665:
3666: IF ( l_message_name IS NOT NULL)
3667: THEN
3668: p_return_status := FND_API.G_RET_STS_ERROR;
3669: FND_MESSAGE.SET_NAME('AR',l_message_name);
3670: FND_MSG_PUB.Add;
3671: END IF;
3672:
3673:
3692:
3693: IF ( l_message_name IS NOT NULL)
3694: THEN
3695: p_return_status := FND_API.G_RET_STS_ERROR;
3696: FND_MESSAGE.SET_NAME('AR',l_message_name);
3697: FND_MSG_PUB.Add;
3698: END IF;
3699:
3700: END IF;