DBA Data[Home] [Help]

APPS.OZF_AR_VALIDATION_PVT dependencies on FND_MSG_PUB

Line 7: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_AR_VALIDATION_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozfvarvb.pls';
6:
7: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9:
10:
11:

Line 8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);

4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OZF_AR_VALIDATION_PVT';
5: G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozfvarvb.pls';
6:
7: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9:
10:
11:
12: /*=======================================================================*

Line 156: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

152:
153: EXCEPTION
154: WHEN OTHERS THEN
155: x_return_status := FND_API.g_ret_sts_unexp_error ;
156: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
157: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
158: END IF;
159: END Check_to_Process_SETL_WF;
160:

Line 157: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

153: EXCEPTION
154: WHEN OTHERS THEN
155: x_return_status := FND_API.g_ret_sts_unexp_error ;
156: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
157: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
158: END IF;
159: END Check_to_Process_SETL_WF;
160:
161:

Line 198: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

194:
195:
196: IF p_line_type = 'LINE' AND
197: p_claim_line_amount > l_line_remaining THEN
198: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
199: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_LINE_AMT_ERR');
200: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
201: FND_MSG_PUB.add;
202: END IF;

Line 201: FND_MSG_PUB.add;

197: p_claim_line_amount > l_line_remaining THEN
198: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
199: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_LINE_AMT_ERR');
200: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
201: FND_MSG_PUB.add;
202: END IF;
203: RETURN FALSE;
204: ELSIF p_line_type = 'TAX' AND
205: p_claim_line_amount > l_tax_remaining THEN

Line 206: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

202: END IF;
203: RETURN FALSE;
204: ELSIF p_line_type = 'TAX' AND
205: p_claim_line_amount > l_tax_remaining THEN
206: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
207: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_TAX_AMT_ERR');
208: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
209: FND_MSG_PUB.add;
210: END IF;

Line 209: FND_MSG_PUB.add;

205: p_claim_line_amount > l_tax_remaining THEN
206: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
207: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_TAX_AMT_ERR');
208: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
209: FND_MSG_PUB.add;
210: END IF;
211: RETURN FALSE;
212: ELSIF p_line_type = 'FREIGHT' AND
213: p_claim_line_amount > l_freight_remaining THEN

Line 214: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

210: END IF;
211: RETURN FALSE;
212: ELSIF p_line_type = 'FREIGHT' AND
213: p_claim_line_amount > l_freight_remaining THEN
214: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
215: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_FREIGHT_AMT_ERR');
216: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
217: FND_MSG_PUB.add;
218: END IF;

Line 217: FND_MSG_PUB.add;

213: p_claim_line_amount > l_freight_remaining THEN
214: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
215: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_FREIGHT_AMT_ERR');
216: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
217: FND_MSG_PUB.add;
218: END IF;
219: RETURN FALSE;
220: END IF;
221:

Line 372: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

368: OPEN csr_trx_line_amount(l_invoice_line_id);
369: FETCH csr_trx_line_amount INTO l_trx_line_amt;
370: CLOSE csr_trx_line_amount;
371: IF ABS(l_trx_line_amt) < l_sum_line_amt THEN
372: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
373: OPEN csr_trx_details(l_invoice_id);
374: FETCH csr_trx_details INTO l_trx_number;
375: CLOSE csr_trx_details;
376: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TRX_BAL_ERR');

Line 378: FND_MSG_PUB.add;

374: FETCH csr_trx_details INTO l_trx_number;
375: CLOSE csr_trx_details;
376: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TRX_BAL_ERR');
377: FND_MESSAGE.set_token('TRX_NUMBER',l_trx_number);
378: FND_MSG_PUB.add;
379: END IF;
380: x_return_status := FND_API.g_ret_sts_error;
381: RETURN;
382: END IF;

Line 392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

388: END IF;
389:
390: EXCEPTION
391: WHEN OTHERS THEN
392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
394: END IF;
395: x_return_status := FND_API.g_ret_sts_unexp_error;
396: END Validate_CreditTo_Information;

Line 393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

389:
390: EXCEPTION
391: WHEN OTHERS THEN
392: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
393: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
394: END IF;
395: x_return_status := FND_API.g_ret_sts_unexp_error;
396: END Validate_CreditTo_Information;
397:

Line 609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

605: | CREDIT_MEMO / DEBIT_MEMO: Receivables Batch Source is required for Interface
606: *-----------------------------------------------------*/
607: IF p_claim_rec.payment_method IN ('CREDIT_MEMO', 'DEBIT_MEMO') AND
608: l_batch_source_id IS NULL THEN
609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
610: FND_MESSAGE.set_name('OZF','OZF_BATCH_SRC_REQ_FOR_INTF');
611: FND_MSG_PUB.add;
612: END IF;
613: RAISE FND_API.G_EXC_ERROR;

Line 611: FND_MSG_PUB.add;

607: IF p_claim_rec.payment_method IN ('CREDIT_MEMO', 'DEBIT_MEMO') AND
608: l_batch_source_id IS NULL THEN
609: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
610: FND_MESSAGE.set_name('OZF','OZF_BATCH_SRC_REQ_FOR_INTF');
611: FND_MSG_PUB.add;
612: END IF;
613: RAISE FND_API.G_EXC_ERROR;
614: END IF;
615:

Line 630: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

626: CLOSE csr_ar_system_options;
627:
628: IF l_salesrep_req_flag = 'Y' AND
629: p_claim_rec.sales_rep_id IS NULL THEN
630: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
631: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISS_SALESREP');
632: FND_MSG_PUB.add;
633: END IF;
634: RAISE FND_API.G_EXC_ERROR;

Line 632: FND_MSG_PUB.add;

628: IF l_salesrep_req_flag = 'Y' AND
629: p_claim_rec.sales_rep_id IS NULL THEN
630: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
631: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISS_SALESREP');
632: FND_MSG_PUB.add;
633: END IF;
634: RAISE FND_API.G_EXC_ERROR;
635: END IF;
636: END IF;

Line 688: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

684: END IF;
685:
686: IF p_claim_rec.amount > 0 AND
687: l_creation_sign = 'P' THEN
688: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
689: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
690: FND_MSG_PUB.add;
691: END IF;
692: l_error := TRUE;

Line 690: FND_MSG_PUB.add;

686: IF p_claim_rec.amount > 0 AND
687: l_creation_sign = 'P' THEN
688: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
689: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
690: FND_MSG_PUB.add;
691: END IF;
692: l_error := TRUE;
693: ELSIF p_claim_rec.amount < 0 AND
694: l_creation_sign = 'N' THEN

Line 695: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

691: END IF;
692: l_error := TRUE;
693: ELSIF p_claim_rec.amount < 0 AND
694: l_creation_sign = 'N' THEN
695: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
696: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
697: FND_MSG_PUB.add;
698: END IF;
699: l_error := TRUE;

Line 697: FND_MSG_PUB.add;

693: ELSIF p_claim_rec.amount < 0 AND
694: l_creation_sign = 'N' THEN
695: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
696: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
697: FND_MSG_PUB.add;
698: END IF;
699: l_error := TRUE;
700: END IF;
701: END IF;

Line 709: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

705: -- Adjustment Reason can't be ENDORSEMENT or EXCHANGE for CHARGEBACK settlement
706: ------------ REG_CREDIT_MEMO ----------------
707: IF p_claim_rec.payment_method = 'REG_CREDIT_MEMO' THEN
708: IF l_credit_memo_reason IS NULL THEN
709: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
710: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_REASON_ERR');
711: FND_MSG_PUB.add;
712: END IF;
713: l_error := TRUE;

Line 711: FND_MSG_PUB.add;

707: IF p_claim_rec.payment_method = 'REG_CREDIT_MEMO' THEN
708: IF l_credit_memo_reason IS NULL THEN
709: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
710: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_REASON_ERR');
711: FND_MSG_PUB.add;
712: END IF;
713: l_error := TRUE;
714: END IF;
715:

Line 719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

715:
716: ------------ CREDIT_MEMO ----------------
717: ELSIF p_claim_rec.payment_method = 'CREDIT_MEMO' THEN
718: IF l_cm_trx_type_id IS NULL THEN
719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
720: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_TRX_ID_REQ');
721: FND_MSG_PUB.add;
722: END IF;
723: l_error := TRUE;

Line 721: FND_MSG_PUB.add;

717: ELSIF p_claim_rec.payment_method = 'CREDIT_MEMO' THEN
718: IF l_cm_trx_type_id IS NULL THEN
719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
720: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_TRX_ID_REQ');
721: FND_MSG_PUB.add;
722: END IF;
723: l_error := TRUE;
724: END IF;
725: IF p_claim_rec.claim_class = 'DEDUCTION' AND

Line 730: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

726: p_claim_rec.source_object_id IS NOT NULL AND
727: l_sum_line_amt < p_claim_rec.amount_remaining THEN
728: -- adj_rec_trx_id is required later in case of tax_impact transaction
729: IF l_adj_rec_trx_id IS NULL THEN
730: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
731: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
732: FND_MSG_PUB.add;
733: END IF;
734: l_error := TRUE;

Line 732: FND_MSG_PUB.add;

728: -- adj_rec_trx_id is required later in case of tax_impact transaction
729: IF l_adj_rec_trx_id IS NULL THEN
730: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
731: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
732: FND_MSG_PUB.add;
733: END IF;
734: l_error := TRUE;
735: END IF;
736: END IF;

Line 741: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

737:
738: ------------ DEBIT_MEMO ----------------
739: ELSIF p_claim_rec.payment_method = 'DEBIT_MEMO' THEN
740: IF l_dm_trx_type_id IS NULL THEN
741: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
742: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DM_TRX_ID_REQ');
743: FND_MSG_PUB.add;
744: END IF;
745: l_error := TRUE;

Line 743: FND_MSG_PUB.add;

739: ELSIF p_claim_rec.payment_method = 'DEBIT_MEMO' THEN
740: IF l_dm_trx_type_id IS NULL THEN
741: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
742: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DM_TRX_ID_REQ');
743: FND_MSG_PUB.add;
744: END IF;
745: l_error := TRUE;
746: END IF;
747:

Line 751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

747:
748: ------------ CHARGEBACK ----------------
749: ELSIF p_claim_rec.payment_method = 'CHARGEBACK' THEN
750: IF l_adjust_reason IN ('ENDORSEMENT', 'EXCHANGE') THEN
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
752: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_REACODE_ERR');
753: FND_MSG_PUB.add;
754: END IF;
755: l_error := TRUE;

Line 753: FND_MSG_PUB.add;

749: ELSIF p_claim_rec.payment_method = 'CHARGEBACK' THEN
750: IF l_adjust_reason IN ('ENDORSEMENT', 'EXCHANGE') THEN
751: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
752: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_REACODE_ERR');
753: FND_MSG_PUB.add;
754: END IF;
755: l_error := TRUE;
756: END IF;
757: IF l_cb_trx_type_id IS NULL THEN

Line 758: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

754: END IF;
755: l_error := TRUE;
756: END IF;
757: IF l_cb_trx_type_id IS NULL THEN
758: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
759: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_TRX_ID_REQ');
760: FND_MSG_PUB.add;
761: END IF;
762: l_error := TRUE;

Line 760: FND_MSG_PUB.add;

756: END IF;
757: IF l_cb_trx_type_id IS NULL THEN
758: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
759: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_TRX_ID_REQ');
760: FND_MSG_PUB.add;
761: END IF;
762: l_error := TRUE;
763: END IF;
764:

Line 770: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

766: ELSIF p_claim_rec.payment_method = 'WRITE_OFF' THEN
767: IF p_claim_rec.claim_class = 'DEDUCTION' THEN
768: IF p_claim_rec.source_object_id IS NOT NULL AND
769: l_adj_rec_trx_id IS NULL THEN
770: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
771: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
772: FND_MSG_PUB.add;
773: END IF;
774: l_error := TRUE;

Line 772: FND_MSG_PUB.add;

768: IF p_claim_rec.source_object_id IS NOT NULL AND
769: l_adj_rec_trx_id IS NULL THEN
770: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
771: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
772: FND_MSG_PUB.add;
773: END IF;
774: l_error := TRUE;
775: -- 11.5.10 Negative Receipt Write Off
776: ELSIF p_claim_rec.source_object_id IS NULL AND

Line 779: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

775: -- 11.5.10 Negative Receipt Write Off
776: ELSIF p_claim_rec.source_object_id IS NULL AND
777: ARP_DEDUCTION_COVER.negative_rct_writeoffs_allowed() AND
778: l_neg_wo_rec_trx_id IS NULL THEN
779: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
780: FND_MESSAGE.set_name('OZF', 'OZF_SETL_NEG_WO_TRX_ID_REQ');
781: FND_MSG_PUB.add;
782: END IF;
783: l_error := TRUE;

Line 781: FND_MSG_PUB.add;

777: ARP_DEDUCTION_COVER.negative_rct_writeoffs_allowed() AND
778: l_neg_wo_rec_trx_id IS NULL THEN
779: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
780: FND_MESSAGE.set_name('OZF', 'OZF_SETL_NEG_WO_TRX_ID_REQ');
781: FND_MSG_PUB.add;
782: END IF;
783: l_error := TRUE;
784: END IF;
785: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND

Line 787: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

783: l_error := TRUE;
784: END IF;
785: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND
786: l_wo_rec_trx_id IS NULL THEN
787: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
788: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WO_TRX_ID_REQ');
789: FND_MSG_PUB.add;
790: END IF;
791: l_error := TRUE;

Line 789: FND_MSG_PUB.add;

785: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND
786: l_wo_rec_trx_id IS NULL THEN
787: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
788: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WO_TRX_ID_REQ');
789: FND_MSG_PUB.add;
790: END IF;
791: l_error := TRUE;
792: END IF;
793: ------------ RMA ----------------

Line 796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

792: END IF;
793: ------------ RMA ----------------
794: ELSIF p_claim_rec.payment_method = 'RMA' THEN
795: IF l_credit_memo_reason IS NULL THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
797: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RMA_REASON_REQ');
798: FND_MESSAGE.set_token('REASON', l_claim_reason_name);
799: FND_MSG_PUB.add;
800: END IF;

Line 799: FND_MSG_PUB.add;

795: IF l_credit_memo_reason IS NULL THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
797: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RMA_REASON_REQ');
798: FND_MESSAGE.set_token('REASON', l_claim_reason_name);
799: FND_MSG_PUB.add;
800: END IF;
801: l_error := TRUE;
802: END IF;
803: END IF;

Line 816: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

812: -- related customer and site check
813: IF p_claim_rec.pay_related_account_flag = FND_API.g_true THEN
814: -- related_cust_acct_id should exist if pay_related_customer_flag is 'T'
815: IF p_claim_rec.related_cust_account_id IS NULL THEN
816: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
817: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_REQ');
818: FND_MSG_PUB.add;
819: END IF;
820: RAISE FND_API.G_EXC_ERROR;

Line 818: FND_MSG_PUB.add;

814: -- related_cust_acct_id should exist if pay_related_customer_flag is 'T'
815: IF p_claim_rec.related_cust_account_id IS NULL THEN
816: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
817: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_REQ');
818: FND_MSG_PUB.add;
819: END IF;
820: RAISE FND_API.G_EXC_ERROR;
821: END IF;
822: -- related_site_use_id should exist if pay_related_customer_flag is 'T'

Line 824: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

820: RAISE FND_API.G_EXC_ERROR;
821: END IF;
822: -- related_site_use_id should exist if pay_related_customer_flag is 'T'
823: IF p_claim_rec.related_site_use_id IS NULL THEN
824: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
825: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_SITE_REQ');
826: FND_MSG_PUB.add;
827: END IF;
828: RAISE FND_API.G_EXC_ERROR;

Line 826: FND_MSG_PUB.add;

822: -- related_site_use_id should exist if pay_related_customer_flag is 'T'
823: IF p_claim_rec.related_site_use_id IS NULL THEN
824: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
825: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_SITE_REQ');
826: FND_MSG_PUB.add;
827: END IF;
828: RAISE FND_API.G_EXC_ERROR;
829: END IF;
830: ELSE

Line 835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

831: /*-----------------------------------------------------
832: | Bill To Site is required
833: *-----------------------------------------------------*/
834: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
836: FND_MESSAGE.set_name('OZF', 'OZF_SETL_BILLTO_SITE_REQ');
837: FND_MSG_PUB.add;
838: END IF;
839: RAISE FND_API.G_EXC_ERROR;

Line 837: FND_MSG_PUB.add;

833: *-----------------------------------------------------*/
834: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
835: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
836: FND_MESSAGE.set_name('OZF', 'OZF_SETL_BILLTO_SITE_REQ');
837: FND_MSG_PUB.add;
838: END IF;
839: RAISE FND_API.G_EXC_ERROR;
840: END IF;
841: END IF;

Line 847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

843: | Ship To Site is required for RMA settlement
844: *-----------------------------------------------------*/
845: IF p_claim_rec.payment_method = 'RMA' AND
846: p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
848: FND_MESSAGE.set_name('OZF', 'OZF_SETL_SHIPTO_SITE_REQ');
849: FND_MSG_PUB.add;
850: END IF;
851: RAISE FND_API.G_EXC_ERROR;

Line 849: FND_MSG_PUB.add;

845: IF p_claim_rec.payment_method = 'RMA' AND
846: p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
848: FND_MESSAGE.set_name('OZF', 'OZF_SETL_SHIPTO_SITE_REQ');
849: FND_MSG_PUB.add;
850: END IF;
851: RAISE FND_API.G_EXC_ERROR;
852: END IF;
853:

Line 862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

858: -- receivable clearning account must exist in system parameter
859: IF l_gl_acc_checking = FND_API.g_true AND
860: l_rec_clr_in_sys IS NULL AND
861: p_claim_rec.payment_method <> 'RMA' THEN
862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
863: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RECCLRACC_REQ');
864: FND_MSG_PUB.add;
865: END IF;
866: RAISE FND_API.G_EXC_ERROR;

Line 864: FND_MSG_PUB.add;

860: l_rec_clr_in_sys IS NULL AND
861: p_claim_rec.payment_method <> 'RMA' THEN
862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
863: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RECCLRACC_REQ');
864: FND_MSG_PUB.add;
865: END IF;
866: RAISE FND_API.G_EXC_ERROR;
867: END IF;
868:

Line 874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

870: | Prev Open Credit Memo/Debit Memo: open balance amount checking
871: *-----------------------------------------------------*/
872: IF p_claim_rec.payment_method IN ('PREV_OPEN_CREDIT', 'PREV_OPEN_DEBIT') THEN
873: IF p_claim_rec.payment_reference_id IS NULL THEN
874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
875: FND_MESSAGE.set_name('OZF','OZF_PAY_REFERENCE_REQD');
876: FND_MSG_PUB.add;
877: END IF;
878: RAISE FND_API.G_EXC_ERROR;

Line 876: FND_MSG_PUB.add;

872: IF p_claim_rec.payment_method IN ('PREV_OPEN_CREDIT', 'PREV_OPEN_DEBIT') THEN
873: IF p_claim_rec.payment_reference_id IS NULL THEN
874: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
875: FND_MESSAGE.set_name('OZF','OZF_PAY_REFERENCE_REQD');
876: FND_MSG_PUB.add;
877: END IF;
878: RAISE FND_API.G_EXC_ERROR;
879: ELSE
880: OPEN csr_trx_balance(p_claim_rec.payment_reference_id);

Line 886: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

882: CLOSE csr_trx_balance;
883:
884: IF p_claim_rec.currency_code = l_trx_currency AND
885: ABS(p_claim_rec.amount_remaining) > ABS(l_trx_balance) THEN
886: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
887: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_DM_OP_BAL_ERR');
888: FND_MSG_PUB.add;
889: END IF;
890: RAISE FND_API.G_EXC_ERROR;

Line 888: FND_MSG_PUB.add;

884: IF p_claim_rec.currency_code = l_trx_currency AND
885: ABS(p_claim_rec.amount_remaining) > ABS(l_trx_balance) THEN
886: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
887: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_DM_OP_BAL_ERR');
888: FND_MSG_PUB.add;
889: END IF;
890: RAISE FND_API.G_EXC_ERROR;
891: END IF;
892: END IF;

Line 909: FND_MSG_PUB.add;

905: FETCH csr_get_inv_info INTO l_invoice_id, l_object_class,l_sum_line_amt;
906: EXIT WHEN csr_get_inv_info%NOTFOUND;
907: IF l_invoice_id IS NULL THEN
908: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INV_CR_TRX_MISS');
909: FND_MSG_PUB.add;
910: RAISE FND_API.G_EXC_ERROR;
911: ELSIF l_object_class IS NULL OR l_object_class NOT IN ('INVOICE','DM', 'CB') THEN
912: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INVALID_OBJ_CLASS');
913: FND_MSG_PUB.add;

Line 913: FND_MSG_PUB.add;

909: FND_MSG_PUB.add;
910: RAISE FND_API.G_EXC_ERROR;
911: ELSIF l_object_class IS NULL OR l_object_class NOT IN ('INVOICE','DM', 'CB') THEN
912: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INVALID_OBJ_CLASS');
913: FND_MSG_PUB.add;
914: RAISE FND_API.G_EXC_ERROR;
915: END IF;
916: END LOOP;
917: CLOSE csr_get_inv_info;

Line 964: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

960: OPEN csr_validate_uom_class(l_line_uom_code);
961: FETCH csr_validate_uom_class INTO l_line_uom_class;
962: CLOSE csr_validate_uom_class;
963: IF l_primary_uom_class <> l_line_uom_class THEN
964: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
965: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_INVALID');
966: FND_MSG_PUB.add;
967: END IF;
968: l_error := TRUE;

Line 966: FND_MSG_PUB.add;

962: CLOSE csr_validate_uom_class;
963: IF l_primary_uom_class <> l_line_uom_class THEN
964: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
965: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_INVALID');
966: FND_MSG_PUB.add;
967: END IF;
968: l_error := TRUE;
969: END IF;
970: END IF;

Line 972: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

968: l_error := TRUE;
969: END IF;
970: END IF;
971: ELSE
972: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
973: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_MISSING');
974: FND_MSG_PUB.add;
975: END IF;
976: l_error := TRUE;

Line 974: FND_MSG_PUB.add;

970: END IF;
971: ELSE
972: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
973: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_MISSING');
974: FND_MSG_PUB.add;
975: END IF;
976: l_error := TRUE;
977: END IF;
978: END IF;

Line 999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
997: WHEN OTHERS THEN
998: x_return_status := FND_API.g_ret_sts_unexp_error ;
999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1000: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1001: END IF;
1002: END Complete_AR_Validation;
1003:

Line 1000: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
997: WHEN OTHERS THEN
998: x_return_status := FND_API.g_ret_sts_unexp_error ;
999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1000: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1001: END IF;
1002: END Complete_AR_Validation;
1003:
1004: