eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.INV_VALIDATE dependencies on INV_VALIDATE

Line 1: PACKAGE BODY INV_Validate AS

1: PACKAGE BODY INV_Validate AS
2: /* $Header: INVSVATB.pls 120.14 2008/06/05 12:19:43 sdpaul ship $ */
3:
4: -- Global constant holding the package name
5:

Line 6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Validate';

2: /* $Header: INVSVATB.pls 120.14 2008/06/05 12:19:43 sdpaul ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'INV_Validate';
7: g_orgid NUMBER;
8:
9: -- Procedure Get_Attr_Tbl.
10: --

Line 573: * If it returns INV_VALIDATE.T then goahead to call

569: l_status_result VARCHAR2(1);
570: BEGIN
571:
572: /* First call the original From_Subinventory function,
573: * If it returns INV_VALIDATE.T then goahead to call
574: * inv_material_status_grp.is_status_applicable() function.
575: */
576: l_result := INV_VALIDATE.From_Subinventory(
577: p_sub => p_sub,

Line 576: l_result := INV_VALIDATE.From_Subinventory(

572: /* First call the original From_Subinventory function,
573: * If it returns INV_VALIDATE.T then goahead to call
574: * inv_material_status_grp.is_status_applicable() function.
575: */
576: l_result := INV_VALIDATE.From_Subinventory(
577: p_sub => p_sub,
578: p_org => p_org,
579: p_item => p_item,
580: p_acct_txn => p_acct_txn);

Line 582: IF (l_result = INV_VALIDATE.T)

578: p_org => p_org,
579: p_item => p_item,
580: p_acct_txn => p_acct_txn);
581:
582: IF (l_result = INV_VALIDATE.T)
583: THEN
584:
585: -- Make the call for inv_material_status_grp.is_status_applicable()
586: -- with appropriate parameters

Line 602: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result

598: p_serial_number => NULL,
599: p_object_type => p_object_type);
600:
601: -- If l_status_result = 'N', it means that the status validation has failed.
602: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
603: -- directly.
604: IF (l_status_result = 'N')
605: THEN
606: l_result := INV_VALIDATE.F;

Line 606: l_result := INV_VALIDATE.F;

602: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
603: -- directly.
604: IF (l_status_result = 'N')
605: THEN
606: l_result := INV_VALIDATE.F;
607: RETURN l_result;
608: ELSE
609: RETURN l_result;
610: END IF;

Line 987: * If it returns INV_VALIDATE.T then goahead to call

983: l_status_result VARCHAR2(1);
984: BEGIN
985:
986: /* First call the original To_Subinventory function,
987: * If it returns INV_VALIDATE.T then goahead to call
988: * inv_material_status_grp.is_status_applicable() function.
989: */
990: l_result := INV_VALIDATE.To_Subinventory(
991: p_sub => p_sub,

Line 990: l_result := INV_VALIDATE.To_Subinventory(

986: /* First call the original To_Subinventory function,
987: * If it returns INV_VALIDATE.T then goahead to call
988: * inv_material_status_grp.is_status_applicable() function.
989: */
990: l_result := INV_VALIDATE.To_Subinventory(
991: p_sub => p_sub,
992: p_org => p_org,
993: p_item => p_item,
994: p_from_sub => p_from_sub,

Line 997: IF (l_result = INV_VALIDATE.T)

993: p_item => p_item,
994: p_from_sub => p_from_sub,
995: p_acct_txn => p_acct_txn);
996:
997: IF (l_result = INV_VALIDATE.T)
998: THEN
999:
1000: -- Make the call for inv_material_status_grp.is_status_applicable()
1001: -- with appropriate parameters

Line 1017: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result

1013: p_serial_number => NULL,
1014: p_object_type => p_object_type);
1015:
1016: -- If l_status_result = 'N', it means that the status validation has failed.
1017: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1018: -- directly.
1019: IF (l_status_result = 'N')
1020: THEN
1021: l_result := INV_VALIDATE.F;

Line 1021: l_result := INV_VALIDATE.F;

1017: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1018: -- directly.
1019: IF (l_status_result = 'N')
1020: THEN
1021: l_result := INV_VALIDATE.F;
1022: RETURN l_result;
1023: ELSE
1024: RETURN l_result;
1025: END IF;

Line 1667: * If it returns INV_VALIDATE.T then goahead to call

1663: l_result NUMBER;
1664: l_status_result VARCHAR2(1);
1665: BEGIN
1666: /* First call the original validateLocator function,
1667: * If it returns INV_VALIDATE.T then goahead to call
1668: * inv_material_status_grp.is_status_applicable() function.
1669: */
1670: l_result := INV_VALIDATE.validateLocator(
1671: p_locator => p_locator,

Line 1670: l_result := INV_VALIDATE.validateLocator(

1666: /* First call the original validateLocator function,
1667: * If it returns INV_VALIDATE.T then goahead to call
1668: * inv_material_status_grp.is_status_applicable() function.
1669: */
1670: l_result := INV_VALIDATE.validateLocator(
1671: p_locator => p_locator,
1672: p_org => p_org,
1673: p_sub => p_sub,
1674: p_item => p_item);

Line 1676: IF (l_result = INV_VALIDATE.T)

1672: p_org => p_org,
1673: p_sub => p_sub,
1674: p_item => p_item);
1675:
1676: IF (l_result = INV_VALIDATE.T)
1677: THEN
1678:
1679: -- Make the call for inv_material_status_grp.is_status_applicable()
1680: -- with appropriate parameters

Line 1696: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result

1692: p_serial_number => NULL,
1693: p_object_type => p_object_type);
1694:
1695: -- If l_status_result = 'N', it means that the status validation has failed.
1696: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1697: -- directly.
1698: IF (l_status_result = 'N')
1699: THEN
1700: l_result := INV_VALIDATE.F;

Line 1700: l_result := INV_VALIDATE.F;

1696: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1697: -- directly.
1698: IF (l_status_result = 'N')
1699: THEN
1700: l_result := INV_VALIDATE.F;
1701: RETURN l_result;
1702: ELSE
1703: RETURN l_result;
1704: END IF;

Line 1807: * If it returns INV_VALIDATE.T then goahead to call

1803: l_result NUMBER;
1804: l_status_result VARCHAR2(1);
1805: BEGIN
1806: /* First call the original Lot_Number function,
1807: * If it returns INV_VALIDATE.T then goahead to call
1808: * inv_material_status_grp.is_status_applicable() function.
1809: */
1810: l_result := INV_VALIDATE.Lot_Number(
1811: p_lot => p_lot,

Line 1810: l_result := INV_VALIDATE.Lot_Number(

1806: /* First call the original Lot_Number function,
1807: * If it returns INV_VALIDATE.T then goahead to call
1808: * inv_material_status_grp.is_status_applicable() function.
1809: */
1810: l_result := INV_VALIDATE.Lot_Number(
1811: p_lot => p_lot,
1812: p_org => p_org,
1813: p_item => p_item,
1814: p_from_sub => p_from_sub,

Line 1818: IF (l_result = INV_VALIDATE.T)

1814: p_from_sub => p_from_sub,
1815: p_loc => p_loc,
1816: p_revision => p_revision);
1817:
1818: IF (l_result = INV_VALIDATE.T)
1819: THEN
1820:
1821: -- Make the call for inv_material_status_grp.is_status_applicable()
1822: -- with appropriate parameters

Line 1838: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result

1834: p_serial_number => NULL,
1835: p_object_type => p_object_type);
1836:
1837: -- If l_status_result = 'N', it means that the status validation has failed.
1838: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1839: -- directly.
1840: IF (l_status_result = 'N')
1841: THEN
1842: l_result := INV_VALIDATE.F;

Line 1842: l_result := INV_VALIDATE.F;

1838: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
1839: -- directly.
1840: IF (l_status_result = 'N')
1841: THEN
1842: l_result := INV_VALIDATE.F;
1843: RETURN l_result;
1844: ELSE
1845: RETURN l_result;
1846: END IF;

Line 2299: * If it returns INV_VALIDATE.T then goahead to call

2295: l_result NUMBER;
2296: l_status_result VARCHAR2(1);
2297: BEGIN
2298: /* First call the original Validate_serial function,
2299: * If it returns INV_VALIDATE.T then goahead to call
2300: * inv_material_status_grp.is_status_applicable() function.
2301: */
2302: l_result := INV_VALIDATE.Validate_serial(
2303: p_serial => p_serial,

Line 2302: l_result := INV_VALIDATE.Validate_serial(

2298: /* First call the original Validate_serial function,
2299: * If it returns INV_VALIDATE.T then goahead to call
2300: * inv_material_status_grp.is_status_applicable() function.
2301: */
2302: l_result := INV_VALIDATE.Validate_serial(
2303: p_serial => p_serial,
2304: p_org => p_org,
2305: p_item => p_item,
2306: p_from_sub => p_from_sub,

Line 2311: IF (l_result = INV_VALIDATE.T)

2307: p_lot => p_lot,
2308: p_loc => p_loc,
2309: p_revision => p_revision);
2310:
2311: IF (l_result = INV_VALIDATE.T)
2312: THEN
2313:
2314: -- Make the call for inv_material_status_grp.is_status_applicable()
2315: -- with appropriate parameters

Line 2331: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result

2327: p_serial_number => p_serial.serial_number,
2328: p_object_type => p_object_type);
2329:
2330: -- If l_status_result = 'N', it means that status validation has failed.
2331: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
2332: -- directly.
2333: IF (l_status_result = 'N')
2334: THEN
2335: l_result := INV_VALIDATE.F;

Line 2335: l_result := INV_VALIDATE.F;

2331: -- Assign l_result = INV_VALIDATE.F and return l_result, else return l_result
2332: -- directly.
2333: IF (l_status_result = 'N')
2334: THEN
2335: l_result := INV_VALIDATE.F;
2336: RETURN l_result;
2337: ELSE
2338: RETURN l_result;
2339: END IF;

Line 2387: -- From and To Serial is not of the same size return with INV_VALIDATE.F.

2383: l_errored_serial_count NUMBER := 0;
2384:
2385: BEGIN
2386:
2387: -- From and To Serial is not of the same size return with INV_VALIDATE.F.
2388: IF((p_fm_serial IS NULL) OR (p_to_serial IS NULL) OR (p_fm_serial.LAST <> p_to_serial.LAST)) THEN
2389: l_result := INV_VALIDATE.F;
2390: RETURN l_result;
2391: END IF;

Line 2389: l_result := INV_VALIDATE.F;

2385: BEGIN
2386:
2387: -- From and To Serial is not of the same size return with INV_VALIDATE.F.
2388: IF((p_fm_serial IS NULL) OR (p_to_serial IS NULL) OR (p_fm_serial.LAST <> p_to_serial.LAST)) THEN
2389: l_result := INV_VALIDATE.F;
2390: RETURN l_result;
2391: END IF;
2392:
2393: -- Check for the material status of sub,locator and lot if p_object_type = 'A'.

Line 2414: l_result := INV_VALIDATE.F;

2410: p_object_type => 'Z');
2411: -- Subinventory status validation has failed
2412: IF (l_status_result = 'N')
2413: THEN
2414: l_result := INV_VALIDATE.F;
2415: RETURN l_result;
2416: END IF;
2417: END IF;
2418:

Line 2436: l_result := INV_VALIDATE.F;

2432: p_object_type => 'L');
2433: -- Locator status validation has failed
2434: IF (l_status_result = 'N')
2435: THEN
2436: l_result := INV_VALIDATE.F;
2437: RETURN l_result;
2438: END IF;
2439: END IF;
2440:

Line 2458: l_result := INV_VALIDATE.F;

2454: p_object_type => 'O');
2455: -- Lot status validation has failed
2456: IF (l_status_result = 'N')
2457: THEN
2458: l_result := INV_VALIDATE.F;
2459: RETURN l_result;
2460: END IF;
2461: END IF;
2462: END IF;-- End of p_object_type = 'A'

Line 2486: l_result := INV_VALIDATE.F;

2482: x_from_number => l_from_number,
2483: x_to_number => l_to_number,
2484: x_errorcode => l_errorcode)
2485: THEN
2486: l_result := INV_VALIDATE.F;
2487: RETURN l_result;
2488: END IF;
2489:
2490: l_number_part := TO_NUMBER(l_from_number);

Line 2502: l_result := INV_VALIDATE.Validate_serial(

2498: -- the length of the number part
2499: l_padded_length := l_length - LENGTH(l_number_part);
2500: l_temp_serial.serial_number := RPAD(NVL(l_prefix,'0'), l_padded_length, '0') ||l_number_part;
2501: -- Calling the overloaded Validate_serial function.
2502: l_result := INV_VALIDATE.Validate_serial(
2503: p_serial => l_temp_serial,
2504: p_org => p_org,
2505: p_item => p_item,
2506: p_from_sub => p_from_sub,

Line 2515: IF (l_result = INV_VALIDATE.F) THEN

2511: p_object_type => 'S'
2512: );
2513: -- Material status for an intermediate serial has failed, add the serial to the
2514: -- errored serials list and when the count reaches 10 return from the function.
2515: IF (l_result = INV_VALIDATE.F) THEN
2516: l_errored_serial_count := l_errored_serial_count + 1;
2517: x_errored_serials(l_errored_serial_count) := l_temp_serial.serial_number;
2518: IF (l_errored_serial_count = 10) THEN
2519: l_result := INV_VALIDATE.F;

Line 2519: l_result := INV_VALIDATE.F;

2515: IF (l_result = INV_VALIDATE.F) THEN
2516: l_errored_serial_count := l_errored_serial_count + 1;
2517: x_errored_serials(l_errored_serial_count) := l_temp_serial.serial_number;
2518: IF (l_errored_serial_count = 10) THEN
2519: l_result := INV_VALIDATE.F;
2520: RETURN l_result;
2521: END IF;
2522: END IF;
2523:

Line 2530: -- If lesser than 10 serials has failed then set l_result to INV_VALIDATE.F

2526:
2527: END LOOP; -- End of WHILE
2528: END LOOP; -- End of FOR
2529:
2530: -- If lesser than 10 serials has failed then set l_result to INV_VALIDATE.F
2531: -- and return.
2532: IF (l_errored_serial_count <> 0) THEN
2533: l_result := INV_VALIDATE.F;
2534: RETURN l_result;

Line 2533: l_result := INV_VALIDATE.F;

2529:
2530: -- If lesser than 10 serials has failed then set l_result to INV_VALIDATE.F
2531: -- and return.
2532: IF (l_errored_serial_count <> 0) THEN
2533: l_result := INV_VALIDATE.F;
2534: RETURN l_result;
2535: ELSE
2536: -- Entire range of serials has passed for material status
2537: -- set the l_result to INV_VALIDATE.T and return

Line 2537: -- set the l_result to INV_VALIDATE.T and return

2533: l_result := INV_VALIDATE.F;
2534: RETURN l_result;
2535: ELSE
2536: -- Entire range of serials has passed for material status
2537: -- set the l_result to INV_VALIDATE.T and return
2538: l_result := INV_VALIDATE.T;
2539: RETURN l_result;
2540: END IF;
2541:

Line 2538: l_result := INV_VALIDATE.T;

2534: RETURN l_result;
2535: ELSE
2536: -- Entire range of serials has passed for material status
2537: -- set the l_result to INV_VALIDATE.T and return
2538: l_result := INV_VALIDATE.T;
2539: RETURN l_result;
2540: END IF;
2541:
2542: EXCEPTION

Line 2544: -- Exception has occured somewhere set the l_result to INV_VALIDATE.F

2540: END IF;
2541:
2542: EXCEPTION
2543: WHEN OTHERS THEN
2544: -- Exception has occured somewhere set the l_result to INV_VALIDATE.F
2545: -- and return
2546: l_result := INV_VALIDATE.F;
2547: RETURN l_result;
2548:

Line 2546: l_result := INV_VALIDATE.F;

2542: EXCEPTION
2543: WHEN OTHERS THEN
2544: -- Exception has occured somewhere set the l_result to INV_VALIDATE.F
2545: -- and return
2546: l_result := INV_VALIDATE.F;
2547: RETURN l_result;
2548:
2549: END validate_serial_range;
2550:

Line 3144: END INV_Validate;

3140: p_required_flag := rec_chk_loc_req.location_required_flag;
3141: END IF;
3142: CLOSE cur_chk_loc_req;
3143: END check_location_required_setup;
3144: END INV_Validate;