[Home] [Help]
261: IF l_debug = 1 THEN
262: mdebug('Validate Params: Missing reqd parameter');
263: END IF;
264: l_valid := FALSE;
265: fnd_message.set_name('INV','INV_MISSING_REQUIRED_PARAMETER');
266: fnd_msg_pub.ADD;
267: RAISE fnd_api.g_EXC_ERROR;
268: END IF;
269: IF l_debug = 1 THEN
276: l_valid := FALSE;
277: IF l_debug = 1 THEN
278: mdebug('Validate Params: Same Parent and Category Set Id');
279: END IF;
280: fnd_message.set_name('INV','INV_SAME_CATEGORY_SETS');
281: fnd_msg_pub.ADD;
282: RAISE fnd_api.g_EXC_ERROR;
283: END IF;
284: IF l_debug = 1 THEN
297: l_valid := FALSE;
298: IF l_debug = 1 THEN
299: mdebug('Validate Params: Invalid Category Id');
300: END IF;
301: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
302: fnd_message.set_token('PARAM_NAME', 'CATEGORY_ID');
303: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
304: fnd_msg_pub.ADD;
305: RAISE fnd_api.g_EXC_ERROR;
298: IF l_debug = 1 THEN
299: mdebug('Validate Params: Invalid Category Id');
300: END IF;
301: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
302: fnd_message.set_token('PARAM_NAME', 'CATEGORY_ID');
303: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
304: fnd_msg_pub.ADD;
305: RAISE fnd_api.g_EXC_ERROR;
306: END IF;
299: mdebug('Validate Params: Invalid Category Id');
300: END IF;
301: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
302: fnd_message.set_token('PARAM_NAME', 'CATEGORY_ID');
303: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
304: fnd_msg_pub.ADD;
305: RAISE fnd_api.g_EXC_ERROR;
306: END IF;
307: IF l_debug = 1 THEN
320: l_valid := FALSE;
321: IF l_debug = 1 THEN
322: mdebug('Validate Params: Record not available for update');
323: END IF;
324: fnd_message.set_name('INV','INV_CATEGORY_UNAVAIL_UPDATE');
325: fnd_msg_pub.ADD;
326: RAISE fnd_api.g_EXC_ERROR;
327: END IF;
328: IF l_debug = 1 THEN
346: l_valid := FALSE;
347: IF l_debug = 1 THEN
348: mdebug('Validate Params: You might create loops!! ');
349: END IF;
350: fnd_message.set_name('INV','INV_CATEGORY_LOOPS_ERR');
351: fnd_msg_pub.ADD;
352: RAISE fnd_api.g_EXC_ERROR;
353: END IF;
354: IF l_debug = 1 THEN
369: l_valid := TRUE;
370: IF l_debug = 1 THEN
371: mdebug('Validate Params: User wishes to create a leaf node ');
372: END IF;
373: -- fnd_message.set_name('INV','INV_MISSING_PARENT_CAT');
374: -- fnd_msg_pub.ADD;
375: -- RAISE fnd_api.g_EXC_ERROR;
376: ELSE
377: --
383: l_valid := FALSE;
384: IF l_debug = 1 THEN
385: mdebug('Validate Params: Invalid Parent Category Id');
386: END IF;
387: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
388: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
389: fnd_message.set_token('PROGRAM_NAME',
390: G_PKG_NAME||'.'||p_calling_api);
391: fnd_msg_pub.ADD;
384: IF l_debug = 1 THEN
385: mdebug('Validate Params: Invalid Parent Category Id');
386: END IF;
387: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
388: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
389: fnd_message.set_token('PROGRAM_NAME',
390: G_PKG_NAME||'.'||p_calling_api);
391: fnd_msg_pub.ADD;
392: RAISE fnd_api.g_EXC_ERROR;
385: mdebug('Validate Params: Invalid Parent Category Id');
386: END IF;
387: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
388: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
389: fnd_message.set_token('PROGRAM_NAME',
390: G_PKG_NAME||'.'||p_calling_api);
391: fnd_msg_pub.ADD;
392: RAISE fnd_api.g_EXC_ERROR;
393: END IF;
429: l_valid := FALSE;
430: IF l_debug = 1 THEN
431: mdebug('Validate Params: Items attached, cannot be parent ');
432: END IF;
433: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
434: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
435: fnd_message.set_token('PROGRAM_NAME',
436: G_PKG_NAME||'.'||p_calling_api);
437: fnd_msg_pub.ADD;
430: IF l_debug = 1 THEN
431: mdebug('Validate Params: Items attached, cannot be parent ');
432: END IF;
433: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
434: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
435: fnd_message.set_token('PROGRAM_NAME',
436: G_PKG_NAME||'.'||p_calling_api);
437: fnd_msg_pub.ADD;
438: END IF; -- l_count = 0
431: mdebug('Validate Params: Items attached, cannot be parent ');
432: END IF;
433: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
434: fnd_message.set_token('PARAM_NAME', 'PARENT_CATEGORY_ID');
435: fnd_message.set_token('PROGRAM_NAME',
436: G_PKG_NAME||'.'||p_calling_api);
437: fnd_msg_pub.ADD;
438: END IF; -- l_count = 0
439: ELSE
441: l_valid := FALSE;
442: IF l_debug = 1 THEN
443: mdebug('Validate Params: Cannot take parent as default category id ');
444: END IF;
445: fnd_message.set_name('INV','INV_DEFAULT_CATEGORY_ADD_ERR');
446: fnd_msg_pub.ADD;
447: END IF; -- l_coount = 0
448: END IF; -- p_parent_category_id IS NULL
449: ELSE
453: l_valid := FALSE;
454: IF l_debug = 1 THEN
455: mdebug('Validate Params: Do not pass Parent Category Id ');
456: END IF;
457: fnd_message.set_name('INV','INV_UNWANTED_PARENT_CAT');
458: fnd_msg_pub.ADD;
459: ELSE
460: -- parent category_id should be NULL
461: IF l_debug = 1 THEN
468: l_valid := FALSE;
469: IF l_debug = 1 THEN
470: mdebug('Validate Params: Invalid Category Set Id');
471: END IF;
472: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
473: fnd_message.set_token('PARAM_NAME', 'CATEGORY_SET_ID');
474: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
475: fnd_msg_pub.ADD;
476: END IF;
469: IF l_debug = 1 THEN
470: mdebug('Validate Params: Invalid Category Set Id');
471: END IF;
472: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
473: fnd_message.set_token('PARAM_NAME', 'CATEGORY_SET_ID');
474: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
475: fnd_msg_pub.ADD;
476: END IF;
477: IF l_debug = 1 THEN
470: mdebug('Validate Params: Invalid Category Set Id');
471: END IF;
472: fnd_message.set_name('INV','INV_INVALID_PARAMETER');
473: fnd_message.set_token('PARAM_NAME', 'CATEGORY_SET_ID');
474: fnd_message.set_token('PROGRAM_NAME', G_PKG_NAME||'.'||p_calling_api);
475: fnd_msg_pub.ADD;
476: END IF;
477: IF l_debug = 1 THEN
478: mdebug('Validate Params: Returning without exceptions');
688: OPEN get_structure_id('PRODUCT_CATEGORIES');
689: FETCH get_structure_id INTO l_product_str_id;
690:
691: IF (get_structure_id%NOTFOUND) THEN
692: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
693: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
694: fnd_msg_pub.ADD;
695: IF (l_debug = 1) THEN
696: mdebug('ERR: No Product Categories structure');
689: FETCH get_structure_id INTO l_product_str_id;
690:
691: IF (get_structure_id%NOTFOUND) THEN
692: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
693: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
694: fnd_msg_pub.ADD;
695: IF (l_debug = 1) THEN
696: mdebug('ERR: No Product Categories structure');
697: END IF;
719: IF (x_category_rec.structure_id = g_MISS_NUM OR
720: x_category_rec.structure_id IS NULL) AND
721: ( x_category_rec.structure_code = g_MISS_CHAR OR
722: x_category_rec.structure_code IS NULL) THEN
723: fnd_message.set_name('INV','INV_FLEX_STRUCTURE_REQ');
724: fnd_msg_pub.ADD;
725: IF (l_debug = 1) THEN
726: mdebug('Flex Structure Information needed');
727: END IF;
738: mdebug('Flex Structure: '||To_char(x_category_rec.structure_id));
739: END IF;
740:
741: IF (get_structure_id%NOTFOUND) THEN
742: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
743: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
744: fnd_msg_pub.ADD;
745: IF (l_debug = 1) THEN
746: mdebug('ERR: Invalid Flex Structure information provided');
739: END IF;
740:
741: IF (get_structure_id%NOTFOUND) THEN
742: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
743: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
744: fnd_msg_pub.ADD;
745: IF (l_debug = 1) THEN
746: mdebug('ERR: Invalid Flex Structure information provided');
747: END IF;
755: x_category_rec.structure_id IS NOT NULL) THEN
756: OPEN validate_structure_id(x_category_rec.structure_id);
757: FETCH validate_structure_id INTO l_flexstr_exists;
758: IF (validate_structure_id%NOTFOUND) THEN
759: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
760: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
761: fnd_msg_pub.ADD;
762: IF (l_debug = 1) THEN
763: mdebug('Invalid Flex Structure information provided');
756: OPEN validate_structure_id(x_category_rec.structure_id);
757: FETCH validate_structure_id INTO l_flexstr_exists;
758: IF (validate_structure_id%NOTFOUND) THEN
759: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
760: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
761: fnd_msg_pub.ADD;
762: IF (l_debug = 1) THEN
763: mdebug('Invalid Flex Structure information provided');
764: END IF;
772:
773: /* Bug 5474569 Start */
774: if (l_product_str_id <> x_category_rec.structure_id and
775: nvl(x_category_rec.summary_flag, 'N' ) = 'Y' ) then
776: fnd_message.set_name('INV','INV_CAT_SUM_FLAG_ERR');
777: fnd_msg_pub.ADD;
778: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
779: end if;
780: /* Bug 5474569 End */
955: IF (p_operation = G_UPDATE) THEN
956:
957: IF (x_category_rec.category_id = g_MISS_NUM OR
958: x_category_rec.category_id IS NULL) THEN
959: fnd_message.set_name('INV','INV_NO_CATEGORY');
960: fnd_msg_pub.ADD;
961: IF (l_debug = 1) THEN
962: mdebug('Category Id needed for Update');
963: END IF;
970: x_category_rec.structure_code IS NULL) THEN
971: OPEN get_category_structure_id(x_category_rec.category_id);
972: FETCH get_category_structure_id INTO x_category_rec.structure_id;
973: IF (get_category_structure_id%NOTFOUND) THEN
974: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
975: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
976: fnd_msg_pub.ADD;
977: IF (l_debug = 1) THEN
978: mdebug('Invalid Flex Structure information provided');
971: OPEN get_category_structure_id(x_category_rec.category_id);
972: FETCH get_category_structure_id INTO x_category_rec.structure_id;
973: IF (get_category_structure_id%NOTFOUND) THEN
974: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
975: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
976: fnd_msg_pub.ADD;
977: IF (l_debug = 1) THEN
978: mdebug('Invalid Flex Structure information provided');
979: END IF;
981: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
982: END IF;
983: CLOSE get_category_structure_id;
984: /*
985: fnd_message.set_name('INV','INV_FLEX_STRUCTURE_REQ');
986: fnd_msg_pub.ADD;
987: IF (l_debug = 1) THEN
988: mdebug('Flex Structure Information needed');
989: END IF;
997: x_category_rec.structure_code IS NOT NULL) THEN
998: OPEN get_structure_id(x_category_rec.structure_code);
999: FETCH get_structure_id INTO x_category_rec.structure_id;
1000: IF (get_structure_id%NOTFOUND) THEN
1001: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
1002: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
1003: fnd_msg_pub.ADD;
1004: IF (l_debug = 1) THEN
1005: mdebug('Invalid Flex Structure information provided');
998: OPEN get_structure_id(x_category_rec.structure_code);
999: FETCH get_structure_id INTO x_category_rec.structure_id;
1000: IF (get_structure_id%NOTFOUND) THEN
1001: fnd_message.set_name('INV','FLEX-NO MAIN KEY FLEX DEF');
1002: fnd_message.set_token('ROUTINE', 'Preprocess_Category_Rec');
1003: fnd_msg_pub.ADD;
1004: IF (l_debug = 1) THEN
1005: mdebug('Invalid Flex Structure information provided');
1006: END IF;
1014:
1015: /* Bug 5474569 Start */
1016: if (l_product_str_id <> x_category_rec.structure_id and
1017: nvl(x_category_rec.summary_flag, 'N' ) = 'Y' ) then
1018: fnd_message.set_name('INV','INV_CAT_SUM_FLAG_ERR');
1019: fnd_msg_pub.ADD;
1020: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
1021: end if;
1022: /* Bug 5474569 End */
1069: l_category_rec.attribute14,
1070: l_category_rec.attribute15;
1071:
1072: IF (category_rec_cursor%NOTFOUND) THEN
1073: fnd_message.set_name('INV','INV_VALID_CAT');
1074: fnd_msg_pub.ADD;
1075: IF (l_debug = 1) THEN
1076: mdebug('Invalid Category Id provided');
1077: END IF;
1307: INSTR(FND_FLEX_KEYVAL.error_message,'This combination is disabled')>0))) THEN
1308: NULL;
1309: ELSE
1310: l_trim_str := FND_FLEX_KEYVAL.error_message;
1311: fnd_message.set_name('FND','FLEX-SSV EXCEPTION');
1312: fnd_message.set_token('MSG', 'Value set validation error in ValueSet_Validate()');
1313: fnd_msg_pub.ADD;
1314: IF (l_debug = 1) THEN
1315: mdebug('ValueSet Validation Error : '||l_trim_str);
1308: NULL;
1309: ELSE
1310: l_trim_str := FND_FLEX_KEYVAL.error_message;
1311: fnd_message.set_name('FND','FLEX-SSV EXCEPTION');
1312: fnd_message.set_token('MSG', 'Value set validation error in ValueSet_Validate()');
1313: fnd_msg_pub.ADD;
1314: IF (l_debug = 1) THEN
1315: mdebug('ValueSet Validation Error : '||l_trim_str);
1316: END IF;
1372: l_delim := fnd_flex_ext.get_delimiter(G_INVENTORY_APP_SHORT_NAME,
1373: G_CAT_FLEX_CODE,
1374: l_structure_id);
1375: IF l_delim is NULL then
1376: fnd_message.set_name('OFA','FA_BUDGET_NO_SEG_DELIM');
1377: fnd_msg_pub.ADD;
1378: IF (l_debug = 1) THEN
1379: mdebug('Delimiter is NULL...Error');
1380: END IF;
1485: )
1486: AND (p_operation = G_UPDATE))) THEN
1487: IF (p_operation = G_INSERT) THEN
1488:
1489: fnd_message.set_name('INV','INV_NEW_ENT');
1490: fnd_message.set_token('TOKEN', 'Category Segment Combination');
1491: fnd_msg_pub.ADD;
1492: IF (l_debug = 1) THEN
1493: mdebug('CCID already exists => '|| To_char(FND_FLEX_KEYVAL.combination_id));
1486: AND (p_operation = G_UPDATE))) THEN
1487: IF (p_operation = G_INSERT) THEN
1488:
1489: fnd_message.set_name('INV','INV_NEW_ENT');
1490: fnd_message.set_token('TOKEN', 'Category Segment Combination');
1491: fnd_msg_pub.ADD;
1492: IF (l_debug = 1) THEN
1493: mdebug('CCID already exists => '|| To_char(FND_FLEX_KEYVAL.combination_id));
1494: END IF;
1496:
1497: ELSIF (p_operation = G_UPDATE) THEN
1498: IF (FND_FLEX_KEYVAL.combination_id <>
1499: p_category_rec.category_id) THEN
1500: fnd_message.set_name('INV','INV_NEW_ENT');
1501: fnd_message.set_token('TOKEN', 'Category segment combination. Specified Combination used by another Category.');
1502: fnd_msg_pub.ADD;
1503: IF (l_debug = 1) THEN
1504: mdebug( 'Code combination already used for another category');
1497: ELSIF (p_operation = G_UPDATE) THEN
1498: IF (FND_FLEX_KEYVAL.combination_id <>
1499: p_category_rec.category_id) THEN
1500: fnd_message.set_name('INV','INV_NEW_ENT');
1501: fnd_message.set_token('TOKEN', 'Category segment combination. Specified Combination used by another Category.');
1502: fnd_msg_pub.ADD;
1503: IF (l_debug = 1) THEN
1504: mdebug( 'Code combination already used for another category');
1505: END IF;
1541: END IF;
1542: --------------------------------------------------------- */
1543:
1544: ELSIF (p_operation = G_UPDATE) THEN
1545: fnd_message.set_name('INV','INV_VALID_CAT');
1546: fnd_msg_pub.ADD;
1547: IF (l_debug = 1) THEN
1548: mdebug('Trying to update a non-existant ROW');
1549: END IF;
2060: WHERE category_id = p_category_id
2061: AND userenv('LANG') IN (language, source_lang) ;
2062:
2063: IF (sql%notfound) THEN
2064: fnd_message.set_name('INV','INV_VALID_CAT');
2065: fnd_msg_pub.ADD;
2066: IF (l_debug = 1) THEN
2067: mdebug('Trying to Update a non-existant Category.');
2068: END IF;
2217: END IF;
2218: END IF;
2219: CLOSE category_assignment_exists;
2220: IF (l_category_assignment_exists = 'x') THEN
2221: fnd_message.set_name('INV','INV_CATEGORY_ASSIGNED');
2222: fnd_msg_pub.ADD;
2223: IF (l_debug = 1) THEN
2224: mdebug('Cannot delete: Category part of a Category Assignment');
2225: END IF;
2234: END IF;
2235: END IF;
2236: CLOSE default_category_exists;
2237: IF (l_default_category_exists = 'x') THEN
2238: fnd_message.set_name('INV','INV_CATEGORY_DEFAULT');
2239: fnd_msg_pub.ADD;
2240: IF (l_debug = 1) THEN
2241: mdebug('Cannot delete: Category specified is a default category to one of the Category Sets.');
2242: END IF;
2251: END IF;
2252: END IF;
2253: CLOSE valid_category_exists;
2254: IF (l_valid_category_exists = 'x') THEN
2255: fnd_message.set_name('INV','INV_CATEGORY_IN_USE');
2256: fnd_msg_pub.ADD;
2257: IF (l_debug = 1) THEN
2258: mdebug('Cannot delete: Category specified is part of a valid category set');
2259: END IF;
2263: delete from mtl_categories_tl
2264: where category_id = p_category_id ;
2265:
2266: if (sql%notfound) then
2267: fnd_message.set_name('INV','INV_VALID_CAT');
2268: fnd_msg_pub.ADD;
2269: IF (l_debug = 1) THEN
2270: mdebug('Trying to delete non-existant Category Id from MTL_CATEGORIES_TL.');
2271: END IF;
2275: delete from mtl_categories_b
2276: where category_id = p_category_id ;
2277:
2278: if (sql%notfound) then
2279: fnd_message.set_name('INV','INV_VALID_CAT');
2280: fnd_msg_pub.ADD;
2281: IF (l_debug = 1) THEN
2282: mdebug('Trying to delete non-existant Category Id from MTL_CATEGORIES_B.');
2283: END IF;
2708: mdebug('checking supplier enabled flag information provided'|| x_category_rec.supplier_enabled_flag);
2709: END IF;
2710: /* Bug 11787356. Comment out following IF condition. We should allow 'Y', 'N' and NULL as the values of SUPPLIER_ENABLED_FLAG.
2711: IF x_category_rec.supplier_enabled_flag NOT IN (g_YES,g_MISS_CHAR) THEN -- g_NO is modifed to g_YES for bug#6278190
2712: fnd_message.set_name('INV','INV_NOT_VALID_FLAG');
2713: fnd_message.set_token('COLUMN_NAME', 'SUPPLIER_ENABLED_FLAG');
2714: fnd_msg_pub.ADD;
2715: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
2716: IF (l_debug = 1) THEN
2709: END IF;
2710: /* Bug 11787356. Comment out following IF condition. We should allow 'Y', 'N' and NULL as the values of SUPPLIER_ENABLED_FLAG.
2711: IF x_category_rec.supplier_enabled_flag NOT IN (g_YES,g_MISS_CHAR) THEN -- g_NO is modifed to g_YES for bug#6278190
2712: fnd_message.set_name('INV','INV_NOT_VALID_FLAG');
2713: fnd_message.set_token('COLUMN_NAME', 'SUPPLIER_ENABLED_FLAG');
2714: fnd_msg_pub.ADD;
2715: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
2716: IF (l_debug = 1) THEN
2717: mdebug('Invalid supplier enabled flag information provided');
2721: mdebug('checking web status flag information provided');
2722: END IF;
2723: /*Bug: 4494727 Commenting out the following IF condition
2724: IF x_category_rec.web_status NOT IN (g_YES,g_MISS_CHAR) THEN
2725: fnd_message.set_name('INV','INV_NOT_VALID_FLAG');
2726: fnd_message.set_token('COLUMN_NAME', 'WEB_STATUS');
2727: fnd_msg_pub.ADD;
2728: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
2729: IF (l_debug = 1) THEN
2722: END IF;
2723: /*Bug: 4494727 Commenting out the following IF condition
2724: IF x_category_rec.web_status NOT IN (g_YES,g_MISS_CHAR) THEN
2725: fnd_message.set_name('INV','INV_NOT_VALID_FLAG');
2726: fnd_message.set_token('COLUMN_NAME', 'WEB_STATUS');
2727: fnd_msg_pub.ADD;
2728: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
2729: IF (l_debug = 1) THEN
2730: mdebug('Invalid web status flag information provided');
2736: THEN
2737: OPEN get_po_structure_id;
2738: FETCH get_po_structure_id INTO l_po_structure_id;
2739: IF (get_po_structure_id%NOTFOUND) THEN
2740: fnd_message.set_name('INV','INV_NO_DEFAULT_CSET');
2741: fnd_msg_pub.ADD;
2742: IF (l_debug = 1) THEN
2743: mdebug('No Default purchasing category set provided');
2744: END IF;
2746: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
2747: ELSE
2748: IF (l_po_structure_id <> x_category_rec.structure_id) THEN
2749: IF (x_category_rec.supplier_enabled_flag = g_NO) THEN
2750: fnd_message.set_name('INV','INV_SUP_ENABLED_PO_CAT_ONLY');
2751: fnd_msg_pub.ADD;
2752: END IF;
2753: /*Bug: 4494727 Commenting out the following IF condition
2754: IF (x_category_rec.web_status = g_YES) THEN
2751: fnd_msg_pub.ADD;
2752: END IF;
2753: /*Bug: 4494727 Commenting out the following IF condition
2754: IF (x_category_rec.web_status = g_YES) THEN
2755: fnd_message.set_name('INV','INV_CAT_ENABLED_PO_CAT_ONLY');
2756: fnd_msg_pub.ADD;
2757: END IF;
2758: */
2759: IF (l_debug = 1) THEN
3033: IF (SQL%NOTFOUND) THEN
3034: IF l_debug = 1 THEN
3035: mdebug('Update_Valid_Category: Record not available for update');
3036: END IF;
3037: fnd_message.set_name('INV','INV_CATEGORY_UNAVAIL_UPDATE');
3038: fnd_msg_pub.ADD;
3039: RAISE fnd_api.g_EXC_UNEXPECTED_ERROR;
3040: END IF;
3041: ELSE
3234: IF (p_category_set_id IS NULL OR p_category_id IS NULL) THEN
3235: IF l_debug = 1 THEN
3236: mdebug('Delete_Valid_Category: Mandatory parameters missing');
3237: END IF;
3238: fnd_message.set_name('INV','INV_MISSING_REQUIRED_PARAMETER');
3239: fnd_msg_pub.ADD;
3240: RAISE fnd_api.G_EXC_ERROR;
3241: END IF;
3242:
3245: ,x_hrchy_enabled => l_hrchy_enabled) THEN
3246: IF l_debug = 1 THEN
3247: mdebug('Delete_Valid_Category: Record not available for deletion');
3248: END IF;
3249: fnd_message.set_name('INV','INV_CATEGORY_UNAVAIL_DELETE');
3250: fnd_msg_pub.ADD;
3251: RAISE fnd_api.g_EXC_ERROR;
3252: END IF;
3253:
3279: FETCH c_get_cat_desc INTO l_description;
3280: IF c_get_cat_desc%NOTFOUND THEN
3281: l_description := NULL;
3282: END IF;
3283: fnd_message.set_name('INV','INV_DELETE_DEF_CAT_ERR');
3284: fnd_message.set_token('CATEGORY_NAME', l_description);
3285: fnd_msg_pub.ADD;
3286: RAISE fnd_api.G_EXC_ERROR;
3287: END IF;
3280: IF c_get_cat_desc%NOTFOUND THEN
3281: l_description := NULL;
3282: END IF;
3283: fnd_message.set_name('INV','INV_DELETE_DEF_CAT_ERR');
3284: fnd_message.set_token('CATEGORY_NAME', l_description);
3285: fnd_msg_pub.ADD;
3286: RAISE fnd_api.G_EXC_ERROR;
3287: END IF;
3288:
3336: FETCH c_get_cat_desc INTO l_description;
3337: IF c_get_cat_desc%NOTFOUND THEN
3338: l_description := NULL;
3339: END IF;
3340: fnd_message.set_name('INV','INV_CATEGORY_ITEMS_EXIST');
3341: fnd_message.set_token('CATEGORY_NAME', l_description);
3342: fnd_msg_pub.ADD;
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3337: IF c_get_cat_desc%NOTFOUND THEN
3338: l_description := NULL;
3339: END IF;
3340: fnd_message.set_name('INV','INV_CATEGORY_ITEMS_EXIST');
3341: fnd_message.set_token('CATEGORY_NAME', l_description);
3342: fnd_msg_pub.ADD;
3343: RAISE FND_API.G_EXC_ERROR;
3344: END IF;
3345:
3690: l_delim := fnd_flex_ext.get_delimiter(G_INVENTORY_APP_SHORT_NAME,
3691: G_CAT_FLEX_CODE,
3692: l_structure_id);
3693: IF l_delim is NULL then
3694: fnd_message.set_name('OFA','FA_BUDGET_NO_SEG_DELIM');
3695: fnd_msg_pub.ADD;
3696: IF (l_debug = 1) THEN
3697: mdebug('Delimiter is NULL...Error');
3698: END IF;
3769: x_category_id := FND_FLEX_KEYVAL.combination_id;
3770: ELSE
3771:
3772: x_msg_data := FND_FLEX_KEYVAL.error_message;
3773: FND_MESSAGE.Set_Name('FND','FLEX-NO DYNAMIC INSERTS');
3774: l_msg_text := FND_MESSAGE.Get();
3775:
3776: IF (INSTR(x_msg_data,l_msg_text) > 0) THEN
3777: x_return_status := FND_API.G_RET_STS_SUCCESS;
3770: ELSE
3771:
3772: x_msg_data := FND_FLEX_KEYVAL.error_message;
3773: FND_MESSAGE.Set_Name('FND','FLEX-NO DYNAMIC INSERTS');
3774: l_msg_text := FND_MESSAGE.Get();
3775:
3776: IF (INSTR(x_msg_data,l_msg_text) > 0) THEN
3777: x_return_status := FND_API.G_RET_STS_SUCCESS;
3778: x_category_id := -1;