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

Line 334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating revised item revision . . .' ||

330: BEGIN
331:
332: -- verify revised item has a valid current revision
333:
334: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating revised item revision . . .' ||
335: p_new_item_revision);
336: END IF;
337: --11.5.10E
338: --Commented out as From revision is being supported.

Line 346: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;

342: , p_revision_date => SYSDATE
343: );*/
344: l_Curr_Rev := p_from_revision;
345:
346: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;
347: -- revision must be greater than the current revision
348:
349: l_Rev_Compare := BOM_REVISIONS.Compare_Revision(
350: rev1 => p_new_item_revision,

Line 354: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;

350: rev1 => p_new_item_revision,
351: rev2 => l_Curr_Rev);
352: IF l_Rev_Compare = 1 THEN
353:
354: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;
355:
356: RETURN 1;
357: END IF;
358:

Line 367: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;

363: CLOSE c1;
364: IF l_Change_Notice IS NOT NULL
365: THEN
366:
367: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;
368: x_Change_Notice := l_Change_Notice;
369: RETURN 2;
370: END IF;
371:

Line 540: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating revised item revision . . .' ||

536: BEGIN
537:
538: -- verify revised item has a valid current revision
539:
540: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating revised item revision . . .' ||
541: p_new_item_revision);
542: END IF;
543: l_Curr_Rev := Get_Current_Item_Revision
544: ( p_revised_item_id => p_revised_item_id

Line 549: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;

545: , p_organization_id => p_organization_id
546: , p_revision_date => SYSDATE
547: );
548:
549: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;
550: -- revision must be greater than the current revision
551:
552: l_Rev_Compare := BOM_REVISIONS.Compare_Revision(
553: rev1 => p_new_item_revision,

Line 557: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;

553: rev1 => p_new_item_revision,
554: rev2 => l_Curr_Rev);
555: IF l_Rev_Compare = 1 THEN
556:
557: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;
558:
559: RETURN 1;
560: END IF;
561:

Line 570: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;

566: CLOSE c1;
567: IF l_Change_Notice IS NOT NULL
568: THEN
569:
570: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;
571: x_Change_Notice := l_Change_Notice;
572: RETURN 2;
573: END IF;
574:

Line 697: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating routing revision . . .' ||

693: AND implementation_date is not null;
694: BEGIN
695:
696: -- verify revised item has a valid current revision
697: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Validating routing revision . . .' ||
698: p_new_routing_revision);
699: END IF;
700: l_Curr_Rev := Get_Current_Rtg_Revision
701: ( p_revised_item_id => p_revised_item_id

Line 706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;

702: , p_organization_id => p_organization_id
703: , p_revision_date => SYSDATE
704: );
705:
706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Current revision. . . ' || l_Curr_Rev); END IF;
707: -- revision must be greater than the current revision
708:
709: l_Rev_Compare := BOM_REVISIONS.Compare_Revision(
710: rev1 => p_new_routing_revision,

Line 714: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;

710: rev1 => p_new_routing_revision,
711: rev2 => l_Curr_Rev);
712: IF l_Rev_Compare = 1 THEN
713:
714: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision not the latest . . .'); END IF;
715:
716: RETURN 1;
717: END IF;
718:

Line 727: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;

723: CLOSE c1;
724: IF l_Change_Notice IS NOT NULL
725: THEN
726:
727: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revision created thru another ECO . . .'); END IF;
728: x_Change_Notice := l_Change_Notice;
729: RETURN 2;
730: END IF;
731:

Line 812: IF BOM_Globals.get_debug = 'Y'

808:
809: FOR l_Count in c_CheckPrimary LOOP
810: RETURN TRUE;
811:
812: IF BOM_Globals.get_debug = 'Y'
813: THEN
814: error_handler.write_debug('Check Primary Bill fuction, return True ' );
815: END IF;
816:

Line 819: IF BOM_Globals.get_debug = 'Y'

815: END IF;
816:
817: END LOOP;
818:
819: IF BOM_Globals.get_debug = 'Y'
820: THEN
821: error_handler.write_debug('Check Primary Bill fuction, return False ' );
822: END IF;
823:

Line 860: IF BOM_Globals.get_debug = 'Y'

856:
857: FOR l_check_primary_rec in l_checkprimary LOOP
858: RETURN TRUE;
859:
860: IF BOM_Globals.get_debug = 'Y'
861: THEN
862: error_handler.write_debug('Check Primary Routing fuction, return True ' );
863: END IF;
864: END LOOP;

Line 867: IF BOM_Globals.get_debug = 'Y'

863: END IF;
864: END LOOP;
865:
866:
867: IF BOM_Globals.get_debug = 'Y'
868: THEN
869: error_handler.write_debug('Check Primary Routing fuction, return False ' );
870: END IF;
871:

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

1546: l_dummy VARCHAR2(20) ;
1547:
1548: BEGIN
1549:
1550: IF Bom_Globals.Get_Debug = 'Y' THEN
1551: Error_Handler.Write_Debug('Check Locators. . .Locator Id is ' || to_char(p_locator_id));
1552: END IF;
1553:
1554: l_org_locator_control := 0 ;

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

1575: WHERE organization_id = p_organization_id
1576: AND inventory_item_id = p_revised_item_id;
1577:
1578:
1579: IF Bom_Globals.Get_Debug = 'Y' THEN
1580: Error_Handler.Write_Debug('Org - Stock Locator Control : '|| to_char(l_org_locator_control) );
1581: Error_Handler.Write_Debug('Item - Location Control : '|| to_char(l_item_locator_control) );
1582: Error_Handler.Write_Debug('Item - Restrict Locator : '|| to_char(l_item_loc_restricted) );
1583: END IF;

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

1606: RETURN TRUE;
1607: END IF;
1608: */
1609:
1610: IF Bom_Globals.Get_Debug = 'Y' THEN
1611: Error_Handler.Write_Debug('Sub Inv - Loc Control : '|| to_char(l_sub_locator_control) );
1612: END IF;
1613:
1614:

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

1630: Sub_Control => l_sub_locator_control,
1631: Item_Control => l_item_locator_control
1632: );
1633:
1634: IF Bom_Globals.Get_Debug = 'Y' THEN
1635: Error_Handler.Write_Debug('Calling BOM_Validate_Rtg_Header.Control. Loc Control '||
1636: to_char(x_control) );
1637: END IF;
1638:

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

1650: -- Added OR x_Control = 3 as part of fix for bug 16069406 for dynamic locators
1651: -- Clubbing prespecified and dynamic checking logic to sink ENG code with existing BOM API code (BOMLRTGB.pls) BUG# 3761854.
1652: BEGIN
1653:
1654: IF Bom_Globals.Get_Debug = 'Y' THEN
1655: Error_Handler.Write_Debug ('Checking when x_control returned 2 and ' ||
1656: ' item locator is ' ||
1657: to_char(l_item_locator_control));
1658: END IF;

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

1677:
1678: IF l_item_loc_restricted = 1 -- Restrict Locators = YES
1679: THEN
1680: -- Check for restrict Locators YES
1681: IF Bom_Globals.Get_Debug = 'Y' THEN
1682: Error_Handler.Write_Debug ('Before Checking for restrict Locators Yes. ' );
1683: END IF;
1684: SELECT 'Valid'
1685: INTO l_dummy

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

1692: AND mil.inventory_location_id = msl.secondary_locator
1693: AND mil.organization_id = msl.organization_id
1694: AND NVL(mil.disable_date, SYSDATE+1) > SYSDATE ;
1695:
1696: IF Bom_Globals.Get_Debug = 'Y' THEN
1697: Error_Handler.Write_Debug ('Restrict locators is Y . ' ||
1698: 'Sub Inv : ' || p_subinventory || 'Comp Loc : ' || to_char(p_locator_id )
1699: || ' are valid.' );
1700: END IF;

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

1713: AND mil.inventory_location_id = p_locator_id
1714: AND mil.organization_id = p_organization_id
1715: AND NVL(mil.DISABLE_DATE, SYSDATE+1) > SYSDATE;
1716:
1717: IF Bom_Globals.Get_Debug = 'Y' THEN
1718: Error_Handler.Write_Debug ('Restrict locators is No . ' ||
1719: 'Sub Inv : ' || p_subinventory || 'Comp Loc : ' || to_char(p_locator_id )
1720: || ' are valid.' );
1721: END IF;

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

1728:
1729: EXCEPTION
1730: WHEN NO_DATA_FOUND THEN
1731:
1732: IF Bom_Globals.Get_Debug = 'Y' THEN
1733: Error_Handler.Write_Debug ('Locator is invlaid . ' );
1734: END IF ;
1735:
1736: RETURN FALSE;

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

1741: -- DYNAMIC LOCATORS ARE NOT ALLOWED IN OI.
1742: -- Dynamic locators are not allowed in open
1743: -- interface, so raise an error if the locator
1744: -- control is dynamic.
1745: IF Bom_Globals.Get_Debug = 'Y' THEN
1746: Error_Handler.Write_Debug ('Dynamic Locator Control. ' ) ;
1747: END IF ;
1748: l_locator_control := 3;
1749:

Line 1937: l_rev_policy := BOM_GLOBALS.Get_Change_Policy_Val (p_item_id => p_inventory_item_id,

1933: BEGIN
1934: Get_Structure_Type(p_inventory_item_id, p_organization_id, p_alternate_bom_code, x_structure_type_id);
1935: x_strc_cp_not_allowed := 2;
1936:
1937: l_rev_policy := BOM_GLOBALS.Get_Change_Policy_Val (p_item_id => p_inventory_item_id,
1938: p_org_id => p_organization_id,
1939: p_rev_id => NULL,
1940: p_rev_date => sysdate,
1941: p_structure_type_id => x_structure_type_id);

Line 2067: BOM_Globals.Set_Require_Item_Rev

2063: x_return_status := FND_API.G_RET_STS_SUCCESS;
2064: l_Token_Tbl(1).Token_name := 'REVISED_ITEM_NAME';
2065: l_Token_Tbl(1).Token_Value := p_revised_item_Rec.revised_item_name;
2066:
2067: BOM_Globals.Set_Require_Item_Rev
2068: (FND_PROFILE.VALUE('ENG:ECO_REVISED_ITEM_REVISION'));
2069:
2070: IF (Bom_globals.Get_Caller_Type = BOM_GLOBALS.G_MASS_CHANGE) THEN
2071: Null;

Line 2070: IF (Bom_globals.Get_Caller_Type = BOM_GLOBALS.G_MASS_CHANGE) THEN

2066:
2067: BOM_Globals.Set_Require_Item_Rev
2068: (FND_PROFILE.VALUE('ENG:ECO_REVISED_ITEM_REVISION'));
2069:
2070: IF (Bom_globals.Get_Caller_Type = BOM_GLOBALS.G_MASS_CHANGE) THEN
2071: Null;
2072: ELSE
2073: IF ( p_revised_item_rec.new_revised_item_revision IS NULL OR
2074: p_revised_item_rec.new_revised_item_revision = FND_API.G_MISS_CHAR

Line 2076: NVL(BOM_Globals.Is_Item_Rev_Required, 0) = 1

2072: ELSE
2073: IF ( p_revised_item_rec.new_revised_item_revision IS NULL OR
2074: p_revised_item_rec.new_revised_item_revision = FND_API.G_MISS_CHAR
2075: ) AND
2076: NVL(BOM_Globals.Is_Item_Rev_Required, 0) = 1
2077: THEN
2078: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2079: THEN
2080: Error_Handler.Add_Error_Token

Line 2091: IF NVL(BOM_Globals.Is_Item_Rev_Required, 0) = 1 AND

2087: x_return_status := FND_API.G_RET_STS_ERROR;
2088: END IF;
2089: END IF;
2090:
2091: IF NVL(BOM_Globals.Is_Item_Rev_Required, 0) = 1 AND
2092: p_revised_item_rec.updated_revised_item_revision =
2093: FND_API.G_MISS_CHAR
2094: AND
2095: p_revised_item_rec.alternate_bom_code IS NULL AND

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

2423: l_is_scheduled_date_invalid NUMBER;
2424:
2425: BEGIN
2426:
2427: IF Bom_Globals.Get_Debug = 'Y' THEN
2428: Error_Handler.Write_Debug('Performing Check Entity in Revised Item - Trans type: ' || p_revised_item_rec.transaction_Type );
2429: END IF;
2430:
2431: --

Line 2448: l_new_rev_required := BOM_Globals.Is_Item_Rev_Required;

2444: RETURN;
2445: END IF;
2446: IF p_control_rec.caller_type <> 'FORM'
2447: THEN
2448: l_new_rev_required := BOM_Globals.Is_Item_Rev_Required;
2449: l_is_item_unit_controlled := BOM_Globals.Get_Unit_Controlled_Item;
2450: ELSE
2451: l_new_rev_required := p_control_rec.require_item_rev;
2452: l_is_item_unit_controlled := p_control_rec.unit_controlled_item;

Line 2449: l_is_item_unit_controlled := BOM_Globals.Get_Unit_Controlled_Item;

2445: END IF;
2446: IF p_control_rec.caller_type <> 'FORM'
2447: THEN
2448: l_new_rev_required := BOM_Globals.Is_Item_Rev_Required;
2449: l_is_item_unit_controlled := BOM_Globals.Get_Unit_Controlled_Item;
2450: ELSE
2451: l_new_rev_required := p_control_rec.require_item_rev;
2452: l_is_item_unit_controlled := p_control_rec.unit_controlled_item;
2453: END IF;

Line 2494: IF BOM_Globals.get_debug = 'Y' THEN

2490: );
2491: END IF;
2492: l_return_status := FND_API.G_RET_STS_ERROR;
2493: END IF;
2494: IF BOM_Globals.get_debug = 'Y' THEN
2495: error_handler.write_debug('After check if rev item is unit conrolled in new eco type. . . the return status : ' ||
2496: l_Return_Status );
2497: END IF;
2498:

Line 2528: IF BOM_Globals.get_debug = 'Y' THEN

2524: END IF;
2525: l_return_status := FND_API.G_RET_STS_ERROR;
2526: END IF;
2527:
2528: IF BOM_Globals.get_debug = 'Y' THEN
2529: error_handler.write_debug('After check new eco type attributes, the return status is ' ||
2530: l_Return_Status);
2531: END IF;
2532:

Line 2560: IF BOM_Globals.get_debug = 'Y' THEN

2556: END IF;
2557: l_return_status := FND_API.G_RET_STS_ERROR;
2558: END IF;
2559:
2560: IF BOM_Globals.get_debug = 'Y' THEN
2561: error_handler.write_debug('After check lot number and type, the return status is ' ||
2562: l_Return_Status);
2563: END IF;
2564:

Line 2587: IF BOM_Globals.get_debug = 'Y' THEN

2583: END IF;
2584: l_return_status := FND_API.G_RET_STS_ERROR;
2585: END IF;
2586:
2587: IF BOM_Globals.get_debug = 'Y' THEN
2588: error_handler.write_debug('After check wip id, the return status is ' || l_Return_Status);
2589: END IF;
2590: /*****************************************************************
2591: -- If To Work Order is not Null then

Line 2613: IF BOM_Globals.get_debug = 'Y' THEN

2609: END IF;
2610: l_return_status := FND_API.G_RET_STS_ERROR;
2611: END IF;
2612:
2613: IF BOM_Globals.get_debug = 'Y' THEN
2614: error_handler.write_debug('After check work order, the return status is ' || l_Return_Status);
2615: END IF;
2616:
2617: /*****************************************************************

Line 2640: IF BOM_Globals.get_debug = 'Y' THEN

2636: END IF;
2637: l_return_status := FND_API.G_RET_STS_ERROR;
2638: END IF;
2639:
2640: IF BOM_Globals.get_debug = 'Y' THEN
2641: error_handler.write_debug('After check type and cumu, the return status is ' ||
2642: l_Return_Status);
2643: END IF;
2644: /*****************************************************************

Line 2667: IF BOM_Globals.get_debug = 'Y' THEN

2663: END IF;
2664: l_return_status := FND_API.G_RET_STS_ERROR;
2665: END IF;
2666:
2667: IF BOM_Globals.get_debug = 'Y' THEN
2668: error_handler.write_debug('After check cumulative qty and from/to id, the return status is ' ||
2669: l_Return_Status);
2670: END IF;
2671:

Line 2695: IF BOM_Globals.get_debug = 'Y' THEN

2691: END IF;
2692: l_return_status := FND_API.G_RET_STS_ERROR;
2693: END IF;
2694:
2695: IF BOM_Globals.get_debug = 'Y' THEN
2696: error_handler.write_debug('After check work order and cumulative qty, the return status is ' ||
2697: l_Return_Status);
2698: END IF;
2699:

Line 2756: IF BOM_Globals.get_debug = 'Y'THEN

2752: END LOOP ;
2753: END IF ;
2754: END IF ;
2755:
2756: IF BOM_Globals.get_debug = 'Y'THEN
2757: error_handler.write_debug('After check release status, the return status is ' ||
2758: l_Return_Status);
2759: END IF;
2760:

Line 2834: IF BOM_Globals.get_debug = 'Y' THEN

2830: END IF ;
2831: CLOSE l_wipjob_for_eco_cum_csr ;
2832: END IF ;
2833:
2834: IF BOM_Globals.get_debug = 'Y' THEN
2835: error_handler.write_debug('After check released status and cum, the return status is ' ||
2836: l_Return_Status);
2837: END IF;
2838:

Line 2876: IF BOM_Globals.get_debug = 'Y' THEN

2872: END IF;
2873: l_return_status := FND_API.G_RET_STS_ERROR;
2874: END LOOP ;
2875:
2876: IF BOM_Globals.get_debug = 'Y' THEN
2877: error_handler.write_debug('From WO Num : ' || p_revised_item_rec.from_work_order );
2878: error_handler.write_debug('To WO Num : ' || p_revised_item_rec.to_work_order );
2879: error_handler.write_debug('Effective Date : ' || to_char(p_revised_item_rec.start_effective_date
2880: ,'YYYY-MM-DD') );

Line 2888: IF BOM_Globals.get_debug = 'Y' THEN

2884:
2885: END IF ;
2886: --End of Entity Validation for New Effectivities
2887:
2888: IF BOM_Globals.get_debug = 'Y' THEN
2889: error_handler.write_debug('After check new Effectivities, the return status is ' ||
2890: l_Return_Status);
2891: END IF;
2892:

Line 2993: IF BOM_Globals.get_debug = 'Y' THEN

2989: END IF ;
2990: close l_rtg_header_csr;
2991: END IF ;
2992:
2993: IF BOM_Globals.get_debug = 'Y' THEN
2994: error_handler.write_debug('After check unit control for Routing, the return status is ' ||
2995: l_Return_Status);
2996: END IF;
2997:

Line 3013: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate you have entered : '

3009: NVL(p_old_rev_item_unexp_rec.bill_sequence_id, 0)
3010: )
3011: THEN
3012:
3013: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate you have entered : '
3014: || p_revised_item_rec.alternate_bom_code ); END IF;
3015:
3016: l_token_tbl.DELETE;
3017: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';

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

3027: );
3028: END IF;
3029: l_return_status := FND_API.G_RET_STS_ERROR;
3030:
3031: IF Bom_Globals.Get_Debug = 'Y' THEN
3032: Error_Handler.Write_Debug('After check if alternate code is changed, the return status is ' ||
3033: l_Return_Status);
3034: END IF;
3035:

Line 3048: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('alternate: ' || l_alternate_rtg_designator); END IF;

3044: FOR alt IN c_GetRtgAltDesignator
3045: LOOP
3046: l_alternate_rtg_designator := alt.alternate_routing_designator ;
3047:
3048: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('alternate: ' || l_alternate_rtg_designator); END IF;
3049:
3050: END LOOP;
3051:
3052: IF l_alternate_rtg_designator IS NOT NULL AND

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

3116: );
3117: END IF;
3118: l_return_status := FND_API.G_RET_STS_ERROR;
3119:
3120: IF Bom_Globals.Get_Debug = 'Y' THEN
3121: Error_Handler.Write_Debug('After check if a rtg can be created for this rev item, the return status is ' || l_Return_Status);
3122: END IF;
3123:
3124:

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

3158: END IF;
3159: l_return_status := FND_API.G_RET_STS_ERROR;
3160: END IF;
3161:
3162: IF Bom_Globals.Get_Debug = 'Y' THEN
3163: Error_Handler.Write_Debug('After checking rtg revision is null when alt code is not null, the return status is ' || l_return_status );
3164: END IF;
3165:
3166:

Line 3190: IF BOM_Globals.get_debug = 'Y' THEN

3186: l_return_status := FND_API.G_RET_STS_ERROR;
3187:
3188: END IF;
3189:
3190: IF BOM_Globals.get_debug = 'Y' THEN
3191: error_handler.write_debug('After check routing rev, the return status is ' || l_Return_Status);
3192: END IF;
3193:
3194:

Line 3216: IF BOM_Globals.get_debug = 'Y'THEN

3212: , x_change_notice => l_change_notice
3213: , x_revision => l_revision
3214: );
3215:
3216: IF BOM_Globals.get_debug = 'Y'THEN
3217: error_handler.write_debug('After Pending_High_Rtg_Rev, the return status is ' || l_Return_Status);
3218: END IF;
3219:
3220:

Line 3249: IF BOM_Globals.get_debug = 'Y' THEN

3245: , p_message_type => 'W');
3246: END IF;
3247: END IF;
3248:
3249: IF BOM_Globals.get_debug = 'Y' THEN
3250: error_handler.write_debug('After check pending eco, the return status is ' || l_Return_Status);
3251: END IF;
3252:
3253: END IF;

Line 3360: IF BOM_Globals.get_debug = 'Y' THEN

3356: l_return_status := FND_API.G_RET_STS_ERROR;
3357: END IF;
3358: END IF;
3359:
3360: IF BOM_Globals.get_debug = 'Y' THEN
3361: error_handler.write_debug('After check transaction type, the return status is ' || l_Return_Status);
3362: END IF;
3363:
3364:

Line 3395: IF BOM_Globals.get_debug = 'Y' THEN

3391: END IF;
3392: l_return_status := FND_API.G_RET_STS_ERROR;
3393: END IF ;
3394:
3395: IF BOM_Globals.get_debug = 'Y' THEN
3396: error_handler.write_debug('After check ctp flag, the return status is ' || l_Return_Status);
3397: END IF;
3398: END IF ;
3399:

Line 3428: IF BOM_Globals.get_debug = 'Y' THEN

3424: END IF;
3425: l_return_status := FND_API.G_RET_STS_ERROR;
3426: END IF ;
3427:
3428: IF BOM_Globals.get_debug = 'Y' THEN
3429: error_handler.write_debug('After check priority, the return status is ' || l_Return_Status);
3430: END IF;
3431:
3432: END IF ;

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

3435: /*********************************************************************
3436: -- Added by MK 08/26/2000
3437: -- Check Completion Subinventory
3438: **********************************************************************/
3439: IF Bom_Globals.Get_Debug = 'Y' THEN
3440: Error_Handler.Write_Debug('Performing completeion subinventory check. . . Sub Inv : '
3441: || p_revised_item_rec.completion_subinventory ) ;
3442: Error_Handler.Write_Debug('Old Completion_subinv is:'||p_old_revised_item_rec.completion_subinventory );
3443: END IF;

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

3452: AND ( p_revised_item_rec.completion_subinventory IS NULL
3453: OR p_revised_item_rec.completion_subinventory = FND_API.G_MISS_CHAR)
3454: THEN
3455:
3456: IF Bom_Globals.Get_Debug = 'Y' THEN
3457: Error_Handler.Write_Debug('Inside the process when subinventory is null' ) ;
3458: END IF;
3459:
3460: IF p_rev_item_unexp_rec.completion_locator_id IS NOT NULL

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

3487: AND ( p_revised_item_rec.completion_subinventory IS NOT NULL
3488: OR p_revised_item_rec.completion_subinventory <> FND_API.G_MISS_CHAR)
3489: THEN
3490:
3491: IF Bom_Globals.Get_Debug = 'Y' THEN
3492: Error_Handler.Write_Debug('Inside the process when subinventory is not null' ) ;
3493: END IF;
3494:
3495: IF NOT Check_SubInv_Exists(p_organization_id => p_rev_item_unexp_rec.organization_id

Line 3525: IF BOM_Globals.get_debug = 'Y' THEN

3521: , x_rest_subinv_code => l_rest_subinv_code
3522: , x_inv_asset_flag => l_inv_asset_flag ) ;
3523:
3524:
3525: IF BOM_Globals.get_debug = 'Y' THEN
3526: error_handler.write_debug('Get Sub Inv Flag . . . ');
3527: error_handler.write_debug('Expense to asset transfer : '|| l_allow_expense_to_asset );
3528: error_handler.write_debug('Restrict Sub Inv Code : ' || l_rest_subinv_code );
3529: error_handler.write_debug('Inv Asset Flag : '|| l_inv_asset_flag );

Line 3536: IF BOM_Globals.get_debug = 'Y' THEN

3532:
3533: IF l_rest_subinv_code = 'Y' THEN
3534: IF l_allow_expense_to_asset = '1' THEN
3535:
3536: IF BOM_Globals.get_debug = 'Y' THEN
3537: error_handler.write_debug('Before OPEN c_Restrict_SubInv_Trk');
3538: END IF;
3539: OPEN c_Restrict_SubInv_Trk
3540: ( p_revised_item_id => p_rev_item_unexp_rec.revised_item_id

Line 3567: IF BOM_Globals.get_debug = 'Y' THEN

3563: CLOSE c_Restrict_SubInv_Trk;
3564:
3565: END IF;
3566:
3567: IF BOM_Globals.get_debug = 'Y' THEN
3568: error_handler.write_debug('After c_Restrict_SubInv_Trk, the return status is ' || l_Return_Status);
3569: END IF;
3570:
3571: ELSE

Line 3574: IF BOM_Globals.get_debug = 'Y' THEN

3570:
3571: ELSE
3572: IF l_inv_asset_flag = 'Y' THEN
3573:
3574: IF BOM_Globals.get_debug = 'Y' THEN
3575: error_handler.write_debug('Before OPEN c_Restrict_SubInv_Asset');
3576: END IF;
3577:
3578: OPEN c_Restrict_SubInv_Asset

Line 3603: IF BOM_Globals.get_debug = 'Y' THEN

3599: ELSE
3600: CLOSE c_Restrict_SubInv_Asset ;
3601: END IF;
3602:
3603: IF BOM_Globals.get_debug = 'Y' THEN
3604: error_handler.write_debug('After c_Restrict_SubInv_Asset, the return status is ' || l_Return_Status);
3605: END IF;
3606: ELSE
3607:

Line 3608: IF BOM_Globals.get_debug = 'Y' THEN

3604: error_handler.write_debug('After c_Restrict_SubInv_Asset, the return status is ' || l_Return_Status);
3605: END IF;
3606: ELSE
3607:
3608: IF BOM_Globals.get_debug = 'Y' THEN
3609: error_handler.write_debug('Before second c_Restrict_SubInv_Trk');
3610: END IF;
3611: OPEN c_Restrict_SubInv_Trk
3612: ( p_revised_item_id => p_rev_item_unexp_rec.revised_item_id

Line 3637: IF BOM_Globals.get_debug = 'Y' THEN

3633: ELSE
3634: CLOSE c_Restrict_SubInv_Trk;
3635: END IF;
3636:
3637: IF BOM_Globals.get_debug = 'Y' THEN
3638: error_handler.write_debug('After c_Restrict_SubInv_Trk, the return status is '|| l_Return_Status);
3639: END IF;
3640: END IF ; -- End of l_inv_asset_flag = 'Y'
3641: END IF ; -- End of l_allow_expense_to_asset = '1'

Line 3647: IF BOM_Globals.get_debug = 'Y' THEN

3643:
3644: ELSE -- l_rest_subinv_code <> 'Y'
3645: IF l_allow_expense_to_asset = '1' THEN
3646:
3647: IF BOM_Globals.get_debug = 'Y' THEN
3648: error_handler.write_debug('Before open c_SubInventory_Tracked');
3649: END IF;
3650: OPEN c_SubInventory_Tracked
3651: ( p_organization_id => p_rev_item_unexp_rec.organization_id

Line 3675: IF BOM_Globals.get_debug = 'Y' THEN

3671: ELSE
3672: CLOSE c_SubInventory_Tracked;
3673: END IF;
3674:
3675: IF BOM_Globals.get_debug = 'Y' THEN
3676: error_handler.write_debug('After c_SubInventory_Tracked, the return status is '|| l_Return_Status);
3677: END IF;
3678:
3679: ELSE

Line 3682: IF BOM_Globals.get_debug = 'Y' THEN

3678:
3679: ELSE
3680: IF l_inv_asset_flag = 'Y' THEN
3681:
3682: IF BOM_Globals.get_debug = 'Y' THEN
3683: error_handler.write_debug('Before open second c_SubInventory_Asset');
3684: END IF;
3685: OPEN c_SubInventory_Asset
3686: ( p_organization_id => p_rev_item_unexp_rec.organization_id

Line 3708: IF BOM_Globals.get_debug = 'Y' THEN

3704: l_return_status := FND_API.G_RET_STS_ERROR;
3705: ELSE
3706: CLOSE c_SubInventory_Asset;
3707: END IF;
3708: IF BOM_Globals.get_debug = 'Y' THEN
3709: error_handler.write_debug('After c_SubInventory_Asset, the return status is ' || l_Return_Status);
3710: END IF;
3711: ELSE
3712: IF BOM_Globals.get_debug = 'Y' THEN

Line 3712: IF BOM_Globals.get_debug = 'Y' THEN

3708: IF BOM_Globals.get_debug = 'Y' THEN
3709: error_handler.write_debug('After c_SubInventory_Asset, the return status is ' || l_Return_Status);
3710: END IF;
3711: ELSE
3712: IF BOM_Globals.get_debug = 'Y' THEN
3713: error_handler.write_debug('Before open second c_SubInventory_tracked');
3714: END IF;
3715: IF p_revised_item_rec.completion_subinventory IS NOT NULL THEN
3716:

Line 3743: IF BOM_Globals.get_debug = 'Y' THEN

3739: CLOSE c_Subinventory_Tracked;
3740: END IF;
3741: END IF;
3742:
3743: IF BOM_Globals.get_debug = 'Y' THEN
3744: error_handler.write_debug('After c_Subinventory_Tracked, the return status is '|| l_Return_Status);
3745: END IF;
3746:
3747: END IF ; -- End of l_inv_asset_flag = 'Y'

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

3756: -- Added by MK 08/26/2000
3757: -- Check Completion Locator
3758: **********************************************************************/
3759:
3760: IF Bom_Globals.Get_Debug = 'Y' THEN
3761: Error_Handler.Write_Debug('Performing completion locator. . .') ;
3762: Error_Handler.Write_Debug('Sub Inv - Loc Control : '|| to_char(l_sub_locator_control) );
3763: END IF;
3764:

Line 3765: IF (Bom_globals.Get_Caller_Type = BOM_GLOBALS.G_MASS_CHANGE) THEN

3761: Error_Handler.Write_Debug('Performing completion locator. . .') ;
3762: Error_Handler.Write_Debug('Sub Inv - Loc Control : '|| to_char(l_sub_locator_control) );
3763: END IF;
3764:
3765: IF (Bom_globals.Get_Caller_Type = BOM_GLOBALS.G_MASS_CHANGE) THEN
3766: Null;
3767: Else
3768: IF p_control_rec.caller_type <> 'FORM'
3769: AND p_revised_item_rec.completion_subinventory is not null -- Bug 2871420 added this condition

Line 3877: IF BOM_Globals.get_debug = 'Y' THEN

3873: -- );
3874: -- END IF;
3875: -- l_return_status := FND_API.G_RET_STS_ERROR;
3876:
3877: IF BOM_Globals.get_debug = 'Y' THEN
3878: error_handler.write_debug('completion locator check when locator name is not null,the return status is ' ||
3879: l_Return_Status);
3880: END IF;
3881:

Line 3884: IF BOM_Globals.get_debug = 'Y' THEN

3880: END IF;
3881:
3882: END IF; ---end of locator check
3883: END IF;
3884: IF BOM_Globals.get_debug = 'Y' THEN
3885: error_handler.write_debug('After locator check,the return status is '|| l_Return_Status);
3886: END IF;
3887:
3888: /*********************************************************************

Line 4287: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('caller type: ' || p_control_rec.caller_type); END IF;

4283: -- Check if the (currently) highest un-implemented revision of the
4284: -- revised item exists on another ECO - log warning
4285: --
4286: *********************************************************************/
4287: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('caller type: ' || p_control_rec.caller_type); END IF;
4288:
4289: IF (p_control_rec.caller_type = 'FORM'
4290: AND p_revised_item_rec.transaction_type = 'CREATE'
4291: AND p_control_rec.validation_controller = 'REVISED_ITEM')

Line 4360: IF BOM_Globals.get_debug = 'Y'

4356: , p_organization_id => p_rev_item_unexp_rec.organization_id
4357: );
4358: END IF ;
4359:
4360: IF BOM_Globals.get_debug = 'Y'
4361: THEN
4362: error_handler.write_debug('Get Eco Assembly Type, Assebly Type : '|| to_char(l_assembly_type) );
4363: END IF;
4364:

Line 4400: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Early effective Date: '

4396:
4397: --
4398: -- Early Scheduled date must be <= Scheduled Date
4399: --
4400: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Early effective Date: '
4401: || to_char(p_revised_item_rec.earliest_effective_date));
4402: END IF;
4403:
4404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Start effective Date: ' ||

Line 4404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Start effective Date: ' ||

4400: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Early effective Date: '
4401: || to_char(p_revised_item_rec.earliest_effective_date));
4402: END IF;
4403:
4404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Start effective Date: ' ||
4405: to_char(p_revised_item_rec.start_effective_date));
4406: END IF;
4407: IF NOT l_is_item_unit_controlled AND
4408: ((p_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_CREATE AND

Line 4511: IF BOM_Globals.get_debug = 'Y' THEN

4507: END IF;
4508: l_return_status := FND_API.G_RET_STS_ERROR;
4509: END IF;
4510:
4511: IF BOM_Globals.get_debug = 'Y' THEN
4512: error_handler.write_debug('After validation for shedule date, the return status is ' ||
4513: l_Return_Status);
4514: END IF;
4515:

Line 4578: IF BOM_Globals.get_debug = 'Y' THEN

4574:
4575: l_return_status := FND_API.G_RET_STS_ERROR;
4576: END IF;
4577:
4578: IF BOM_Globals.get_debug = 'Y' THEN
4579: error_handler.write_debug('After validation for Use Up Item, the return status is '|| l_Return_Status);
4580: END IF;
4581: END IF;
4582:

Line 4592: IF BOM_Globals.get_debug = 'Y' THEN

4588: -- Also added Eng_Primary_Bill_Exists check in Rev Comp and
4589: -- Eng_Primary_Routing_Exists in Rev Op
4590: **********************************************************************/
4591:
4592: IF BOM_Globals.get_debug = 'Y' THEN
4593: error_handler.write_debug('Org Id : ' || to_char(p_rev_item_unexp_rec.organization_id) );
4594: error_handler.write_debug('Rev Item Id : ' || to_char(p_rev_item_unexp_rec.revised_item_id) );
4595: error_handler.write_debug('Assem Type : ' || to_char(l_assembly_type) );
4596: END IF;

Line 4666: IF BOM_Globals.get_debug = 'Y' THEN

4662: END IF;
4663: -- Added by MK on 08/26/2000
4664: **********************************************************************/
4665:
4666: IF BOM_Globals.get_debug = 'Y' THEN
4667: error_handler.write_debug('End of check primary routing and bill, the return status is ' || l_Return_Status);
4668: END IF;
4669:
4670:

Line 4690: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ENG_ITEM_IN_OTHER_ECOS Warning . . .'); END IF;

4686: , p_Revised_Item_Id => p_rev_item_unexp_rec.revised_item_id
4687: , p_organization_id => p_rev_item_unexp_rec.organization_id
4688: )
4689: THEN
4690: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('ENG_ITEM_IN_OTHER_ECOS Warning . . .'); END IF;
4691:
4692: l_token_tbl.delete;
4693:
4694: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';

Line 4706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - if item is on other ECOs'); END IF;

4702: , p_message_type => 'W');
4703: END IF;
4704: END IF;
4705:
4706: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - if item is on other ECOs'); END IF;
4707:
4708:
4709: /*********************************************************************
4710: --

Line 4771: IF BOM_Globals.get_debug = 'Y' THEN

4767: l_return_status := FND_API.G_RET_STS_ERROR;
4768: END IF;
4769: END IF;
4770:
4771: IF BOM_Globals.get_debug = 'Y' THEN
4772: error_handler.write_debug('End of new revised item, the return status is ' || l_Return_Status);
4773: END IF;
4774:
4775: /*********************************************************************

Line 4814: IF BOM_Globals.get_debug = 'Y' THEN

4810: l_return_status := FND_API.G_RET_STS_ERROR;
4811: END IF;
4812: END IF;
4813: -- Added by MK on 09/01/2000
4814: IF BOM_Globals.get_debug = 'Y' THEN
4815: error_handler.write_debug('End of transaction type and call type chceck, the return status is '||
4816: l_Return_Status);
4817: END IF;
4818:

Line 4862: IF BOM_Globals.get_debug = 'Y' THEN

4858: , p_Token_Tbl => l_Token_Tbl);
4859: END IF;
4860: l_return_status := FND_API.G_RET_STS_ERROR;
4861: END IF;
4862: IF BOM_Globals.get_debug = 'Y' THEN
4863: error_handler.write_debug('End of call type check for form, the return status is ' ||
4864: l_Return_Status);
4865: END IF;
4866:

Line 4909: IF BOM_Globals.get_debug = 'Y' THEN

4905: END IF;
4906: l_return_status := FND_API.G_RET_STS_ERROR;
4907: END;
4908: END IF;
4909: IF BOM_Globals.get_debug = 'Y' THEN
4910: error_handler.write_debug('End of check call type, the return status is '|| l_Return_Status);
4911: END IF;
4912:
4913:

Line 4952: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is status updateable'); END IF;

4948: END IF;
4949: l_return_status := FND_API.G_RET_STS_ERROR;
4950: END IF;
4951:
4952: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is status updateable'); END IF;
4953:
4954: -- Cannot have new revision for alternate bill item
4955:
4956: /*********************************************************************

Line 4964: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('alternate: ' || l_alternate_bom_designator); END IF;

4960: FOR alt IN c_GetAlternateDesignator
4961: LOOP
4962: l_alternate_bom_designator :=
4963: alt.alternate_bom_designator;
4964: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('alternate: ' || l_alternate_bom_designator); END IF;
4965: END LOOP;
4966:
4967: IF l_alternate_bom_designator IS NOT NULL AND
4968: (p_revised_item_rec.alternate_bom_code <>

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

5022: );
5023: END IF;
5024: l_return_status := FND_API.G_RET_STS_ERROR;
5025: END IF;
5026: IF Bom_Globals.Get_Debug = 'Y' THEN
5027: Error_Handler.Write_Debug('After checking item revision is null when alt code is not null, the return status is ' || l_return_status );
5028: END IF;
5029:
5030:

Line 5053: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is there current item rev. for item'); END IF;

5049: END IF;
5050: l_return_status := FND_API.G_RET_STS_ERROR;
5051: END IF;
5052:
5053: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is there current item rev. for item'); END IF;
5054:
5055: l_token_tbl.delete;
5056: l_token_tbl(1).token_name := 'REVISED_ITEM_NAME';
5057: l_token_tbl(1).token_value := p_revised_item_rec.revised_item_name;

Line 5085: IF BOM_Globals.get_debug = 'Y' THEN

5081: );
5082: END IF;
5083: l_return_status := FND_API.G_RET_STS_ERROR;
5084: END IF;
5085: IF BOM_Globals.get_debug = 'Y' THEN
5086: error_handler.write_debug('End of validating revision, the return status is ' || l_Return_Status);
5087: END IF;
5088:
5089: /*********************************************************************

Line 5221: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is new item revision valid'); END IF;

5217: END IF;
5218: l_return_status := FND_API.G_RET_STS_ERROR;
5219: END IF;
5220: END IF;
5221: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is new item revision valid'); END IF;
5222:
5223: -- Changes for bug 3618662
5224: IF Bom_Globals.Get_Debug = 'Y'
5225: THEN

Line 5224: IF Bom_Globals.Get_Debug = 'Y'

5220: END IF;
5221: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('checked - is new item revision valid'); END IF;
5222:
5223: -- Changes for bug 3618662
5224: IF Bom_Globals.Get_Debug = 'Y'
5225: THEN
5226: Error_Handler.Write_Debug('Validate if the revisions and effectivity dates in ascending order. . . . ');
5227: END IF;
5228:

Line 5268: IF Bom_Globals.Get_Debug = 'Y'

5264: );
5265: END IF;
5266: l_return_status := FND_API.G_RET_STS_ERROR;
5267: END IF;
5268: IF Bom_Globals.Get_Debug = 'Y'
5269: THEN
5270: Error_Handler.Write_Debug('End of validation of revisions and effectivity dates in ascending order.'
5271: ||' The return status is ' || l_Return_Status);
5272: END IF;

Line 5319: IF BOM_Globals.get_debug = 'Y' THEN

5315: However, as per the comments the below code is required only for PLM.
5316:
5317: IF p_revised_item_rec.transaction_type = ENG_GLOBALS.G_OPR_CREATE AND p_control_rec.caller_type <> 'SSWA'
5318: THEN
5319: IF BOM_Globals.get_debug = 'Y' THEN
5320: error_handler.write_debug('Verifying the subject level security for PLM ' );
5321: END IF;
5322: validate_rev_items_for_sub(
5323: p_change_notice => p_revised_item_rec.eco_name

Line 5343: IF BOM_Globals.get_debug = 'Y' THEN

5339: l_return_status :=FND_API.G_RET_STS_ERROR;
5340: END IF;
5341: END IF; */
5342: -- Done validating entity
5343: IF BOM_Globals.get_debug = 'Y' THEN
5344: error_handler.write_debug('End of validating entity, the return status is ' || l_Return_Status);
5345: END IF;
5346:
5347: x_return_status := l_return_status;

Line 5449: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Revised Item Check Attributes . . .'); END IF;

5445: BEGIN
5446:
5447: x_return_status := FND_API.G_RET_STS_SUCCESS;
5448:
5449: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Revised Item Check Attributes . . .'); END IF;
5450:
5451: -- Set revised item token name and value.
5452:
5453: l_Token_Tbl(1).Token_Name := 'REVISED_ITEM_NAME';

Line 5495: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status Type Validated . . . ' ); END IF;

5491: x_return_status := FND_API.G_RET_STS_ERROR;
5492:
5493: END IF;
5494:
5495: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Status Type Validated . . . ' ); END IF;
5496:
5497: -- Creates or Updates of records marked Implemented is not allowed
5498: IF p_revised_item_rec.status_type = 6
5499: THEN

Line 5634: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('MRP Active Validated . . .'); END IF;

5630: x_return_status := FND_API.G_RET_STS_ERROR;
5631:
5632: END IF;
5633:
5634: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('MRP Active Validated . . .'); END IF;
5635:
5636: IF p_revised_item_rec.update_wip IS NOT NULL AND
5637: ( p_revised_item_rec.update_wip <>
5638: p_old_revised_item_rec.update_wip OR

Line 5675: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Update WIP Validated . . .'); END IF;

5671: x_return_status := FND_API.G_RET_STS_ERROR;
5672:
5673: END IF;
5674:
5675: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Update WIP Validated . . .'); END IF;
5676:
5677: IF p_revised_item_rec.use_up_plan_name IS NOT NULL AND
5678: ( p_revised_item_rec.use_up_plan_name <>
5679: p_old_revised_item_rec.use_up_plan_name OR

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

5711: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5712: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
5713: , p_Token_Tbl => l_Token_Tbl
5714: );
5715: IF Bom_Globals.Get_Debug = 'Y' THEN
5716: Error_Handler.Write_Debug('Use_Up_Plan validation returned with an error ' ||
5717: l_err_text);
5718: END IF;
5719: END IF;

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

5870:
5871: END LOOP;
5872:
5873:
5874: IF Bom_Globals.Get_Debug = 'Y' THEN
5875: Error_Handler.Write_Debug('Alternate Desig Validated . . . status : '||x_return_status );
5876: END IF;
5877:
5878: END IF;

Line 6543: l_is_item_unit_controlled := BOM_Globals.Get_Unit_Controlled_Item;

6539:
6540: l_Token_Tbl(1).token_name := 'REVISED_ITEM_NAME';
6541: l_token_tbl(1).token_value := p_revised_item_name;
6542:
6543: l_is_item_unit_controlled := BOM_Globals.Get_Unit_Controlled_Item;
6544:
6545: --
6546: -- The driving procedure must make sure that the ECO
6547: -- Check_Access has been called and has returned with a success.

Line 6579: IF BOM_Globals.Is_RItem_Cancl IS NULL AND

6575:
6576: --
6577: -- Check revised item is not implemented or Cancelled
6578: --
6579: IF BOM_Globals.Is_RItem_Cancl IS NULL AND
6580: BOM_Globals.Is_RItem_Impl IS NULL
6581: THEN
6582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking for revised item impl /canceled . . .'); END IF;
6583:

Line 6580: BOM_Globals.Is_RItem_Impl IS NULL

6576: --
6577: -- Check revised item is not implemented or Cancelled
6578: --
6579: IF BOM_Globals.Is_RItem_Cancl IS NULL AND
6580: BOM_Globals.Is_RItem_Impl IS NULL
6581: THEN
6582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking for revised item impl /canceled . . .'); END IF;
6583:
6584: FOR revised_item IN c_CheckRevisedItem

Line 6582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking for revised item impl /canceled . . .'); END IF;

6578: --
6579: IF BOM_Globals.Is_RItem_Cancl IS NULL AND
6580: BOM_Globals.Is_RItem_Impl IS NULL
6581: THEN
6582: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Checking for revised item impl /canceled . . .'); END IF;
6583:
6584: FOR revised_item IN c_CheckRevisedItem
6585: LOOP
6586: IF revised_item.status_type = 5 THEN

Line 6587: BOM_Globals.Set_RItem_Cancl

6583:
6584: FOR revised_item IN c_CheckRevisedItem
6585: LOOP
6586: IF revised_item.status_type = 5 THEN
6587: BOM_Globals.Set_RItem_Cancl
6588: (p_ritem_cancl => TRUE);
6589: ELSIF revised_item.status_type = 6 THEN
6590: BOM_Globals.Set_RItem_Impl
6591: (p_ritem_impl => TRUE);

Line 6590: BOM_Globals.Set_RItem_Impl

6586: IF revised_item.status_type = 5 THEN
6587: BOM_Globals.Set_RItem_Cancl
6588: (p_ritem_cancl => TRUE);
6589: ELSIF revised_item.status_type = 6 THEN
6590: BOM_Globals.Set_RItem_Impl
6591: (p_ritem_impl => TRUE);
6592: ELSE
6593: BOM_Globals.Set_RItem_Cancl
6594: (p_ritem_cancl => FALSE);

Line 6593: BOM_Globals.Set_RItem_Cancl

6589: ELSIF revised_item.status_type = 6 THEN
6590: BOM_Globals.Set_RItem_Impl
6591: (p_ritem_impl => TRUE);
6592: ELSE
6593: BOM_Globals.Set_RItem_Cancl
6594: (p_ritem_cancl => FALSE);
6595: BOM_Globals.Set_RItem_Impl
6596: (p_ritem_impl => FALSE);
6597: END IF;

Line 6595: BOM_Globals.Set_RItem_Impl

6591: (p_ritem_impl => TRUE);
6592: ELSE
6593: BOM_Globals.Set_RItem_Cancl
6594: (p_ritem_cancl => FALSE);
6595: BOM_Globals.Set_RItem_Impl
6596: (p_ritem_impl => FALSE);
6597: END IF;
6598: -- Bug 4276451
6599: -- Check if the revised item is updateable for PLM ECOs

Line 6638: IF NVL(BOM_Globals.Is_RItem_Impl, FALSE) = TRUE

6634: -- End fix for Bug 4276451
6635: END LOOP;
6636: END IF;
6637:
6638: IF NVL(BOM_Globals.Is_RItem_Impl, FALSE) = TRUE
6639: THEN
6640: Error_Handler.Add_Error_Token
6641: ( p_Message_Name => 'ENG_RIT_IMPLEMENTED'
6642: , p_Mesg_Token_Tbl => l_mesg_token_tbl

Line 6648: ELSIF NVL(BOM_Globals.Is_RItem_Cancl, FALSE) = TRUE

6644: , p_Token_Tbl => l_token_tbl
6645: );
6646:
6647: l_return_status := FND_API.G_RET_STS_ERROR;
6648: ELSIF NVL(BOM_Globals.Is_RItem_Cancl, FALSE) = TRUE
6649: THEN
6650: Error_Handler.Add_Error_Token
6651: ( p_Message_Name => 'ENG_RIT_CANCELLED'
6652: , p_Mesg_Token_Tbl => l_mesg_token_tbl

Line 6665: IF BOM_Globals.Get_STD_Item_Access IS NULL AND

6661: --
6662: -- Check that the user has access to the BOM Item Type
6663: -- of the revised item
6664: --
6665: IF BOM_Globals.Get_STD_Item_Access IS NULL AND
6666: BOM_Globals.Get_PLN_Item_Access IS NULL AND
6667: BOM_Globals.Get_MDL_Item_Access IS NULL
6668: THEN
6669:

Line 6666: BOM_Globals.Get_PLN_Item_Access IS NULL AND

6662: -- Check that the user has access to the BOM Item Type
6663: -- of the revised item
6664: --
6665: IF BOM_Globals.Get_STD_Item_Access IS NULL AND
6666: BOM_Globals.Get_PLN_Item_Access IS NULL AND
6667: BOM_Globals.Get_MDL_Item_Access IS NULL
6668: THEN
6669:
6670: --

Line 6667: BOM_Globals.Get_MDL_Item_Access IS NULL

6663: -- of the revised item
6664: --
6665: IF BOM_Globals.Get_STD_Item_Access IS NULL AND
6666: BOM_Globals.Get_PLN_Item_Access IS NULL AND
6667: BOM_Globals.Get_MDL_Item_Access IS NULL
6668: THEN
6669:
6670: --
6671: -- Get respective profile values

Line 6675: BOM_Globals.Set_STD_Item_Access

6671: -- Get respective profile values
6672: --
6673: IF NVL(fnd_profile.value('ENG:STANDARD_ITEM_ECN_ACCESS'), 1) = 1
6674: THEN
6675: BOM_Globals.Set_STD_Item_Access
6676: ( p_std_item_access => 4);
6677: ELSE
6678: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;
6679: BOM_Globals.Set_STD_Item_Access

Line 6678: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;

6674: THEN
6675: BOM_Globals.Set_STD_Item_Access
6676: ( p_std_item_access => 4);
6677: ELSE
6678: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;
6679: BOM_Globals.Set_STD_Item_Access
6680: (p_std_item_access => NULL);
6681: END IF;
6682:

Line 6679: BOM_Globals.Set_STD_Item_Access

6675: BOM_Globals.Set_STD_Item_Access
6676: ( p_std_item_access => 4);
6677: ELSE
6678: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('no access to standard items'); END IF;
6679: BOM_Globals.Set_STD_Item_Access
6680: (p_std_item_access => NULL);
6681: END IF;
6682:
6683: IF fnd_profile.value('ENG:MODEL_ITEM_ECN_ACCESS') = '1'

Line 6685: BOM_Globals.Set_MDL_Item_Access

6681: END IF;
6682:
6683: IF fnd_profile.value('ENG:MODEL_ITEM_ECN_ACCESS') = '1'
6684: THEN
6685: BOM_Globals.Set_MDL_Item_Access
6686: ( p_mdl_item_access => 1);
6687: BOM_Globals.Set_OC_Item_Access
6688: ( p_oc_item_access => 2);
6689: ELSE

Line 6687: BOM_Globals.Set_OC_Item_Access

6683: IF fnd_profile.value('ENG:MODEL_ITEM_ECN_ACCESS') = '1'
6684: THEN
6685: BOM_Globals.Set_MDL_Item_Access
6686: ( p_mdl_item_access => 1);
6687: BOM_Globals.Set_OC_Item_Access
6688: ( p_oc_item_access => 2);
6689: ELSE
6690: BOM_Globals.Set_MDL_Item_Access
6691: ( p_mdl_item_access => NULL);

Line 6690: BOM_Globals.Set_MDL_Item_Access

6686: ( p_mdl_item_access => 1);
6687: BOM_Globals.Set_OC_Item_Access
6688: ( p_oc_item_access => 2);
6689: ELSE
6690: BOM_Globals.Set_MDL_Item_Access
6691: ( p_mdl_item_access => NULL);
6692: BOM_Globals.Set_OC_Item_Access
6693: ( p_oc_item_access => NULL);
6694: END IF;

Line 6692: BOM_Globals.Set_OC_Item_Access

6688: ( p_oc_item_access => 2);
6689: ELSE
6690: BOM_Globals.Set_MDL_Item_Access
6691: ( p_mdl_item_access => NULL);
6692: BOM_Globals.Set_OC_Item_Access
6693: ( p_oc_item_access => NULL);
6694: END IF;
6695:
6696: IF fnd_profile.value('ENG:PLANNING_ITEM_ECN_ACCESS') = '1'

Line 6698: BOM_Globals.Set_PLN_Item_Access

6694: END IF;
6695:
6696: IF fnd_profile.value('ENG:PLANNING_ITEM_ECN_ACCESS') = '1'
6697: THEN
6698: BOM_Globals.Set_PLN_Item_Access
6699: ( p_pln_item_access => 3);
6700: ELSE
6701: BOM_Globals.Set_PLN_Item_Access
6702: ( p_pln_item_access => NULL);

Line 6701: BOM_Globals.Set_PLN_Item_Access

6697: THEN
6698: BOM_Globals.Set_PLN_Item_Access
6699: ( p_pln_item_access => 3);
6700: ELSE
6701: BOM_Globals.Set_PLN_Item_Access
6702: ( p_pln_item_access => NULL);
6703: END IF;
6704: END IF;
6705:

Line 6718: ( NVL(BOM_Globals.Get_STD_Item_Access, 0),

6714: , p_Token_Tbl => l_token_tbl
6715: );
6716: l_return_status := FND_API.G_RET_STS_ERROR;
6717: ELSIF RevItem.Bom_Item_Type NOT IN
6718: ( NVL(BOM_Globals.Get_STD_Item_Access, 0),
6719: NVL(BOM_Globals.Get_PLN_Item_Access, 0),
6720: NVL(BOM_Globals.Get_OC_Item_Access, 0) ,
6721: NVL(BOM_Globals.Get_MDL_Item_Access, 0)
6722: )

Line 6719: NVL(BOM_Globals.Get_PLN_Item_Access, 0),

6715: );
6716: l_return_status := FND_API.G_RET_STS_ERROR;
6717: ELSIF RevItem.Bom_Item_Type NOT IN
6718: ( NVL(BOM_Globals.Get_STD_Item_Access, 0),
6719: NVL(BOM_Globals.Get_PLN_Item_Access, 0),
6720: NVL(BOM_Globals.Get_OC_Item_Access, 0) ,
6721: NVL(BOM_Globals.Get_MDL_Item_Access, 0)
6722: )
6723: THEN

Line 6720: NVL(BOM_Globals.Get_OC_Item_Access, 0) ,

6716: l_return_status := FND_API.G_RET_STS_ERROR;
6717: ELSIF RevItem.Bom_Item_Type NOT IN
6718: ( NVL(BOM_Globals.Get_STD_Item_Access, 0),
6719: NVL(BOM_Globals.Get_PLN_Item_Access, 0),
6720: NVL(BOM_Globals.Get_OC_Item_Access, 0) ,
6721: NVL(BOM_Globals.Get_MDL_Item_Access, 0)
6722: )
6723: THEN
6724: l_Token_Tbl(2).Token_Name := 'BOM_ITEM_TYPE';

Line 6721: NVL(BOM_Globals.Get_MDL_Item_Access, 0)

6717: ELSIF RevItem.Bom_Item_Type NOT IN
6718: ( NVL(BOM_Globals.Get_STD_Item_Access, 0),
6719: NVL(BOM_Globals.Get_PLN_Item_Access, 0),
6720: NVL(BOM_Globals.Get_OC_Item_Access, 0) ,
6721: NVL(BOM_Globals.Get_MDL_Item_Access, 0)
6722: )
6723: THEN
6724: l_Token_Tbl(2).Token_Name := 'BOM_ITEM_TYPE';
6725: l_Token_Tbl(2).Translate := TRUE;

Line 6757: IF NOT BOM_Globals.Get_Unit_Effectivity AND

6753: -- Checks that unit effective items are allowed only if the profile
6754: -- value allows them (profile value stored in system_information)
6755: *********************************************************************/
6756:
6757: IF NOT BOM_Globals.Get_Unit_Effectivity AND
6758: l_is_item_unit_controlled
6759: THEN
6760: Error_Handler.Add_Error_Token
6761: ( p_Message_Name => 'ENG_REV_ITEM_UNIT_CONTROL'

Line 6902: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Check Access returning . . . ' ||

6898: --
6899: -- If all the access checks are satisfied then return a status of
6900: -- success, else return error.
6901: --
6902: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Revised Item Check Access returning . . . ' ||
6903: l_return_status);
6904: END IF;
6905:
6906: x_Return_Status := l_return_status;

Line 7131: BOM_Globals.Set_Debug(p_debug);

7127: END IF;
7128:
7129: IF p_debug = 'Y'
7130: THEN
7131: BOM_Globals.Set_Debug(p_debug);
7132: Error_Handler.Open_Debug_Session(
7133: p_debug_filename => p_debug_filename
7134: , p_output_dir => p_output_dir
7135: , x_return_status => l_return_status

Line 7140: BOM_Globals.Set_Debug('N');

7136: , x_error_mesg => x_msg_data
7137: );
7138: IF l_return_status <> 'S'
7139: THEN
7140: BOM_Globals.Set_Debug('N');
7141: END IF;
7142: END IF;
7143: -- Initialize System_Information
7144: ENG_GLOBALS.Init_System_Info_Rec(

Line 7155: BOM_Globals.Set_Unit_Effectivity (TRUE);

7151: END IF;
7152: -- Initialize Unit_Effectivity flag
7153: IF PJM_UNIT_EFF.Enabled = 'Y'
7154: THEN
7155: BOM_Globals.Set_Unit_Effectivity (TRUE);
7156: ENG_Globals.Set_Unit_Effectivity (TRUE);
7157: ELSE
7158: BOM_Globals.Set_Unit_Effectivity (FALSE);
7159: ENG_Globals.Set_Unit_Effectivity (FALSE);

Line 7158: BOM_Globals.Set_Unit_Effectivity (FALSE);

7154: THEN
7155: BOM_Globals.Set_Unit_Effectivity (TRUE);
7156: ENG_Globals.Set_Unit_Effectivity (TRUE);
7157: ELSE
7158: BOM_Globals.Set_Unit_Effectivity (FALSE);
7159: ENG_Globals.Set_Unit_Effectivity (FALSE);
7160: END IF;
7161: --
7162: BOM_Globals.Set_Unit_Controlled_Item(

Line 7162: BOM_Globals.Set_Unit_Controlled_Item(

7158: BOM_Globals.Set_Unit_Effectivity (FALSE);
7159: ENG_Globals.Set_Unit_Effectivity (FALSE);
7160: END IF;
7161: --
7162: BOM_Globals.Set_Unit_Controlled_Item(
7163: p_inventory_item_id => p_revised_item_id
7164: , p_organization_id => p_organization_id
7165: );
7166: BOM_Globals.Set_Require_Item_Rev(FND_PROFILE.VALUE('ENG:ECO_REVISED_ITEM_REVISION'));

Line 7166: BOM_Globals.Set_Require_Item_Rev(FND_PROFILE.VALUE('ENG:ECO_REVISED_ITEM_REVISION'));

7162: BOM_Globals.Set_Unit_Controlled_Item(
7163: p_inventory_item_id => p_revised_item_id
7164: , p_organization_id => p_organization_id
7165: );
7166: BOM_Globals.Set_Require_Item_Rev(FND_PROFILE.VALUE('ENG:ECO_REVISED_ITEM_REVISION'));
7167: Eng_Globals.Set_Bo_Identifier( p_bo_identifier => p_bo_identifier);
7168: Eng_Globals.Set_Org_Id( p_org_id => p_organization_id);
7169:
7170: -- Bug 12310735. If alternate designator is Primary, set it to NULL.

Line 7175: or l_alternate_bom_code = BOM_GLOBALS.RETRIEVE_MESSAGE('BOM','BOM_PRIMARY') )

7171: -- Bug 14639944 extends bug 12310735 to multiple languages,
7172: l_alternate_bom_code := p_alternate_bom_code;
7173: IF l_alternate_bom_code IS NOT NULL
7174: AND ( l_alternate_bom_code = 'Primary'
7175: or l_alternate_bom_code = BOM_GLOBALS.RETRIEVE_MESSAGE('BOM','BOM_PRIMARY') )
7176: THEN
7177: l_alternate_bom_code := NULL;
7178: END IF;
7179:

Line 7420: IF Bom_Globals.Get_Debug = 'Y'

7416: , p_data => l_msg_data
7417: );
7418:
7419: x_msg_data := l_msg_data;
7420: IF Bom_Globals.Get_Debug = 'Y'
7421: THEN
7422: Error_Handler.Write_Debug('-***-End API Validate_Revised_Item-***-');
7423: Error_Handler.Close_Debug_Session;
7424: END IF;

Line 7438: IF Bom_Globals.Get_Debug = 'Y'

7434: FND_MSG_PUB.Count_And_Get(
7435: p_count => x_msg_count
7436: , p_data => x_msg_data
7437: );
7438: IF Bom_Globals.Get_Debug = 'Y'
7439: THEN
7440: Error_Handler.Write_Debug('Unexpected Error ');
7441: Error_Handler.Close_Debug_Session;
7442: END IF;