[Home] [Help]
83: CLOSE csr_batch_org_id;
84:
85: IF l_resale_org_id IS NULL THEN
86: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
87: FND_MESSAGE.set_name('OZF', 'OZF_ORG_ID_NOTFOUND');
88: FND_MSG_PUB.add;
89: END IF;
90: RAISE FND_API.g_exc_error;
91: END IF;
219: CLOSE csr_batch_org_id;
220:
221: IF l_resale_org_id IS NULL THEN
222: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
223: FND_MESSAGE.set_name('OZF', 'OZF_ORG_ID_NOTFOUND');
224: FND_MSG_PUB.add;
225: END IF;
226: RAISE FND_API.g_exc_error;
227: END IF;
636:
637: --//1.resale_batch_id
638: IF l_resale_util_rec.resale_batch_id IS NULL OR l_resale_util_rec.resale_batch_id = FND_API.g_miss_num THEN
639: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
640: FND_MESSAGE.set_name('OZF', 'OZF_NO_RESALE_BATCH_ID');
641: --//Resale batch Identifier is mandatory.Please provide a valid Resale Batch Identifier.
642: FND_MSG_PUB.add;
643: END IF;
644: x_return_status := fnd_api.g_ret_sts_error;
649: CLOSE c_resale_batch_id;
650:
651: IF l_resale_batch_id IS NULL THEN
652: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
653: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_RESALE_BATCH_ID');
654: --//Resale batch Identifier provided is Invalid.Please provide a valid Resale Batch Identifier.
655: FND_MSG_PUB.add;
656: END IF;
657: x_return_status := fnd_api.g_ret_sts_error;
661:
662: --//2.resale_line_id
663: IF l_resale_util_rec.resale_line_id IS NULL OR l_resale_util_rec.resale_line_id = FND_API.g_miss_num THEN
664: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
665: FND_MESSAGE.set_name('OZF', 'OZF_NO_RESALE_LINE_ID');
666: --//Resale Line Identifier is mandatory.Please provide a valid Resale Line Identifier.
667: FND_MSG_PUB.add;
668: END IF;
669: x_return_status := fnd_api.g_ret_sts_error;
674:
675: IF c_get_resale_lines%NOTFOUND THEN
676: --OZF_UTILITY_PVT.debug_message('INSIDE '||l_resale_line_rec.resale_line_id);
677: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
678: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_RESALE_LINE_ID');
679: --//Resale Line Identifier provided is invalid.Please provide a valid Resale Line Identifier.
680: FND_MSG_PUB.add;
681: END IF;
682: x_return_status := fnd_api.g_ret_sts_error;
688:
689: --//3.list_header_id
690: IF l_resale_util_rec.list_header_id IS NULL OR l_resale_util_rec.list_header_id = FND_API.g_miss_num THEN
691: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
692: FND_MESSAGE.set_name('OZF', 'OZF_NO_LIST_HEADER_ID');
693: --//List Header Identifier is mandatory.Please provide a valid List Header Identifier.
694: FND_MSG_PUB.add;
695: END IF;
696: x_return_status := fnd_api.g_ret_sts_error;
701: FETCH c_get_offer_details INTO l_offer_type, l_custom_setup_id,l_offer_currency_code,l_qp_org_id,l_offer_name,l_status_code;
702:
703: IF c_get_offer_details%NOTFOUND THEN
704: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
705: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_LIST_HEADER_ID');
706: --//List Header Identifier provided is invalid.Please provide a valid List Header Identifier.
707: FND_MSG_PUB.add;
708: END IF;
709: x_return_status := fnd_api.g_ret_sts_error;
714:
715: --//Offer type Validation
716: IF l_offer_type NOT IN ('ACCRUAL','OFF_INVOICE','VOLUME_OFFER','OID','DEAL','ORDER') THEN
717: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
718: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_TYPE_UNSUPPORTED');
719: --//Offer type of the provided offer is not supported to create resale utilization.
720: FND_MSG_PUB.add;
721: END IF;
722: x_return_status := fnd_api.g_ret_sts_error;
725:
726: --//Status code validation - Only ACTIVE offers are eligible to create utilization
727: IF l_status_code <> 'ACTIVE' THEN
728: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
729: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_STATUS_UNSUPPORTED');
730: --//Offer should be in Active status to create resale utilization.
731: FND_MSG_PUB.add;
732: END IF;
733: x_return_status := fnd_api.g_ret_sts_error;
738: --//If Offer currency code is not null, it should match with resale header currency code
739: IF l_offer_currency_code IS NOT NULL THEN
740: IF l_offer_currency_code <> l_batch_currency_code THEN
741: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
742: FND_MESSAGE.set_name('OZF', 'OZF_BATCH_CURR_MISMATCH');
743: --//Offer Currecy Code should be same as Resale batch Currency Code.
744: FND_MSG_PUB.add;
745: END IF;
746: x_return_status := fnd_api.g_ret_sts_error;
751: --//If Offer org_id is not null, it should match with resale header Org_id
752: IF l_qp_org_id IS NOT NULL THEN
753: IF l_qp_org_id <> l_batch_org_id THEN
754: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
755: FND_MESSAGE.set_name('OZF', 'OZF_RESALE_ORG_MISMATCH');
756: --//Offer Organization Identifier should be same as Resale batch Organization Identifier.
757: FND_MSG_PUB.add;
758: END IF;
759: x_return_status := fnd_api.g_ret_sts_error;
763:
764: --//4.list_line_id
765: IF l_resale_util_rec.list_line_id IS NULL OR l_resale_util_rec.list_line_id = FND_API.g_miss_num THEN
766: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
767: FND_MESSAGE.set_name('OZF', 'OZF_NO_LIST_LINE_ID');
768: --//List Line Identifier is mandatory.Please provide a valid List Line Identifier.
769: FND_MSG_PUB.add;
770: END IF;
771: x_return_status := fnd_api.g_ret_sts_error;
776: CLOSE c_list_line;
777:
778: IF l_list_line_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_INVALID_LIST_LINE_ID');
781: --//List Line Identifier provided is invalid.Please provide a valid List Line Identifier.
782: FND_MSG_PUB.add;
783: END IF;
784: x_return_status := fnd_api.g_ret_sts_error;
792: CLOSE line_adjustment_csr;
793:
794: IF l_result IS NOT 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_DUP_RESALE_ACCRUAL');
797: --//Utilization is already created for provided list header and line combination
798: FND_MSG_PUB.add;
799: END IF;
800: x_return_status := fnd_api.g_ret_sts_error;
803:
804: --//5.accepted_amount
805: IF l_resale_util_rec.accepted_amount IS NULL OR l_resale_util_rec.accepted_amount = FND_API.g_miss_num THEN
806: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
807: FND_MESSAGE.set_name('OZF', 'OZF_NO_ACCEPTED_AMOUNT');
808: --//Accepted Amount is mandatory.Please provide a valid Accepted Amount.
809: FND_MSG_PUB.add;
810: END IF;
811: x_return_status := fnd_api.g_ret_sts_error;
814:
815: --//7.priced_quantity
816: IF l_resale_util_rec.quantity IS NULL OR l_resale_util_rec.quantity = FND_API.g_miss_num THEN
817: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
818: FND_MESSAGE.set_name('OZF', 'OZF_NO_PRICED_QUANTITY');
819: --//Priced Quantity is mandatory.Please provide a valid Priced Quantity.
820: FND_MSG_PUB.add;
821: END IF;
822: x_return_status := fnd_api.g_ret_sts_error;
825:
826: --//8. operand
827: IF l_resale_util_rec.discount_value IS NULL OR l_resale_util_rec.discount_value = FND_API.g_miss_num THEN
828: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
829: FND_MESSAGE.set_name('OZF', 'OZF_NO_DISCOUNT_VALUE');
830: --//Discount value is mandatory.Please provide a valid Discount value.
831: FND_MSG_PUB.add;
832: END IF;
833: x_return_status := fnd_api.g_ret_sts_error;
836:
837: --//9. operand_calculation_code
838: IF l_resale_util_rec.discount_type IS NULL OR l_resale_util_rec.discount_type = FND_API.g_miss_char THEN
839: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
840: FND_MESSAGE.set_name('OZF', 'OZF_NO_DISCOUNT_TYPE');
841: --//Discount type is mandatory.Please provide a valid Discount type.
842: FND_MSG_PUB.add;
843: END IF;
844: x_return_status := fnd_api.g_ret_sts_error;
845: RETURN;
846: ELSE
847: IF l_resale_util_rec.discount_type <> l_arithmetic_operator THEN
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
849: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_OPER_CALC_CODE');
850: --//Operend Calculation Code Should be the same as of offer.
851: FND_MSG_PUB.add;
852: END IF;
853: x_return_status := fnd_api.g_ret_sts_error;
861:
862: IF l_accrual_on_selling = 'Y' THEN
863: IF l_resale_line_rec.selling_price IS NULL OR l_resale_line_rec.selling_price = FND_API.g_miss_num THEN
864: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
865: FND_MESSAGE.set_name('OZF', 'OZF_ACC_ON_SELLING_PRICE_ERR');
866: --//Selling price should be available in resale lines when Profile OZF: Third Party Accrual on Selling Price is set to Yes.
867: FND_MSG_PUB.add;
868: END IF;
869: x_return_status := fnd_api.g_ret_sts_error;
873: END IF;
874: ELSE -- l_accrual_on_selling IS N or NULL
875: IF l_resale_util_rec.unit_price IS NULL OR l_resale_util_rec.unit_price = FND_API.g_miss_num THEN
876: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
877: FND_MESSAGE.set_name('OZF', 'OZF_NO_PRICED_UNIT_PRICE');
878: --//Unit Price is mandatory.Please provide a valid Unit Price.
879: FND_MSG_PUB.add;
880: END IF;
881: x_return_status := fnd_api.g_ret_sts_error;
887: IF l_resale_util_rec.requester_id IS NULL OR l_resale_util_rec.requester_id = FND_API.g_miss_num THEN
888: l_requester_id := OZF_UTILITY_PVT.get_resource_id(l_resale_line_rec.last_updated_by);
889: IF l_requester_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_SD_USER_IS_NOT_RESOURCE');
892: --//User is not a valid resource.
893: FND_MSG_PUB.add;
894: END IF;
895: x_return_status := fnd_api.g_ret_sts_error;
901: CLOSE c_get_user_id;
902:
903: IF l_user_id IS NULL THEN
904: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
905: FND_MESSAGE.set_name('OZF', 'OZF_SD_INVALID_USER');
906: --//The User Id provided is invalid, please provide a valid User Id.
907: FND_MSG_PUB.add;
908: END IF;
909: x_return_status := fnd_api.g_ret_sts_error;
912:
913: l_requester_id := OZF_UTILITY_PVT.get_resource_id(l_resale_util_rec.requester_id);
914: IF l_requester_id IS NULL THEN
915: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
916: FND_MESSAGE.set_name('OZF', 'OZF_SD_USER_IS_NOT_RESOURCE');
917: --//User is not a valid resource.
918: FND_MSG_PUB.add;
919: END IF;
920: x_return_status := fnd_api.g_ret_sts_error;
927: l_resale_util_rec.currency_code := l_resale_line_rec.currency_code;
928: ELSE
929: IF l_resale_util_rec.currency_code <> l_resale_line_rec.currency_code THEN
930: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
931: FND_MESSAGE.set_name('OZF', 'OZF_CURRENCY_CODE_MISMATCH');
932: --//Provided currency code should be same as Resale batch Currency code.
933: FND_MSG_PUB.add;
934: END IF;
935: x_return_status := fnd_api.g_ret_sts_error;
942: l_resale_util_rec.uom_code := l_resale_line_rec.uom_code;
943: ELSE
944: IF l_resale_util_rec.uom_code <> l_resale_line_rec.uom_code THEN
945: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
946: FND_MESSAGE.set_name('OZF', 'OZF_UOM_CODE_MISMATCH');
947: --//Provided Unit of Measurement Code should be same as Resale batch Unit of Measurement Code.
948: FND_MSG_PUB.add;
949: END IF;
950: x_return_status := fnd_api.g_ret_sts_error;
957: l_resale_util_rec.inventory_item_Id := l_resale_line_rec.inventory_item_Id;
958: ELSE
959: IF l_resale_util_rec.inventory_item_Id <> l_resale_line_rec.inventory_item_Id THEN
960: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
961: FND_MESSAGE.set_name('OZF', 'OZF_PRODUCT_CODE_MISMATCH');
962: --//Provided product Code should be same as Resale lines Product code.
963: FND_MSG_PUB.add;
964: END IF;
965: x_return_status := fnd_api.g_ret_sts_error;
1071:
1072: IF l_ssd_on_idsm = 'Y' THEN
1073: IF (l_resale_line_rec.supplier_item_cost = -1 AND (l_resale_util_rec.discount_type = '%' OR l_resale_util_rec.discount_type ='UNIT_PRICE')) THEN
1074: IF FND_MSG_PUB.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1075: FND_MESSAGE.Set_Token('OZF', 'OZF_COST_PRICE_NOT_FOUND');
1076: --//Program Error: No cost price was found to complete this SDR offer accrual.
1077: FND_MESSAGE.Set_Token('OFFR',l_offer_name);
1078: FND_MESSAGE.Set_Token('ORDER',l_act_util_rec.object_id);
1079: FND_MESSAGE.Set_Token('ITEM',l_act_util_rec.product_id);
1073: IF (l_resale_line_rec.supplier_item_cost = -1 AND (l_resale_util_rec.discount_type = '%' OR l_resale_util_rec.discount_type ='UNIT_PRICE')) THEN
1074: IF FND_MSG_PUB.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1075: FND_MESSAGE.Set_Token('OZF', 'OZF_COST_PRICE_NOT_FOUND');
1076: --//Program Error: No cost price was found to complete this SDR offer accrual.
1077: FND_MESSAGE.Set_Token('OFFR',l_offer_name);
1078: FND_MESSAGE.Set_Token('ORDER',l_act_util_rec.object_id);
1079: FND_MESSAGE.Set_Token('ITEM',l_act_util_rec.product_id);
1080: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1081: FND_MSG_PUB.add;
1074: IF FND_MSG_PUB.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1075: FND_MESSAGE.Set_Token('OZF', 'OZF_COST_PRICE_NOT_FOUND');
1076: --//Program Error: No cost price was found to complete this SDR offer accrual.
1077: FND_MESSAGE.Set_Token('OFFR',l_offer_name);
1078: FND_MESSAGE.Set_Token('ORDER',l_act_util_rec.object_id);
1079: FND_MESSAGE.Set_Token('ITEM',l_act_util_rec.product_id);
1080: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1081: FND_MSG_PUB.add;
1082: END IF;
1075: FND_MESSAGE.Set_Token('OZF', 'OZF_COST_PRICE_NOT_FOUND');
1076: --//Program Error: No cost price was found to complete this SDR offer accrual.
1077: FND_MESSAGE.Set_Token('OFFR',l_offer_name);
1078: FND_MESSAGE.Set_Token('ORDER',l_act_util_rec.object_id);
1079: FND_MESSAGE.Set_Token('ITEM',l_act_util_rec.product_id);
1080: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1081: FND_MSG_PUB.add;
1082: END IF;
1083: RAISE fnd_api.g_exc_error;
1076: --//Program Error: No cost price was found to complete this SDR offer accrual.
1077: FND_MESSAGE.Set_Token('OFFR',l_offer_name);
1078: FND_MESSAGE.Set_Token('ORDER',l_act_util_rec.object_id);
1079: FND_MESSAGE.Set_Token('ITEM',l_act_util_rec.product_id);
1080: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1081: FND_MSG_PUB.add;
1082: END IF;
1083: RAISE fnd_api.g_exc_error;
1084: END IF;