107: AND display = 'Y'
108: AND ROWNUM = 1;
109: EXCEPTION
110: WHEN OTHERS THEN
111: FND_MESSAGE.SET_NAME('AR','ARTA_PAYMENT_SCHEDULE_NO_FOUND');
112: FND_MSG_PUB.Add;
113: l_error_count := l_error_count + 1;
114: END;
115:
152:
153: /*---------------------------------------------------------------------+
154: | 2) Enter a note on the transaction |
155: +---------------------------------------------------------------------*/
156: FND_MESSAGE.set_name('AR','AR_RW_TRX_CLAIM_SETTLE_NOTE');
157: FND_MESSAGE.set_token('CLAIM_NUM',p_claim_number);
158: FND_MESSAGE.set_token('AMOUNT',p_amount);
159: l_note_text := FND_MESSAGE.get;
160:
153: /*---------------------------------------------------------------------+
154: | 2) Enter a note on the transaction |
155: +---------------------------------------------------------------------*/
156: FND_MESSAGE.set_name('AR','AR_RW_TRX_CLAIM_SETTLE_NOTE');
157: FND_MESSAGE.set_token('CLAIM_NUM',p_claim_number);
158: FND_MESSAGE.set_token('AMOUNT',p_amount);
159: l_note_text := FND_MESSAGE.get;
160:
161: arp_cmreq_wf.InsertTrxNotes
154: | 2) Enter a note on the transaction |
155: +---------------------------------------------------------------------*/
156: FND_MESSAGE.set_name('AR','AR_RW_TRX_CLAIM_SETTLE_NOTE');
157: FND_MESSAGE.set_token('CLAIM_NUM',p_claim_number);
158: FND_MESSAGE.set_token('AMOUNT',p_amount);
159: l_note_text := FND_MESSAGE.get;
160:
161: arp_cmreq_wf.InsertTrxNotes
162: (x_customer_call_id => NULL,
155: +---------------------------------------------------------------------*/
156: FND_MESSAGE.set_name('AR','AR_RW_TRX_CLAIM_SETTLE_NOTE');
157: FND_MESSAGE.set_token('CLAIM_NUM',p_claim_number);
158: FND_MESSAGE.set_token('AMOUNT',p_amount);
159: l_note_text := FND_MESSAGE.get;
160:
161: arp_cmreq_wf.InsertTrxNotes
162: (x_customer_call_id => NULL,
163: x_customer_call_topic_id => NULL,
374: | 1) Check that a valid writeoff activity has been passed |
375: +---------------------------------------------------------------------*/
376: IF (p_receivables_trx_id IS NULL)
377: THEN
378: FND_MESSAGE.SET_NAME('AR','AR_WR_INVALID_ACTIVITY_ID');
379: FND_MSG_PUB.Add;
380: l_error_count := l_error_count + 1;
381: ELSE
382: BEGIN
390: AND type = 'WRITEOFF';
391: EXCEPTION
392: WHEN NO_DATA_FOUND
393: THEN
394: FND_MESSAGE.SET_NAME('AR','AR_WR_INVALID_ACTIVITY_ID');
395: FND_MSG_PUB.Add;
396: l_error_count := l_error_count + 1;
397: END;
398: END IF;
445: THEN
446: l_balance := (l_amount - p_amount);
447: IF p_new_claim_id IS NULL
448: THEN
449: FND_MESSAGE.set_name('AR','AR_RWAPP_NEW_CLAIM_ID_NULL');
450: FND_MSG_PUB.Add;
451: l_error_count := l_error_count + 1;
452: ELSE
453: IF NOT claim_valid(
497: l_error_message) = TRUE)
498: THEN
499: NULL;
500: ELSE
501: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
502: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
503: FND_MSG_PUB.Add;
504: l_error_count := l_error_count + 1;
505: END IF;
498: THEN
499: NULL;
500: ELSE
501: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
502: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
503: FND_MSG_PUB.Add;
504: l_error_count := l_error_count + 1;
505: END IF;
506:
884: l_applied_ps_id := -4;
885: END IF;
886: EXCEPTION
887: WHEN OTHERS THEN
888: FND_MESSAGE.SET_NAME('AR','ARTA_PAYMENT_SCHEDULE_NO_FOUND');
889: FND_MSG_PUB.Add;
890: RAISE FND_API.G_EXC_ERROR;
891: END;
892: IF NOT claim_on_receipt (
1231: x_currency_code := NULL;
1232: x_cr_payment_schedule_id := NULL;
1233: IF (p_cash_receipt_id IS NULL)
1234: THEN
1235: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CASH_RCPT_ID_NULL');
1236: FND_MSG_PUB.Add;
1237: RETURN FALSE;
1238: ELSE
1239: SELECT cr.receipt_number
1263:
1264: EXCEPTION
1265: WHEN OTHERS
1266: THEN
1267: FND_MESSAGE.SET_NAME('AR','ARTA_ERR_FINDING_CASH_RCPT');
1268: FND_MESSAGE.SET_TOKEN('CR_ID',p_cash_receipt_id);
1269: FND_MSG_PUB.Add;
1270: RETURN FALSE;
1271: END receipt_valid;
1264: EXCEPTION
1265: WHEN OTHERS
1266: THEN
1267: FND_MESSAGE.SET_NAME('AR','ARTA_ERR_FINDING_CASH_RCPT');
1268: FND_MESSAGE.SET_TOKEN('CR_ID',p_cash_receipt_id);
1269: FND_MSG_PUB.Add;
1270: RETURN FALSE;
1271: END receipt_valid;
1272:
1344: END IF;
1345:
1346: IF (p_claim_id IS NULL)
1347: THEN
1348: FND_MESSAGE.SET_NAME('AR','AR_RWAPP_NULL_CLAIM_ID');
1349: FND_MSG_PUB.Add;
1350: RETURN FALSE;
1351: ELSIF (p_cash_receipt_id IS NOT NULL)
1352: THEN
1573: END;
1574:
1575: RETURN TRUE;
1576: ELSE
1577: FND_MESSAGE.SET_NAME('AR','AR_RW_INVALID_CLAIM_ID');
1578: FND_MSG_PUB.Add;
1579: RETURN FALSE;
1580: END IF;
1581: IF PG_DEBUG in ('Y', 'C') THEN
1584:
1585: EXCEPTION
1586: WHEN OTHERS
1587: THEN
1588: FND_MESSAGE.SET_NAME('AR','AR_RWAPP_CLAIM_ID_NOTFOUND');
1589: FND_MESSAGE.SET_TOKEN('CLAIM_ID',p_claim_id);
1590: FND_MSG_PUB.Add;
1591: RETURN FALSE;
1592: END claim_on_receipt;
1585: EXCEPTION
1586: WHEN OTHERS
1587: THEN
1588: FND_MESSAGE.SET_NAME('AR','AR_RWAPP_CLAIM_ID_NOTFOUND');
1589: FND_MESSAGE.SET_TOKEN('CLAIM_ID',p_claim_id);
1590: FND_MSG_PUB.Add;
1591: RETURN FALSE;
1592: END claim_on_receipt;
1593:
1655: p_receipt_id,
1656: p_curr_code;
1657: EXCEPTION
1658: WHEN NO_DATA_FOUND THEN
1659: FND_MESSAGE.set_name('AR','AR_RW_INVALID_CLAIM_ID');
1660: FND_MESSAGE.set_token('CLAIM_ID',p_claim_id);
1661: FND_MSG_PUB.Add;
1662: RETURN FALSE;
1663: END;
1656: p_curr_code;
1657: EXCEPTION
1658: WHEN NO_DATA_FOUND THEN
1659: FND_MESSAGE.set_name('AR','AR_RW_INVALID_CLAIM_ID');
1660: FND_MESSAGE.set_token('CLAIM_ID',p_claim_id);
1661: FND_MSG_PUB.Add;
1662: RETURN FALSE;
1663: END;
1664: RETURN TRUE;
1662: RETURN FALSE;
1663: END;
1664: RETURN TRUE;
1665: ELSE
1666: FND_MESSAGE.set_name('AR','AR_RW_ICLAIM_NOT_INSTALLED');
1667: FND_MSG_PUB.Add;
1668: RETURN FALSE;
1669: END IF;
1670: IF PG_DEBUG in ('Y', 'C') THEN
1791: arp_standard.debug('l_new_unapplied_total = '||l_new_unapplied_total);
1792: END IF;
1793:
1794: IF l_new_unapplied_total < 0 THEN
1795: FND_MESSAGE.set_name('AR','AR_RW_CLAIM_SETTLMT_NEG_RCT');
1796: FND_MSG_PUB.Add;
1797: x_return_status := FND_API.G_RET_STS_ERROR;
1798: END IF;
1799:
1801: arp_standard.debug('ARP_DEDUCTION_COVER.validate_amount_applied()-');
1802: END IF;
1803:
1804: EXCEPTION WHEN OTHERS THEN
1805: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1806: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARXDECVB.pls:Validate_amount_applied' ||SQLERRM);
1807: FND_MSG_PUB.Add;
1808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1809: END validate_amount_applied;
1802: END IF;
1803:
1804: EXCEPTION WHEN OTHERS THEN
1805: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
1806: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','ARXDECVB.pls:Validate_amount_applied' ||SQLERRM);
1807: FND_MSG_PUB.Add;
1808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1809: END validate_amount_applied;
1810: