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.ENG_VALIDATE_REV_COMPONENT dependencies on FND_API

Line 62: x_return_status := FND_API.G_RET_STS_SUCCESS;

58: IS
59: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
60:
61: BEGIN
62: x_return_status := FND_API.G_RET_STS_SUCCESS;
63:
64: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
65: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
66:

Line 68: p_rev_component_rec.acd_type = FND_API.G_MISS_NUM

64: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
65: g_token_tbl(1).token_value := p_rev_component_rec.component_item_name;
66:
67: IF p_rev_component_rec.acd_type IS NULL OR
68: p_rev_component_rec.acd_type = FND_API.G_MISS_NUM
69: THEN
70: Error_Handler.Add_Error_Token
71: ( p_message_name => 'ENG_ACD_TYPE_MISSING'
72: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 77: x_return_status := FND_API.G_RET_STS_ERROR;

73: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
74: , p_Token_Tbl => g_Token_Tbl
75: );
76:
77: x_return_status := FND_API.G_RET_STS_ERROR;
78: END IF;
79:
80: -- Return the message table.
81:

Line 1434: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1430: , p_Old_Rev_Component_Rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
1431: , p_Old_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
1432: )
1433: IS
1434: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1435: l_bill_sequence_id NUMBER;
1436: l_processed BOOLEAN;
1437: l_result NUMBER;
1438: l_Err_Text VARCHAR2(2000);

Line 1626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1622: x_err_text => l_err_text
1623: );
1624:
1625: EXCEPTION
1626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1627: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1628: END;
1629: END IF;
1630:

Line 1627: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1623: );
1624:
1625: EXCEPTION
1626: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1627: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1628: END;
1629: END IF;
1630:
1631: -- To End Item Unit Number must be greater than or equal to

Line 1634: IF NVL(p_rev_component_rec.From_End_Item_Unit_Number, FND_API.G_MISS_CHAR)

1630:
1631: -- To End Item Unit Number must be greater than or equal to
1632: -- From End Item Unit Number
1633:
1634: IF NVL(p_rev_component_rec.From_End_Item_Unit_Number, FND_API.G_MISS_CHAR)
1635: >
1636: NVL(p_rev_component_rec.To_End_Item_Unit_Number, FND_API.G_MISS_CHAR)
1637: THEN
1638: g_token_tbl.delete;

Line 1636: NVL(p_rev_component_rec.To_End_Item_Unit_Number, FND_API.G_MISS_CHAR)

1632: -- From End Item Unit Number
1633:
1634: IF NVL(p_rev_component_rec.From_End_Item_Unit_Number, FND_API.G_MISS_CHAR)
1635: >
1636: NVL(p_rev_component_rec.To_End_Item_Unit_Number, FND_API.G_MISS_CHAR)
1637: THEN
1638: g_token_tbl.delete;
1639: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
1640: g_token_tbl(1).token_value :=

Line 1649: l_return_status := FND_API.G_RET_STS_ERROR;

1645: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1646: , p_token_tbl => g_token_tbl
1647: );
1648:
1649: l_return_status := FND_API.G_RET_STS_ERROR;
1650: END IF;
1651:
1652: --
1653: -- All validations that only apply to Operation Type CREATE

Line 1684: l_return_status := FND_API.G_RET_STS_ERROR;

1680: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1681: , p_token_tbl => g_token_tbl
1682: );
1683:
1684: l_return_status := FND_API.G_RET_STS_ERROR;
1685: END IF;
1686: END IF;
1687:
1688: -- Component can be unit controlled only if parent revised item is

Line 1710: l_return_status := FND_API.G_RET_STS_ERROR;

1706: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1707: , p_token_tbl => g_token_tbl
1708: );
1709:
1710: l_return_status := FND_API.G_RET_STS_ERROR;
1711: END IF;
1712:
1713: -- Unit controlled revised items can only have non-ATO or non-PTO
1714: -- standard items as components.

Line 1735: l_return_status := FND_API.G_RET_STS_ERROR;

1731: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1732: , p_token_tbl => g_token_tbl
1733: );
1734:
1735: l_return_status := FND_API.G_RET_STS_ERROR;
1736: END IF;
1737:
1738: --
1739: -- Verify that the Parent has BOM Enabled

Line 1754: l_return_status := FND_API.G_RET_STS_ERROR;

1750: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1751: , p_token_tbl => g_token_tbl
1752: );
1753:
1754: l_return_status := FND_API.G_RET_STS_ERROR;
1755: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
1756: g_token_tbl(1).token_value :=
1757: p_rev_component_rec.component_item_name;
1758:

Line 1781: l_return_status := FND_API.G_RET_STS_ERROR;

1777: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1778: , p_token_tbl => g_token_tbl
1779: );
1780: END IF;
1781: l_return_status := FND_API.G_RET_STS_ERROR;
1782: END IF;
1783:
1784: END IF; -- End checking of ACD Type
1785:

Line 1813: l_return_status := FND_API.G_RET_STS_ERROR;

1809: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1810: , p_Token_Tbl => g_Token_Tbl
1811: );
1812: END IF;
1813: l_return_status := FND_API.G_RET_STS_ERROR;
1814:
1815: EXCEPTION
1816: WHEN NO_DATA_FOUND THEN
1817: NULL;

Line 1832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1828: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1829: );
1830: END IF;
1831: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
1832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1833:
1834: END; -- Check if parent Common Ends
1835:
1836: /*****************************************************************

Line 1857: l_return_status := FND_API.G_RET_STS_ERROR;

1853: , p_Message_name => 'ENG_COMP_SAME_AS_BILL'
1854: , p_token_tbl => g_token_tbl
1855: );
1856: END IF;
1857: l_return_status := FND_API.G_RET_STS_ERROR;
1858: g_token_tbl(1).token_name := 'REVISED_COMPONENT_NAME';
1859: g_token_tbl(1).token_value :=
1860: p_rev_component_rec.component_item_name;
1861:

Line 1881: l_return_status := FND_API.G_RET_STS_ERROR;

1877: , p_Message_name => 'ENG_COMP_ITEM_BOM_NOT_ENABLED'
1878: , p_token_tbl => g_token_tbl
1879: );
1880: END IF;
1881: l_return_status := FND_API.G_RET_STS_ERROR;
1882: END IF;
1883:
1884: /*******************************************************************
1885: --

Line 1942: l_return_status := FND_API.G_RET_STS_ERROR;

1938: IF NOT Verify_Item_Attributes( p_Mesg_token_Tbl => l_Mesg_Token_Tbl
1939: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1940: )
1941: THEN
1942: l_return_status := FND_API.G_RET_STS_ERROR;
1943: END IF;
1944:
1945: --
1946: -- Verify if the revised item is being referenced as common in

Line 1974: l_return_status := FND_API.G_RET_STS_ERROR;

1970: , p_message_name => l_err_text
1971: , p_token_tbl => g_token_tbl
1972: );
1973: END IF;
1974: l_return_status := FND_API.G_RET_STS_ERROR;
1975: END IF; -- Check if exists in other orgs if common Ends
1976:
1977: END IF; -- End of Operation Type CREATE
1978:

Line 2003: l_return_status := FND_API.G_RET_STS_ERROR;

1999: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2000: , p_token_tbl => g_token_tbl
2001: );
2002: END IF;
2003: l_return_status := FND_API.G_RET_STS_ERROR;
2004: END IF;
2005:
2006: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
2007: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE

Line 2007: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE

2003: l_return_status := FND_API.G_RET_STS_ERROR;
2004: END IF;
2005:
2006: IF p_rev_component_rec.old_effectivity_date IS NOT NULL AND
2007: p_rev_component_rec.old_effectivity_date <> FND_API.G_MISS_DATE
2008: THEN
2009: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2010: THEN
2011: Error_Handler.Add_Error_Token

Line 2018: l_return_status := FND_API.G_RET_STS_ERROR;

2014: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2015: , p_token_tbl => g_token_tbl
2016: );
2017: END IF;
2018: l_return_status := FND_API.G_RET_STS_ERROR;
2019:
2020: END IF;
2021:
2022: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND

Line 2023: p_rev_component_rec.old_operation_sequence_number <> FND_API.G_MISS_NUM

2019:
2020: END IF;
2021:
2022: IF p_rev_component_rec.old_operation_sequence_number IS NOT NULL AND
2023: p_rev_component_rec.old_operation_sequence_number <> FND_API.G_MISS_NUM
2024: THEN
2025: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2026: THEN
2027: Error_Handler.Add_Error_Token

Line 2034: l_return_status := FND_API.G_RET_STS_ERROR;

2030: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2031: , p_token_tbl => g_token_tbl
2032: );
2033: END IF;
2034: l_return_status := FND_API.G_RET_STS_ERROR;
2035:
2036: END IF;
2037:
2038: --

Line 2053: l_return_status := FND_API.G_RET_STS_ERROR;

2049: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2050: , p_token_tbl => g_token_tbl
2051: );
2052: END IF;
2053: l_return_status := FND_API.G_RET_STS_ERROR;
2054: END IF;
2055:
2056: --
2057: -- Verify that the user is not trying to update a component which

Line 2071: l_return_status := FND_API.G_RET_STS_ERROR;

2067: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2068: , p_token_tbl => g_token_tbl
2069: );
2070: END IF;
2071: l_return_status := FND_API.G_RET_STS_ERROR;
2072: END IF;
2073:
2074: -- User cannot update to_end_item_unit_number when the component
2075: -- is disabled.

Line 2090: l_return_status := FND_API.G_RET_STS_ERROR;

2086: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2087: , p_token_tbl => g_token_tbl
2088: );
2089: END IF;
2090: l_return_status := FND_API.G_RET_STS_ERROR;
2091: END IF;
2092:
2093: END IF; /* Operation UPDATE ENDS */
2094:

Line 2121: l_return_status := FND_API.G_RET_STS_ERROR;

2117: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2118: , p_Token_Tbl => g_Token_Tbl
2119: );
2120: END IF;
2121: l_return_status := FND_API.G_RET_STS_ERROR;
2122: END IF;
2123:
2124: --dbms_output.put_line('Verified disable date . . . ' || l_return_status);
2125:

Line 2169: l_return_status := FND_API.G_RET_STS_ERROR;

2165: , x_Mesg_Token_Tbl=> l_Mesg_Token_Tbl
2166: , p_Token_Tbl => g_Token_Tbl
2167: );
2168:
2169: l_return_status := FND_API.G_RET_STS_ERROR;
2170: END IF;
2171:
2172: /*********************************************************************
2173: --

Line 2200: l_return_status := FND_API.G_RET_STS_ERROR;

2196: , p_Token_Tbl => g_Token_Tbl
2197: );
2198: g_token_tbl.delete(2);
2199: END IF;
2200: l_return_status := FND_API.G_RET_STS_ERROR;
2201: END IF;
2202: END IF;
2203:
2204: /********************************************************************

Line 2238: l_return_status := FND_API.G_RET_STS_ERROR;

2234: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2235: , p_Token_Tbl => g_Token_Tbl
2236: );
2237: END IF;
2238: l_return_status := FND_API.G_RET_STS_ERROR;
2239: WHEN OTHERS THEN
2240: --dbms_output.put_line(SQLERRM);
2241: Error_Handler.Add_Error_Token
2242: ( p_message_name => NULL

Line 2249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2245: TO_CHAR(SQLCODE)
2246: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2247: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2248: );
2249: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2250: END;
2251: END IF;
2252:
2253: /********************************************************************

Line 2307: l_return_status := FND_API.G_RET_STS_ERROR;

2303: g_Token_Tbl(1).Token_Name := 'REVISED_COMPONENT_NAME';
2304: g_Token_Tbl(1).Token_Value :=
2305: g_Rev_Component_rec.component_item_name;
2306: END IF;
2307: l_return_status := FND_API.G_RET_STS_ERROR;
2308: ELSIF l_result = 2 THEN
2309: IF FND_MSG_PUB.Check_Msg_Level
2310: (FND_MSG_PUB.G_MSG_LVL_ERROR)
2311: THEN

Line 2324: l_return_status := FND_API.G_RET_STS_ERROR;

2320: , p_Token_Tbl => g_Token_Tbl
2321: );
2322: END IF;
2323: g_Token_Tbl.DELETE(2);
2324: l_return_status := FND_API.G_RET_STS_ERROR;
2325: ELSIF l_result = 0 AND
2326: p_Rev_Component_rec.old_operation_sequence_number
2327: IS NOT NULL AND
2328: p_Rev_Component_rec.old_operation_sequence_number <>

Line 2329: FND_API.G_MISS_NUM

2325: ELSIF l_result = 0 AND
2326: p_Rev_Component_rec.old_operation_sequence_number
2327: IS NOT NULL AND
2328: p_Rev_Component_rec.old_operation_sequence_number <>
2329: FND_API.G_MISS_NUM
2330: THEN
2331: BEGIN
2332: SELECT operation_seq_num
2333: INTO l_result

Line 2361: l_return_status := FND_API.G_RET_STS_ERROR;

2357: , p_Token_Tbl => g_Token_Tbl
2358: );
2359: END IF;
2360: g_Token_Tbl.DELETE(2);
2361: l_return_status := FND_API.G_RET_STS_ERROR;
2362: END IF;
2363: END IF; -- Operation_seq_Num Check Ends.
2364:
2365: /********************************************************************

Line 2454: l_return_status := FND_API.G_RET_STS_ERROR;

2450: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2451: , p_Token_Tbl => g_Token_Tbl
2452: );
2453: END IF;
2454: l_return_status := FND_API.G_RET_STS_ERROR;
2455: ELSIF l_Result = 2
2456: THEN
2457: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2458: THEN

Line 2465: l_return_status := FND_API.G_RET_STS_ERROR;

2461: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2462: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2463: );
2464: END IF;
2465: l_return_status := FND_API.G_RET_STS_ERROR;
2466: END IF;
2467: END IF;
2468:
2469: --dbms_output.put_line('Verified PTO / ATO . . .' || l_return_status);

Line 2508: l_return_status := FND_API.G_RET_STS_ERROR;

2504: , p_Token_Tbl => g_Token_Tbl
2505: );
2506: g_Token_Tbl.DELETE(2);
2507: END IF;
2508: l_return_status := FND_API.G_RET_STS_ERROR;
2509: ELSIF l_Result = 2 THEN
2510: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2511: THEN
2512: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';

Line 2532: l_return_status := FND_API.G_RET_STS_ERROR;

2528: , p_Token_Tbl => g_Token_Tbl
2529: );
2530: g_Token_Tbl.DELETE(2);
2531: g_Token_Tbl.DELETE(3);
2532: l_return_status := FND_API.G_RET_STS_ERROR;
2533: END IF;
2534: ELSIF l_Result = 3 THEN
2535: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2536: THEN

Line 2553: l_return_status := FND_API.G_RET_STS_ERROR;

2549: g_Token_Tbl(1).Token_Value :=
2550: g_rev_component_rec.component_item_name;
2551:
2552: END IF;
2553: l_return_status := FND_API.G_RET_STS_ERROR;
2554: END IF; -- If Result Ends
2555: END IF; -- If Plannng <> 100 Ends
2556:
2557: --dbms_output.put_line('Verified Planning % . . .' || l_return_status);

Line 2600: l_return_status := FND_API.G_RET_STS_ERROR;

2596: , p_Token_Tbl => g_Token_Tbl
2597: );
2598: g_Token_Tbl.DELETE(2);
2599: END IF;
2600: l_return_status := FND_API.G_RET_STS_ERROR;
2601: ELSIF l_Result = 2 THEN
2602: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
2603: g_Token_Tbl(2).Token_Value :=
2604: g_rev_component_rec.revised_item_name;

Line 2612: l_return_status := FND_API.G_RET_STS_ERROR;

2608: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2609: , p_Token_Tbl => g_Token_Tbl
2610: );
2611: g_Token_Tbl.DELETE(2);
2612: l_return_status := FND_API.G_RET_STS_ERROR;
2613: ELSIF l_Result = 3 THEN
2614: g_Token_Tbl(2).Token_Name := 'REVISED_ITEM_NAME';
2615: g_Token_Tbl(2).Token_Value :=
2616: g_rev_component_rec.revised_item_name;

Line 2635: l_return_status := FND_API.G_RET_STS_ERROR;

2631: , p_Token_Tbl => g_Token_Tbl
2632: );
2633:
2634: g_Token_Tbl.DELETE(2);
2635: l_return_status := FND_API.G_RET_STS_ERROR;
2636: END IF;
2637: END IF;
2638:
2639: --dbms_output.put_line('Verified Req for Rev and Shipping . . . ' ||

Line 2656: l_Return_Status := FND_API.G_RET_STS_ERROR;

2652: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2653: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2654: , p_Token_Tbl => g_Token_Tbl
2655: );
2656: l_Return_Status := FND_API.G_RET_STS_ERROR;
2657: END IF;
2658:
2659: /********************************************************************
2660: --

Line 2696: l_return_status := FND_API.G_RET_STS_ERROR;

2692: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2693: , p_Token_Tbl => g_Token_Tbl
2694: );
2695: g_Token_Tbl.DELETE(2);
2696: l_return_status := FND_API.G_RET_STS_ERROR;
2697: END IF;
2698: END IF;
2699:
2700: --dbms_output.put_line('After verification of Check ATP, Req for Rev' );

Line 2732: l_return_status := FND_API.G_RET_STS_ERROR;

2728: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2729: , p_Token_Tbl => g_Token_Tbl
2730: );
2731: END IF;
2732: l_return_status := FND_API.G_RET_STS_ERROR;
2733: END IF;
2734: END IF;
2735:
2736: --dbms_output.put_line('After verification of Mutually exclusive . . .' ||

Line 2763: l_return_status := FND_API.G_RET_STS_ERROR;

2759: Check_Supply_Type
2760: ( p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2761: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl ) = FALSE
2762: THEN
2763: l_return_status := FND_API.G_RET_STS_ERROR;
2764: END IF;
2765:
2766: --dbms_output.put_line
2767: --('After verification of Supply Type . . .' || l_return_status);

Line 2785: l_return_status := FND_API.G_RET_STS_ERROR;

2781: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2782: , p_Token_Tbl => g_Token_Tbl
2783: );
2784: END IF;
2785: l_return_status := FND_API.G_RET_STS_ERROR;
2786: END IF;
2787:
2788: -- Check Maximun Quantity which must be >= Component Quantity or
2789: -- should be NULL if the minimum quantity is NULL.

Line 2805: l_return_status := FND_API.G_RET_STS_ERROR;

2801: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2802: , p_Token_Tbl => g_Token_Tbl
2803: );
2804: END IF;
2805: l_return_status := FND_API.G_RET_STS_ERROR;
2806: END IF;
2807:
2808: --dbms_output.put_line('After verification of Min / Max quantity . . .');
2809:

Line 2852: l_return_status := FND_API.G_RET_STS_ERROR;

2848: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2849: , p_Token_Tbl => g_Token_Tbl
2850: );
2851: END IF;
2852: l_return_status := FND_API.G_RET_STS_ERROR;
2853: END IF;
2854:
2855: --dbms_output.put_line('Checked if fractional quantity is valid . . .' ||
2856: -- l_return_status);

Line 2878: l_return_status := FND_API.G_RET_STS_ERROR;

2874: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2875: , p_Token_Tbl => g_Token_Tbl
2876: );
2877: END IF;
2878: l_return_status := FND_API.G_RET_STS_ERROR;
2879: END IF;
2880:
2881: /********************************************************************
2882: --

Line 2899: l_return_status := FND_API.G_RET_STS_ERROR;

2895: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2896: , p_Token_Tbl => g_Token_Tbl
2897: );
2898: END IF;
2899: l_return_status := FND_API.G_RET_STS_ERROR;
2900: END IF;
2901:
2902: --dbms_output.put_line('Checking Supply Subinventory . . . ' ||
2903: -- p_rev_component_rec.Supply_SubInventory);

Line 2935: l_return_status := FND_API.G_RET_STS_ERROR;

2931: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2932: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2933: );
2934: END IF;
2935: l_return_status := FND_API.G_RET_STS_ERROR;
2936: END IF;
2937: --dbms_output.put_line('After checking Subinventory . . . ' || l_return_status);
2938:
2939: --dbms_output.put_line('Checking Locators . . . .');

Line 2948: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR

2944: ********************************************************************/
2945: IF (( p_rev_component_rec.Transaction_Type=Bom_GLOBALS.G_OPR_CREATE AND
2946: p_rev_component_rec.acd_type = 1 AND
2947: p_rev_component_rec.Supply_SubInventory IS NOT NULL AND
2948: p_rev_component_rec.Supply_SubInventory <> FND_API.G_MISS_CHAR
2949: ) OR
2950: ((( p_rev_component_rec.Transaction_Type=Bom_GLOBALS.G_OPR_CREATE AND
2951: p_rev_component_rec.acd_type = 2
2952: ) OR

Line 3031: l_return_status := FND_API.G_RET_STS_ERROR;

3027: );
3028: END IF;
3029:
3030: END IF;
3031: l_return_status := FND_API.G_RET_STS_ERROR;
3032: ELSIF p_rev_component_rec.location_name IS NOT NULL AND
3033: p_rev_component_rec.supply_subinventory IS NULL
3034: THEN
3035: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 3044: l_return_status := FND_API.G_RET_STS_ERROR;

3040: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3041: , p_Token_Tbl => g_Token_Tbl
3042: );
3043: END IF;
3044: l_return_status := FND_API.G_RET_STS_ERROR;
3045: END IF;
3046:
3047: --dbms_output.put_line('Operation CREATE ENDS . . .' || l_return_status);
3048:

Line 3059: WHEN FND_API.G_EXC_ERROR THEN

3055: -- l_return_status);
3056:
3057: EXCEPTION
3058:
3059: WHEN FND_API.G_EXC_ERROR THEN
3060:
3061: --dbms_output.put_line('Expected Error in Rev. Comp. Entity Validation . . .');
3062:
3063: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3063: x_return_status := FND_API.G_RET_STS_ERROR;

3059: WHEN FND_API.G_EXC_ERROR THEN
3060:
3061: --dbms_output.put_line('Expected Error in Rev. Comp. Entity Validation . . .');
3062:
3063: x_return_status := FND_API.G_RET_STS_ERROR;
3064: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3065:
3066: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3067:

Line 3066: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3062:
3063: x_return_status := FND_API.G_RET_STS_ERROR;
3064: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3065:
3066: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3067:
3068: --dbms_output.put_line('UNExpected Error in Rev. Comp. Entity Validation . . .');
3069:
3070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3066: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3067:
3068: --dbms_output.put_line('UNExpected Error in Rev. Comp. Entity Validation . . .');
3069:
3070: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3071: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3072:
3073: WHEN OTHERS THEN
3074: --dbms_output.put_line(SQLERRM || ' ' || TO_CHAR(SQLCODE));

Line 3075: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3071: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3072:
3073: WHEN OTHERS THEN
3074: --dbms_output.put_line(SQLERRM || ' ' || TO_CHAR(SQLCODE));
3075: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3076: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3077:
3078: END Check_Entity;
3079:

Line 3104: x_return_status := FND_API.G_RET_STS_SUCCESS;

3100: l_err_text VARCHAR2(2000);
3101: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3102: BEGIN
3103:
3104: x_return_status := FND_API.G_RET_STS_SUCCESS;
3105: l_return_status := FND_API.G_RET_STS_SUCCESS;
3106:
3107: g_rev_component_rec := p_rev_component_rec;
3108:

Line 3105: l_return_status := FND_API.G_RET_STS_SUCCESS;

3101: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3102: BEGIN
3103:
3104: x_return_status := FND_API.G_RET_STS_SUCCESS;
3105: l_return_status := FND_API.G_RET_STS_SUCCESS;
3106:
3107: g_rev_component_rec := p_rev_component_rec;
3108:
3109: -- Set the first token to be equal to the component_name

Line 3118: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM

3114: --
3115: -- Check if the user is trying to create/update a record with missing
3116: -- value when the column value is required.
3117: --
3118: IF p_rev_component_rec.item_sequence_number = FND_API.G_MISS_NUM
3119: THEN
3120: Error_Handler.Add_Error_Token
3121: ( p_Message_Name => 'ENG_ITEM_NUM_MISSING'
3122: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3126: l_return_status := FND_API.G_RET_STS_ERROR;

3122: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3123: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3124: , p_Token_Tbl => g_Token_Tbl
3125: );
3126: l_return_status := FND_API.G_RET_STS_ERROR;
3127: END IF;
3128:
3129: IF p_rev_component_rec.quantity_per_assembly = FND_API.G_MISS_NUM
3130: THEN

Line 3129: IF p_rev_component_rec.quantity_per_assembly = FND_API.G_MISS_NUM

3125: );
3126: l_return_status := FND_API.G_RET_STS_ERROR;
3127: END IF;
3128:
3129: IF p_rev_component_rec.quantity_per_assembly = FND_API.G_MISS_NUM
3130: THEN
3131: Error_Handler.Add_Error_Token
3132: ( p_Message_Name => 'ENG_COMP_QUANTITY_MISSING'
3133: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3137: l_return_status := FND_API.G_RET_STS_ERROR;

3133: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3134: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3135: , p_Token_Tbl => g_Token_Tbl
3136: );
3137: l_return_status := FND_API.G_RET_STS_ERROR;
3138: END IF;
3139:
3140: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
3141: THEN

Line 3140: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM

3136: );
3137: l_return_status := FND_API.G_RET_STS_ERROR;
3138: END IF;
3139:
3140: IF p_rev_component_rec.projected_yield = FND_API.G_MISS_NUM
3141: THEN
3142: Error_Handler.Add_Error_Token
3143: ( p_Message_Name => 'ENG_COMP_YIELD_MISSING'
3144: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3148: l_return_status := FND_API.G_RET_STS_ERROR;

3144: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3145: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3146: , p_Token_Tbl => g_Token_Tbl
3147: );
3148: l_return_status := FND_API.G_RET_STS_ERROR;
3149: END IF;
3150:
3151: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
3152: THEN

Line 3151: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM

3147: );
3148: l_return_status := FND_API.G_RET_STS_ERROR;
3149: END IF;
3150:
3151: IF p_rev_component_rec.planning_percent = FND_API.G_MISS_NUM
3152: THEN
3153: Error_Handler.Add_Error_Token
3154: ( p_Message_Name => 'ENG_PLAN_PERCENT_MISSING'
3155: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3159: l_return_status := FND_API.G_RET_STS_ERROR;

3155: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3156: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3157: , p_Token_Tbl => g_Token_Tbl
3158: );
3159: l_return_status := FND_API.G_RET_STS_ERROR;
3160: END IF;
3161:
3162: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
3163: THEN

Line 3162: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM

3158: );
3159: l_return_status := FND_API.G_RET_STS_ERROR;
3160: END IF;
3161:
3162: IF p_rev_component_rec.quantity_related = FND_API.G_MISS_NUM
3163: THEN
3164: Error_Handler.Add_Error_Token
3165: ( p_Message_Name => 'ENG_QUANTITY_RELATED_MISSING'
3166: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3170: l_return_status := FND_API.G_RET_STS_ERROR;

3166: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3167: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3168: , p_Token_Tbl => g_Token_Tbl
3169: );
3170: l_return_status := FND_API.G_RET_STS_ERROR;
3171: END IF;
3172:
3173: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
3174: THEN

Line 3173: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM

3169: );
3170: l_return_status := FND_API.G_RET_STS_ERROR;
3171: END IF;
3172:
3173: IF p_rev_component_rec.include_in_cost_rollup = FND_API.G_MISS_NUM
3174: THEN
3175: Error_Handler.Add_Error_Token
3176: ( p_Message_Name => 'ENG_INCL_IN_COST_ROLLUP_MISSING'
3177: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3181: l_return_status := FND_API.G_RET_STS_ERROR;

3177: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3178: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3179: , p_Token_Tbl => g_Token_Tbl
3180: );
3181: l_return_status := FND_API.G_RET_STS_ERROR;
3182: END IF;
3183:
3184: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
3185: THEN

Line 3184: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM

3180: );
3181: l_return_status := FND_API.G_RET_STS_ERROR;
3182: END IF;
3183:
3184: IF p_rev_component_rec.check_atp = FND_API.G_MISS_NUM
3185: THEN
3186: Error_Handler.Add_Error_Token
3187: ( p_Message_Name => 'ENG_CHECK_ATP_MISSING'
3188: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3192: l_return_status := FND_API.G_RET_STS_ERROR;

3188: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3189: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3190: , p_Token_Tbl => g_Token_Tbl
3191: );
3192: l_return_status := FND_API.G_RET_STS_ERROR;
3193: END IF;
3194:
3195:
3196: IF p_rev_component_rec.acd_type IS NOT NULL AND

Line 3208: l_return_status := FND_API.G_RET_STS_ERROR;

3204: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3205: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3206: , p_Token_Tbl => g_Token_Tbl
3207: );
3208: l_return_status := FND_API.G_RET_STS_ERROR;
3209: END IF;
3210:
3211: -- Validate rev_component attributes
3212:

Line 3218: p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR)

3214:
3215: IF p_rev_component_rec.transaction_type = Bom_GLOBALS.G_OPR_CREATE AND
3216: (p_rev_component_rec.from_end_item_unit_number IS NOT NULL
3217: OR
3218: p_rev_component_rec.from_end_item_unit_number <> FND_API.G_MISS_CHAR)
3219: THEN
3220: IF NOT ENG_Validate.End_Item_Unit_Number
3221: ( p_from_end_item_unit_number =>
3222: p_rev_component_rec.from_end_item_unit_number

Line 3228: x_return_status := FND_API.G_RET_STS_ERROR;

3224: p_rev_component_rec.component_item_id
3225: , x_err_text => l_err_text
3226: )
3227: THEN
3228: x_return_status := FND_API.G_RET_STS_ERROR;
3229: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3230: THEN
3231: g_token_tbl(1).token_name := 'FROM_END_ITEM_UNIT_NUMBER';
3232: g_token_tbl(1).token_value :=

Line 3248: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR)

3244:
3245: IF p_rev_component_rec.transaction_type = Bom_GLOBALS.G_OPR_CREATE AND
3246: (p_rev_component_rec.to_end_item_unit_number IS NOT NULL
3247: OR
3248: p_rev_component_rec.to_end_item_unit_number <> FND_API.G_MISS_CHAR)
3249: THEN
3250: IF NOT ENG_Validate.End_Item_Unit_Number
3251: ( p_from_end_item_unit_number =>
3252: p_rev_component_rec.to_end_item_unit_number

Line 3258: x_return_status := FND_API.G_RET_STS_ERROR;

3254: p_rev_comp_unexp_rec.component_item_id
3255: , x_err_text => l_err_text
3256: )
3257: THEN
3258: x_return_status := FND_API.G_RET_STS_ERROR;
3259: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
3260: THEN
3261: g_token_tbl(1).token_name := 'FROM_END_ITEM_UNIT_NUMBER';
3262: g_token_tbl(1).token_value :=

Line 3281: p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR

3277: END IF;
3278: END IF;
3279:
3280: IF p_rev_component_rec.transaction_type = Bom_GLOBALS.G_OPR_CREATE AND
3281: p_rev_component_rec.to_end_item_unit_number = FND_API.G_MISS_CHAR
3282: THEN
3283: Error_Handler.Add_Error_Token
3284: ( p_Message_Name => 'ENG_CMP_TO_UNIT_NUM_NULL'
3285: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3289: l_return_status := FND_API.G_RET_STS_ERROR;

3285: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3286: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3287: , p_Token_Tbl => g_Token_Tbl
3288: );
3289: l_return_status := FND_API.G_RET_STS_ERROR;
3290: END IF;
3291:
3292: IF p_rev_component_rec.wip_supply_type IS NOT NULL AND
3293: p_rev_component_rec.wip_supply_type = 7

Line 3308: l_return_status := FND_API.G_RET_STS_ERROR;

3304: , p_Token_Tbl => g_Token_Tbl
3305: );
3306: g_token_tbl.delete(2);
3307: END IF;
3308: l_return_status := FND_API.G_RET_STS_ERROR;
3309:
3310: ELSIF p_rev_component_rec.wip_supply_type IS NOT NULL AND
3311: p_rev_component_rec.wip_supply_type <> 7 AND
3312: NOT ENG_Validate.Wip_Supply_Type

Line 3334: l_return_status := FND_API.G_RET_STS_ERROR;

3330: g_token_tbl(1).token_value :=
3331: p_rev_component_rec.component_item_name;
3332:
3333: END IF;
3334: l_return_status := FND_API.G_RET_STS_ERROR;
3335: END IF;
3336:
3337: IF p_rev_component_rec.operation_sequence_number IS NOT NULL AND
3338: p_rev_component_rec.operation_sequence_number <= 0

Line 3349: l_return_status := FND_API.G_RET_STS_ERROR;

3345: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3346: , p_Token_Tbl => g_Token_Tbl
3347: );
3348: END IF;
3349: l_return_status := FND_API.G_RET_STS_ERROR;
3350: END IF;
3351:
3352: --dbms_output.put_line('After Operation Sequence Num . . . ' || l_return_status);
3353:

Line 3368: l_return_status := FND_API.G_RET_STS_ERROR;

3364: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3365: , p_token_tbl => g_Token_Tbl
3366: );
3367: END IF;
3368: l_return_status := FND_API.G_RET_STS_ERROR;
3369: END IF;
3370:
3371: IF p_rev_component_rec.projected_yield IS NOT NULL AND
3372: p_rev_component_rec.projected_yield < 0 OR

Line 3386: l_return_status := FND_API.G_RET_STS_ERROR;

3382: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3383: , p_token_tbl => g_token_tbl
3384: );
3385: END IF;
3386: l_return_status := FND_API.G_RET_STS_ERROR;
3387: END IF;
3388:
3389: IF p_rev_component_rec.include_in_cost_rollup IS NOT NULL AND
3390: p_rev_component_rec.include_in_cost_rollup NOT IN (1,2)

Line 3401: l_return_status := FND_API.G_RET_STS_ERROR;

3397: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3398: , p_Token_Tbl => g_Token_Tbl
3399: );
3400: END IF;
3401: l_return_status := FND_API.G_RET_STS_ERROR;
3402: END IF;
3403:
3404: IF p_rev_component_rec.SO_Basis IS NOT NULL AND
3405: p_rev_component_rec.SO_Basis NOT IN (1, 2)

Line 3416: l_return_status := FND_API.G_RET_STS_ERROR;

3412: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3413: , p_Token_Tbl => g_Token_Tbl
3414: );
3415: END IF;
3416: l_return_status := FND_API.G_RET_STS_ERROR;
3417: END IF;
3418:
3419: IF p_rev_component_rec.optional IS NOT NULL AND
3420: p_rev_component_rec.optional NOT IN (1, 2)

Line 3431: l_return_status := FND_API.G_RET_STS_ERROR;

3427: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3428: , p_Token_Tbl => g_Token_Tbl
3429: );
3430: END IF;
3431: l_return_status := FND_API.G_RET_STS_ERROR;
3432: END IF;
3433:
3434: IF p_rev_component_rec.mutually_exclusive IS NOT NULL AND
3435: p_rev_component_rec.mutually_exclusive NOT IN (1, 2)

Line 3446: l_return_status := FND_API.G_RET_STS_ERROR;

3442: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3443: , p_Token_Tbl => g_Token_Tbl
3444: );
3445: END IF;
3446: l_return_status := FND_API.G_RET_STS_ERROR;
3447: END IF;
3448:
3449: IF p_rev_component_rec.check_atp IS NOT NULL AND
3450: p_rev_component_rec.check_atp NOT IN (1, 2)

Line 3461: l_return_status := FND_API.G_RET_STS_ERROR;

3457: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3458: , p_Token_Tbl => g_Token_Tbl
3459: );
3460: END IF;
3461: l_return_status := FND_API.G_RET_STS_ERROR;
3462: END IF;
3463:
3464: IF p_rev_component_rec.shipping_allowed IS NOT NULL AND
3465: p_rev_component_rec.shipping_allowed NOT IN (1, 2)

Line 3476: l_return_status := FND_API.G_RET_STS_ERROR;

3472: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3473: , p_Token_Tbl => g_Token_Tbl
3474: );
3475: END IF;
3476: l_return_status := FND_API.G_RET_STS_ERROR;
3477: END IF;
3478:
3479: IF p_rev_component_rec.required_to_ship IS NOT NULL AND
3480: p_rev_component_rec.required_to_ship NOT IN (1, 2)

Line 3491: l_return_status := FND_API.G_RET_STS_ERROR;

3487: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3488: , p_Token_Tbl => g_Token_Tbl
3489: );
3490: END IF;
3491: l_return_status := FND_API.G_RET_STS_ERROR;
3492: END IF;
3493:
3494: IF p_rev_component_rec.required_for_revenue IS NOT NULL AND
3495: p_rev_component_rec.required_for_revenue NOT IN (1, 2)

Line 3506: l_return_status := FND_API.G_RET_STS_ERROR;

3502: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3503: , p_Token_Tbl => g_Token_Tbl
3504: );
3505: END IF;
3506: l_return_status := FND_API.G_RET_STS_ERROR;
3507: END IF;
3508:
3509: IF p_rev_component_rec.include_on_ship_docs IS NOT NULL AND
3510: p_rev_component_rec.include_on_ship_docs NOT IN (1, 2)

Line 3521: l_return_status := FND_API.G_RET_STS_ERROR;

3517: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3518: , p_Token_Tbl => g_Token_Tbl
3519: );
3520: END IF;
3521: l_return_status := FND_API.G_RET_STS_ERROR;
3522: END IF;
3523:
3524: IF p_rev_component_rec.quantity_related IS NOT NULL AND
3525: p_rev_component_rec.quantity_related NOT IN (1, 2)

Line 3536: l_return_status := FND_API.G_RET_STS_ERROR;

3532: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3533: , p_Token_Tbl => g_Token_Tbl
3534: );
3535: END IF;
3536: l_return_status := FND_API.G_RET_STS_ERROR;
3537: END IF;
3538:
3539: -- Done validating attributes
3540:

Line 3562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3558: , p_Mesg_Token_Tbl => l_Mesg_token_Tbl
3559: );
3560: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3561: END IF;
3562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3563:
3564: END Check_Attributes;
3565:
3566: PROCEDURE Check_Entity_Delete

Line 3573: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3569: , p_rev_component_rec IN Bom_Bo_Pub.Rev_Component_Rec_Type
3570: , p_Rev_Comp_Unexp_Rec IN Bom_Bo_Pub.Rev_Comp_Unexposed_Rec_Type
3571: )
3572: IS
3573: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3574: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3575:
3576: BEGIN
3577:

Line 3610: l_return_status := FND_API.G_RET_STS_ERROR;

3606: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3607: , p_Token_Tbl => g_Token_Tbl
3608: );
3609: END IF;
3610: l_return_status := FND_API.G_RET_STS_ERROR;
3611: EXCEPTION
3612: WHEN NO_DATA_FOUND THEN
3613: null; -- do nothing the record is valid.
3614: END;

Line 3622: WHEN FND_API.G_EXC_ERROR THEN

3618: x_return_status := l_return_status;
3619:
3620: EXCEPTION
3621:
3622: WHEN FND_API.G_EXC_ERROR THEN
3623:
3624: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3625: x_return_status := FND_API.G_RET_STS_ERROR;
3626:

Line 3625: x_return_status := FND_API.G_RET_STS_ERROR;

3621:
3622: WHEN FND_API.G_EXC_ERROR THEN
3623:
3624: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3625: x_return_status := FND_API.G_RET_STS_ERROR;
3626:
3627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3628: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3623:
3624: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3625: x_return_status := FND_API.G_RET_STS_ERROR;
3626:
3627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3628: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3630:
3631: WHEN OTHERS THEN

Line 3629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3625: x_return_status := FND_API.G_RET_STS_ERROR;
3626:
3627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3628: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3630:
3631: WHEN OTHERS THEN
3632: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3630:
3631: WHEN OTHERS THEN
3632: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3634:
3635: END Check_Entity_Delete;
3636:
3637: /*****************************************************************************

Line 3694: l_return_status := FND_API.G_RET_STS_ERROR;

3690: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3691: , p_message_name => 'ENG_REV_COMP_ALREADY_EXISTS'
3692: , p_token_tbl => l_token_tbl
3693: );
3694: l_return_status := FND_API.G_RET_STS_ERROR;
3695: ELSIF l_return_status = Bom_Globals.G_RECORD_NOT_FOUND AND
3696: p_rev_component_rec.transaction_type IN
3697: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
3698: THEN

Line 3705: l_return_status := FND_API.G_RET_STS_ERROR;

3701: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3702: , p_message_name => 'ENG_REV_COMP_DOESNOT_EXIST'
3703: , p_token_tbl => l_token_tbl
3704: );
3705: l_return_status := FND_API.G_RET_STS_ERROR;
3706: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
3707: THEN
3708: Error_Handler.Add_Error_Token
3709: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl

Line 3706: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR

3702: , p_message_name => 'ENG_REV_COMP_DOESNOT_EXIST'
3703: , p_token_tbl => l_token_tbl
3704: );
3705: l_return_status := FND_API.G_RET_STS_ERROR;
3706: ELSIF l_Return_status = FND_API.G_RET_STS_UNEXP_ERROR
3707: THEN
3708: Error_Handler.Add_Error_Token
3709: ( x_Mesg_token_tbl => l_Mesg_Token_Tbl
3710: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 3719: l_return_status := FND_API.G_RET_STS_SUCCESS;

3715: p_rev_component_rec.component_item_name
3716: , p_token_tbl => l_token_tbl
3717: );
3718: ELSE
3719: l_return_status := FND_API.G_RET_STS_SUCCESS;
3720: END IF;
3721:
3722: x_return_status := l_return_status;
3723: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;

Line 3757: l_return_status := FND_API.G_RET_STS_SUCCESS;

3753: l_return_status VARCHAR2(1);
3754: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
3755:
3756: BEGIN
3757: l_return_status := FND_API.G_RET_STS_SUCCESS;
3758:
3759: /******************************************************************
3760: --
3761: -- In case of an update, based on the revised item information

Line 3794: l_return_status := FND_API.G_RET_STS_ERROR;

3790: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3791: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3792: , p_Token_Tbl => l_Token_Tbl
3793: );
3794: l_return_status := FND_API.G_RET_STS_ERROR;
3795: END IF;
3796: END LOOP;
3797: END IF;
3798:

Line 3876: l_return_status := FND_API.G_RET_STS_SUCCESS;

3872: WHERE inventory_item_id = p_component_item_id
3873: AND organization_id = p_organization_id;
3874:
3875: BEGIN
3876: l_return_status := FND_API.G_RET_STS_SUCCESS;
3877:
3878: --
3879: -- Revised Item Access check should be done by the calling
3880: -- program

Line 3894: IF l_return_status <> FND_API.G_RET_STS_SUCCESS

3890: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3891: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3892: , x_Return_Status => l_Return_Status
3893: );
3894: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
3895: THEN
3896: x_Return_Status := l_return_status;
3897: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
3898:

Line 3949: l_return_status := FND_API.G_RET_STS_ERROR;

3945: , x_Mesg_Token_Tbl => l_mesg_token_tbl
3946: , p_Token_Tbl => l_token_tbl
3947: );
3948: l_token_tbl.DELETE(2);
3949: l_return_status := FND_API.G_RET_STS_ERROR;
3950: END IF;
3951:
3952: IF l_rev_comp_item_type = 5 /* Product Family */
3953: THEN

Line 3960: l_return_status := FND_API.G_RET_STS_ERROR;

3956: , p_Mesg_Token_Tbl => l_mesg_token_tbl
3957: , x_Mesg_Token_Tbl => l_mesg_token_tbl
3958: , p_Token_Tbl => l_token_tbl
3959: );
3960: l_return_status := FND_API.G_RET_STS_ERROR;
3961: END IF;
3962:
3963: /****************************************************************
3964: --

Line 3986: l_return_status := FND_API.G_RET_STS_ERROR;

3982: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3983: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
3984: , p_Token_Tbl => l_token_tbl
3985: );
3986: l_return_status := FND_API.G_RET_STS_ERROR;
3987: END LOOP;
3988: END IF;
3989:
3990: /*********************************************************************

Line 4029: l_return_status := FND_API.G_RET_STS_ERROR;

4025: , p_Mesg_Token_Tbl => l_mesg_token_tbl
4026: , x_Mesg_Token_Tbl => l_mesg_token_tbl
4027: , p_Token_Tbl => l_token_tbl
4028: );
4029: l_return_status := FND_API.G_RET_STS_ERROR;
4030: END IF;
4031:
4032: /**************************************************************
4033: --

Line 4059: l_return_status := FND_API.G_RET_STS_ERROR;

4055:
4056: l_token_tbl(2).token_name := 'REVISED_COMPONENT_NAME';
4057: l_token_tbl(2).token_value := p_component_name;
4058:
4059: l_return_status := FND_API.G_RET_STS_ERROR;
4060:
4061: Error_Handler.Add_Error_Token
4062: ( p_Message_Name => l_error_name
4063: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl