DBA Data[Home] [Help]

APPS.ARP_PROCESS_DET_PKG dependencies on ARP_PROCESS_DET_PKG

Line 1: PACKAGE BODY arp_process_det_pkg AS

1: PACKAGE BODY arp_process_det_pkg AS
2: /* $Header: ARDLAPPB.pls 120.30 2011/08/15 09:27:48 chuansha ship $*/
3: g_gt_id NUMBER := 0;
4: g_payschedule_trx ar_payment_schedules%ROWTYPE;
5: g_payschedule_rec ar_payment_schedules%ROWTYPE;

Line 617: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_customer_trx_cache

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

Line 625: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_installed_inv_allowed customer_trx_id:'

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

Line 633: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-no_open_trx_pay_schedule customer_trx_id:'

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

Line 641: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_inv_ps-'||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;

Line 682: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps no_open_rec_pay_schedule' );

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);

Line 689: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_rec_ps:'||SQLERRM );

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);

Line 886: arp_standard.debug('arp_process_det_pkg.upd_inv_ps+' );

882: RETURN 'Y';
883: END IF;
884: END is_bucket_concern;
885: BEGIN
886: arp_standard.debug('arp_process_det_pkg.upd_inv_ps+' );
887: arp_standard.debug(' p_line_applied :'||p_line_applied);
888: arp_standard.debug(' p_tax_applied :'||p_tax_applied);
889: arp_standard.debug(' p_freight_applied :'||p_freight_applied);
890: arp_standard.debug(' p_charges_applied :'||p_charges_applied);

Line 1056: arp_standard.debug( 'arp_process_det_pkg.upd_inv_ps-' );

1052: l_apps_rec.STATUS := 'APP';
1053: insert_rapps_p(p_app_rec => l_apps_rec,
1054: x_return_status => x_return_status);
1055: x_app_rec := l_apps_rec;
1056: arp_standard.debug( 'arp_process_det_pkg.upd_inv_ps-' );
1057: EXCEPTION
1058: WHEN neg_app_amt THEN
1059: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1060: IF l_earned_concern = 'PBLINENEG' THEN

Line 1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');

1057: EXCEPTION
1058: WHEN neg_app_amt THEN
1059: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1060: IF l_earned_concern = 'PBLINENEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1062: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1064: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');

Line 1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');

1059: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1060: IF l_earned_concern = 'PBLINENEG' THEN
1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1062: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1064: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1066: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1067: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');

Line 1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');

1061: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line applied amt is negative');
1062: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1064: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1066: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1067: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');
1068: END IF;
1069: FND_MSG_PUB.ADD;

Line 1067: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');

1063: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax applied amt is negative');
1064: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1065: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight applied amt is negative');
1066: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1067: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge applied amt is negative');
1068: END IF;
1069: FND_MSG_PUB.ADD;
1070: x_return_status := FND_API.G_RET_STS_ERROR;
1071: WHEN neg_earned_amt THEN

Line 1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');

1070: x_return_status := FND_API.G_RET_STS_ERROR;
1071: WHEN neg_earned_amt THEN
1072: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1073: IF l_earned_concern = 'PBLINENEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1075: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1077: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');

Line 1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');

1072: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1073: IF l_earned_concern = 'PBLINENEG' THEN
1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1075: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1077: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1079: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1080: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');

Line 1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');

1074: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line earned amt is negative');
1075: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1077: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1079: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1080: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');
1081: END IF;
1082: FND_MSG_PUB.ADD;

Line 1080: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');

1076: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax earned amt is negative');
1077: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1078: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight earned amt is negative');
1079: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1080: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge earned amt is negative');
1081: END IF;
1082: FND_MSG_PUB.ADD;
1083: x_return_status := FND_API.G_RET_STS_ERROR;
1084: WHEN neg_unearned_amt THEN

Line 1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');

1083: x_return_status := FND_API.G_RET_STS_ERROR;
1084: WHEN neg_unearned_amt THEN
1085: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1086: IF l_earned_concern = 'PBLINENEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');

Line 1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');

1085: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1086: IF l_earned_concern = 'PBLINENEG' THEN
1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1092: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1093: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');

Line 1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');

1087: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-line unearned amt is negative');
1088: ELSIF l_earned_concern = 'PBTAXNEG' THEN
1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1092: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1093: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');
1094: END IF;
1095: FND_MSG_PUB.ADD;

Line 1093: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');

1089: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-tax unearned amt is negative');
1090: ELSIF l_earned_concern = 'PBFRTNEG' THEN
1091: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-freight unearned amt is negative');
1092: ELSIF l_earned_concern = 'PBCHRGNEG' THEN
1093: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-charge unearned amt is negative');
1094: END IF;
1095: FND_MSG_PUB.ADD;
1096: x_return_status := FND_API.G_RET_STS_ERROR;
1097: WHEN OTHERS THEN

Line 1099: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-'||SQLERRM );

1095: FND_MSG_PUB.ADD;
1096: x_return_status := FND_API.G_RET_STS_ERROR;
1097: WHEN OTHERS THEN
1098: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1099: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-'||SQLERRM );
1100: FND_MSG_PUB.ADD;
1101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1102: arp_util.debug('EXCEPTION OTHERS arp_process_det_pkg.upd_inv_ps:'||SQLERRM );
1103: END upd_inv_ps;

Line 1102: arp_util.debug('EXCEPTION OTHERS arp_process_det_pkg.upd_inv_ps:'||SQLERRM );

1098: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
1099: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.upd_inv_ps-'||SQLERRM );
1100: FND_MSG_PUB.ADD;
1101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1102: arp_util.debug('EXCEPTION OTHERS arp_process_det_pkg.upd_inv_ps:'||SQLERRM );
1103: END upd_inv_ps;
1104:
1105:
1106:

Line 2663: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.final_commit-'||SQLERRM );

2659: WHEN OTHERS THEN
2660: ROLLBACK TO final_commit;
2661: arp_standard.debug('EXCEPTION OTHERS final_commit:'||SQLERRM);
2662: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2663: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.final_commit-'||SQLERRM );
2664: FND_MSG_PUB.ADD;
2665: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2666: p_count => x_msg_count,
2667: p_data => x_msg_data);

Line 2778: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_remaining-'||SQLERRM );

2774: x_return_status := FND_API.G_RET_STS_SUCCESS;
2775: WHEN OTHERS THEN
2776: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_remaining:'||SQLERRM);
2777: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
2778: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_remaining-'||SQLERRM );
2779: FND_MSG_PUB.ADD;
2780: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
2781: p_count => x_msg_count,
2782: p_data => x_msg_data);

Line 3116: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_applied-'||SQLERRM );

3112: EXCEPTION
3113: WHEN OTHERS THEN
3114: arp_standard.debug('EXCEPTION OTHERS get_latest_amount_applied:'||SQLERRM);
3115: FND_MESSAGE.SET_NAME( 'AR', 'AR_CUST_API_ERROR' );
3116: FND_MESSAGE.SET_TOKEN( 'TEXT', 'arp_process_det_pkg.get_latest_amount_applied-'||SQLERRM );
3117: FND_MSG_PUB.ADD;
3118: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
3119: p_count => x_msg_count,
3120: p_data => x_msg_data);

Line 3512: END arp_process_det_pkg;

3508:
3509:
3510:
3511:
3512: END arp_process_det_pkg;