612: -- dump_payschedule(g_payschedule_trx);
613: arp_standard.debug('get_inv_ps -');
614: EXCEPTION
615: WHEN no_customer_trx_cache THEN
616: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
617: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_customer_trx_cache
618: Please verify if initialization has been successfully' );
619: FND_MSG_PUB.ADD;
620: x_return_status := FND_API.G_RET_STS_ERROR;
613: arp_standard.debug('get_inv_ps -');
614: EXCEPTION
615: WHEN no_customer_trx_cache THEN
616: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
617: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_customer_trx_cache
618: Please verify if initialization has been successfully' );
619: FND_MSG_PUB.ADD;
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: arp_standard.debug
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: arp_standard.debug
622: ('EXCEPTION get_inv_ps no_installed_inv_allowed customer_trx_id '||g_customer_trx.customer_trx_id);
623: WHEN no_installed_inv_allowed THEN
624: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
625: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_installed_inv_allowed customer_trx_id:'
626: ||g_customer_trx.customer_trx_id);
627: FND_MSG_PUB.ADD;
628: x_return_status := FND_API.G_RET_STS_ERROR;
621: arp_standard.debug
622: ('EXCEPTION get_inv_ps no_installed_inv_allowed customer_trx_id '||g_customer_trx.customer_trx_id);
623: WHEN no_installed_inv_allowed THEN
624: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
625: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_installed_inv_allowed customer_trx_id:'
626: ||g_customer_trx.customer_trx_id);
627: FND_MSG_PUB.ADD;
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: arp_standard.debug
628: x_return_status := FND_API.G_RET_STS_ERROR;
629: arp_standard.debug
630: ('EXCEPTION get_inv_ps no_installed_inv_allowed customer_trx_id '||g_customer_trx.customer_trx_id);
631: WHEN no_op_trx_pay_schedule THEN
632: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
633: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_open_trx_pay_schedule customer_trx_id:'
634: ||g_customer_trx.customer_trx_id);
635: FND_MSG_PUB.ADD;
636: x_return_status := FND_API.G_RET_STS_ERROR;
629: arp_standard.debug
630: ('EXCEPTION get_inv_ps no_installed_inv_allowed customer_trx_id '||g_customer_trx.customer_trx_id);
631: WHEN no_op_trx_pay_schedule THEN
632: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
633: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_open_trx_pay_schedule customer_trx_id:'
634: ||g_customer_trx.customer_trx_id);
635: FND_MSG_PUB.ADD;
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: arp_standard.debug
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: arp_standard.debug
638: ('EXCEPTION get_inv_ps no_op_trx_pay_schedule customer_trx_id '||g_customer_trx.customer_trx_id);
639: WHEN OTHERS THEN
640: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
641: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-'||SQLERRM);
642: FND_MSG_PUB.ADD;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: arp_standard.debug('EXCEPTION get_inv_ps OTHERS '||SQLERRM);
637: arp_standard.debug
638: ('EXCEPTION get_inv_ps no_op_trx_pay_schedule customer_trx_id '||g_customer_trx.customer_trx_id);
639: WHEN OTHERS THEN
640: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
641: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-'||SQLERRM);
642: FND_MSG_PUB.ADD;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: arp_standard.debug('EXCEPTION get_inv_ps OTHERS '||SQLERRM);
645: END get_inv_ps;
677: CLOSE c_ps;
678: arp_standard.debug('get_rec_ps -');
679: EXCEPTION
680: WHEN no_op_rec_pay_schedule THEN
681: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
682: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps no_open_rec_pay_schedule' );
683: FND_MSG_PUB.ADD;
684: x_return_status := FND_API.G_RET_STS_ERROR;
685: arp_standard.debug
678: arp_standard.debug('get_rec_ps -');
679: EXCEPTION
680: WHEN no_op_rec_pay_schedule THEN
681: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
682: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps no_open_rec_pay_schedule' );
683: FND_MSG_PUB.ADD;
684: x_return_status := FND_API.G_RET_STS_ERROR;
685: arp_standard.debug
686: ('EXCEPTION get_rec_ps no_op_rec_pay_schedule p_cr_id '||p_cr_id);
684: x_return_status := FND_API.G_RET_STS_ERROR;
685: arp_standard.debug
686: ('EXCEPTION get_rec_ps no_op_rec_pay_schedule p_cr_id '||p_cr_id);
687: WHEN OTHERS THEN
688: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
689: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps:'||SQLERRM );
690: FND_MSG_PUB.ADD;
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: arp_standard.debug
685: arp_standard.debug
686: ('EXCEPTION get_rec_ps no_op_rec_pay_schedule p_cr_id '||p_cr_id);
687: WHEN OTHERS THEN
688: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
689: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps:'||SQLERRM );
690: FND_MSG_PUB.ADD;
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: arp_standard.debug
693: ('EXCEPTION get_rec_ps OTHERS '||SQLERRM);
1053: x_app_rec := l_apps_rec;
1054: arp_standard.debug( 'arp_process_det_pkg.upd_inv_ps-' );
1055: EXCEPTION
1056: WHEN neg_app_amt THEN
1057: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1058: IF l_earned_concern = 'PBLINENEG' THEN
1059: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1060: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1055: EXCEPTION
1056: WHEN neg_app_amt THEN
1057: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1058: IF l_earned_concern = 'PBLINENEG' THEN
1059: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1060: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1062: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1057: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1058: IF l_earned_concern = 'PBLINENEG' THEN
1059: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1060: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1062: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1064: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');
1059: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1060: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1062: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1064: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');
1066: END IF;
1067: FND_MSG_PUB.ADD;
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1062: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1064: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');
1066: END IF;
1067: FND_MSG_PUB.ADD;
1068: x_return_status := FND_API.G_RET_STS_ERROR;
1069: WHEN neg_earned_amt THEN
1066: END IF;
1067: FND_MSG_PUB.ADD;
1068: x_return_status := FND_API.G_RET_STS_ERROR;
1069: WHEN neg_earned_amt THEN
1070: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1071: IF l_earned_concern = 'PBLINENEG' THEN
1072: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1073: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1068: x_return_status := FND_API.G_RET_STS_ERROR;
1069: WHEN neg_earned_amt THEN
1070: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1071: IF l_earned_concern = 'PBLINENEG' THEN
1072: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1073: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1075: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1070: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1071: IF l_earned_concern = 'PBLINENEG' THEN
1072: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1073: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1075: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1077: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');
1072: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1073: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1075: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1077: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');
1079: END IF;
1080: FND_MSG_PUB.ADD;
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1075: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1077: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');
1079: END IF;
1080: FND_MSG_PUB.ADD;
1081: x_return_status := FND_API.G_RET_STS_ERROR;
1082: WHEN neg_unearned_amt THEN
1079: END IF;
1080: FND_MSG_PUB.ADD;
1081: x_return_status := FND_API.G_RET_STS_ERROR;
1082: WHEN neg_unearned_amt THEN
1083: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1084: IF l_earned_concern = 'PBLINENEG' THEN
1085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1086: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1081: x_return_status := FND_API.G_RET_STS_ERROR;
1082: WHEN neg_unearned_amt THEN
1083: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1084: IF l_earned_concern = 'PBLINENEG' THEN
1085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1086: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1083: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1084: IF l_earned_concern = 'PBLINENEG' THEN
1085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1086: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');
1085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1086: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');
1092: END IF;
1093: FND_MSG_PUB.ADD;
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');
1092: END IF;
1093: FND_MSG_PUB.ADD;
1094: x_return_status := FND_API.G_RET_STS_ERROR;
1095: WHEN OTHERS THEN
1092: END IF;
1093: FND_MSG_PUB.ADD;
1094: x_return_status := FND_API.G_RET_STS_ERROR;
1095: WHEN OTHERS THEN
1096: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1097: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-'||SQLERRM );
1098: FND_MSG_PUB.ADD;
1099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1100: arp_util.debug('EXCEPTION OTHERS arp_process_det_pkg.upd_inv_ps:'||SQLERRM );
1093: FND_MSG_PUB.ADD;
1094: x_return_status := FND_API.G_RET_STS_ERROR;
1095: WHEN OTHERS THEN
1096: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1097: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-'||SQLERRM );
1098: FND_MSG_PUB.ADD;
1099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1100: arp_util.debug('EXCEPTION OTHERS arp_process_det_pkg.upd_inv_ps:'||SQLERRM );
1101: END upd_inv_ps;
1253: arp_standard.debug('insert_rapps_p -');
1254: EXCEPTION
1255: WHEN OTHERS THEN
1256: arp_standard.debug('EXCEPTION insert_rapps_p OTHERS:'||SQLERRM);
1257: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1258: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS insert_rapps_p:'||SQLERRM );
1259: FND_MSG_PUB.ADD;
1260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1261: END insert_rapps_p;
1254: EXCEPTION
1255: WHEN OTHERS THEN
1256: arp_standard.debug('EXCEPTION insert_rapps_p OTHERS:'||SQLERRM);
1257: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1258: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS insert_rapps_p:'||SQLERRM );
1259: FND_MSG_PUB.ADD;
1260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1261: END insert_rapps_p;
1262:
1406: arp_standard.debug('res_ctl_rem_amt_for_app -');
1407: EXCEPTION
1408: WHEN OTHERS THEN
1409: arp_standard.debug('EXCEPTION res_ctl_rem_amt_for_app OTHERS:'||SQLERRM);
1410: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1411: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS res_ctl_rem_amt_for_app:'||SQLERRM );
1412: FND_MSG_PUB.ADD;
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1414: END res_ctl_rem_amt_for_app;
1407: EXCEPTION
1408: WHEN OTHERS THEN
1409: arp_standard.debug('EXCEPTION res_ctl_rem_amt_for_app OTHERS:'||SQLERRM);
1410: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1411: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS res_ctl_rem_amt_for_app:'||SQLERRM );
1412: FND_MSG_PUB.ADD;
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1414: END res_ctl_rem_amt_for_app;
1415:
1473: arp_standard.debug('res_inv_ps -');
1474: EXCEPTION
1475: WHEN OTHERS THEN
1476: arp_standard.debug('EXCEPTION res_inv_ps OTHERS:'||SQLERRM);
1477: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1478: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS res_inv_ps:'||SQLERRM );
1479: FND_MSG_PUB.ADD;
1480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1481: END res_inv_ps;
1474: EXCEPTION
1475: WHEN OTHERS THEN
1476: arp_standard.debug('EXCEPTION res_inv_ps OTHERS:'||SQLERRM);
1477: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1478: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS res_inv_ps:'||SQLERRM );
1479: FND_MSG_PUB.ADD;
1480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1481: END res_inv_ps;
1482:
1520: arp_standard.debug('delete_application -');
1521: EXCEPTION
1522: WHEN OTHERS THEN
1523: arp_standard.debug('EXCEPTION delete_application OTHERS:'||SQLERRM);
1524: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1525: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS delete_application:'||SQLERRM );
1526: FND_MSG_PUB.ADD;
1527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1528: END delete_application;
1521: EXCEPTION
1522: WHEN OTHERS THEN
1523: arp_standard.debug('EXCEPTION delete_application OTHERS:'||SQLERRM);
1524: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1525: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS delete_application:'||SQLERRM );
1526: FND_MSG_PUB.ADD;
1527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1528: END delete_application;
1529:
1579: arp_standard.debug('copy_app_rec -');
1580: EXCEPTION
1581: WHEN OTHERS THEN
1582: arp_standard.debug('EXCEPTION copy_app_rec OTHERS:'||SQLERRM);
1583: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1584: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS copy_app_rec:'||SQLERRM );
1585: FND_MSG_PUB.ADD;
1586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1587: END copy_app_rec;
1580: EXCEPTION
1581: WHEN OTHERS THEN
1582: arp_standard.debug('EXCEPTION copy_app_rec OTHERS:'||SQLERRM);
1583: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1584: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS copy_app_rec:'||SQLERRM );
1585: FND_MSG_PUB.ADD;
1586: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1587: END copy_app_rec;
1588:
1652: arp_standard.debug('do_apply -');
1653: EXCEPTION
1654: WHEN OTHERS THEN
1655: arp_standard.debug('EXCEPTION do_apply OTHERS:'||SQLERRM);
1656: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1657: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS do_apply:'||SQLERRM );
1658: FND_MSG_PUB.ADD;
1659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1660: END do_apply;
1653: EXCEPTION
1654: WHEN OTHERS THEN
1655: arp_standard.debug('EXCEPTION do_apply OTHERS:'||SQLERRM);
1656: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1657: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS do_apply:'||SQLERRM );
1658: FND_MSG_PUB.ADD;
1659: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1660: END do_apply;
1661:
1764: arp_standard.debug('apply -');
1765: EXCEPTION
1766: WHEN OTHERS THEN
1767: arp_standard.debug('EXCEPTION apply OTHERS:'||SQLERRM);
1768: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1769: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS apply:'||SQLERRM );
1770: FND_MSG_PUB.ADD;
1771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1772: END apply;
1765: EXCEPTION
1766: WHEN OTHERS THEN
1767: arp_standard.debug('EXCEPTION apply OTHERS:'||SQLERRM);
1768: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1769: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS apply:'||SQLERRM );
1770: FND_MSG_PUB.ADD;
1771: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1772: END apply;
1773:
1939: EXCEPTION
1940: WHEN no_sys_param THEN
1941: ROLLBACK TO initialization;
1942: arp_standard.debug('EXCEPTION initialization no_sys_param');
1943: FND_MESSAGE.SET_NAME( 'AR', 'AR_NO_ROW_IN_SYSTEM_PARAMETERS' );
1944: FND_MSG_PUB.ADD;
1945: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1946: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1947: p_count => x_msg_count,
1948: p_data => x_msg_data);
1949: WHEN not_valid_trx THEN
1950: ROLLBACK TO initialization;
1951: arp_standard.debug('EXCEPTION initialization not_valid_trx');
1952: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1953: FND_MESSAGE.SET_TOKEN( 'TEXT', 'not_valid_trx initialization p_customer_trx_id:'||
1954: p_customer_trx_id );
1955: FND_MSG_PUB.ADD;
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1949: WHEN not_valid_trx THEN
1950: ROLLBACK TO initialization;
1951: arp_standard.debug('EXCEPTION initialization not_valid_trx');
1952: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1953: FND_MESSAGE.SET_TOKEN( 'TEXT', 'not_valid_trx initialization p_customer_trx_id:'||
1954: p_customer_trx_id );
1955: FND_MSG_PUB.ADD;
1956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1959: p_data => x_msg_data);
1960: WHEN not_valid_cr THEN
1961: ROLLBACK TO initialization;
1962: arp_standard.debug('EXCEPTION initialization not_valid_cr');
1963: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1964: FND_MESSAGE.SET_TOKEN( 'TEXT', 'not_valid_cr initialization p_cash_receipt_id:'||
1965: p_cash_receipt_id );
1966: FND_MSG_PUB.ADD;
1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1960: WHEN not_valid_cr THEN
1961: ROLLBACK TO initialization;
1962: arp_standard.debug('EXCEPTION initialization not_valid_cr');
1963: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1964: FND_MESSAGE.SET_TOKEN( 'TEXT', 'not_valid_cr initialization p_cash_receipt_id:'||
1965: p_cash_receipt_id );
1966: FND_MSG_PUB.ADD;
1967: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1968: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1976: p_data => x_msg_data);
1977: WHEN OTHERS THEN
1978: ROLLBACK TO initialization;
1979: arp_standard.debug('EXCEPTION initialization OTHERS:'||SQLERRM);
1980: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1981: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS initialization:'||SQLERRM );
1982: FND_MSG_PUB.ADD;
1983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1984: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1977: WHEN OTHERS THEN
1978: ROLLBACK TO initialization;
1979: arp_standard.debug('EXCEPTION initialization OTHERS:'||SQLERRM);
1980: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1981: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS initialization:'||SQLERRM );
1982: FND_MSG_PUB.ADD;
1983: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1984: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1985: p_count => x_msg_count,
2080: RETURN l_res;
2081: EXCEPTION
2082: WHEN OTHERS THEN
2083: arp_standard.debug('EXCEPTION cur_app_gt_id OTHERS:'||SQLERRM);
2084: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS cur_app_gt_id:'||SQLERRM );
2086: FND_MSG_PUB.ADD;
2087: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
2088: END cur_app_gt_id;
2081: EXCEPTION
2082: WHEN OTHERS THEN
2083: arp_standard.debug('EXCEPTION cur_app_gt_id OTHERS:'||SQLERRM);
2084: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2085: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS cur_app_gt_id:'||SQLERRM );
2086: FND_MSG_PUB.ADD;
2087: RETURN FND_API.G_RET_STS_UNEXP_ERROR;
2088: END cur_app_gt_id;
2089:
2219: WHEN unexpected_error THEN
2220: ROLLBACK TO first_delete_then_apply;
2221: arp_standard.debug('EXCEPTION first_delete_then_apply unexpected_error - p_app_level:'
2222: ||p_app_level||' - p_source_data_key1 :'||p_source_data_key1 ||' - p_ctl_id :'||p_ctl_id);
2223: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2224: FND_MESSAGE.SET_TOKEN( 'TEXT', 'Unexpected first_delete_then_apply - p_app_level:'
2225: ||p_app_level||' - p_source_data_key1 :'||p_source_data_key1 ||' - p_ctl_id :'||p_ctl_id);
2226: FND_MSG_PUB.ADD;
2227: x_return_status := FND_API.G_RET_STS_ERROR;
2220: ROLLBACK TO first_delete_then_apply;
2221: arp_standard.debug('EXCEPTION first_delete_then_apply unexpected_error - p_app_level:'
2222: ||p_app_level||' - p_source_data_key1 :'||p_source_data_key1 ||' - p_ctl_id :'||p_ctl_id);
2223: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2224: FND_MESSAGE.SET_TOKEN( 'TEXT', 'Unexpected first_delete_then_apply - p_app_level:'
2225: ||p_app_level||' - p_source_data_key1 :'||p_source_data_key1 ||' - p_ctl_id :'||p_ctl_id);
2226: FND_MSG_PUB.ADD;
2227: x_return_status := FND_API.G_RET_STS_ERROR;
2228: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2230: p_data => x_msg_data);
2231: WHEN OTHERS THEN
2232: ROLLBACK TO first_delete_then_apply;
2233: arp_standard.debug('EXCEPTION first_delete_then_apply OTHERS:'||SQLERRM);
2234: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2235: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS first_delete_then_apply:'||SQLERRM );
2236: FND_MSG_PUB.ADD;
2237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2238: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2231: WHEN OTHERS THEN
2232: ROLLBACK TO first_delete_then_apply;
2233: arp_standard.debug('EXCEPTION first_delete_then_apply OTHERS:'||SQLERRM);
2234: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2235: FND_MESSAGE.SET_TOKEN( 'TEXT', 'OTHERS first_delete_then_apply:'||SQLERRM );
2236: FND_MSG_PUB.ADD;
2237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2238: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2239: p_count => x_msg_count,
2596: EXCEPTION
2597: WHEN OTHERS THEN
2598: ROLLBACK TO final_commit;
2599: arp_standard.debug('EXCEPTION OTHERS final_commit:'||SQLERRM);
2600: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2601: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.final_commit-'||SQLERRM );
2602: FND_MSG_PUB.ADD;
2603: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2604: p_count => x_msg_count,
2597: WHEN OTHERS THEN
2598: ROLLBACK TO final_commit;
2599: arp_standard.debug('EXCEPTION OTHERS final_commit:'||SQLERRM);
2600: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2601: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.final_commit-'||SQLERRM );
2602: FND_MSG_PUB.ADD;
2603: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2604: p_count => x_msg_count,
2605: p_data => x_msg_data);
2699: arp_standard.debug('get_latest_amount_remaining -');
2700: EXCEPTION
2701: WHEN NO_DATA_FOUND THEN
2702: arp_standard.debug('EXCEPTION NO_DATA_FOUND get_latest_amount_remaining:'||SQLERRM);
2703: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2704: FND_MESSAGE.SET_TOKEN( 'TEXT', 'get_latest_amount_remaining NO_DATA_FOUND
2705: customer_trx_id :'||g_customer_trx.customer_trx_id||'
2706: p_app_level :'||p_app_level||'
2707: p_ctl_id :'||p_ctl_id);
2700: EXCEPTION
2701: WHEN NO_DATA_FOUND THEN
2702: arp_standard.debug('EXCEPTION NO_DATA_FOUND get_latest_amount_remaining:'||SQLERRM);
2703: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2704: FND_MESSAGE.SET_TOKEN( 'TEXT', 'get_latest_amount_remaining NO_DATA_FOUND
2705: customer_trx_id :'||g_customer_trx.customer_trx_id||'
2706: p_app_level :'||p_app_level||'
2707: p_ctl_id :'||p_ctl_id);
2708: FND_MSG_PUB.ADD;
2711: p_data => x_msg_data);
2712: x_return_status := FND_API.G_RET_STS_SUCCESS;
2713: WHEN OTHERS THEN
2714: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_remaining:'||SQLERRM);
2715: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2716: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_remaining-'||SQLERRM );
2717: FND_MSG_PUB.ADD;
2718: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2719: p_count => x_msg_count,
2712: x_return_status := FND_API.G_RET_STS_SUCCESS;
2713: WHEN OTHERS THEN
2714: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_remaining:'||SQLERRM);
2715: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2716: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_remaining-'||SQLERRM );
2717: FND_MSG_PUB.ADD;
2718: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2719: p_count => x_msg_count,
2720: p_data => x_msg_data);
3049: arp_standard.debug('get_latest_amount_applied -');
3050: EXCEPTION
3051: WHEN OTHERS THEN
3052: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_applied:'||SQLERRM);
3053: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
3054: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_applied-'||SQLERRM );
3055: FND_MSG_PUB.ADD;
3056: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3057: p_count => x_msg_count,
3050: EXCEPTION
3051: WHEN OTHERS THEN
3052: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_applied:'||SQLERRM);
3053: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
3054: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_applied-'||SQLERRM );
3055: FND_MSG_PUB.ADD;
3056: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3057: p_count => x_msg_count,
3058: p_data => x_msg_data);
3154:
3155: IF p_gt_id IS NULL THEN
3156: x_return_status := fnd_api.g_ret_sts_error;
3157: arp_standard.debug(' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3158: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3159: FND_MESSAGE.SET_TOKEN('TEXT',' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3160: FND_MSG_PUB.ADD;
3161: ELSE
3162:
3155: IF p_gt_id IS NULL THEN
3156: x_return_status := fnd_api.g_ret_sts_error;
3157: arp_standard.debug(' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3158: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3159: FND_MESSAGE.SET_TOKEN('TEXT',' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3160: FND_MSG_PUB.ADD;
3161: ELSE
3162:
3163: IF ((p_adj_rec.amount IS NULL) AND (p_adj_rec.acctd_amount IS NULL))
3165: ((p_adj_rec.amount = 0 ) AND (p_adj_rec.acctd_amount = 0 ))
3166: THEN
3167: x_return_status := fnd_api.g_ret_sts_error;
3168: arp_standard.debug(' Adjustment record amount and accounted amount causes no need to execute');
3169: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3170: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment record amount and accounted amount causes no need to execute');
3171: FND_MSG_PUB.ADD;
3172: ELSIF ((p_adj_rec.amount IS NULL) AND (p_adj_rec.acctd_amount IS NOT NULL))
3173: OR
3166: THEN
3167: x_return_status := fnd_api.g_ret_sts_error;
3168: arp_standard.debug(' Adjustment record amount and accounted amount causes no need to execute');
3169: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3170: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment record amount and accounted amount causes no need to execute');
3171: FND_MSG_PUB.ADD;
3172: ELSIF ((p_adj_rec.amount IS NULL) AND (p_adj_rec.acctd_amount IS NOT NULL))
3173: OR
3174: ((p_adj_rec.amount = 0 ) AND (p_adj_rec.acctd_amount <> 0 ))
3177: (p_customer_trx.invoice_currency_code = p_ae_sys_rec.base_currency))
3178: THEN
3179: x_return_status := fnd_api.g_ret_sts_error;
3180: arp_standard.debug(' Adjustment record combination causes an invalid combination');
3181: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3182: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment record combination causes an invalid combination');
3183: FND_MSG_PUB.ADD;
3184: END IF;
3185:
3178: THEN
3179: x_return_status := fnd_api.g_ret_sts_error;
3180: arp_standard.debug(' Adjustment record combination causes an invalid combination');
3181: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3182: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment record combination causes an invalid combination');
3183: FND_MSG_PUB.ADD;
3184: END IF;
3185:
3186: OPEN verif_amt;
3194: IF (l_sum_line = NULL) AND (l_sum_tax = NULL )
3195: THEN
3196: x_return_status := fnd_api.g_ret_sts_error;
3197: arp_standard.debug(' There is no line amount and tax amount in the interface table for this adjustment');
3198: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3199: FND_MESSAGE.SET_TOKEN('TEXT',' There is no line amount and tax amount in the interface table for adjustment -'||
3200: ' adjustment_id : ' || p_adj_rec.adjustment_id);
3201: END IF;
3202:
3195: THEN
3196: x_return_status := fnd_api.g_ret_sts_error;
3197: arp_standard.debug(' There is no line amount and tax amount in the interface table for this adjustment');
3198: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3199: FND_MESSAGE.SET_TOKEN('TEXT',' There is no line amount and tax amount in the interface table for adjustment -'||
3200: ' adjustment_id : ' || p_adj_rec.adjustment_id);
3201: END IF;
3202:
3203:
3203:
3204: IF (p_line_flag = 'Y') AND (l_sum_line <> p_adj_rec.line_adjusted) THEN
3205: x_return_status := fnd_api.g_ret_sts_error;
3206: arp_standard.debug(' Adjustment line_adjusted <> l_sum_line from ar_line_dist_interface_gt');
3207: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3208: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment line_adjusted <> l_sum_line from ar_line_dist_interface_gt');
3209: FND_MSG_PUB.ADD;
3210: END IF;
3211:
3204: IF (p_line_flag = 'Y') AND (l_sum_line <> p_adj_rec.line_adjusted) THEN
3205: x_return_status := fnd_api.g_ret_sts_error;
3206: arp_standard.debug(' Adjustment line_adjusted <> l_sum_line from ar_line_dist_interface_gt');
3207: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3208: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment line_adjusted <> l_sum_line from ar_line_dist_interface_gt');
3209: FND_MSG_PUB.ADD;
3210: END IF;
3211:
3212: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_adj_rec.tax_adjusted) THEN
3211:
3212: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_adj_rec.tax_adjusted) THEN
3213: x_return_status := fnd_api.g_ret_sts_error;
3214: arp_standard.debug(' Adjustment tax_adjusted <> l_sum_tax from ar_line_dist_interface_gt');
3215: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3216: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment tax_adjusted <> l_sum_tax from ar_line_dist_interface_gt');
3217: FND_MSG_PUB.ADD;
3218: END IF;
3219:
3212: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_adj_rec.tax_adjusted) THEN
3213: x_return_status := fnd_api.g_ret_sts_error;
3214: arp_standard.debug(' Adjustment tax_adjusted <> l_sum_tax from ar_line_dist_interface_gt');
3215: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3216: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment tax_adjusted <> l_sum_tax from ar_line_dist_interface_gt');
3217: FND_MSG_PUB.ADD;
3218: END IF;
3219:
3220: END IF;
3271:
3272: IF p_gt_id IS NULL THEN
3273: x_return_status := fnd_api.g_ret_sts_error;
3274: arp_standard.debug(' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3275: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3276: FND_MESSAGE.SET_TOKEN('TEXT',' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3277: FND_MSG_PUB.ADD;
3278: ELSE
3279:
3272: IF p_gt_id IS NULL THEN
3273: x_return_status := fnd_api.g_ret_sts_error;
3274: arp_standard.debug(' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3275: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3276: FND_MESSAGE.SET_TOKEN('TEXT',' p_gt_id IS NULL, please excecute arp_det_dist_pkg.get_gt_sequence');
3277: FND_MSG_PUB.ADD;
3278: ELSE
3279:
3280: IF ((p_app_rec.amount_applied IS NULL) AND (p_app_rec.acctd_amount_applied_to IS NULL))
3283: THEN
3284: x_return_status := fnd_api.g_ret_sts_error;
3285: arp_standard.debug(' Application record amount and accounted amount to causes no need to execute'||
3286: ' as no amount in amount_applied and acctd_amount_applied_to bucket');
3287: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3288: FND_MESSAGE.SET_TOKEN('TEXT',' Application record amount and accounted amount to causes no need to execute'||
3289: ' as no amount in amount_applied and acctd_amount_applied_to bucket');
3290: FND_MSG_PUB.ADD;
3291: ELSIF ((p_app_rec.amount_applied IS NULL) AND (p_app_rec.acctd_amount_applied_to IS NOT NULL))
3284: x_return_status := fnd_api.g_ret_sts_error;
3285: arp_standard.debug(' Application record amount and accounted amount to causes no need to execute'||
3286: ' as no amount in amount_applied and acctd_amount_applied_to bucket');
3287: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3288: FND_MESSAGE.SET_TOKEN('TEXT',' Application record amount and accounted amount to causes no need to execute'||
3289: ' as no amount in amount_applied and acctd_amount_applied_to bucket');
3290: FND_MSG_PUB.ADD;
3291: ELSIF ((p_app_rec.amount_applied IS NULL) AND (p_app_rec.acctd_amount_applied_to IS NOT NULL))
3292: OR
3296: (p_customer_trx.invoice_currency_code = p_ae_sys_rec.base_currency))
3297: THEN
3298: x_return_status := fnd_api.g_ret_sts_error;
3299: arp_standard.debug(' Application record combination causes an invalid combination on amount bucket');
3300: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3301: FND_MESSAGE.SET_TOKEN('TEXT',' Application record combination causes an invalid combination');
3302: FND_MSG_PUB.ADD;
3303: END IF;
3304:
3297: THEN
3298: x_return_status := fnd_api.g_ret_sts_error;
3299: arp_standard.debug(' Application record combination causes an invalid combination on amount bucket');
3300: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3301: FND_MESSAGE.SET_TOKEN('TEXT',' Application record combination causes an invalid combination');
3302: FND_MSG_PUB.ADD;
3303: END IF;
3304:
3305: OPEN verif_amt;
3333: (l_sum_uned_line = NULL) AND (l_sum_uned_tax = NULL )
3334: THEN
3335: x_return_status := fnd_api.g_ret_sts_error;
3336: arp_standard.debug(' There is no line amount, tax amount for app, edisc and unedisc in the interface table for this application');
3337: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3338: FND_MESSAGE.SET_TOKEN('TEXT',' There is no line amount, tax amount for app, edisc and unedisc in the interface table for this application'||
3339: ' receivable_application_id : ' || p_app_rec.receivable_application_id);
3340: END IF;
3341:
3334: THEN
3335: x_return_status := fnd_api.g_ret_sts_error;
3336: arp_standard.debug(' There is no line amount, tax amount for app, edisc and unedisc in the interface table for this application');
3337: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3338: FND_MESSAGE.SET_TOKEN('TEXT',' There is no line amount, tax amount for app, edisc and unedisc in the interface table for this application'||
3339: ' receivable_application_id : ' || p_app_rec.receivable_application_id);
3340: END IF;
3341:
3342:
3342:
3343: IF (p_line_flag = 'Y') AND (l_sum_line <> p_app_rec.line_applied) THEN
3344: x_return_status := fnd_api.g_ret_sts_error;
3345: arp_standard.debug(' Application line_applied ('||p_app_rec.line_applied||')<> l_sum_line('||l_sum_line||') from ar_line_dist_interface_gt');
3346: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3347: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_applied ('||p_app_rec.line_applied||')<> l_sum_line('||l_sum_line||') from ar_line_dist_interface_gt');
3348: FND_MSG_PUB.ADD;
3349: END IF;
3350:
3343: IF (p_line_flag = 'Y') AND (l_sum_line <> p_app_rec.line_applied) THEN
3344: x_return_status := fnd_api.g_ret_sts_error;
3345: arp_standard.debug(' Application line_applied ('||p_app_rec.line_applied||')<> l_sum_line('||l_sum_line||') from ar_line_dist_interface_gt');
3346: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3347: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_applied ('||p_app_rec.line_applied||')<> l_sum_line('||l_sum_line||') from ar_line_dist_interface_gt');
3348: FND_MSG_PUB.ADD;
3349: END IF;
3350:
3351: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_app_rec.tax_applied) THEN
3350:
3351: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_app_rec.tax_applied) THEN
3352: x_return_status := fnd_api.g_ret_sts_error;
3353: arp_standard.debug(' Adjustment tax_adjusted ('||p_app_rec.tax_applied||')<> l_sum_tax('||l_sum_tax||') from ar_line_dist_interface_gt');
3354: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3355: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment tax_adjusted ('||p_app_rec.tax_applied||')<> l_sum_tax('||l_sum_tax||') from ar_line_dist_interface_gt');
3356: FND_MSG_PUB.ADD;
3357: END IF;
3358:
3351: IF (p_tax_flag = 'Y') AND (l_sum_tax <> p_app_rec.tax_applied) THEN
3352: x_return_status := fnd_api.g_ret_sts_error;
3353: arp_standard.debug(' Adjustment tax_adjusted ('||p_app_rec.tax_applied||')<> l_sum_tax('||l_sum_tax||') from ar_line_dist_interface_gt');
3354: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3355: FND_MESSAGE.SET_TOKEN('TEXT',' Adjustment tax_adjusted ('||p_app_rec.tax_applied||')<> l_sum_tax('||l_sum_tax||') from ar_line_dist_interface_gt');
3356: FND_MSG_PUB.ADD;
3357: END IF;
3358:
3359: IF (p_ed_line_flag = 'Y') AND (l_sum_ed_line <> p_app_rec.LINE_EDISCOUNTED) THEN
3358:
3359: IF (p_ed_line_flag = 'Y') AND (l_sum_ed_line <> p_app_rec.LINE_EDISCOUNTED) THEN
3360: x_return_status := fnd_api.g_ret_sts_error;
3361: arp_standard.debug(' Application line_ediscounted ('||p_app_rec.LINE_EDISCOUNTED||')<> l_sum_ed_line('||l_sum_ed_line||') from ar_line_dist_interface_gt');
3362: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3363: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_ediscounted ('||p_app_rec.LINE_EDISCOUNTED||')<> l_sum_ed_line('||l_sum_ed_line||') from ar_line_dist_interface_gt');
3364: FND_MSG_PUB.ADD;
3365: END IF;
3366:
3359: IF (p_ed_line_flag = 'Y') AND (l_sum_ed_line <> p_app_rec.LINE_EDISCOUNTED) THEN
3360: x_return_status := fnd_api.g_ret_sts_error;
3361: arp_standard.debug(' Application line_ediscounted ('||p_app_rec.LINE_EDISCOUNTED||')<> l_sum_ed_line('||l_sum_ed_line||') from ar_line_dist_interface_gt');
3362: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3363: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_ediscounted ('||p_app_rec.LINE_EDISCOUNTED||')<> l_sum_ed_line('||l_sum_ed_line||') from ar_line_dist_interface_gt');
3364: FND_MSG_PUB.ADD;
3365: END IF;
3366:
3367: IF (p_ed_tax_flag = 'Y') AND (l_sum_ed_tax <> p_app_rec.TAX_EDISCOUNTED) THEN
3366:
3367: IF (p_ed_tax_flag = 'Y') AND (l_sum_ed_tax <> p_app_rec.TAX_EDISCOUNTED) THEN
3368: x_return_status := fnd_api.g_ret_sts_error;
3369: arp_standard.debug(' Application tax_ediscounted ('||p_app_rec.tax_EDISCOUNTED||')<> l_sum_ed_tax('||l_sum_ed_tax||') from ar_line_dist_interface_gt');
3370: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3371: FND_MESSAGE.SET_TOKEN('TEXT',' Application tax_ediscounted ('||p_app_rec.tax_EDISCOUNTED||')<> l_sum_ed_tax('||l_sum_ed_tax||') from ar_line_dist_interface_gt');
3372: FND_MSG_PUB.ADD;
3373: END IF;
3374:
3367: IF (p_ed_tax_flag = 'Y') AND (l_sum_ed_tax <> p_app_rec.TAX_EDISCOUNTED) THEN
3368: x_return_status := fnd_api.g_ret_sts_error;
3369: arp_standard.debug(' Application tax_ediscounted ('||p_app_rec.tax_EDISCOUNTED||')<> l_sum_ed_tax('||l_sum_ed_tax||') from ar_line_dist_interface_gt');
3370: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3371: FND_MESSAGE.SET_TOKEN('TEXT',' Application tax_ediscounted ('||p_app_rec.tax_EDISCOUNTED||')<> l_sum_ed_tax('||l_sum_ed_tax||') from ar_line_dist_interface_gt');
3372: FND_MSG_PUB.ADD;
3373: END IF;
3374:
3375: IF (p_uned_line_flag = 'Y') AND (l_sum_uned_line <> p_app_rec.LINE_uEDISCOUNTED) THEN
3374:
3375: IF (p_uned_line_flag = 'Y') AND (l_sum_uned_line <> p_app_rec.LINE_uEDISCOUNTED) THEN
3376: x_return_status := fnd_api.g_ret_sts_error;
3377: arp_standard.debug(' Application line_uediscounted ('||p_app_rec.LINE_uEDISCOUNTED||')<> l_sum_uned_line('||l_sum_uned_line||') from ar_line_dist_interface_gt');
3378: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3379: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_uediscounted ('||p_app_rec.LINE_uEDISCOUNTED||')<> l_sum_uned_line('||l_sum_uned_line||') from ar_line_dist_interface_gt');
3380: FND_MSG_PUB.ADD;
3381: END IF;
3382:
3375: IF (p_uned_line_flag = 'Y') AND (l_sum_uned_line <> p_app_rec.LINE_uEDISCOUNTED) THEN
3376: x_return_status := fnd_api.g_ret_sts_error;
3377: arp_standard.debug(' Application line_uediscounted ('||p_app_rec.LINE_uEDISCOUNTED||')<> l_sum_uned_line('||l_sum_uned_line||') from ar_line_dist_interface_gt');
3378: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3379: FND_MESSAGE.SET_TOKEN('TEXT',' Application line_uediscounted ('||p_app_rec.LINE_uEDISCOUNTED||')<> l_sum_uned_line('||l_sum_uned_line||') from ar_line_dist_interface_gt');
3380: FND_MSG_PUB.ADD;
3381: END IF;
3382:
3383: IF (p_uned_tax_flag = 'Y') AND (l_sum_uned_tax <> p_app_rec.TAX_uEDISCOUNTED) THEN
3382:
3383: IF (p_uned_tax_flag = 'Y') AND (l_sum_uned_tax <> p_app_rec.TAX_uEDISCOUNTED) THEN
3384: x_return_status := fnd_api.g_ret_sts_error;
3385: arp_standard.debug(' Application tax_uediscounted ('||p_app_rec.tax_uEDISCOUNTED||')<> l_sum_uned_tax('||l_sum_uned_tax||') from ar_line_dist_interface_gt');
3386: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3387: FND_MESSAGE.SET_TOKEN('TEXT',' Application tax_uediscounted ('||p_app_rec.tax_uEDISCOUNTED||')<> l_sum_uned_tax('||l_sum_uned_tax||') from ar_line_dist_interface_gt');
3388: FND_MSG_PUB.ADD;
3389: END IF;
3390:
3383: IF (p_uned_tax_flag = 'Y') AND (l_sum_uned_tax <> p_app_rec.TAX_uEDISCOUNTED) THEN
3384: x_return_status := fnd_api.g_ret_sts_error;
3385: arp_standard.debug(' Application tax_uediscounted ('||p_app_rec.tax_uEDISCOUNTED||')<> l_sum_uned_tax('||l_sum_uned_tax||') from ar_line_dist_interface_gt');
3386: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR');
3387: FND_MESSAGE.SET_TOKEN('TEXT',' Application tax_uediscounted ('||p_app_rec.tax_uEDISCOUNTED||')<> l_sum_uned_tax('||l_sum_uned_tax||') from ar_line_dist_interface_gt');
3388: FND_MSG_PUB.ADD;
3389: END IF;
3390:
3391: END IF;