756: ELSE
757: RETURN trunc(sysdate);
758: END IF;
759: ELSE
760: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
761: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
762: FND_MSG_PUB.Add;
763: app_exception.raise_exception;
764: END IF;
757: RETURN trunc(sysdate);
758: END IF;
759: ELSE
760: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
761: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
762: FND_MSG_PUB.Add;
763: app_exception.raise_exception;
764: END IF;
765: IF PG_DEBUG in ('Y', 'C') THEN
1450:
1451: EXCEPTION
1452: WHEN EventNotFound THEN
1453:
1454: FND_MESSAGE.SET_NAME( 'AR', 'AR_EVENTNOTFOUND');
1455: FND_MESSAGE.SET_TOKEN( 'EVENT' ,p_event_name );
1456: FND_MSG_PUB.Add;
1457: app_exception.raise_exception;
1458:
1451: EXCEPTION
1452: WHEN EventNotFound THEN
1453:
1454: FND_MESSAGE.SET_NAME( 'AR', 'AR_EVENTNOTFOUND');
1455: FND_MESSAGE.SET_TOKEN( 'EVENT' ,p_event_name );
1456: FND_MSG_PUB.Add;
1457: app_exception.raise_exception;
1458:
1459: WHEN EventNotARCC THEN
1456: FND_MSG_PUB.Add;
1457: app_exception.raise_exception;
1458:
1459: WHEN EventNotARCC THEN
1460: FND_MESSAGE.SET_NAME( 'AR', 'AR_EVENTNOTAR');
1461: FND_MESSAGE.SET_TOKEN( 'EVENT' ,p_event_name );
1462: FND_MSG_PUB.Add;
1463: app_exception.raise_exception;
1464:
1457: app_exception.raise_exception;
1458:
1459: WHEN EventNotARCC THEN
1460: FND_MESSAGE.SET_NAME( 'AR', 'AR_EVENTNOTAR');
1461: FND_MESSAGE.SET_TOKEN( 'EVENT' ,p_event_name );
1462: FND_MSG_PUB.Add;
1463: app_exception.raise_exception;
1464:
1465: WHEN NO_DATA_FOUND THEN
1463: app_exception.raise_exception;
1464:
1465: WHEN NO_DATA_FOUND THEN
1466: ROLLBACK TO ar_cccorrection_raise_event;
1467: FND_MESSAGE.SET_NAME( 'AR', 'GENERIC_MESSAGE' );
1468: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1469: FND_MSG_PUB.Add;
1470: app_exception.raise_exception;
1471:
1464:
1465: WHEN NO_DATA_FOUND THEN
1466: ROLLBACK TO ar_cccorrection_raise_event;
1467: FND_MESSAGE.SET_NAME( 'AR', 'GENERIC_MESSAGE' );
1468: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1469: FND_MSG_PUB.Add;
1470: app_exception.raise_exception;
1471:
1472: WHEN OTHERS THEN
1470: app_exception.raise_exception;
1471:
1472: WHEN OTHERS THEN
1473: ROLLBACK TO ar_cccorrection_raise_event;
1474: FND_MESSAGE.SET_NAME( 'AR', 'GENERIC_MESSAGE' );
1475: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1476: FND_MSG_PUB.Add;
1477: app_exception.raise_exception;
1478: END raise_event;
1471:
1472: WHEN OTHERS THEN
1473: ROLLBACK TO ar_cccorrection_raise_event;
1474: FND_MESSAGE.SET_NAME( 'AR', 'GENERIC_MESSAGE' );
1475: FND_MESSAGE.SET_TOKEN( 'ERROR' ,SQLERRM );
1476: FND_MSG_PUB.Add;
1477: app_exception.raise_exception;
1478: END raise_event;
1479:
1596: END IF;
1597: EXCEPTION
1598: WHEN NO_DATA_FOUND THEN
1599: IF p_table_name in ('AR_CASH_RECEIPTS','CASH','MISC') THEN
1600: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_CHANGED');
1601: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1602: FND_MSG_PUB.Add;
1603: ELSE
1604: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_CHANGED');
1597: EXCEPTION
1598: WHEN NO_DATA_FOUND THEN
1599: IF p_table_name in ('AR_CASH_RECEIPTS','CASH','MISC') THEN
1600: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_CHANGED');
1601: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1602: FND_MSG_PUB.Add;
1603: ELSE
1604: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_CHANGED');
1605: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1600: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_CHANGED');
1601: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1602: FND_MSG_PUB.Add;
1603: ELSE
1604: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_CHANGED');
1605: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1606: FND_MSG_PUB.Add;
1607: END IF;
1608: IF PG_DEBUG in ('Y', 'C') THEN
1601: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1602: FND_MSG_PUB.Add;
1603: ELSE
1604: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_CHANGED');
1605: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1606: FND_MSG_PUB.Add;
1607: END IF;
1608: IF PG_DEBUG in ('Y', 'C') THEN
1609: arp_util.debug('EXCEPTION: ARP_CORRECT_CC_ERRORS.lock_table_nowait()');
1610: END IF;
1611: app_exception.raise_exception;
1612: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1613: IF p_table_name in ('AR_CASH_RECEIPTS','CASH','MISC') THEN
1614: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_LOCKED');
1615: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1616: FND_MSG_PUB.Add;
1617: ELSE
1618: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_LOCKED');
1611: app_exception.raise_exception;
1612: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1613: IF p_table_name in ('AR_CASH_RECEIPTS','CASH','MISC') THEN
1614: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_LOCKED');
1615: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1616: FND_MSG_PUB.Add;
1617: ELSE
1618: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_LOCKED');
1619: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1614: FND_MESSAGE.SET_NAME('AR','AR_RECEIPT_RECORD_LOCKED');
1615: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1616: FND_MSG_PUB.Add;
1617: ELSE
1618: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_LOCKED');
1619: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1620: FND_MSG_PUB.Add;
1621: END IF;
1622: IF PG_DEBUG in ('Y', 'C') THEN
1615: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1616: FND_MSG_PUB.Add;
1617: ELSE
1618: FND_MESSAGE.SET_NAME('AR','AR_TRANSACTION_RECORD_LOCKED');
1619: FND_MESSAGE.SET_TOKEN('PARAMETER',p_trx_number);
1620: FND_MSG_PUB.Add;
1621: END IF;
1622: IF PG_DEBUG in ('Y', 'C') THEN
1623: arp_util.debug('EXCEPTION: ARP_CORRECT_CC_ERRORS.lock_table_nowait()');
2424: END IF;
2425: IF lock_trx%ISOPEN THEN
2426: CLOSE lock_trx;
2427: END IF;
2428: errbuf := fnd_message.get||' X '||SQLERRM;
2429: retcode := 2;
2430: END cc_auto_correct;
2431:
2432: