[Home] [Help]
2001: --//Validations
2002: IF p_modifier_rec.qp_list_header_id = FND_API.g_miss_num OR p_modifier_rec.qp_list_header_id IS NULL THEN
2003: IF p_modifier_rec.offer_type = FND_API.g_miss_char OR p_modifier_rec.offer_type IS NULL THEN
2004: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2005: FND_MESSAGE.set_name('OZF', 'OZF_OFFERS_NO_OFFER_TYPE');
2006: --//Please enter a value for Offer Type
2007: FND_MSG_PUB.add;
2008: END IF;
2009: RAISE FND_API.G_EXC_ERROR;
2010: END IF;
2011:
2012: IF p_modifier_rec.offer_type NOT IN ('ACCRUAL','OFF_INVOICE','LUMPSUM') THEN
2013: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2014: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_TPM_OFFR_TYPE');
2015: --//Only Lump sum, Off Invoice and Accrual offer types are supported.
2016: FND_MSG_PUB.add;
2017: END IF;
2018: RAISE FND_API.G_EXC_ERROR;
2019: END IF;
2020:
2021: IF p_modifier_rec.name = FND_API.g_miss_char OR p_modifier_rec.name IS NULL THEN
2022: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2023: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2024: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Offer Name');
2025: FND_MSG_PUB.add;
2026: END IF;
2027: RAISE FND_API.G_EXC_ERROR;
2020:
2021: IF p_modifier_rec.name = FND_API.g_miss_char OR p_modifier_rec.name IS NULL THEN
2022: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2023: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
2024: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Offer Name');
2025: FND_MSG_PUB.add;
2026: END IF;
2027: RAISE FND_API.G_EXC_ERROR;
2028: END IF;
2032: IF p_modifier_rec.offer_type = 'LUMPSUM' THEN
2033: IF p_modifier_rec.lumpsum_amount = FND_API.g_miss_num OR p_modifier_rec.lumpsum_amount IS NULL THEN
2034: IF p_modifier_rec.offer_amount = FND_API.g_miss_num OR p_modifier_rec.offer_amount IS NULL THEN
2035: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2036: FND_MESSAGE.set_name('OZF', 'OZF_NO_LUMPSUM_AMOUNT');
2037: --//Lumpsum Amount is mandatory.Please provide Lumpsum Amount
2038: FND_MSG_PUB.add;
2039: END IF;
2040: RAISE FND_API.G_EXC_ERROR;
2054: ,p_lookup_code => p_modifier_rec.distribution_type);
2055:
2056: IF l_lookup_stat = FND_API.g_false THEN
2057: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2058: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_DISTRIBUTION');
2059: --//Invalid distribution of Lumpsum Offer amount
2060: FND_MSG_PUB.add;
2061: END IF;
2062: RAISE FND_API.G_EXC_ERROR;
2073: ,p_lookup_code => p_modifier_rec.lumpsum_payment_type);
2074:
2075: IF l_lookup_stat = FND_API.g_false THEN
2076: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2077: FND_MESSAGE.set_name('OZF', 'OZF_OFFER_LUMPSUM_PAYMENT');
2078: --//Lumpsum Offer payment Type provided is invalid, please provide a valid Payment type Type.
2079: FND_MSG_PUB.add;
2080: END IF;
2081: RAISE FND_API.G_EXC_ERROR;
2086: END IF;
2087:
2088: IF p_modifier_rec.start_date_active = FND_API.g_miss_date OR p_modifier_rec.start_date_active IS NULL THEN
2089: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2090: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_NO_START_DATE');
2091: --//Start date is required for this offer type.
2092: FND_MSG_PUB.add;
2093: END IF;
2094: RAISE FND_API.G_EXC_ERROR;
2094: RAISE FND_API.G_EXC_ERROR;
2095: END IF;
2096: IF p_modifier_rec.transaction_currency_code = FND_API.g_miss_char OR p_modifier_rec.transaction_currency_code IS NULL THEN
2097: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2098: FND_MESSAGE.set_name('OZF', 'OZF_OFFR_LS_SD_CURR_REQD');
2099: --//Currency is required for this offer.
2100: FND_MSG_PUB.add;
2101: END IF;
2102: RAISE FND_API.G_EXC_ERROR;
2105: FETCH c_currency INTO l_currency_code;
2106: CLOSE c_currency;
2107: IF l_currency_code IS NULL THEN
2108: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2109: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_CURRENCY_CODE');
2110: --//Mandatory field Currency Code is missing. Please enter a valid Currency Code
2111: FND_MSG_PUB.add;
2112: END IF;
2113: RAISE FND_API.G_EXC_ERROR;
2122: CLOSE c_fund_id;
2123:
2124: IF l_fund_id IS NULL THEN
2125: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2126: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_FUND_ID');
2127: --//The Fund ID provided is invalid. Please provide a valid Fund ID.
2128: FND_MSG_PUB.add;
2129: END IF;
2130: RAISE FND_API.G_EXC_ERROR;
2151: CLOSE c_currency;
2152:
2153: IF l_currency_code IS NULL THEN
2154: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2155: FND_MESSAGE.set_name('OZF', 'OZF_INVALID_CURRENCY_CODE');
2156: --//Mandatory field Currency Code is missing. Please enter a valid Currency Code
2157: FND_MSG_PUB.add;
2158: END IF;
2159: RAISE FND_API.G_EXC_ERROR;
2373: OPEN c_uom(l_act_product_rec.inventory_item_id, fnd_profile.value('QP_ORGANIZATION_ID'));
2374: FETCH c_uom INTO l_uom;
2375: IF (c_uom%NOTFOUND) THEN
2376: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2377: FND_MESSAGE.SET_NAME('QP','QP_INVALID_PROD_UOM');
2378: FND_MSG_PUB.add;
2379: END IF;
2380: RAISE Fnd_Api.g_exc_error;
2381: END IF;
2496: );
2497: FETCH c_uom INTO l_uom;
2498: IF ( c_uom%NOTFOUND) THEN
2499: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2500: FND_MESSAGE.SET_NAME('QP','QP_INVALID_PROD_UOM');
2501: FND_MSG_PUB.add;
2502: END IF;
2503: RAISE Fnd_Api.g_exc_error;
2504: END IF;