225: );
226:
227: -- bug 2290738 : arw_cmreq_cover.ar_request_cm will pass -1 if any error is encountered
228: if x_request_id = '-1' then
229: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
230: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Failure encountered in AR_CREDIT_MEMO_API_PUB.Create_request' ||
231: ' call to arw_cmreq_cover.ar_request_cm');
232: FND_MSG_PUB.Add;
233: raise creation_failed;
226:
227: -- bug 2290738 : arw_cmreq_cover.ar_request_cm will pass -1 if any error is encountered
228: if x_request_id = '-1' then
229: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
230: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Failure encountered in AR_CREDIT_MEMO_API_PUB.Create_request' ||
231: ' call to arw_cmreq_cover.ar_request_cm');
232: FND_MSG_PUB.Add;
233: raise creation_failed;
234: end if;
311: --If only one error message on the stack, retrieve it
312:
313: x_return_status := FND_API.G_RET_STS_ERROR ;
314:
315: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
316: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_CREDIT_MEMO_API_PUB.Create_request');
317: FND_MSG_PUB.Add;
318:
319: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
312:
313: x_return_status := FND_API.G_RET_STS_ERROR ;
314:
315: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
316: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_CREDIT_MEMO_API_PUB.Create_request');
317: FND_MSG_PUB.Add;
318:
319: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
320: p_count => x_msg_count,
392: IF PG_DEBUG in ('Y', 'C') THEN
393: arp_util.debug('validate_request_parameters: ' || 'Did not find customer_trx_id');
394: END IF;
395: -- Put error message on stack
396: FND_MESSAGE.SET_NAME('AR','AR_TAPI_TRANS_NOT_EXIST');
397: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
398:
399: FND_MSG_PUB.Add;
400: l_val_return_status := FND_API.G_RET_STS_ERROR ;
393: arp_util.debug('validate_request_parameters: ' || 'Did not find customer_trx_id');
394: END IF;
395: -- Put error message on stack
396: FND_MESSAGE.SET_NAME('AR','AR_TAPI_TRANS_NOT_EXIST');
397: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
398:
399: FND_MSG_PUB.Add;
400: l_val_return_status := FND_API.G_RET_STS_ERROR ;
401: return;
410: IF p_line_credit_flag not in ('Y','N') THEN
411: IF PG_DEBUG in ('Y', 'C') THEN
412: arp_util.debug ('validate_request_parameters: ' || 'Invalid line_credit_flag');
413: END IF;
414: FND_MESSAGE.SET_NAME('AR','AR_CMWF_API_INVALID_VALUE');
415: FND_MSG_PUB.Add;
416: l_val_return_status := FND_API.G_RET_STS_ERROR ;
417: return;
418: ELSE
421: IF PG_DEBUG in ('Y', 'C') THEN
422: arp_util.debug ('validate_request_parameters: ' || 'line_credit_flag is Y and there are no lines');
423: END IF;
424: l_val_return_status := FND_API.G_RET_STS_ERROR ;
425: FND_MESSAGE.SET_NAME('AR','AR_CMWF_API_NO_LINES_INFO ');
426: FND_MSG_PUB.Add;
427: return;
428: END IF;
429: END IF;
444: arp_util.debug('validate_request_parameters: ' || 'CM trx type id = ' || to_char(l_credit_memo_type_id));
445: END IF;
446: IF l_credit_memo_type_id IS NULL THEN
447: l_val_return_status := FND_API.G_RET_STS_ERROR ;
448: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
449: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error : no CM trx type id defined.');
450: FND_MSG_PUB.Add;
451: return;
452: END IF;
445: END IF;
446: IF l_credit_memo_type_id IS NULL THEN
447: l_val_return_status := FND_API.G_RET_STS_ERROR ;
448: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
449: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error : no CM trx type id defined.');
450: FND_MSG_PUB.Add;
451: return;
452: END IF;
453:
508: arp_util.debug('validate_request_parameters: ' || 'Over application flag is N and amount remaining is more than amount requested');
509: END IF;
510:
511: l_val_return_status := FND_API.G_RET_STS_ERROR ;
512: FND_MESSAGE.SET_NAME('AR','AR_CKAP_OVERAPP');
513: FND_MSG_PUB.Add;
514: return;
515: END IF;
516: END IF;
524:
525: IF (NVL(l_tax_percent,0) <> 0 AND
526: NVL(l_line_percent,0) <> 0 AND
527: NVL(l_line_percent,0) <> NVL(l_tax_percent,0)) THEN
528: FND_MESSAGE.set_name( 'AR', 'AR_ETX_BAD_CM_LINE_TAX_RATIO');
529: FND_MSG_PUB.Add;
530: RETURN;
531: END IF;
532:
546: AND lookup_code = p_cm_reason_code ;
547:
548: IF l_count_reason_code = 0 THEN
549: l_val_return_status := FND_API.G_RET_STS_ERROR ;
550: FND_MESSAGE.SET_NAME('AR','AR_RAXTRX-1719');
551: FND_MSG_PUB.Add;
552: return;
553: END IF;
554:
572: IF l_count_trx = 0 THEN
573: IF PG_DEBUG in ('Y', 'C') THEN
574: arp_util.debug ('validate_request_parameters: ' || 'Transaction does not exist');
575: END IF;
576: FND_MESSAGE.SET_NAME('AR','AR_TAPI_LINE_NOT_EXIST');
577: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
578: FND_MSG_PUB.Add;
579: l_val_return_status := FND_API.G_RET_STS_ERROR ;
580: return;
573: IF PG_DEBUG in ('Y', 'C') THEN
574: arp_util.debug ('validate_request_parameters: ' || 'Transaction does not exist');
575: END IF;
576: FND_MESSAGE.SET_NAME('AR','AR_TAPI_LINE_NOT_EXIST');
577: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
578: FND_MSG_PUB.Add;
579: l_val_return_status := FND_API.G_RET_STS_ERROR ;
580: return;
581: END IF;
617: IF p_cm_line_tbl(i).extended_amount > (l_extended_amount - l_credited_amount) THEN
618: IF PG_DEBUG in ('Y', 'C') THEN
619: arp_util.debug('validate_request_parameters: ' || 'Over application is not allowed. raising exception');
620: END IF;
621: FND_MESSAGE.SET_NAME('AR','AR_CKAP_OVERAPP');
622: FND_MSG_PUB.Add;
623: l_val_return_status := FND_API.G_RET_STS_ERROR ;
624: return;
625: END IF;
645: IF PG_DEBUG in ('Y', 'C') THEN
646: arp_util.debug('validate_request_parameters: ' || 'Dispute date is less than transaction date');
647: END IF;
648: -- Put error message on stack
649: FND_MESSAGE.SET_NAME ('AR','AR_DISPUTE_BEFORE_TRX_DATE');
650: FND_MSG_PUB.Add;
651: l_val_return_status := FND_API.G_RET_STS_ERROR ;
652: return;
653: END IF;
840: raise an error */
841:
842: if x_cm_customer_trx_id is null then
843: x_return_status := FND_API.G_RET_STS_ERROR;
844: FND_MESSAGE.SET_NAME( 'AR','GENERIC_MESSAGE');
845: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error : Could not find credit memo, unknown failure.');
846: FND_MSG_PUB.ADD;
847: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
848: p_count => x_msg_count,
841:
842: if x_cm_customer_trx_id is null then
843: x_return_status := FND_API.G_RET_STS_ERROR;
844: FND_MESSAGE.SET_NAME( 'AR','GENERIC_MESSAGE');
845: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','Error : Could not find credit memo, unknown failure.');
846: FND_MSG_PUB.ADD;
847: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
848: p_count => x_msg_count,
849: p_data => x_msg_data);
852:
853: EXCEPTION
854: WHEN no_data_found THEN
855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
856: FND_MESSAGE.SET_NAME( 'AR','AR_CMWF_API_INVALID_REQUEST_ID');
857: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
858: FND_MSG_PUB.ADD;
859:
860: -- Display_Parameters;
853: EXCEPTION
854: WHEN no_data_found THEN
855: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
856: FND_MESSAGE.SET_NAME( 'AR','AR_CMWF_API_INVALID_REQUEST_ID');
857: FND_MESSAGE.SET_TOKEN('REQUEST_ID',p_request_id);
858: FND_MSG_PUB.ADD;
859:
860: -- Display_Parameters;
861:
993: IF PG_DEBUG in ('Y', 'C') THEN
994: arp_util.debug ('get_request_status: ' || 'Exception OTHERS');
995: END IF;
996: x_return_status := FND_API.G_RET_STS_ERROR ;
997: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
998: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_CREDIT_MEMO_API_PUB.Get_request_status');
999:
1000: -- Display_Parameters;
1001: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
994: arp_util.debug ('get_request_status: ' || 'Exception OTHERS');
995: END IF;
996: x_return_status := FND_API.G_RET_STS_ERROR ;
997: FND_MESSAGE.SET_NAME ('AR','GENERIC_MESSAGE');
998: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT','AR_CREDIT_MEMO_API_PUB.Get_request_status');
999:
1000: -- Display_Parameters;
1001: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1002: p_count => x_msg_count,
1013: default_message varchar2(240);
1014:
1015: BEGIN
1016:
1017: FND_MESSAGE.SET_NAME ('AR','AR_REPORTS_UNAVAILABLE');
1018: default_message := FND_MESSAGE.GET;
1019: HTP.P (default_message);
1020:
1021: END print_default_page;
1014:
1015: BEGIN
1016:
1017: FND_MESSAGE.SET_NAME ('AR','AR_REPORTS_UNAVAILABLE');
1018: default_message := FND_MESSAGE.GET;
1019: HTP.P (default_message);
1020:
1021: END print_default_page;
1022:
1116: THEN
1117: IF PG_DEBUG in ('Y', 'C') THEN
1118: arp_util.debug ('validate_request_parameters:'||'Err. Line Transaction FF Validation');
1119: END IF;
1120: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1121: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
1122: FND_MSG_PUB.Add;
1123: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1124: return;
1117: IF PG_DEBUG in ('Y', 'C') THEN
1118: arp_util.debug ('validate_request_parameters:'||'Err. Line Transaction FF Validation');
1119: END IF;
1120: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1121: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
1122: FND_MSG_PUB.Add;
1123: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1124: return;
1125: END IF;
1167: THEN
1168: IF PG_DEBUG in ('Y', 'C') THEN
1169: arp_util.debug ('validate_request_parameters:'||'Err. Line Information FF Validation');
1170: END IF;
1171: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1172: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
1173: FND_MSG_PUB.Add;
1174: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1175: return;
1168: IF PG_DEBUG in ('Y', 'C') THEN
1169: arp_util.debug ('validate_request_parameters:'||'Err. Line Information FF Validation');
1170: END IF;
1171: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1172: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_LINE_ID',p_cm_line_tbl(i).customer_trx_line_id);
1173: FND_MSG_PUB.Add;
1174: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1175: return;
1176: END IF;
1226: THEN
1227: IF PG_DEBUG in ('Y', 'C') THEN
1228: arp_util.debug ('validate_request_parameters:'||'Err. Invoice Transaction FF Validation');
1229: END IF;
1230: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1231: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1232: FND_MSG_PUB.Add;
1233: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1234: return;
1227: IF PG_DEBUG in ('Y', 'C') THEN
1228: arp_util.debug ('validate_request_parameters:'||'Err. Invoice Transaction FF Validation');
1229: END IF;
1230: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1231: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1232: FND_MSG_PUB.Add;
1233: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1234: return;
1235: END IF;
1245: SELECT NVL(COPY_INV_TIDFF_TO_CM_FLAG,'N') into l_copy_inv_tidff_flag
1246: FROM ra_batch_sources where batch_source_id=l_ct_trx.batch_source_id;
1247: EXCEPTION
1248: WHEN NO_DATA_FOUND THEN
1249: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_BATCH_SOURCE');
1250: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1251: FND_MSG_PUB.Add;
1252: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1253: return;
1246: FROM ra_batch_sources where batch_source_id=l_ct_trx.batch_source_id;
1247: EXCEPTION
1248: WHEN NO_DATA_FOUND THEN
1249: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_BATCH_SOURCE');
1250: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1251: FND_MSG_PUB.Add;
1252: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1253: return;
1254: END;
1299: THEN
1300: IF PG_DEBUG in ('Y', 'C') THEN
1301: arp_util.debug ('validate_request_parameters:'||'Err. Transaction Information FF Validation');
1302: END IF;
1303: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1304: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1305: FND_MSG_PUB.Add;
1306: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1307: return;
1300: IF PG_DEBUG in ('Y', 'C') THEN
1301: arp_util.debug ('validate_request_parameters:'||'Err. Transaction Information FF Validation');
1302: END IF;
1303: FND_MESSAGE.SET_NAME('AR','AR_INAPI_INVALID_DESC_FLEX');
1304: FND_MESSAGE.SET_TOKEN('CUSTOMER_TRX_ID',p_customer_trx_id);
1305: FND_MSG_PUB.Add;
1306: l_val_return_status := FND_API.G_RET_STS_ERROR ;
1307: return;
1308: END IF;