DBA Data[Home] [Help]

APPS.AR_CM_VAL_PVT dependencies on FND_MSG_PUB

Line 4: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;

1: PACKAGE BODY AR_CM_VAL_PVT AS
2: /* $Header: ARXVCMEB.pls 120.0.12000000.1 2007/02/27 12:06:50 mpsingh noship $ */
3:
4: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
5: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
6: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
7:
8: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');

Line 5: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;

1: PACKAGE BODY AR_CM_VAL_PVT AS
2: /* $Header: ARXVCMEB.pls 120.0.12000000.1 2007/02/27 12:06:50 mpsingh noship $ */
3:
4: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
5: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
6: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
7:
8: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
9: PG_PROFILE_APPLN_GL_DATE_DEF varchar2(30) := FND_PROFILE.value('AR_APPLICATION_GL_DATE_DEFAULT');

Line 6: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;

2: /* $Header: ARXVCMEB.pls 120.0.12000000.1 2007/02/27 12:06:50 mpsingh noship $ */
3:
4: G_MSG_UERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR;
5: G_MSG_ERROR CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_ERROR;
6: G_MSG_SUCCESS CONSTANT NUMBER := FND_MSG_PUB.G_MSG_LVL_SUCCESS;
7:
8: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
9: PG_PROFILE_APPLN_GL_DATE_DEF varchar2(30) := FND_PROFILE.value('AR_APPLICATION_GL_DATE_DEFAULT');
10:

Line 34: FND_MSG_PUB.Add;

30: WHERE trx_number = p_trx_number;
31: EXCEPTION
32: WHEN no_data_found THEN
33: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_NUM_INVALID');
34: FND_MSG_PUB.Add;
35: p_return_status := FND_API.G_RET_STS_ERROR ;
36: END;
37: END IF;
38:

Line 45: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)

41: IF p_trx_number IS NOT NULL
42: THEN
43: --give a warning message to indicate that the trx number
44: --entered by the user has been ignored.
45: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
46: THEN
47: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_NUM_IGN');
48: FND_MSG_PUB.Add;
49: END IF;

Line 48: FND_MSG_PUB.Add;

44: --entered by the user has been ignored.
45: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
46: THEN
47: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_NUM_IGN');
48: FND_MSG_PUB.Add;
49: END IF;
50: END IF;
51: END IF;
52: IF PG_DEBUG in ('Y', 'C') THEN

Line 79: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)

75: p_inv_line_number IS NOT NULL
76: THEN
77: --give a warning message to indicate that the line number
78: --entered by the user has been ignored.
79: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
80: THEN
81: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_LINE_NUM_IGN');
82: FND_MSG_PUB.Add;
83: END IF;

Line 82: FND_MSG_PUB.Add;

78: --entered by the user has been ignored.
79: IF FND_MSG_PUB.Check_Msg_Level(G_MSG_SUCCESS)
80: THEN
81: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_LINE_NUM_IGN');
82: FND_MSG_PUB.Add;
83: END IF;
84: END IF;
85:
86: IF p_inv_customer_trx_id IS NOT NULL THEN

Line 99: FND_MSG_PUB.Add;

95: AND line_type = 'LINE';
96: EXCEPTION
97: WHEN no_data_found THEN
98: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_LINE_NO_INVALID');
99: FND_MSG_PUB.Add;
100: p_return_status := FND_API.G_RET_STS_ERROR ;
101: END;
102: END IF;
103: END IF;

Line 115: FND_MSG_PUB.Add;

111: AND line_type = 'LINE';
112: EXCEPTION
113: WHEN no_data_found THEN
114: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_LINE_ID_INVALID');
115: FND_MSG_PUB.Add;
116: p_return_status := FND_API.G_RET_STS_ERROR ;
117: END;
118: END IF;
119: END IF;

Line 173: FND_MSG_PUB.ADD;

169:
170: EXCEPTION
171: WHEN NO_DATA_FOUND THEN
172: FND_MESSAGE.SET_NAME( 'AR','AR_CMAPI_CM_TRX_ID_INVALID');
173: FND_MSG_PUB.ADD;
174: p_return_status := FND_API.G_RET_STS_ERROR;
175: WHEN OTHERS THEN
176: IF PG_DEBUG in ('Y', 'C') THEN
177: arp_util.debug('EXCEPTION: Default_CM_Info()');

Line 183: FND_MSG_PUB.ADD;

179: END;
180:
181: ELSE
182: FND_MESSAGE.SET_NAME( 'AR','AR_CMAPI_CM_TRX_ID_NULL');
183: FND_MSG_PUB.ADD;
184: p_return_status := FND_API.G_RET_STS_ERROR ;
185: END IF;
186:
187:

Line 339: FND_MSG_PUB.Add;

335: IF p_applied_payment_schedule_id IS NOT NULL THEN
336: IF l_applied_payment_schedule_id <>
337: p_applied_payment_schedule_id THEN
338: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_PS_ID_X_INVALID');
339: FND_MSG_PUB.Add;
340: p_return_status := FND_API.G_RET_STS_ERROR ;
341: END IF;
342: ELSE
343: p_applied_payment_schedule_id := l_applied_payment_schedule_id;

Line 350: FND_MSG_PUB.Add;

346:
347: ELSE --case when p_customer_trx_id is null
348: --no further validation done in the validation routines for customer_trx_id
349: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_NULL');
350: FND_MSG_PUB.Add;
351: p_return_status := FND_API.G_RET_STS_ERROR ;
352:
353: END IF;
354:

Line 454: FND_MSG_PUB.Add;

450:
451: -- check that the apply date is not before the invoice date.
452: IF p_apply_date < p_inv_trx_date THEN
453: FND_MESSAGE.SET_NAME('AR','AR_APPLY_BEFORE_TRANSACTION');
454: FND_MSG_PUB.Add;
455: p_return_status := FND_API.G_RET_STS_ERROR;
456:
457: -- check that the application date is not before the CM trx date.
458: END IF;

Line 462: FND_MSG_PUB.Add;

458: END IF;
459:
460: IF p_apply_date < p_cm_trx_date THEN
461: FND_MESSAGE.SET_NAME('AR','AR_APPLY_BEFORE_CM');
462: FND_MSG_PUB.Add;
463: p_return_status := FND_API.G_RET_STS_ERROR;
464: END IF;
465:
466: END IF;

Line 496: FND_MSG_PUB.Add;

492:
493: -- Check that the application GL Date is not before the invoice GL Date.
494: IF p_apply_gl_date < p_inv_gl_date THEN
495: FND_MESSAGE.SET_NAME('AR','AR_VAL_GL_INV_GL');
496: FND_MSG_PUB.Add;
497: p_return_status := FND_API.G_RET_STS_ERROR;
498:
499: -- Check that the application GL Date is not before the CM GL Date.
500: END IF;

Line 503: FND_MSG_PUB.Add;

499: -- Check that the application GL Date is not before the CM GL Date.
500: END IF;
501: IF p_apply_gl_date < p_cm_gl_date THEN
502: FND_MESSAGE.SET_NAME('AR','AR_RW_GL_DATE_BEFORE_CM_GL');
503: FND_MSG_PUB.Add;
504: p_return_status := FND_API.G_RET_STS_ERROR;
505: END IF;
506:
507:

Line 512: FND_MSG_PUB.Add;

508: -- Check that the Application GL Date is in an open or future GL period.
509: IF ( NOT arp_util.is_gl_date_valid( p_apply_gl_date )) THEN
510: FND_MESSAGE.set_name( 'AR', 'AR_INVALID_APP_GL_DATE' );
511: FND_MESSAGE.set_token( 'GL_DATE', TO_CHAR( p_apply_gl_date ));
512: FND_MSG_PUB.Add;
513: p_return_status := FND_API.G_RET_STS_ERROR;
514: END IF;
515:
516:

Line 550: FND_MSG_PUB.Add;

546:
547: IF p_amount_applied IS NULL THEN
548: p_return_status := FND_API.G_RET_STS_ERROR;
549: FND_MESSAGE.SET_NAME('AR','AR_RAPI_APPLIED_AMT_NULL');
550: FND_MSG_PUB.Add;
551: return;
552: END IF;
553:
554:

Line 592: FND_MSG_PUB.Add;

588: EXCEPTION
589: WHEN no_data_found THEN
590: IF ar_cm_api_pub.Original_cm_unapp_info.inv_customer_trx_id IS NOT NULL THEN
591: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_ID_INST_INVALID');
592: FND_MSG_PUB.Add;
593: p_return_status := FND_API.G_RET_STS_ERROR;
594: ELSIF ar_cm_api_pub.Original_cm_unapp_info.inv_trx_number IS NOT NULL THEN
595: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_NUM_INST_INVALID');
596: FND_MSG_PUB.Add;

Line 596: FND_MSG_PUB.Add;

592: FND_MSG_PUB.Add;
593: p_return_status := FND_API.G_RET_STS_ERROR;
594: ELSIF ar_cm_api_pub.Original_cm_unapp_info.inv_trx_number IS NOT NULL THEN
595: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_NUM_INST_INVALID');
596: FND_MSG_PUB.Add;
597: p_return_status := FND_API.G_RET_STS_ERROR;
598: END IF;
599:
600: END;

Line 616: FND_MSG_PUB.Add;

612: ;
613: EXCEPTION
614: WHEN no_data_found THEN
615: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_INVALID');
616: FND_MSG_PUB.Add;
617: p_return_status := FND_API.G_RET_STS_ERROR;
618: WHEN too_many_rows THEN
619: FND_MESSAGE.SET_NAME('AR','AR_RAPI_INSTALL_NULL');
620: FND_MSG_PUB.Add;

Line 620: FND_MSG_PUB.Add;

616: FND_MSG_PUB.Add;
617: p_return_status := FND_API.G_RET_STS_ERROR;
618: WHEN too_many_rows THEN
619: FND_MESSAGE.SET_NAME('AR','AR_RAPI_INSTALL_NULL');
620: FND_MSG_PUB.Add;
621: p_return_status := FND_API.G_RET_STS_ERROR;
622: END;
623:
624:

Line 671: FND_MSG_PUB.Add;

667: OPEN rec_apppln;
668: FETCH rec_apppln INTO p_inv_customer_trx_id, p_ra_app_ps_id,p_apply_gl_date;
669: IF rec_apppln%NOTFOUND THEN
670: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REC_APP_ID_INVALID');
671: FND_MSG_PUB.Add;
672: p_return_status := FND_API.G_RET_STS_ERROR;
673: END IF;
674: CLOSE rec_apppln;
675:

Line 720: FND_MSG_PUB.Add;

716: END IF;
717: EXCEPTION
718: WHEN no_data_found THEN
719: FND_MESSAGE.SET_NAME('AR','AR_CMAPI_CM_NOT_APP_TO_INV');
720: FND_MSG_PUB.Add;
721: p_return_status := FND_API.G_RET_STS_ERROR;
722: raise;
723: WHEN others THEN
724: IF PG_DEBUG in ('Y', 'C') THEN

Line 787: FND_MSG_PUB.Add;

783: --here on the stack, but the return status will be set
784: --to FND_API.G_RET_STS_ERROR in the validation phase.
785: FND_MESSAGE.SET_NAME('AR', 'GENERIC_MESSAGE');
786: FND_MESSAGE.SET_TOKEN('GENERIC_TEXT', l_error_message);
787: FND_MSG_PUB.Add;
788: END IF;
789: END IF;
790: END IF;
791: IF PG_DEBUG in ('Y', 'C') THEN

Line 828: FND_MSG_PUB.Add;

824: and ra.application_type = 'CM';
825:
826: IF l_valid = 0 THEN
827: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REC_APP_ID_INVALID');
828: FND_MSG_PUB.Add;
829: p_return_status := FND_API.G_RET_STS_ERROR;
830: END IF;
831:
832: ELSIF p_receivable_application_id IS NULL THEN

Line 841: FND_MSG_PUB.Add;

837: ar_cm_api_pub.original_cm_unapp_info.inv_trx_number IS NULL
838: THEN
839: --receivable application id is null
840: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REC_APP_ID_NULL');
841: FND_MSG_PUB.Add;
842: p_return_status := FND_API.G_RET_STS_ERROR;
843: ELSIF ar_cm_api_pub.original_cm_unapp_info.inv_trx_number IS NULL AND
844: ar_cm_api_pub.original_cm_unapp_info.inv_customer_trx_id IS NULL AND
845: ar_cm_api_pub.original_cm_unapp_info.applied_ps_id IS NULL AND

Line 851: FND_MSG_PUB.Add;

847: ar_cm_api_pub.original_cm_unapp_info.cm_trx_number IS NOT NULL)
848: THEN
849: --the transaction was not specified
850: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_NULL');
851: FND_MSG_PUB.Add;
852: p_return_status := FND_API.G_RET_STS_ERROR;
853: ELSIF (ar_cm_api_pub.original_cm_unapp_info.inv_trx_number IS NOT NULL OR
854: ar_cm_api_pub.original_cm_unapp_info.inv_customer_trx_id IS NOT NULL OR
855: ar_cm_api_pub.original_cm_unapp_info.applied_ps_id IS NOT NULL) AND

Line 861: FND_MSG_PUB.Add;

857: ar_cm_api_pub.original_cm_unapp_info.cm_trx_number IS NULL
858: THEN
859: --the credit memo was not specified
860: FND_MESSAGE.SET_NAME('AR','AR_CMAPI_CM_TRX_ID_NULL');
861: FND_MSG_PUB.Add;
862: p_return_status := FND_API.G_RET_STS_ERROR;
863: END IF;
864:
865: END IF;

Line 895: FND_MSG_PUB.Add;

891:
892: IF p_reversal_gl_date < NVL(p_apply_gl_date,p_reversal_gl_date) THEN
893: FND_MESSAGE.SET_NAME('AR','AR_RW_BEFORE_APP_GL_DATE');
894: FND_MESSAGE.SET_TOKEN('GL_DATE', p_apply_gl_date);
895: FND_MSG_PUB.Add;
896: p_return_status := FND_API.G_RET_STS_ERROR;
897: END IF;
898: IF p_reversal_gl_date < nvl(p_cm_gl_date,p_reversal_gl_date) THEN
899: FND_MESSAGE.SET_NAME('AR','AR_RW_BEFORE_CM_GL_DATE');

Line 901: FND_MSG_PUB.Add;

897: END IF;
898: IF p_reversal_gl_date < nvl(p_cm_gl_date,p_reversal_gl_date) THEN
899: FND_MESSAGE.SET_NAME('AR','AR_RW_BEFORE_CM_GL_DATE');
900: FND_MESSAGE.SET_TOKEN('GL_DATE', p_cm_gl_date);
901: FND_MSG_PUB.Add;
902: p_return_status := FND_API.G_RET_STS_ERROR;
903: END IF;
904:
905: IF ( NOT arp_util.is_gl_date_valid(p_reversal_gl_date)) THEN

Line 908: FND_MSG_PUB.Add;

904:
905: IF ( NOT arp_util.is_gl_date_valid(p_reversal_gl_date)) THEN
906: FND_MESSAGE.set_name( 'AR', 'AR_INVALID_APP_GL_DATE' );
907: FND_MESSAGE.set_token( 'GL_DATE', TO_CHAR( p_reversal_gl_date ));
908: FND_MSG_PUB.Add;
909: p_return_status := FND_API.G_RET_STS_ERROR;
910: END IF;
911:
912: ELSE

Line 914: FND_MSG_PUB.Add;

910: END IF;
911:
912: ELSE
913: FND_MESSAGE.SET_NAME('AR','AR_RAPI_REV_GL_DATE_NULL');
914: FND_MSG_PUB.Add;
915: p_return_status := FND_API.G_RET_STS_ERROR;
916: IF PG_DEBUG in ('Y', 'C') THEN
917: arp_util.debug('Validate_Rev_gl_date: ' || 'The Reversal gl date is null ');
918: END IF;

Line 997: FND_MSG_PUB.Add;

993: INTO l_inv_customer_trx_id,
994: l_installment;
995: IF c_pay_sched%NOTFOUND THEN
996: FND_MESSAGE.SET_NAME('AR','AR_RAPI_APP_PS_ID_INVALID');
997: FND_MSG_PUB.Add;
998: p_return_status := FND_API.G_RET_STS_ERROR ;
999: END IF;
1000: CLOSE c_pay_sched;
1001:

Line 1022: FND_MSG_PUB.Add;

1018: WHERE customer_trx_id = p_inv_customer_trx_id;
1019: EXCEPTION
1020: WHEN no_data_found THEN
1021: FND_MESSAGE.SET_NAME('AR','AR_RAPI_CUST_TRX_ID_INVALID');
1022: FND_MSG_PUB.Add;
1023: p_return_status := FND_API.G_RET_STS_ERROR;
1024: WHEN too_many_rows THEN
1025: FND_MESSAGE.SET_NAME('AR','AR_RAPI_INSTALL_NULL');
1026: FND_MSG_PUB.Add;

Line 1026: FND_MSG_PUB.Add;

1022: FND_MSG_PUB.Add;
1023: p_return_status := FND_API.G_RET_STS_ERROR;
1024: WHEN too_many_rows THEN
1025: FND_MESSAGE.SET_NAME('AR','AR_RAPI_INSTALL_NULL');
1026: FND_MSG_PUB.Add;
1027: p_return_status := FND_API.G_RET_STS_ERROR;
1028: END;
1029: END IF;
1030: END IF;

Line 1396: FND_MSG_PUB.Add;

1392: INTO l_inv_customer_trx_id,
1393: l_installment;
1394: IF c_pay_sched%NOTFOUND THEN
1395: FND_MESSAGE.SET_NAME('AR','AR_RAPI_APP_PS_ID_INVALID');
1396: FND_MSG_PUB.Add;
1397: p_return_status := FND_API.G_RET_STS_ERROR ;
1398: END IF;
1399: CLOSE c_pay_sched;
1400:

Line 1405: FND_MSG_PUB.Add;

1401: IF p_return_status = FND_API.G_RET_STS_SUCCESS THEN
1402: IF (nvl(p_inv_customer_trx_id,l_inv_customer_trx_id) <> l_inv_customer_trx_id OR
1403: nvl(p_installment,l_installment) <> l_installment) THEN
1404: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_PS_ID_X_INVALID');
1405: FND_MSG_PUB.Add;
1406: p_return_status := FND_API.G_RET_STS_ERROR;
1407: ELSE
1408: p_inv_customer_trx_id := l_inv_customer_trx_id;
1409: END IF;

Line 1440: FND_MSG_PUB.Add;

1436: THEN
1437: IF ar_cm_api_pub.original_cm_unapp_info.inv_customer_trx_id IS NOT NULL OR
1438: ar_cm_api_pub.original_cm_unapp_info.inv_trx_number IS NOT NULL THEN
1439: FND_MESSAGE.SET_NAME('AR','AR_RAPI_TRX_RA_ID_X_INVALID');
1440: FND_MSG_PUB.Add;
1441: p_return_status := FND_API.G_RET_STS_ERROR;
1442: ELSIF ar_cm_api_pub.original_cm_unapp_info.applied_ps_id IS NOT NULL THEN
1443: FND_MESSAGE.SET_NAME('AR','AR_RAPI_APP_PS_RA_ID_X_INVALID');
1444: FND_MSG_PUB.Add;

Line 1444: FND_MSG_PUB.Add;

1440: FND_MSG_PUB.Add;
1441: p_return_status := FND_API.G_RET_STS_ERROR;
1442: ELSIF ar_cm_api_pub.original_cm_unapp_info.applied_ps_id IS NOT NULL THEN
1443: FND_MESSAGE.SET_NAME('AR','AR_RAPI_APP_PS_RA_ID_X_INVALID');
1444: FND_MSG_PUB.Add;
1445: p_return_status := FND_API.G_RET_STS_ERROR;
1446: END IF;
1447: ELSE
1448: p_applied_payment_schedule_id := l_ra_app_ps_id;

Line 1455: FND_MSG_PUB.Add;

1451: IF nvl(l_inv_customer_trx_id,-99) <> nvl(p_inv_customer_trx_id,nvl(l_inv_customer_trx_id,-99)) THEN
1452: --Invalid receivable application identifier for the entered
1453: -- invoice customer trx id
1454: FND_MESSAGE.SET_NAME('AR','AR_RAPI_RCPT_RA_ID_X_INVALID');
1455: FND_MSG_PUB.Add;
1456: p_return_status := FND_API.G_RET_STS_ERROR;
1457: ELSE
1458: p_inv_customer_trx_id := l_inv_customer_trx_id;
1459: END IF;