5: Global Data Types
6: ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AR_CREDIT_MEMO_API_PUB';
9: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
10:
11: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
12:
13: /*Bg 7367350 Added new parameter for internal comment handling*/
113: IF PG_DEBUG in ('Y', 'C') THEN
114: arp_util.debug('create_request: ' || 'Initializing message list');
115: END IF;
116: IF FND_API.to_Boolean( p_init_msg_list ) THEN
117: FND_MSG_PUB.initialize;
118: END IF;
119:
120: /*-----------------------------------------+
121: | Initialize return status to SUCCESS |
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;
235:
236: IF PG_DEBUG in ('Y', 'C') THEN
264: ROLLBACK TO Create_request_PVT;
265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
266:
267: -- Display_Parameters;
268: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
269: p_count => x_msg_count,
270: p_data => x_msg_data);
271:
272: WHEN creation_failed THEN
277: -- ROLLBACK TO Create_request_cm;
278: x_return_status := FND_API.G_RET_STS_ERROR;
279:
280: -- Display_Parameters;
281: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
282: p_count => x_msg_count,
283: p_data => x_msg_data);
284:
285: WHEN validation_failed THEN
291: /* bug 2290738 - returns the validation status, rather than the 'unexpected' status */
292: x_return_status := l_val_return_status;
293:
294: -- Display_Parameters;
295: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
296: p_count => x_msg_count,
297: p_data => x_msg_data);
298:
299: WHEN OTHERS THEN
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,
321: p_data => x_msg_data);
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,
321: p_data => x_msg_data);
322:
323: END create_request;
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;
402: END IF;
403:
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
419: /* If dispute is at line level, there has to be atleast one line */
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;
430:
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:
454: IF PG_DEBUG in ('Y', 'C') THEN
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;
517: */
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:
533: /*-----------------------------------------+
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:
555: /*-------------------------------------------------+
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;
582:
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;
626: END IF;
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;
654:
788: IF PG_DEBUG in ('Y', 'C') THEN
789: arp_util.debug ('get_request_status: ' || 'Initializing message list');
790: END IF;
791: IF FND_API.to_Boolean( p_init_msg_list ) THEN
792: FND_MSG_PUB.initialize;
793: END IF;
794:
795: /*-----------------------------------------+
796: | Initialize return status to SUCCESS |
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);
850: return;
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);
850: return;
851: end if;
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:
862: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
858: FND_MSG_PUB.ADD;
859:
860: -- Display_Parameters;
861:
862: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
863: p_count => x_msg_count,
864: p_data => x_msg_data);
865: END;
866:
979: END IF;
980: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
981:
982: -- Display_Parameters;
983: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
984: p_count => x_msg_count,
985: p_data => x_msg_data);
986:
987: WHEN OTHERS THEN
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,
1003: p_data => x_msg_data);
1004:
1005: END get_request_status;
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;
1126: p_cm_line_tbl(i).interface_line_context:=interface_line_rec.interface_line_context;
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;
1177: p_cm_line_tbl(i).attribute_category:=p_desc_flex_rec.attribute_category;
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;
1236: END IF;
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;
1255: END;
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;
1309: END IF;