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 161: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

157:
158: EXCEPTION
159: WHEN OTHERS THEN
160: x_return_status := FND_API.g_ret_sts_unexp_error ;
161: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
162: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
163: END IF;
164: END Check_to_Process_SETL_WF;
165:

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

158: EXCEPTION
159: WHEN OTHERS THEN
160: x_return_status := FND_API.g_ret_sts_unexp_error ;
161: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
162: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
163: END IF;
164: END Check_to_Process_SETL_WF;
165:
166:

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

199:
200:
201: IF p_line_type = 'LINE' AND
202: p_claim_line_amount > l_line_remaining THEN
203: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
204: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_LINE_AMT_ERR');
205: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
206: FND_MSG_PUB.add;
207: END IF;

Line 206: FND_MSG_PUB.add;

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

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

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

Line 214: FND_MSG_PUB.add;

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

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

215: END IF;
216: RETURN FALSE;
217: ELSIF p_line_type = 'FREIGHT' AND
218: p_claim_line_amount > l_freight_remaining THEN
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
220: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_FREIGHT_AMT_ERR');
221: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
222: FND_MSG_PUB.add;
223: END IF;

Line 222: FND_MSG_PUB.add;

218: p_claim_line_amount > l_freight_remaining THEN
219: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
220: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CR_TO_FREIGHT_AMT_ERR');
221: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
222: FND_MSG_PUB.add;
223: END IF;
224: RETURN FALSE;
225: END IF;
226:

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

383: OPEN csr_trx_line_amount(l_invoice_line_id);
384: FETCH csr_trx_line_amount INTO l_trx_line_amt;
385: CLOSE csr_trx_line_amount;
386: IF ABS(l_trx_line_amt) < l_sum_line_amt THEN
387: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
388: OPEN csr_trx_details(l_invoice_id);
389: FETCH csr_trx_details INTO l_trx_number;
390: CLOSE csr_trx_details;
391: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TRX_BAL_ERR');

Line 393: FND_MSG_PUB.add;

389: FETCH csr_trx_details INTO l_trx_number;
390: CLOSE csr_trx_details;
391: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TRX_BAL_ERR');
392: FND_MESSAGE.set_token('TRX_NUMBER',l_trx_number);
393: FND_MSG_PUB.add;
394: END IF;
395: x_return_status := FND_API.g_ret_sts_error;
396: RETURN;
397: END IF;

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

403: END IF;
404:
405: EXCEPTION
406: WHEN OTHERS THEN
407: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
408: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
409: END IF;
410: x_return_status := FND_API.g_ret_sts_unexp_error;
411: END Validate_CreditTo_Information;

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

404:
405: EXCEPTION
406: WHEN OTHERS THEN
407: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
408: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
409: END IF;
410: x_return_status := FND_API.g_ret_sts_unexp_error;
411: END Validate_CreditTo_Information;
412:

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

621: | CREDIT_MEMO / DEBIT_MEMO: Receivables Batch Source is required for Interface
622: *-----------------------------------------------------*/
623: IF p_claim_rec.payment_method IN ('CREDIT_MEMO', 'DEBIT_MEMO') AND
624: l_batch_source_id IS NULL THEN
625: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
626: FND_MESSAGE.set_name('OZF','OZF_BATCH_SRC_REQ_FOR_INTF');
627: FND_MSG_PUB.add;
628: END IF;
629: RAISE FND_API.G_EXC_ERROR;

Line 627: FND_MSG_PUB.add;

623: IF p_claim_rec.payment_method IN ('CREDIT_MEMO', 'DEBIT_MEMO') AND
624: l_batch_source_id IS NULL THEN
625: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
626: FND_MESSAGE.set_name('OZF','OZF_BATCH_SRC_REQ_FOR_INTF');
627: FND_MSG_PUB.add;
628: END IF;
629: RAISE FND_API.G_EXC_ERROR;
630: END IF;
631:

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

642: CLOSE csr_ar_system_options;
643:
644: IF l_salesrep_req_flag = 'Y' AND
645: p_claim_rec.sales_rep_id IS NULL THEN
646: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
647: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISS_SALESREP');
648: FND_MSG_PUB.add;
649: END IF;
650: RAISE FND_API.G_EXC_ERROR;

Line 648: FND_MSG_PUB.add;

644: IF l_salesrep_req_flag = 'Y' AND
645: p_claim_rec.sales_rep_id IS NULL THEN
646: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
647: FND_MESSAGE.set_name('OZF', 'OZF_SETL_MISS_SALESREP');
648: FND_MSG_PUB.add;
649: END IF;
650: RAISE FND_API.G_EXC_ERROR;
651: END IF;
652: END IF;

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

700: END IF;
701:
702: IF p_claim_rec.amount > 0 AND
703: l_creation_sign = 'P' THEN
704: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
705: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
706: FND_MSG_PUB.add;
707: END IF;
708: l_error := TRUE;

Line 706: FND_MSG_PUB.add;

702: IF p_claim_rec.amount > 0 AND
703: l_creation_sign = 'P' THEN
704: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
705: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
706: FND_MSG_PUB.add;
707: END IF;
708: l_error := TRUE;
709: ELSIF p_claim_rec.amount < 0 AND
710: l_creation_sign = 'N' THEN

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

707: END IF;
708: l_error := TRUE;
709: ELSIF p_claim_rec.amount < 0 AND
710: l_creation_sign = 'N' THEN
711: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
712: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
713: FND_MSG_PUB.add;
714: END IF;
715: l_error := TRUE;

Line 713: FND_MSG_PUB.add;

709: ELSIF p_claim_rec.amount < 0 AND
710: l_creation_sign = 'N' THEN
711: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
712: FND_MESSAGE.set_name('OZF', 'OZF_SETL_TRX_TYPE_CS_WRONG');
713: FND_MSG_PUB.add;
714: END IF;
715: l_error := TRUE;
716: END IF;
717: END IF;

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

721: -- Adjustment Reason can't be ENDORSEMENT or EXCHANGE for CHARGEBACK settlement
722: ------------ REG_CREDIT_MEMO ----------------
723: IF p_claim_rec.payment_method = 'REG_CREDIT_MEMO' THEN
724: IF l_credit_memo_reason IS NULL THEN
725: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
726: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_REASON_ERR');
727: FND_MSG_PUB.add;
728: END IF;
729: l_error := TRUE;

Line 727: FND_MSG_PUB.add;

723: IF p_claim_rec.payment_method = 'REG_CREDIT_MEMO' THEN
724: IF l_credit_memo_reason IS NULL THEN
725: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
726: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_REASON_ERR');
727: FND_MSG_PUB.add;
728: END IF;
729: l_error := TRUE;
730: END IF;
731:

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

731:
732: ------------ CREDIT_MEMO ----------------
733: ELSIF p_claim_rec.payment_method = 'CREDIT_MEMO' THEN
734: IF l_cm_trx_type_id IS NULL THEN
735: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
736: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_TRX_ID_REQ');
737: FND_MSG_PUB.add;
738: END IF;
739: l_error := TRUE;

Line 737: FND_MSG_PUB.add;

733: ELSIF p_claim_rec.payment_method = 'CREDIT_MEMO' THEN
734: IF l_cm_trx_type_id IS NULL THEN
735: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
736: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_TRX_ID_REQ');
737: FND_MSG_PUB.add;
738: END IF;
739: l_error := TRUE;
740: END IF;
741: IF p_claim_rec.claim_class = 'DEDUCTION' AND

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

742: p_claim_rec.source_object_id IS NOT NULL AND
743: l_sum_line_amt < p_claim_rec.amount_remaining THEN
744: -- adj_rec_trx_id is required later in case of tax_impact transaction
745: IF l_adj_rec_trx_id IS NULL THEN
746: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
747: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
748: FND_MSG_PUB.add;
749: END IF;
750: l_error := TRUE;

Line 748: FND_MSG_PUB.add;

744: -- adj_rec_trx_id is required later in case of tax_impact transaction
745: IF l_adj_rec_trx_id IS NULL THEN
746: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
747: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
748: FND_MSG_PUB.add;
749: END IF;
750: l_error := TRUE;
751: END IF;
752: END IF;

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

753:
754: ------------ DEBIT_MEMO ----------------
755: ELSIF p_claim_rec.payment_method = 'DEBIT_MEMO' THEN
756: IF l_dm_trx_type_id IS NULL THEN
757: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
758: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DM_TRX_ID_REQ');
759: FND_MSG_PUB.add;
760: END IF;
761: l_error := TRUE;

Line 759: FND_MSG_PUB.add;

755: ELSIF p_claim_rec.payment_method = 'DEBIT_MEMO' THEN
756: IF l_dm_trx_type_id IS NULL THEN
757: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
758: FND_MESSAGE.set_name('OZF', 'OZF_SETL_DM_TRX_ID_REQ');
759: FND_MSG_PUB.add;
760: END IF;
761: l_error := TRUE;
762: END IF;
763:

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

763:
764: ------------ CHARGEBACK ----------------
765: ELSIF p_claim_rec.payment_method = 'CHARGEBACK' THEN
766: IF l_adjust_reason IN ('ENDORSEMENT', 'EXCHANGE') THEN
767: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
768: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_REACODE_ERR');
769: FND_MSG_PUB.add;
770: END IF;
771: l_error := TRUE;

Line 769: FND_MSG_PUB.add;

765: ELSIF p_claim_rec.payment_method = 'CHARGEBACK' THEN
766: IF l_adjust_reason IN ('ENDORSEMENT', 'EXCHANGE') THEN
767: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
768: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_REACODE_ERR');
769: FND_MSG_PUB.add;
770: END IF;
771: l_error := TRUE;
772: END IF;
773: IF l_cb_trx_type_id IS NULL THEN

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

770: END IF;
771: l_error := TRUE;
772: END IF;
773: IF l_cb_trx_type_id IS NULL THEN
774: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
775: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_TRX_ID_REQ');
776: FND_MSG_PUB.add;
777: END IF;
778: l_error := TRUE;

Line 776: FND_MSG_PUB.add;

772: END IF;
773: IF l_cb_trx_type_id IS NULL THEN
774: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
775: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CB_TRX_ID_REQ');
776: FND_MSG_PUB.add;
777: END IF;
778: l_error := TRUE;
779: END IF;
780:

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

782: ELSIF p_claim_rec.payment_method = 'WRITE_OFF' THEN
783: IF p_claim_rec.claim_class = 'DEDUCTION' THEN
784: IF p_claim_rec.source_object_id IS NOT NULL AND
785: l_adj_rec_trx_id IS NULL THEN
786: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
787: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
788: FND_MSG_PUB.add;
789: END IF;
790: l_error := TRUE;

Line 788: FND_MSG_PUB.add;

784: IF p_claim_rec.source_object_id IS NOT NULL AND
785: l_adj_rec_trx_id IS NULL THEN
786: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
787: FND_MESSAGE.set_name('OZF', 'OZF_SETL_ADJ_TRX_ID_REQ');
788: FND_MSG_PUB.add;
789: END IF;
790: l_error := TRUE;
791: -- 11.5.10 Negative Receipt Write Off
792: ELSIF p_claim_rec.source_object_id IS NULL AND

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

791: -- 11.5.10 Negative Receipt Write Off
792: ELSIF p_claim_rec.source_object_id IS NULL AND
793: ARP_DEDUCTION_COVER.negative_rct_writeoffs_allowed() AND
794: l_neg_wo_rec_trx_id IS NULL THEN
795: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
796: FND_MESSAGE.set_name('OZF', 'OZF_SETL_NEG_WO_TRX_ID_REQ');
797: FND_MSG_PUB.add;
798: END IF;
799: l_error := TRUE;

Line 797: FND_MSG_PUB.add;

793: ARP_DEDUCTION_COVER.negative_rct_writeoffs_allowed() AND
794: l_neg_wo_rec_trx_id IS NULL THEN
795: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
796: FND_MESSAGE.set_name('OZF', 'OZF_SETL_NEG_WO_TRX_ID_REQ');
797: FND_MSG_PUB.add;
798: END IF;
799: l_error := TRUE;
800: END IF;
801: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND

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

799: l_error := TRUE;
800: END IF;
801: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND
802: l_wo_rec_trx_id IS NULL THEN
803: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
804: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WO_TRX_ID_REQ');
805: FND_MSG_PUB.add;
806: END IF;
807: l_error := TRUE;

Line 805: FND_MSG_PUB.add;

801: ELSIF p_claim_rec.claim_class = 'OVERPAYMENT' AND
802: l_wo_rec_trx_id IS NULL THEN
803: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
804: FND_MESSAGE.set_name('OZF', 'OZF_SETL_WO_TRX_ID_REQ');
805: FND_MSG_PUB.add;
806: END IF;
807: l_error := TRUE;
808: END IF;
809: ------------ RMA ----------------

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

808: END IF;
809: ------------ RMA ----------------
810: ELSIF p_claim_rec.payment_method = 'RMA' THEN
811: IF l_credit_memo_reason IS NULL THEN
812: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
813: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RMA_REASON_REQ');
814: FND_MESSAGE.set_token('REASON', l_claim_reason_name);
815: FND_MSG_PUB.add;
816: END IF;

Line 815: FND_MSG_PUB.add;

