APPS.BOM_DEFAULT_OP_RES dependencies on BOM_RTG_GLOBALS

Line 458: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

454:
455:
456: BEGIN
457:
458: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
459: ('Within the Operation Resource Attr. Defaulting...') ;
460: END IF ;
461:
462: x_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 543: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN

539:
540: x_rev_op_resource_rec := l_rev_op_resource_rec ;
541: x_rev_op_res_unexp_rec := l_rev_op_res_unexp_rec ;
542:
543: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
544: Error_Handler.Write_Debug('Getting out of Operation Resource Attribute Defualting...');
545: END IF ;
546:
547:

Line 550: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

546:
547:
548: EXCEPTION
549: WHEN OTHERS THEN
550: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
551: ('Some unknown error in Attribute Defaulting . . .' || SQLERRM );
552: END IF ;
553:
554:

Line 683: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

679: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
680: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
681:
682: BEGIN
683: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
684: ('Within the Operation Resource Populate null columns...') ;
685: END IF ;
686:
687: -- Initialize operation exp and unexp record

Line 692: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

688: l_rev_op_resource_rec := p_rev_op_resource_rec ;
689: l_rev_op_res_unexp_rec := p_rev_op_res_unexp_rec ;
690:
691: -- Exposed Column
692: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
693: ('Populate null exposed columns......') ;
694: END IF ;
695:
696: IF l_rev_op_resource_rec.ACD_Type IS NULL

Line 864: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

860: -- Also copy the Unexposed Columns from Database to New record
861: --
862:
863:
864: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
865: ('Populate Null Unexposed columns......') ;
866: END IF ;
867:
868:

Line 869: IF l_rev_op_resource_rec.transaction_type <> BOM_Rtg_Globals.G_OPR_CREATE

865: ('Populate Null Unexposed columns......') ;
866: END IF ;
867:
868:
869: IF l_rev_op_resource_rec.transaction_type <> BOM_Rtg_Globals.G_OPR_CREATE
870: THEN
871:
872: l_rev_op_res_unexp_rec.Revised_Item_Sequence_Id
873: := p_old_rev_op_res_unexp_rec.Revised_Item_Sequence_Id ;

Line 1026: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1022: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1023:
1024: BEGIN
1025:
1026: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1027: ('Within the Operation Resource Entity Defaulting...') ;
1028: END IF ;
1029:
1030: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1078: IF l_rev_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

1074: -- Basis_Type,
1075: -- Standard_Rate_Flag
1076: --
1077: ************************************************************/
1078: IF l_rev_op_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1079: AND
1080: ( l_rev_op_res_unexp_rec.activity_id IS NULL OR
1081: l_rev_op_res_unexp_rec.activity_id = FND_API.G_MISS_NUM OR
1082: l_rev_op_resource_rec.autocharge_type IS NULL OR

Line 1115: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1111: --
1112: --
1113: ************************************************************/
1114: /**** Commenting the following validation as per bug 2661684
1115: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1116: ('Default Assigned Units. . . . ' || l_return_status) ;
1117: END IF ;
1118:
1119: IF NVL(l_rev_op_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD

Line 1157: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1153: -- If resource is batchable, basis type should always be LOT
1154: --
1155: ************************************************************/
1156:
1157: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1158: ('Default Basis type. . . . ' || l_return_status) ;
1159: END IF ;
1160:
1161: IF NVL(l_rev_op_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD

Line 1296: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

1292: x_rev_op_res_unexp_rec := l_rev_op_res_unexp_rec ;
1293:
1294: EXCEPTION
1295: WHEN OTHERS THEN
1296: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1297: ('Some unknown error in Entity Defaulting . . .' || SQLERRM );
1298: END IF ;
1299:
1300: