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_REVISED_ITEM_UTIL dependencies on BOM_GLOBALS

Line 779: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating revised item . . . seq id : ' ||

775: l_prog_id := ENG_GLOBALS.Get_prog_id;
776:
777:
778:
779: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating revised item . . . seq id : ' ||
780: to_char(p_rev_item_unexp_rec.revised_item_sequence_id));
781: END IF;
782:
783: IF (p_control_rec.caller_type = 'FORM' AND

Line 899: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating revised item is completed'); END IF;

895:
896: x_return_status := FND_API.G_RET_STS_SUCCESS;
897:
898:
899: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating revised item is completed'); END IF;
900:
901: EXCEPTION
902: WHEN NO_DATA_FOUND THEN
903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no data stmt_num '|| l_stmt_num); END IF;

Line 903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no data stmt_num '|| l_stmt_num); END IF;

899: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating revised item is completed'); END IF;
900:
901: EXCEPTION
902: WHEN NO_DATA_FOUND THEN
903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no data stmt_num '|| l_stmt_num); END IF;
904: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
905: THEN
906: Error_Handler.Add_Error_Token
907: ( p_Message_Name => 'ENG_REV_ITEM_REC_DELETED'

Line 915: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('un exp stmt_num '|| l_stmt_num); END IF;

911: END IF;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913:
914: WHEN OTHERS THEN
915: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('un exp stmt_num '|| l_stmt_num); END IF;
916: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
917: THEN
918: l_err_text := G_PKG_NAME || ' : Utility (Revised Item Update) '
919: || SUBSTR(SQLERRM, 1, 200);

Line 920: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(l_err_text); END IF;

916: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
917: THEN
918: l_err_text := G_PKG_NAME || ' : Utility (Revised Item Update) '
919: || SUBSTR(SQLERRM, 1, 200);
920: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(l_err_text); END IF;
921: IF FND_MSG_PUB.Check_Msg_Level
922: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
923: THEN
924: Error_Handler.Add_Error_Token

Line 936: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validation controller is '||p_control_rec.validation_controller); END IF;

932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
933: END;
934: END IF; -- if call is from form, and side effects processing not requested.
935:
936: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validation controller is '||p_control_rec.validation_controller); END IF;
937:
938: -- If call if from form, execute this block of code only if side effects
939: -- processing has been requested
940: -- By AS on 10/13/99

Line 947: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing SIDE_EFFECTS'); END IF;

943: OR
944: p_control_rec.caller_type <> 'FORM'
945: THEN
946:
947: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing SIDE_EFFECTS'); END IF;
948:
949: /*********************************************************************
950: --
951: -- If the user has updated the status to 5 i.e. cancel, then

Line 1005: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Action on Item Revision is :'||to_char(Eng_Default_Revised_Item.G_DEL_UPD_INS_ITEM_REV) ); END IF;

1001: if any existing need to be deleted ro modified.
1002: */
1003:
1004: BEGIN
1005: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Action on Item Revision is :'||to_char(Eng_Default_Revised_Item.G_DEL_UPD_INS_ITEM_REV) ); END IF;
1006: IF Eng_Default_Revised_Item.G_DEL_UPD_INS_ITEM_REV = 1
1007: THEN
1008: -- Delete record from MTL_ITEM_REVISIONS if it already
1009: -- exists

Line 1010: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Deleting Item Revisions . . .'); END IF;

1006: IF Eng_Default_Revised_Item.G_DEL_UPD_INS_ITEM_REV = 1
1007: THEN
1008: -- Delete record from MTL_ITEM_REVISIONS if it already
1009: -- exists
1010: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Deleting Item Revisions . . .'); END IF;
1011:
1012: l_stmt_num := 3;
1013: ENG_REVISED_ITEMS_PKG.Delete_Item_Revisions
1014: ( x_change_notice =>

Line 1028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating Item Revisions . . .');

1024: THEN
1025: -- Update new item revision information in
1026: -- MTL_ITEM_REVISIONS
1027:
1028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating Item Revisions . . .');
1029: END IF;
1030:
1031: /*
1032: IF Bom_Globals.Get_Debug = 'Y' THEN

Line 1032: IF Bom_Globals.Get_Debug = 'Y' THEN

1028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating Item Revisions . . .');
1029: END IF;
1030:
1031: /*
1032: IF Bom_Globals.Get_Debug = 'Y' THEN
1033: Error_Handler.Write_Debug(p_revised_item_rec.updated_revised_item_revision
1034: || p_revised_item_rec.start_effective_date
1035: ||p_revised_item_rec.new_effective_date
1036: || p_revised_item_rec.eco_name

Line 1142: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting Item Revisions . . .'); END IF;

1138: THEN
1139: -- Insert new record if revision record doesn't already
1140: -- exist
1141:
1142: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting Item Revisions . . .'); END IF;
1143: l_stmt_num := 5;
1144: IF (p_revised_item_rec.new_effective_date is NULL) THEN
1145: ENG_REVISED_ITEMS_PKG.Insert_Item_Revisions
1146: ( x_inventory_item_id =>

Line 1249: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Deleting Routing Revisions . . .'); END IF;

1245: IF Eng_Default_Revised_Item.G_DEL_UPD_INS_RTG_REV = 1
1246: THEN
1247: -- Delete record from MTL_RTG_ITEM_REVISIONS if it already
1248: -- exists
1249: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Deleting Routing Revisions . . .'); END IF;
1250:
1251: DELETE FROM MTL_RTG_ITEM_REVISIONS
1252: WHERE implementation_date IS NULL
1253: AND change_notice = p_revised_item_rec.eco_name

Line 1265: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating Routing Revisions . . .'); END IF;

1261: THEN
1262: -- Update new item revision information in
1263: -- MTL_ITEM_REVISIONS
1264:
1265: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating Routing Revisions . . .'); END IF;
1266:
1267: UPDATE MTL_RTG_ITEM_REVISIONS
1268: SET process_revision = p_revised_item_rec.updated_routing_revision
1269: , effectivity_date = DECODE( DECODE(p_revised_item_rec.new_effective_date,

Line 1292: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting Routing Revisions . . . '); END IF;

1288: ELSIF Eng_Default_Revised_Item.G_DEL_UPD_INS_RTG_REV = 3
1289: THEN
1290: -- Insert new record if revision record doesn't already
1291: -- exist
1292: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting Routing Revisions . . . '); END IF;
1293:
1294: IF ( p_revised_item_rec.new_effective_date is NULL) THEN
1295: Insert_Routing_Revisions
1296: ( p_inventory_item_id => p_rev_item_unexp_rec.revised_item_id

Line 1334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating effective daste for child rev comps . . .'); END IF;

1330: IF Eng_Default_Revised_Item.G_SCHED_DATE_CHANGED
1331: THEN
1332: l_stmt_num := 6;
1333:
1334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating effective daste for child rev comps . . .'); END IF;
1335:
1336: ENG_REVISED_ITEMS_PKG.Update_Inventory_Components
1337: ( x_change_notice =>
1338: p_revised_item_rec.eco_name

Line 1352: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating effective date for child rev operations . . . '); END IF;

1348: );
1349:
1350:
1351:
1352: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updating effective date for child rev operations . . . '); END IF;
1353:
1354: Update_Rev_Operations
1355: ( x_change_notice => p_revised_item_rec.eco_name
1356: , x_routing_sequence_id => p_rev_item_unexp_rec.routing_sequence_id

Line 1363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting current schedule date . . .'); END IF;

1359: ) ;
1360:
1361:
1362: l_stmt_num := 7;
1363: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting current schedule date . . .'); END IF;
1364: if (p_revised_item_rec.status_type = 4) then
1365: if (p_rev_item_unexp_rec.requestor_id is null ) then
1366: -- req_id := l_User_Id;
1367: -- Bug 3589974 : Fetching the party_id for the current user_id

Line 1418: IF Bom_Globals.Get_Debug = 'Y' THEN

1414: , x_comments => p_revised_item_rec.reschedule_comments -- Bug 3589974
1415: );
1416: end if;
1417:
1418: IF Bom_Globals.Get_Debug = 'Y' THEN
1419: Error_Handler.Write_Debug('Updating effective dates of pending item/rtg rev in this revised item record . . . ');
1420: END IF;
1421:
1422: UPDATE MTL_RTG_ITEM_REVISIONS

Line 1513: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Before Updating Eco_For_Production in Rev Comps and Rev Ops'); END IF;

1509: ************************************************************/
1510: IF Eng_Default_Revised_Item.G_ECO_FOR_PROD_CHANGED
1511: THEN
1512:
1513: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Before Updating Eco_For_Production in Rev Comps and Rev Ops'); END IF;
1514:
1515: UPDATE BOM_OPERATION_SEQUENCES
1516: SET eco_for_production = p_revised_item_rec.eco_for_production
1517: WHERE revised_item_sequence_id = p_rev_item_unexp_rec.revised_item_sequence_id ;

Line 1523: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Updating Eco_For_Production in Rev Comps and Rev Ops'); END IF;

1519: UPDATE BOM_INVENTORY_COMPONENTS
1520: SET eco_for_production = p_revised_item_rec.eco_for_production
1521: WHERE revised_item_sequence_id = p_rev_item_unexp_rec.revised_item_sequence_id ;
1522:
1523: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('After Updating Eco_For_Production in Rev Comps and Rev Ops'); END IF;
1524:
1525: END IF; /* Eco For Production */
1526:
1527: /* 11.5.10 chnages */

Line 1558: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('returning from update_row'); END IF;

1554:
1555: END; /* Inser/Update/Delete revision and check reschedule block Ends */
1556: END IF;
1557:
1558: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('returning from update_row'); END IF;
1559:
1560: END Update_Row;
1561:
1562: /*****************************************************************************

Line 1840: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting item revisions . . . '); END IF;

1836: ( p_revised_item_rec.new_revised_item_revision IS NOT NULL OR
1837: p_revised_item_rec.new_revised_item_revision <> FND_API.G_MISS_CHAR
1838: )
1839: THEN
1840: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting item revisions . . . '); END IF;
1841: ENG_REVISED_ITEMS_PKG.Insert_Item_Revisions
1842: ( x_inventory_item_id =>
1843: p_rev_item_unexp_rec.revised_item_id
1844: , x_organization_id =>

Line 1874: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting routing revisions . . .'); END IF;

1870: p_revised_item_rec.new_routing_revision <> FND_API.G_MISS_CHAR
1871: )
1872: THEN
1873:
1874: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting routing revisions . . .'); END IF;
1875:
1876:
1877: Insert_Routing_Revisions
1878: ( p_inventory_item_id => p_rev_item_unexp_rec.revised_item_id

Line 1892: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting cur_sch_dates . . .'); END IF;

1888:
1889:
1890: IF p_revised_item_rec.start_effective_date IS NOT NULL
1891: THEN
1892: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting cur_sch_dates . . .'); END IF;
1893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ECO : ' || p_revised_item_rec.eco_name); END IF;
1894: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' ||
1895: to_char(p_rev_item_unexp_rec.organization_id));
1896: END IF;

Line 1893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ECO : ' || p_revised_item_rec.eco_name); END IF;

1889:
1890: IF p_revised_item_rec.start_effective_date IS NOT NULL
1891: THEN
1892: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting cur_sch_dates . . .'); END IF;
1893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ECO : ' || p_revised_item_rec.eco_name); END IF;
1894: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' ||
1895: to_char(p_rev_item_unexp_rec.organization_id));
1896: END IF;
1897: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' ||

Line 1894: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' ||

1890: IF p_revised_item_rec.start_effective_date IS NOT NULL
1891: THEN
1892: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Inserting cur_sch_dates . . .'); END IF;
1893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ECO : ' || p_revised_item_rec.eco_name); END IF;
1894: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' ||
1895: to_char(p_rev_item_unexp_rec.organization_id));
1896: END IF;
1897: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' ||
1898: to_char(p_rev_item_unexp_rec.revised_item_id));

Line 1897: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' ||

1893: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ECO : ' || p_revised_item_rec.eco_name); END IF;
1894: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' ||
1895: to_char(p_rev_item_unexp_rec.organization_id));
1896: END IF;
1897: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' ||
1898: to_char(p_rev_item_unexp_rec.revised_item_id));
1899: END IF;
1900: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' ||
1901: to_char(p_revised_item_rec.start_effective_date));

Line 1900: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' ||

1896: END IF;
1897: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' ||
1898: to_char(p_rev_item_unexp_rec.revised_item_id));
1899: END IF;
1900: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' ||
1901: to_char(p_revised_item_rec.start_effective_date));
1902: END IF;
1903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Sequence: ' ||
1904: to_char(p_rev_item_unexp_rec.revised_item_sequence_id));

Line 1903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Sequence: ' ||

1899: END IF;
1900: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' ||
1901: to_char(p_revised_item_rec.start_effective_date));
1902: END IF;
1903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Sequence: ' ||
1904: to_char(p_rev_item_unexp_rec.revised_item_sequence_id));
1905: END IF;
1906: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Requestor: ' ||
1907: to_char(p_rev_item_unexp_rec.requestor_id));

Line 1906: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Requestor: ' ||

1902: END IF;
1903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Sequence: ' ||
1904: to_char(p_rev_item_unexp_rec.revised_item_sequence_id));
1905: END IF;
1906: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Requestor: ' ||
1907: to_char(p_rev_item_unexp_rec.requestor_id));
1908: END IF;
1909:
1910: /*Insert_Current_Scheduled_Dates

Line 1940: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Creating Altenate BOM . . .'); END IF;

1936: , p_organization_id =>
1937: p_rev_item_unexp_rec.organization_id
1938: );
1939:
1940: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Creating Altenate BOM . . .'); END IF;
1941:
1942: ENG_REVISED_ITEMS_PKG.Create_BOM
1943: ( x_assembly_item_id =>
1944: p_rev_item_unexp_rec.revised_item_id

Line 1973: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1969: , last_updated_by = l_user_id -- Last Updated By
1970: , last_update_login = l_login_id -- Last Update Login
1971: WHERE revised_item_sequence_id = p_rev_item_unexp_rec.revised_item_sequence_id ;
1972:
1973: IF BOM_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1974: ('Set created bill sequence id : ' || to_char(p_rev_item_unexp_rec.bill_sequence_id )
1975: || ' to the parenet revised item . . .') ;
1976: END IF ;
1977:

Line 1996: IF Bom_Globals.Get_Debug = 'Y' THEN

1992: , p_organization_id => p_rev_item_unexp_rec.organization_id
1993: );
1994: END IF ;
1995:
1996: IF Bom_Globals.Get_Debug = 'Y' THEN
1997: Error_Handler.Write_Debug('Creating Alternate Routing. . . ');
1998:
1999: Error_Handler.Write_Debug('Rtg Sequence Id : '|| to_char(p_rev_item_unexp_rec.routing_sequence_id));
2000: Error_Handler.Write_Debug('Assembly Item : '|| to_char(p_rev_item_unexp_rec.revised_item_id));

Line 2057: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(l_err_text); END IF;

2053: WHEN OTHERS THEN
2054:
2055: l_err_text := G_PKG_NAME || ' : (Inserting Record - Revised Item) '
2056: || substrb(SQLERRM,1,200);
2057: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug(l_err_text); END IF;
2058: Error_Handler.Add_Error_Token
2059: ( p_Message_Name => NULL
2060: , p_Message_Text => l_Err_Text
2061: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;

2204: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
2205: l_err_text VARCHAR2(2000);
2206: BEGIN
2207:
2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;

Line 2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;

2205: l_err_text VARCHAR2(2000);
2206: BEGIN
2207:
2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;
2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));

Line 2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;

2206: BEGIN
2207:
2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;
2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));
2214: END IF;

Line 2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;

2207:
2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;
2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));
2214: END IF;
2215:

Line 2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;

2208: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item: ' || to_char(p_revised_item_id)); END IF;
2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;
2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));
2214: END IF;
2215:
2216: SELECT

Line 2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));

2209: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || to_char(p_organization_id)); END IF;
2210: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ChangeNotice: ' || p_change_notice); END IF;
2211: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision: ' || p_new_item_revision); END IF;
2212: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Rtg Revision: ' || p_new_routing_revision); END IF;
2213: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Effective Date: ' || to_char(p_start_eff_date));
2214: END IF;
2215:
2216: SELECT
2217: CHANGE_NOTICE

Line 2343: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Execution of Query row over . . .'); END IF;

2339:
2340: x_revised_item_Rec := l_revised_item_rec;
2341: x_rev_item_unexp_rec := l_rev_item_unexp_rec;
2342:
2343: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Execution of Query row over . . .'); END IF;
2344:
2345: EXCEPTION
2346:
2347: WHEN NO_DATA_FOUND THEN

Line 2349: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Query Revised Item: ' || SQLERRM); END IF;

2345: EXCEPTION
2346:
2347: WHEN NO_DATA_FOUND THEN
2348:
2349: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Query Revised Item: ' || SQLERRM); END IF;
2350:
2351: x_return_status := Eng_Globals.G_RECORD_NOT_FOUND;
2352: x_revised_item_Rec := l_revised_item_rec;
2353: x_rev_item_unexp_rec := l_rev_item_unexp_rec;

Line 2356: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Query Revised Item: ' || SQLERRM); END IF;

2352: x_revised_item_Rec := l_revised_item_rec;
2353: x_rev_item_unexp_rec := l_rev_item_unexp_rec;
2354:
2355: WHEN OTHERS THEN
2356: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Query Revised Item: ' || SQLERRM); END IF;
2357:
2358: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2359: x_revised_item_Rec := l_revised_item_rec;
2360: x_rev_item_unexp_rec := l_rev_item_unexp_rec;

Line 2517: BOM_Globals.Set_Debug(p_debug);

2513: l_login_id := to_number(Fnd_Profile.Value('LOGIN_ID'));
2514:
2515: IF (p_debug = 'Y')
2516: THEN
2517: BOM_Globals.Set_Debug(p_debug);
2518: Error_Handler.Open_Debug_Session
2519: ( p_debug_filename => p_debug_filename
2520: , p_output_dir => p_output_dir
2521: , x_return_status => x_return_status

Line 2526: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('--Start API Reschedule_Revised_Item--'); END IF;

2522: , x_error_mesg => l_error_mesg
2523: );
2524: END IF;
2525:
2526: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('-***-Start API Reschedule_Revised_Item-***-'); END IF;
2527: SAVEPOINT Reschedule_Revised_Item_SP;
2528: x_return_status := FND_API.G_RET_STS_SUCCESS;
2529:
2530: -- Standard call to check for call compatibility

Line 2541: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Fetch the revised Item Details'); END IF;

2537: IF FND_API.to_Boolean(p_init_msg_list) THEN
2538: FND_MSG_PUB.initialize;
2539: END IF;
2540:
2541: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Fetch the revised Item Details'); END IF;
2542: OPEN c_revised_item(cp_revised_item_sequence_id => p_revised_item_sequence_id);
2543: FETCH c_revised_item INTO l_rev_item;
2544:
2545: -- update item revision

Line 2556: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for item revision effectivity'); END IF;

2552: AND organization_id = l_rev_item.organization_id
2553: AND implementation_date is NULL
2554: AND inventory_item_id = l_rev_item.revised_item_id
2555: AND revised_item_sequence_id = p_revised_item_sequence_id;
2556: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for item revision effectivity'); END IF;
2557:
2558: -- update revised components EFFECTIVITY_DATE
2559: UPDATE BOM_INVENTORY_COMPONENTS bic
2560: SET bic.EFFECTIVITY_DATE = p_effectivity_date

Line 2569: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for component effectivity' ); END IF;

2565: OR bic.common_component_sequence_id = bic.component_sequence_id)
2566: -- This is to ensure that the destination bill's revised item
2567: -- reschedule doesnt affect its components effectivity date
2568: AND bic.IMPLEMENTATION_DATE IS NULL;
2569: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for component effectivity' ); END IF;
2570:
2571: -- update revised components DISABLE_DATE
2572: UPDATE BOM_INVENTORY_COMPONENTS bic1
2573: SET bic1.DISABLE_DATE = p_effectivity_date

Line 2579: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for component disable date' ); END IF;

2575: AND bic1.ACD_TYPE = 3 -- ACD Type: Disable
2576: AND revised_item_sequence_id = p_revised_item_sequence_id
2577: AND bill_sequence_id = l_rev_item.bill_sequence_id
2578: AND bic1.IMPLEMENTATION_DATE IS NULL;
2579: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for component disable date' ); END IF;
2580: -- R12 : Common BOM changes
2581: -- updating the replicated components for the pending changes
2582: FOR c_sc IN c_source_components(l_rev_item.change_notice, p_revised_item_sequence_id, l_rev_item.bill_sequence_id)
2583: LOOP

Line 2597: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated operation sequences effectivity'); END IF;

2593: ( x_change_notice => l_rev_item.change_notice
2594: , x_routing_sequence_id => l_rev_item.routing_sequence_id
2595: , x_revised_item_sequence_id => p_revised_item_sequence_id
2596: , x_scheduled_date => p_effectivity_date);
2597: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated operation sequences effectivity'); END IF;
2598:
2599: -- update routing revision details
2600: UPDATE MTL_RTG_ITEM_REVISIONS
2601: SET effectivity_date = p_effectivity_date,

Line 2610: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for routing revision effectivity'); END IF;

2606: AND organization_id = l_rev_item.organization_id
2607: AND implementation_date is NULL
2608: AND inventory_item_id = l_rev_item.revised_item_id
2609: AND revised_item_sequence_id = p_revised_item_sequence_id;
2610: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Updated '|| SQL%ROWCOUNT ||'rows for routing revision effectivity'); END IF;
2611:
2612: CLOSE c_revised_item;
2613: IF FND_API.To_Boolean (p_commit)
2614: THEN

Line 2620: IF Bom_Globals.Get_Debug = 'Y'

2616: END IF;
2617: FND_MSG_PUB.Count_And_Get
2618: ( p_count => x_msg_count
2619: , p_data => x_msg_data );
2620: IF Bom_Globals.Get_Debug = 'Y'
2621: THEN
2622: Error_Handler.Write_Debug('-***-End API Reschedule_Revised_Item-***-');
2623: Error_Handler.Close_Debug_Session;
2624: END IF;

Line 2638: IF Bom_Globals.Get_Debug = 'Y'

2634: END IF;
2635: FND_MSG_PUB.Count_And_Get
2636: ( p_count => x_msg_count
2637: , p_data => x_msg_data );
2638: IF Bom_Globals.Get_Debug = 'Y'
2639: THEN
2640: Error_Handler.Write_Debug('Unexpected Error in API Reschedule_Revised_Item');
2641: Error_Handler.Close_Debug_Session;
2642: END IF;