811: IF l_credit_memo_reason IS NULL THEN
812: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
813: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RMA_REASON_REQ');
814: FND_MESSAGE.set_token('REASON', l_claim_reason_name);
815: FND_MSG_PUB.add;
816: END IF;
817: l_error := TRUE;
818: END IF;
819: END IF;

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

828: -- related customer and site check
829: IF p_claim_rec.pay_related_account_flag = FND_API.g_true THEN
830: -- related_cust_acct_id should exist if pay_related_customer_flag is 'T'
831: IF p_claim_rec.related_cust_account_id IS NULL THEN
832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
833: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_REQ');
834: FND_MSG_PUB.add;
835: END IF;
836: RAISE FND_API.G_EXC_ERROR;

Line 834: FND_MSG_PUB.add;

830: -- related_cust_acct_id should exist if pay_related_customer_flag is 'T'
831: IF p_claim_rec.related_cust_account_id IS NULL THEN
832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
833: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_REQ');
834: FND_MSG_PUB.add;
835: END IF;
836: RAISE FND_API.G_EXC_ERROR;
837: END IF;
838: -- related_site_use_id should exist if pay_related_customer_flag is 'T'

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

836: RAISE FND_API.G_EXC_ERROR;
837: END IF;
838: -- related_site_use_id should exist if pay_related_customer_flag is 'T'
839: IF p_claim_rec.related_site_use_id IS NULL THEN
840: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
841: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_SITE_REQ');
842: FND_MSG_PUB.add;
843: END IF;
844: RAISE FND_API.G_EXC_ERROR;

Line 842: FND_MSG_PUB.add;

838: -- related_site_use_id should exist if pay_related_customer_flag is 'T'
839: IF p_claim_rec.related_site_use_id IS NULL THEN
840: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
841: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RELCUST_SITE_REQ');
842: FND_MSG_PUB.add;
843: END IF;
844: RAISE FND_API.G_EXC_ERROR;
845: END IF;
846: ELSE

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

847: /*-----------------------------------------------------
848: | Bill To Site is required
849: *-----------------------------------------------------*/
850: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
852: FND_MESSAGE.set_name('OZF', 'OZF_SETL_BILLTO_SITE_REQ');
853: FND_MSG_PUB.add;
854: END IF;
855: RAISE FND_API.G_EXC_ERROR;

Line 853: FND_MSG_PUB.add;

849: *-----------------------------------------------------*/
850: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
852: FND_MESSAGE.set_name('OZF', 'OZF_SETL_BILLTO_SITE_REQ');
853: FND_MSG_PUB.add;
854: END IF;
855: RAISE FND_API.G_EXC_ERROR;
856: END IF;
857: END IF;

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

859: | Ship To Site is required for RMA settlement
860: *-----------------------------------------------------*/
861: IF p_claim_rec.payment_method = 'RMA' AND
862: p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
863: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
864: FND_MESSAGE.set_name('OZF', 'OZF_SETL_SHIPTO_SITE_REQ');
865: FND_MSG_PUB.add;
866: END IF;
867: RAISE FND_API.G_EXC_ERROR;

Line 865: FND_MSG_PUB.add;

861: IF p_claim_rec.payment_method = 'RMA' AND
862: p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
863: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
864: FND_MESSAGE.set_name('OZF', 'OZF_SETL_SHIPTO_SITE_REQ');
865: FND_MSG_PUB.add;
866: END IF;
867: RAISE FND_API.G_EXC_ERROR;
868: END IF;
869:

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

874: -- receivable clearning account must exist in system parameter
875: IF l_gl_acc_checking = FND_API.g_true AND
876: l_rec_clr_in_sys IS NULL AND
877: p_claim_rec.payment_method <> 'RMA' THEN
878: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
879: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RECCLRACC_REQ');
880: FND_MSG_PUB.add;
881: END IF;
882: RAISE FND_API.G_EXC_ERROR;

Line 880: FND_MSG_PUB.add;

876: l_rec_clr_in_sys IS NULL AND
877: p_claim_rec.payment_method <> 'RMA' THEN
878: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
879: FND_MESSAGE.set_name('OZF', 'OZF_SETL_RECCLRACC_REQ');
880: FND_MSG_PUB.add;
881: END IF;
882: RAISE FND_API.G_EXC_ERROR;
883: END IF;
884:

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

886: | Prev Open Credit Memo/Debit Memo: open balance amount checking
887: *-----------------------------------------------------*/
888: IF p_claim_rec.payment_method IN ('PREV_OPEN_CREDIT', 'PREV_OPEN_DEBIT') THEN
889: IF p_claim_rec.payment_reference_id IS NULL THEN
890: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
891: FND_MESSAGE.set_name('OZF','OZF_PAY_REFERENCE_REQD');
892: FND_MSG_PUB.add;
893: END IF;
894: RAISE FND_API.G_EXC_ERROR;

Line 892: FND_MSG_PUB.add;

888: IF p_claim_rec.payment_method IN ('PREV_OPEN_CREDIT', 'PREV_OPEN_DEBIT') THEN
889: IF p_claim_rec.payment_reference_id IS NULL THEN
890: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
891: FND_MESSAGE.set_name('OZF','OZF_PAY_REFERENCE_REQD');
892: FND_MSG_PUB.add;
893: END IF;
894: RAISE FND_API.G_EXC_ERROR;
895: ELSE
896: OPEN csr_trx_balance(p_claim_rec.payment_reference_id);

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

898: CLOSE csr_trx_balance;
899:
900: IF p_claim_rec.currency_code = l_trx_currency AND
901: ABS(p_claim_rec.amount_remaining) > ABS(l_trx_balance) THEN
902: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
903: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_DM_OP_BAL_ERR');
904: FND_MSG_PUB.add;
905: END IF;
906: RAISE FND_API.G_EXC_ERROR;

Line 904: FND_MSG_PUB.add;

900: IF p_claim_rec.currency_code = l_trx_currency AND
901: ABS(p_claim_rec.amount_remaining) > ABS(l_trx_balance) THEN
902: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
903: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_DM_OP_BAL_ERR');
904: FND_MSG_PUB.add;
905: END IF;
906: RAISE FND_API.G_EXC_ERROR;
907: END IF;
908: END IF;

Line 925: FND_MSG_PUB.add;

921: FETCH csr_get_inv_info INTO l_invoice_id, l_object_class,l_sum_line_amt;
922: EXIT WHEN csr_get_inv_info%NOTFOUND;
923: IF l_invoice_id IS NULL THEN
924: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INV_CR_TRX_MISS');
925: FND_MSG_PUB.add;
926: RAISE FND_API.G_EXC_ERROR;
927: ELSIF l_object_class IS NULL OR l_object_class NOT IN ('INVOICE','DM', 'CB') THEN
928: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INVALID_OBJ_CLASS');
929: FND_MSG_PUB.add;

Line 929: FND_MSG_PUB.add;

925: FND_MSG_PUB.add;
926: RAISE FND_API.G_EXC_ERROR;
927: ELSIF l_object_class IS NULL OR l_object_class NOT IN ('INVOICE','DM', 'CB') THEN
928: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INVALID_OBJ_CLASS');
929: FND_MSG_PUB.add;
930: RAISE FND_API.G_EXC_ERROR;
931: END IF;
932: END LOOP;
933: CLOSE csr_get_inv_info;

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

976: OPEN csr_validate_uom_class(l_line_uom_code);
977: FETCH csr_validate_uom_class INTO l_line_uom_class;
978: CLOSE csr_validate_uom_class;
979: IF l_primary_uom_class <> l_line_uom_class THEN
980: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
981: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_INVALID');
982: FND_MSG_PUB.add;
983: END IF;
984: l_error := TRUE;

Line 982: FND_MSG_PUB.add;

978: CLOSE csr_validate_uom_class;
979: IF l_primary_uom_class <> l_line_uom_class THEN
980: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
981: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_INVALID');
982: FND_MSG_PUB.add;
983: END IF;
984: l_error := TRUE;
985: END IF;
986: END IF;

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

984: l_error := TRUE;
985: END IF;
986: END IF;
987: ELSE
988: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
989: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_MISSING');
990: FND_MSG_PUB.add;
991: END IF;
992: l_error := TRUE;

Line 990: FND_MSG_PUB.add;

986: END IF;
987: ELSE
988: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
989: FND_MESSAGE.set_name('OZF', 'OZF_SETL_PROD_UOM_MISSING');
990: FND_MSG_PUB.add;
991: END IF;
992: l_error := TRUE;
993: END IF;
994: END IF;

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

1011: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1013: WHEN OTHERS THEN
1014: x_return_status := FND_API.g_ret_sts_unexp_error ;
1015: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1016: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1017: END IF;
1018: END Complete_AR_Validation;
1019:

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

1012: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1013: WHEN OTHERS THEN
1014: x_return_status := FND_API.g_ret_sts_unexp_error ;
1015: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1016: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1017: END IF;
1018: END Complete_AR_Validation;
1019:
1020: