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_DEFAULT_REVISED_ITEM dependencies on ERROR_HANDLER

Line 95: Error_Handler.Write_Debug('FUNCTION Get_Routing_Sequence, RTG Seq Id is: ' || to_char(l_rtg_sequence_id));

91: NVL(g_revised_item_rec.alternate_bom_code, 'NONE')
92: AND organization_id = g_rev_item_unexp_rec.organization_id;
93:
94: IF Bom_Globals.Get_Debug = 'Y' THEN
95: Error_Handler.Write_Debug('FUNCTION Get_Routing_Sequence, RTG Seq Id is: ' || to_char(l_rtg_sequence_id));
96: END IF;
97:
98: RETURN l_rtg_sequence_id;
99:

Line 387: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

383: ( p_revised_item_rec IN ENG_Eco_PUB.Revised_Item_Rec_Type
384: , p_rev_item_unexp_rec IN Eng_Eco_Pub.Rev_Item_Unexposed_Rec_Type
385: , x_revised_item_rec IN OUT NOCOPY ENG_Eco_PUB.Revised_Item_Rec_Type
386: , x_rev_item_unexp_rec IN OUT NOCOPY Eng_Eco_Pub.Rev_Item_Unexposed_rec_type
387: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
388: , x_return_status OUT NOCOPY VARCHAR2
389: )
390: IS
391: l_revision VARCHAR2(3);

Line 507: Error_Handler.Write_Debug('Getting Bill Seq Id . . . : ' ||

503: THEN
504: g_rev_item_unexp_rec.bill_sequence_id := Get_Bill_Sequence;
505:
506: IF Bom_Globals.Get_Debug = 'Y' THEN
507: Error_Handler.Write_Debug('Getting Bill Seq Id . . . : ' ||
508: to_char(g_rev_item_unexp_rec.bill_sequence_id));
509: END IF;
510:
511: END IF;

Line 590: Error_Handler.Write_Debug('Getting Routing Seq Id . . . : ' ||

586: THEN
587: g_rev_item_unexp_rec.routing_sequence_id := Get_Routing_Sequence;
588:
589: IF Bom_Globals.Get_Debug = 'Y' THEN
590: Error_Handler.Write_Debug('Getting Routing Seq Id . . . : ' ||
591: to_char(g_rev_item_unexp_rec.routing_sequence_id));
592: END IF;
593:
594: END IF;

Line 1344: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1340: , p_control_rec IN BOM_BO_Pub.Control_Rec_Type
1341: := BOM_BO_PUB.G_DEFAULT_CONTROL_REC
1342: , x_revised_item_rec IN OUT NOCOPY ENG_Eco_PUB.Revised_Item_Rec_Type
1343: , x_rev_item_unexp_rec IN OUT NOCOPY Eng_Eco_Pub.Rev_Item_Unexposed_Rec_Type
1344: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1345: , x_return_status OUT NOCOPY VARCHAR2
1346: )
1347: IS
1348: l_schedule_id NUMBER := NULL;

Line 1425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

1421:
1422: -- Added by MK on 09/01/2000
1423:
1424:
1425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1426: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1427: -- Added for bug 4210718
1428: l_revEffStrc_exists NUMBER;
1429: l_structure_type_id NUMBER;

Line 1426: l_Token_Tbl Error_Handler.Token_Tbl_Type;

1422: -- Added by MK on 09/01/2000
1423:
1424:
1425: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
1426: l_Token_Tbl Error_Handler.Token_Tbl_Type;
1427: -- Added for bug 4210718
1428: l_revEffStrc_exists NUMBER;
1429: l_structure_type_id NUMBER;
1430: l_cp_not_allowed NUMBER;

Line 1450: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing Entity Level Defaulting . . .'); END IF;

1446: l_Item_Details_Rec c_Get_Item_Details%ROWTYPE;
1447: l_Org_Details_Rec c_Get_Org_Details%ROWTYPE;
1448: BEGIN
1449:
1450: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing Entity Level Defaulting . . .'); END IF;
1451:
1452: -- Initialize flags
1453:
1454: G_SCHED_DATE_CHANGED := FALSE;

Line 1484: Error_Handler.Add_Error_Token

1480:
1481: l_Token_Tbl(1).Token_Name := 'ECO_NAME';
1482: l_Token_Tbl(1).Token_Value := p_revised_item_rec.eco_name;
1483:
1484: Error_Handler.Add_Error_Token
1485: ( p_Message_Name => 'ENG_APPROVE_WARNING'
1486: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1487: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1488: , p_Token_Tbl => l_Token_Tbl

Line 1529: Error_Handler.Add_Error_Token

1525: l_revised_item_rec.updated_routing_revision <> FND_API.G_MISS_CHAR
1526: THEN
1527: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1528: THEN
1529: Error_Handler.Add_Error_Token
1530: ( p_Message_Name => 'ENG_RIT_SET_REV_NULL'
1531: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1532: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1533: , p_Token_Tbl => l_Token_Tbl

Line 1567: Error_Handler.Write_Debug('In transaction type = Create, Checking for revised item revision: ' ||

1563: ENG_Globals.G_OPR_CREATE
1564: THEN
1565:
1566: IF Bom_Globals.Get_Debug = 'Y' THEN
1567: Error_Handler.Write_Debug('In transaction type = Create, Checking for revised item revision: ' ||
1568: p_revised_item_rec.new_revised_item_revision);
1569: END IF;
1570: FOR x_count IN
1571: c_CheckRevision

Line 1577: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current Revision Found . . .'); END IF;

1573: l_revised_item_rec.new_revised_item_revision
1574: )
1575: LOOP
1576:
1577: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current Revision Found . . .'); END IF;
1578:
1579: l_rev_already_exists := 1;
1580: END LOOP;
1581:

Line 1598: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Insert . . .'); END IF;

1594: IF l_revised_item_rec.new_revised_item_revision <>
1595: l_current_revision AND
1596: l_rev_already_exists = 0
1597: THEN
1598: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Insert . . .'); END IF;
1599:
1600: G_DEL_UPD_INS_ITEM_REV := 3;
1601: ELSIF l_rev_already_exists = 1 THEN
1602:

Line 1603: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update . . .'); END IF;

1599:
1600: G_DEL_UPD_INS_ITEM_REV := 3;
1601: ELSIF l_rev_already_exists = 1 THEN
1602:
1603: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update . . .'); END IF;
1604:
1605: G_DEL_UPD_INS_ITEM_REV := 2;
1606: END IF;
1607:

Line 1613: Error_Handler.Write_Debug('In transaction type = Update , Checking for revised item revision: ' ||

1609: ENG_Globals.G_OPR_UPDATE
1610: THEN
1611:
1612: IF Bom_Globals.Get_Debug = 'Y' THEN
1613: Error_Handler.Write_Debug('In transaction type = Update , Checking for revised item revision: ' ||
1614: l_revised_item_rec.updated_revised_item_revision );
1615: END IF;
1616:
1617: l_current_revision :=

Line 1647: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Insert . . .'); END IF;

1643: IF l_revised_item_rec.new_revised_item_revision IS NULL OR
1644: l_revised_item_rec.new_revised_item_revision
1645: = l_current_revision -- Added by MK on 02/13/2001
1646: THEN
1647: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Insert . . .'); END IF;
1648:
1649: G_DEL_UPD_INS_ITEM_REV := 3;
1650: ELSE
1651: --

Line 1656: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update. . .'); END IF;

1652: -- Modified by MK on 10/24/00
1653: -- Update new revision information into
1654: -- MTL_ITEM_REVISIONS
1655: --
1656: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update. . .'); END IF;
1657: G_DEL_UPD_INS_ITEM_REV := 2 ;
1658: END IF ;
1659:
1660: ELSIF ( ( l_rev_already_exists = 0

Line 1679: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Delete . . .'); END IF;

1675: -- Commented as it is within the
1676: -- l_revised_item_rec.transaction_type = ENG_Globals.G_OPR_UPDATE Condition
1677: THEN
1678:
1679: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Delete . . .'); END IF;
1680:
1681: G_DEL_UPD_INS_ITEM_REV := 1;
1682:
1683: ELSIF l_rev_already_exists = 1 AND

Line 1690: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update. . .'); END IF;

1686: THEN
1687:
1688: -- Update new item revision information in
1689: -- MTL_ITEM_REVISIONS
1690: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Item Revision set for Update. . .'); END IF;
1691: G_DEL_UPD_INS_ITEM_REV := 2;
1692:
1693: END IF; /* If Update Ends */
1694:

Line 1735: Error_Handler.Write_Debug('After Check if structure change policy is existing...'||to_char(l_cp_not_allowed)) ;

1731: , x_structure_type_id => l_structure_type_id
1732: , x_strc_cp_not_allowed => l_cp_not_allowed
1733: );
1734: IF Bom_Globals.Get_Debug = 'Y' THEN
1735: Error_Handler.Write_Debug('After Check if structure change policy is existing...'||to_char(l_cp_not_allowed)) ;
1736: Error_Handler.Write_Debug('structure change policy Structure Type Id...'||to_char(l_structure_type_id)) ;
1737: END IF;
1738: IF l_cp_not_allowed = 2
1739: THEN

Line 1736: Error_Handler.Write_Debug('structure change policy Structure Type Id...'||to_char(l_structure_type_id)) ;

1732: , x_strc_cp_not_allowed => l_cp_not_allowed
1733: );
1734: IF Bom_Globals.Get_Debug = 'Y' THEN
1735: Error_Handler.Write_Debug('After Check if structure change policy is existing...'||to_char(l_cp_not_allowed)) ;
1736: Error_Handler.Write_Debug('structure change policy Structure Type Id...'||to_char(l_structure_type_id)) ;
1737: END IF;
1738: IF l_cp_not_allowed = 2
1739: THEN
1740: BEGIN

Line 1762: Error_Handler.Write_Debug('After Check if revision eff structure is existing...'||to_char(l_revEffStrc_exists)) ;

1758: OPEN c_Get_Org_Details;
1759: FETCH c_Get_Org_Details INTO l_Org_Details_Rec;
1760: CLOSE c_Get_Org_Details;
1761: IF Bom_Globals.Get_Debug = 'Y' THEN
1762: Error_Handler.Write_Debug('After Check if revision eff structure is existing...'||to_char(l_revEffStrc_exists)) ;
1763: END IF;
1764: -- Added check for OPM Convergence
1765: -- Bills shouldnt get created when the organization is a process enabled org
1766: -- and the assembly item is model or optional or it is dual UOM contralled

Line 1775: Error_Handler.Write_Debug('Bill seq id is generated for an alternate BOM . . . : ' ||

1771: AND l_Item_Details_Rec.tracking_quantity_ind = 'P')
1772: THEN
1773: l_rev_item_unexp_rec.bill_sequence_id := Initialize_Bill_Sequence_Id;
1774: IF Bom_Globals.Get_Debug = 'Y' THEN
1775: Error_Handler.Write_Debug('Bill seq id is generated for an alternate BOM . . . : ' ||
1776: to_char(l_rev_item_unexp_rec.bill_sequence_id ));
1777: END IF;
1778: IF Bom_Globals.Get_Debug = 'Y' THEN
1779: Error_Handler.Write_Debug('Setting creat alternate bill flag to True. . . ' ) ;

Line 1779: Error_Handler.Write_Debug('Setting creat alternate bill flag to True. . . ' ) ;

1775: Error_Handler.Write_Debug('Bill seq id is generated for an alternate BOM . . . : ' ||
1776: to_char(l_rev_item_unexp_rec.bill_sequence_id ));
1777: END IF;
1778: IF Bom_Globals.Get_Debug = 'Y' THEN
1779: Error_Handler.Write_Debug('Setting creat alternate bill flag to True. . . ' ) ;
1780: END IF;
1781: G_CREATE_ALTERNATE := TRUE;
1782: END IF;
1783: END IF;

Line 1794: Error_Handler.Add_Error_Token

1790: IF (l_revised_item_rec.alternate_bom_code IS NOT NULL OR
1791: l_rev_item_unexp_rec.structure_type_id IS NOT NULL) AND NOT G_CREATE_ALTERNATE
1792: THEN
1793: l_token_tbl.delete;
1794: Error_Handler.Add_Error_Token
1795: ( p_Message_Name => 'ENG_IGNORE_STRUCTURE_CREATION'
1796: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1797: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1798: , p_Token_Tbl => l_Token_Tbl

Line 1823: Error_Handler.Write_Debug('BillSeq Defaulted to: ' ||

1819: END LOOP;
1820:
1821: IF Bom_Globals.Get_Debug = 'Y'
1822: THEN
1823: Error_Handler.Write_Debug('BillSeq Defaulted to: ' ||
1824: to_char(l_rev_item_unexp_rec.bill_sequence_id));
1825: END IF;
1826: END IF;
1827: ************************************************************************/

Line 1833: Error_Handler.Write_Debug('Before Getting New Scheduled Date, Start Effective Date : '

1829:
1830: -- If either Use Up Plan or Use Up Item has changed, get new scheduled date
1831:
1832: IF Bom_Globals.Get_Debug = 'Y' THEN
1833: Error_Handler.Write_Debug('Before Getting New Scheduled Date, Start Effective Date : '
1834: ||to_char(l_revised_item_rec.start_effective_date) );
1835: END IF;
1836:
1837: IF p_control_rec.caller_type <> 'FORM' -- Bug1906633

Line 1863: Error_Handler.Write_Debug('If either Use Up Plan or Use Up Item has changed, get new scheduled date');

1859: )
1860: THEN
1861:
1862: IF Bom_Globals.Get_Debug = 'Y' THEN
1863: Error_Handler.Write_Debug('If either Use Up Plan or Use Up Item has changed, get new scheduled date');
1864: Error_Handler.Write_Debug('Use Up Item Id : ' ||to_char(l_rev_item_unexp_rec.use_up_item_id ) );
1865: Error_Handler.Write_Debug('Use Up Plan Name : ' ||l_revised_item_rec.use_up_plan_name );
1866: END IF;
1867:

Line 1864: Error_Handler.Write_Debug('Use Up Item Id : ' ||to_char(l_rev_item_unexp_rec.use_up_item_id ) );

1860: THEN
1861:
1862: IF Bom_Globals.Get_Debug = 'Y' THEN
1863: Error_Handler.Write_Debug('If either Use Up Plan or Use Up Item has changed, get new scheduled date');
1864: Error_Handler.Write_Debug('Use Up Item Id : ' ||to_char(l_rev_item_unexp_rec.use_up_item_id ) );
1865: Error_Handler.Write_Debug('Use Up Plan Name : ' ||l_revised_item_rec.use_up_plan_name );
1866: END IF;
1867:
1868: IF l_rev_item_unexp_rec.use_up_item_id IS NOT NULL AND

Line 1865: Error_Handler.Write_Debug('Use Up Plan Name : ' ||l_revised_item_rec.use_up_plan_name );

1861:
1862: IF Bom_Globals.Get_Debug = 'Y' THEN
1863: Error_Handler.Write_Debug('If either Use Up Plan or Use Up Item has changed, get new scheduled date');
1864: Error_Handler.Write_Debug('Use Up Item Id : ' ||to_char(l_rev_item_unexp_rec.use_up_item_id ) );
1865: Error_Handler.Write_Debug('Use Up Plan Name : ' ||l_revised_item_rec.use_up_plan_name );
1866: END IF;
1867:
1868: IF l_rev_item_unexp_rec.use_up_item_id IS NOT NULL AND
1869: l_rev_item_unexp_rec.use_up_item_id <> FND_API.G_MISS_NUM AND -- Added by MK on 10/31/00

Line 1898: Error_Handler.Write_Debug('After getting new schedule date, Start Effective Date : '

1894: END IF;
1895:
1896: END IF; -- Bug 1906633
1897: IF Bom_Globals.Get_Debug = 'Y' THEN
1898: Error_Handler.Write_Debug('After getting new schedule date, Start Effective Date : '
1899: ||to_char(l_revised_item_rec.start_effective_date) );
1900: END IF;
1901:
1902: /* -- Moved to ENGLRITB.pls where this flag is set based on

Line 1927: Error_Handler.Write_Debug('Scheduled Date is been trying to udpate. . .');

1923: <> p_old_revised_item_rec.start_effective_date)
1924: THEN
1925:
1926: IF Bom_Globals.Get_Debug = 'Y' THEN
1927: Error_Handler.Write_Debug('Scheduled Date is been trying to udpate. . .');
1928: END IF;
1929: G_SCHED_DATE_CHANGED := TRUE;
1930: END IF;
1931:

Line 1933: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Defualting based on Status Type . . .'); END IF;

1929: G_SCHED_DATE_CHANGED := TRUE;
1930: END IF;
1931:
1932:
1933: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Defualting based on Status Type . . .'); END IF;
1934:
1935: IF l_revised_item_rec.status_type <>
1936: p_old_revised_item_rec.status_type
1937: THEN

Line 1964: /* IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if status type = HOLD . . .'); END IF;*/

1960: END IF;
1961:
1962: -- Hold
1963:
1964: /* IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking if status type = HOLD . . .'); END IF;*/
1965:
1966: /* Changed upon ITI's request. Earlier warnings weren't being
1967: logged and mrp_active blindly being overwritten
1968: By AS on 11/10/99

Line 1979: Error_Handler.Add_Error_Token

1975: THEN
1976: l_revised_item_rec.mrp_active := 2;
1977: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1978: THEN
1979: Error_Handler.Add_Error_Token
1980: ( p_Message_Name => 'ENG_SET_MRP_ACTIVE_NO'
1981: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1982: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1983: , p_Token_Tbl => l_Token_Tbl

Line 1999: Error_Handler.Add_Error_Token

1995: THEN
1996: l_revised_item_rec.mrp_active := 1;
1997: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1998: THEN
1999: Error_Handler.Add_Error_Token
2000: ( p_Message_Name => 'ENG_SET_MRP_ACTIVE_YES'
2001: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2002: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2003: , p_Token_Tbl => l_Token_Tbl

Line 2102: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

2098: OR
2099: l_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_CREATE
2100: THEN
2101:
2102: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
2103: ( 'Checking for routing revision: ' || p_revised_item_rec.new_routing_revision );
2104: END IF;
2105:
2106: IF l_revised_item_rec.transaction_type =

Line 2113: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current Routing Revision Found . . .'); END IF;

2109: FOR x_count IN c_Rtg_CheckRevision
2110: ( p_revision => l_revised_item_rec.new_routing_revision)
2111: LOOP
2112:
2113: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current Routing Revision Found . . .'); END IF;
2114:
2115: l_rtg_rev_already_exists := 1;
2116: END LOOP;
2117:

Line 2132: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Insert . . .'); END IF;

2128: IF l_revised_item_rec.new_routing_revision <> l_current_rtg_revision AND
2129: l_rtg_rev_already_exists = 0
2130: THEN
2131:
2132: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Insert . . .'); END IF;
2133:
2134: G_DEL_UPD_INS_RTG_REV := 3;
2135: ELSIF l_rtg_rev_already_exists = 1 THEN
2136:

Line 2137: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update . . .'); END IF;

2133:
2134: G_DEL_UPD_INS_RTG_REV := 3;
2135: ELSIF l_rtg_rev_already_exists = 1 THEN
2136:
2137: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update . . .'); END IF;
2138:
2139: G_DEL_UPD_INS_RTG_REV := 2;
2140: END IF;
2141:

Line 2171: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Insert . . .'); END IF;

2167: IF l_revised_item_rec.new_routing_revision IS NULL OR
2168: l_revised_item_rec.new_routing_revision
2169: = l_current_rtg_revision -- Added by MK on 02/13/2001
2170: THEN
2171: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Insert . . .'); END IF;
2172:
2173: G_DEL_UPD_INS_RTG_REV := 3;
2174: ELSE
2175: --

Line 2180: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update. . .'); END IF;

2176: -- Modified by MK on 10/24/00
2177: -- Update new routing revision information into
2178: -- MTL_RTG_ITEM_REVISIONS
2179: --
2180: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update. . .'); END IF;
2181:
2182: G_DEL_UPD_INS_RTG_REV := 2 ;
2183:
2184: END IF ;

Line 2199: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Delete. . .'); END IF;

2195: = l_current_rtg_revision
2196: )
2197: THEN
2198:
2199: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Delete. . .'); END IF;
2200:
2201: G_DEL_UPD_INS_RTG_REV := 1;
2202:
2203: ELSIF l_rtg_rev_already_exists = 1 AND

Line 2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update. . .'); END IF;

2205: THEN
2206: -- Update new routing revision information in
2207: -- MTL_RTG_ITEM_REVISIONS
2208:
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision set for Update. . .'); END IF;
2210: G_DEL_UPD_INS_RTG_REV := 2;
2211:
2212: END IF; /* If Update Ends */
2213: END IF; /* If Create or Update Ends */

Line 2244: Error_Handler.Write_Debug('Routing seq id is generated for an alternate routing . . . : ' ||

2240: Bom_Default_Rtg_Header.Get_Routing_Sequence ;
2241: -- to generate new routing sequence id
2242:
2243: IF Bom_Globals.Get_Debug = 'Y' THEN
2244: Error_Handler.Write_Debug('Routing seq id is generated for an alternate routing . . . : ' ||
2245: to_char(l_rev_item_unexp_rec.routing_sequence_id));
2246: END IF;
2247:
2248: IF Bom_Globals.Get_Debug = 'Y' THEN

Line 2249: Error_Handler.Write_Debug('Setting creat alternate bill flag to True. . . ' ) ;

2245: to_char(l_rev_item_unexp_rec.routing_sequence_id));
2246: END IF;
2247:
2248: IF Bom_Globals.Get_Debug = 'Y' THEN
2249: Error_Handler.Write_Debug('Setting creat alternate bill flag to True. . . ' ) ;
2250: END IF;
2251:
2252: G_CREATE_RTG_ALTERNATE := TRUE;
2253:

Line 2277: Error_Handler.Write_Debug('Routing Seq Id Defaulted to: ' ||

2273: routing_seq.routing_sequence_id;
2274: END LOOP;
2275:
2276: IF Bom_Globals.Get_Debug = 'Y' THEN
2277: Error_Handler.Write_Debug('Routing Seq Id Defaulted to: ' ||
2278: to_char(l_rev_item_unexp_rec.routing_sequence_id));
2279: END IF;
2280:
2281: END IF;

Line 2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;

2335: -- Added by MK on 09/01/2000
2336: ***********************************************************************/
2337:
2338: IF Bom_Globals.Get_Debug = 'Y' THEN
2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;
2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;

Line 2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;

2336: ***********************************************************************/
2337:
2338: IF Bom_Globals.Get_Debug = 'Y' THEN
2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;
2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;

Line 2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;

2337:
2338: IF Bom_Globals.Get_Debug = 'Y' THEN
2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;
2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;
2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;

Line 2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;

2338: IF Bom_Globals.Get_Debug = 'Y' THEN
2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;
2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;
2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;
2346: END IF ;

Line 2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;

2339: Error_Handler.Write_Debug('Before MRP Active and WIP Update Defaulting') ;
2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;
2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;
2346: END IF ;
2347:

Line 2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;

2340: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;
2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;
2346: END IF ;
2347:
2348: -- Modified by MK on 10/30/2000

Line 2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;

2341: Error_Handler.Write_Debug('Update Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2342: Error_Handler.Write_Debug('Lot Num : ' || l_revised_item_rec.lot_number ) ;
2343: Error_Handler.Write_Debug('Cum Qty : ' || to_char(l_revised_item_rec.from_cumulative_quantity)) ;
2344: Error_Handler.Write_Debug('From Wo : ' || to_char(l_rev_item_unexp_rec.from_wip_entity_id )) ;
2345: Error_Handler.Write_Debug('To Wo : ' || to_char(l_rev_item_unexp_rec.to_wip_entity_id)) ;
2346: END IF ;
2347:
2348: -- Modified by MK on 10/30/2000
2349: IF l_revised_item_rec.transaction_type = ENG_Globals.G_OPR_CREATE

Line 2364: Error_Handler.Write_Debug('Mrp Active and Update Wip are set to Yes') ;

2360: l_revised_item_rec.mrp_active := 2;
2361: l_revised_item_rec.update_wip := 1;
2362:
2363: IF Bom_Globals.Get_Debug = 'Y' THEN
2364: Error_Handler.Write_Debug('Mrp Active and Update Wip are set to Yes') ;
2365: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2366: Error_Handler.Write_Debug('UPDATE Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2367: END IF ;
2368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 2365: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;

2361: l_revised_item_rec.update_wip := 1;
2362:
2363: IF Bom_Globals.Get_Debug = 'Y' THEN
2364: Error_Handler.Write_Debug('Mrp Active and Update Wip are set to Yes') ;
2365: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2366: Error_Handler.Write_Debug('UPDATE Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2367: END IF ;
2368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2369: THEN

Line 2366: Error_Handler.Write_Debug('UPDATE Wip: ' || to_char(l_revised_item_rec.update_wip )) ;

2362:
2363: IF Bom_Globals.Get_Debug = 'Y' THEN
2364: Error_Handler.Write_Debug('Mrp Active and Update Wip are set to Yes') ;
2365: Error_Handler.Write_Debug('MRP Active : ' || to_char(l_revised_item_rec.mrp_active )) ;
2366: Error_Handler.Write_Debug('UPDATE Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2367: END IF ;
2368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2369: THEN
2370: Error_Handler.Add_Error_Token

Line 2370: Error_Handler.Add_Error_Token

2366: Error_Handler.Write_Debug('UPDATE Wip: ' || to_char(l_revised_item_rec.update_wip )) ;
2367: END IF ;
2368: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2369: THEN
2370: Error_Handler.Add_Error_Token
2371: ( p_Message_Name => 'ENG_SET_WO_EFFECTIVITY_FLAG'
2372: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2373: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2374: , p_Token_Tbl => l_Token_Tbl

Line 2393: Error_Handler.Write_Debug('Eco for Prod has been changed. . . Yes') ;

2389: )
2390: THEN
2391:
2392: IF Bom_Globals.Get_Debug = 'Y' THEN
2393: Error_Handler.Write_Debug('Eco for Prod has been changed. . . Yes') ;
2394: END IF ;
2395: G_ECO_FOR_PROD_CHANGED := TRUE;
2396: END IF;
2397: