DBA Data[Home] [Help]

APPS.BOM_BO_PVT dependencies on BOM_GLOBALS

Line 101: l_bom_comp_ops_unexp_rec.organization_id := Bom_Globals.Get_org_id;

97: l_bo_return_status := 'S';
98:
99: l_bom_comp_ops_tbl := p_bom_comp_ops_tbl;
100:
101: l_bom_comp_ops_unexp_rec.organization_id := Bom_Globals.Get_org_id;
102:
103:
104: FOR I IN 1..l_bom_comp_ops_tbl.COUNT LOOP
105: BEGIN

Line 179: Bom_Globals.Transaction_Type_Validity

175: --
176: -- Check if transaction_type is valid
177: --
178:
179: Bom_Globals.Transaction_Type_Validity
180: ( p_transaction_type => l_bom_comp_ops_rec.transaction_type
181: , p_entity => 'Bom_Comp_Ops'
182: , p_entity_id => l_bom_comp_ops_rec.assembly_item_name
183: , x_valid => l_valid

Line 296: /* IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;

292: -- Process Flow step 7: Check lineage
293: --
294: /* Check lineage is not necessary for a component operation */
295:
296: /* IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
297: Bom_Validate_Comp_Operation.Check_Lineage
298: ( p_bom_comp_ops_rec => l_bom_comp_ops_rec
299: , p_bom_comp_ops_unexp_rec => l_bom_comp_ops_unexp_rec
300: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 402: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)

398: -- Process Flow step 9: Attribute Validation for Create and Update
399: --
400:
401: IF l_bom_comp_ops_rec.transaction_type IN
402: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
403: THEN
404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Component Operation: Check Attributes . . .'); END IF;
405:
406: Bom_Validate_Comp_Operation.Check_Attributes

Line 404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Component Operation: Check Attributes . . .'); END IF;

400:
401: IF l_bom_comp_ops_rec.transaction_type IN
402: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
403: THEN
404: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Component Operation: Check Attributes . . .'); END IF;
405:
406: Bom_Validate_Comp_Operation.Check_Attributes
407: ( x_return_status => l_return_status
408: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 426: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

422: -- Process flow step 10 - Populate NULL columns for Update and
423: -- Delete
424:
425: IF l_bom_comp_ops_rec.transaction_type IN
426: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
427: THEN
428: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;
429: Bom_Default_Comp_Operation.Populate_Null_Columns
430: ( p_bom_comp_ops_rec => l_bom_Comp_ops_Rec

Line 428: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;

424:
425: IF l_bom_comp_ops_rec.transaction_type IN
426: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
427: THEN
428: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;
429: Bom_Default_Comp_Operation.Populate_Null_Columns
430: ( p_bom_comp_ops_rec => l_bom_Comp_ops_Rec
431: , p_old_bom_Comp_ops_Rec => l_old_bom_Comp_ops_Rec
432: , p_bom_comp_ops_unexp_rec => l_bom_comp_ops_unexp_rec

Line 438: ELSIF l_bom_comp_ops_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE

434: , x_bom_comp_ops_Rec => l_bom_Comp_ops_Rec
435: , x_bom_comp_ops_unexp_rec => l_bom_comp_ops_unexp_rec
436: );
437:
438: ELSIF l_bom_comp_ops_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE
439: THEN
440:
441: --
442: -- Process Flow step 11 : Default missing values for Operation

Line 446: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting'); END IF;

442: -- Process Flow step 11 : Default missing values for Operation
443: -- CREATE
444: --
445:
446: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting'); END IF;
447: Bom_Default_Comp_Operation.Attribute_Defaulting
448: ( p_bom_comp_ops_rec => l_bom_comp_ops_rec
449: , p_bom_comp_ops_unexp_rec => l_bom_comp_ops_unexp_rec
450: , x_bom_comp_ops_rec => l_bom_comp_ops_rec

Line 456: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

452: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
453: , x_return_status => l_return_status
454: );
455:
456: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
457:
458: IF l_return_status = Error_Handler.G_STATUS_ERROR
459: THEN
460: l_other_message := 'BOM_COPS_ATTDEF_CSEV_SKIP';

Line 485: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation'); END IF;

481:
482: -- Process Flow step 12- Entity Level Validation
483: --
484:
485: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation'); END IF;
486:
487: IF l_bom_comp_ops_rec.transaction_type <> 'DELETE'
488: THEN
489:

Line 498: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

494: , x_return_status => l_Return_Status
495: );
496: END IF ;
497:
498: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
499:
500: IF l_return_status = Error_Handler.G_STATUS_ERROR
501: THEN
502: RAISE EXC_SEV_QUIT_RECORD;

Line 519: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing to the database'); END IF;

515: --
516: -- Process Flow step 13 : Database Writes
517: --
518:
519: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing to the database'); END IF;
520: Bom_Comp_Operation_Util.Perform_Writes
521: ( p_bom_comp_ops_rec => l_bom_comp_ops_rec
522: , p_bom_comp_ops_unexp_rec => l_bom_comp_ops_unexp_rec
523: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 717: IF( l_bom_comp_ops_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )

713: RETURN;
714: END IF;
715:
716: --4306013
717: IF( l_bom_comp_ops_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )
718: AND l_return_status = 'S' )
719: THEN
720: G_Comp_Op_Flag := 1;
721: END IF;

Line 724: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('after end loop'); END IF;

720: G_Comp_Op_Flag := 1;
721: END IF;
722:
723: END LOOP; -- END Component Operations processing loop
724: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('after end loop'); END IF;
725:
726: /*********Business Event************/
727: IF ( G_Comp_Op_Flag = 1 AND l_comp_ops_processed) THEN
728: Bom_Business_Event_PKG.Raise_Component_Event(

Line 731: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

727: IF ( G_Comp_Op_Flag = 1 AND l_comp_ops_processed) THEN
728: Bom_Business_Event_PKG.Raise_Component_Event(
729: p_event_load_type => 'Bulk'
730: , p_request_identifier => FND_GLOBAL.CONC_REQUEST_ID
731: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
732: , p_event_entity_name => 'Component Operation'
733: , p_event_name => Bom_Business_Event_PKG.G_COMPONENT_MODIFIED_EVENT
734: , p_last_update_date => sysdate
735: , p_last_updated_by => fnd_global.user_id

Line 799: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;

795: -- Init local table variables.
796:
797: l_bom_sub_component_tbl := p_bom_sub_component_tbl;
798:
799: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
800:
801: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Substitute Components . . . will process records: ' || l_bom_sub_component_tbl.COUNT); END IF;
802:
803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;

Line 801: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Substitute Components . . . will process records: ' || l_bom_sub_component_tbl.COUNT); END IF;

797: l_bom_sub_component_tbl := p_bom_sub_component_tbl;
798:
799: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
800:
801: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Substitute Components . . . will process records: ' || l_bom_sub_component_tbl.COUNT); END IF;
802:
803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;
804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);
805: END IF;

Line 803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;

799: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
800:
801: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Substitute Components . . . will process records: ' || l_bom_sub_component_tbl.COUNT); END IF;
802:
803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;
804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);
805: END IF;
806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:

Line 804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);

800:
801: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Within Substitute Components . . . will process records: ' || l_bom_sub_component_tbl.COUNT); END IF;
802:
803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;
804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);
805: END IF;
806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;

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

802:
803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Input parameters '); END IF;
804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);
805: END IF;
806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;
809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;
810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;

Line 808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;

804: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Assembly : ' || p_assembly_item_name);
805: END IF;
806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;
809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;
810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;
811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Eff Dt: ' || to_char(p_effectivity_date)); END IF;
812:

Line 809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;

805: END IF;
806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;
809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;
810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;
811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Eff Dt: ' || to_char(p_effectivity_date)); END IF;
812:
813: FOR I IN 1..l_bom_sub_component_tbl.COUNT LOOP

Line 810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;

806: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Organization: ' || p_organization_id);END IF;
807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;
809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;
810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;
811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Eff Dt: ' || to_char(p_effectivity_date)); END IF;
812:
813: FOR I IN 1..l_bom_sub_component_tbl.COUNT LOOP
814: BEGIN

Line 811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Eff Dt: ' || to_char(p_effectivity_date)); END IF;

807:
808: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alternate: ' || p_alternate_bom_code);END IF;
809: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Component: ' || p_component_item_name);END IF;
810: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Op Seq: ' || p_operation_seq_num); END IF;
811: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Eff Dt: ' || to_char(p_effectivity_date)); END IF;
812:
813: FOR I IN 1..l_bom_sub_component_tbl.COUNT LOOP
814: BEGIN
815:

Line 820: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;

816: -- Load local records.
817:
818: l_bom_sub_component_rec := l_bom_sub_component_tbl(I);
819: l_bom_sub_comp_unexp_rec := Bom_Bo_Pub.G_MISS_BOM_SUB_COMP_UNEXP_REC;
820: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
821:
822:
823: IF Bom_Globals.Get_Debug = 'Y' THEN
824: Error_Handler.Write_Debug('Substitute Component Record values:');

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

819: l_bom_sub_comp_unexp_rec := Bom_Bo_Pub.G_MISS_BOM_SUB_COMP_UNEXP_REC;
820: l_bom_sub_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
821:
822:
823: IF Bom_Globals.Get_Debug = 'Y' THEN
824: Error_Handler.Write_Debug('Substitute Component Record values:');
825: Error_Handler.Write_Debug('Component Item Name: ' || l_bom_sub_component_rec.component_item_name);
826: Error_Handler.Write_Debug('Op Seq Num: ' || l_bom_sub_component_rec.operation_sequence_number);
827: Error_Handler.Write_Debug('Effectivity Date: ' || l_bom_sub_component_rec.start_effective_date);

Line 842: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps called by Component . . .'); END IF;

838: THEN
839: -- revised comp parent exists
840:
841: l_comp_parent_exists := TRUE;
842: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps called by Component . . .'); END IF;
843:
844: ELSIF p_assembly_item_name IS NOT NULL AND
845: p_organization_id IS NOT NULL
846: THEN

Line 850: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps called by Header. . .'); END IF;

846: THEN
847: -- revised item parent exists
848:
849: l_item_parent_exists := TRUE;
850: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps called by Header. . .'); END IF;
851:
852: END IF;
853:
854: -- Process Flow Step 2: Check if record has not yet been processed and

Line 858: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comp Status prior to start of processing: ' || l_bom_sub_component_rec.return_status);

854: -- Process Flow Step 2: Check if record has not yet been processed and
855: -- that it is the child of the parent that called this procedure
856: --
857:
858: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comp Status prior to start of processing: ' || l_bom_sub_component_rec.return_status);
859: END IF;
860:
861: IF ( l_bom_sub_component_rec.return_status IS NULL OR
862: l_bom_sub_component_rec.return_status = FND_API.G_MISS_CHAR

Line 904: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Transaction Type Validity . . .'); END IF;

900:
901: --
902: -- Check if transaction_type is valid
903: --
904: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Transaction Type Validity . . .'); END IF;
905: Bom_Globals.Transaction_Type_Validity
906: ( p_transaction_type => l_bom_sub_component_rec.transaction_type
907: , p_entity => 'Sub_Comps'
908: , p_entity_id => l_bom_sub_component_rec.assembly_item_name

Line 905: Bom_Globals.Transaction_Type_Validity

901: --
902: -- Check if transaction_type is valid
903: --
904: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Transaction Type Validity . . .'); END IF;
905: Bom_Globals.Transaction_Type_Validity
906: ( p_transaction_type => l_bom_sub_component_rec.transaction_type
907: , p_entity => 'Sub_Comps'
908: , p_entity_id => l_bom_sub_component_rec.assembly_item_name
909: , x_valid => l_valid

Line 924: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: UUI-UI Conversion . . .'); END IF;

920: -- Process Flow step 4(a): Convert user unique index to unique
921: -- index I
922: --
923: --
924: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: UUI-UI Conversion . . .'); END IF;
925:
926: Bom_Val_To_Id.Sub_Component_UUI_To_UI
927: ( p_bom_sub_component_rec => l_bom_sub_component_rec
928: , p_bom_sub_comp_unexp_rec => l_bom_sub_comp_unexp_rec

Line 934: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

930: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
931: , x_Return_Status => l_return_status
932: );
933:
934: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
935:
936: IF l_return_status = Error_Handler.G_STATUS_ERROR
937: THEN
938: RAISE EXC_SEV_QUIT_RECORD;

Line 1154: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)

1150: -- Process Flow step 8: Attribute Validation for Create and Update
1151: --
1152:
1153: IF l_bom_sub_component_rec.transaction_type IN
1154: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
1155: THEN
1156: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Substitute Component: Check Attributes . . .'); END IF;
1157:
1158: Bom_Validate_Sub_Component.Check_Attributes

Line 1156: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Substitute Component: Check Attributes . . .'); END IF;

1152:
1153: IF l_bom_sub_component_rec.transaction_type IN
1154: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
1155: THEN
1156: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Substitute Component: Check Attributes . . .'); END IF;
1157:
1158: Bom_Validate_Sub_Component.Check_Attributes
1159: ( p_bom_sub_component_rec => l_bom_sub_component_rec
1160: , p_bom_sub_comp_unexp_rec => l_bom_sub_comp_unexp_rec

Line 1178: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

1174: -- peform Populate_null_columns if the Transaction Type is
1175: -- not INSERT.
1176:
1177: IF l_bom_sub_component_rec.Transaction_Type IN
1178: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
1179: THEN
1180:
1181: -- Process flow step 8 - Populate NULL columns for Update and
1182: -- Delete.

Line 1184: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populating NULL Columns'); END IF;

1180:
1181: -- Process flow step 8 - Populate NULL columns for Update and
1182: -- Delete.
1183:
1184: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populating NULL Columns'); END IF;
1185: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1186:
1187: Bom_Default_Sub_Component.Populate_NULL_Columns
1188: ( p_bom_sub_component_rec => l_bom_sub_component_rec

Line 1185: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;

1181: -- Process flow step 8 - Populate NULL columns for Update and
1182: -- Delete.
1183:
1184: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populating NULL Columns'); END IF;
1185: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1186:
1187: Bom_Default_Sub_Component.Populate_NULL_Columns
1188: ( p_bom_sub_component_rec => l_bom_sub_component_rec
1189: , p_old_bom_sub_component_rec => l_old_bom_sub_component_rec

Line 1195: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq after populate: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;

1191: , p_old_bom_sub_comp_unexp_rec=> l_old_bom_sub_comp_unexp_rec
1192: , x_bom_sub_component_rec => l_bom_sub_component_rec
1193: , x_bom_sub_comp_unexp_rec => l_bom_sub_comp_unexp_rec
1194: );
1195: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq after populate: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1196:
1197:
1198: ELSIF l_bom_sub_component_rec.Transaction_Type =
1199: Bom_Globals.G_OPR_CREATE

Line 1199: Bom_Globals.G_OPR_CREATE

1195: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Comp Seq after populate: ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1196:
1197:
1198: ELSIF l_bom_sub_component_rec.Transaction_Type =
1199: Bom_Globals.G_OPR_CREATE
1200: THEN
1201:
1202: --
1203: -- Process Flow step 9: Default missing values for Operation

Line 1207: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Attribute Defaulting, comp seq: '|| l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;

1203: -- Process Flow step 9: Default missing values for Operation
1204: -- CREATE
1205: --
1206:
1207: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Attribute Defaulting, comp seq: '|| l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1208: Bom_Default_Sub_Component.Attribute_Defaulting
1209: ( p_bom_sub_component_rec => l_bom_sub_component_rec
1210: , p_bom_sub_comp_unexp_rec => l_bom_sub_comp_unexp_rec
1211: , x_bom_sub_component_rec => l_bom_sub_component_rec

Line 1217: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Comp Seq after defaulting ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;

1213: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1214: , x_return_status => l_return_status
1215: );
1216:
1217: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Comp Seq after defaulting ' || l_bom_sub_comp_unexp_rec.component_sequence_id); END IF;
1218:
1219: IF l_return_status = Error_Handler.G_STATUS_ERROR
1220: THEN
1221: RAISE EXC_SEV_QUIT_RECORD;

Line 1244: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

1240: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1241: , x_return_status => l_Return_Status
1242: );
1243:
1244: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
1245:
1246: IF l_return_status = Error_Handler.G_STATUS_ERROR
1247: THEN
1248: RAISE EXC_SEV_QUIT_RECORD;

Line 1262: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Performing Database write...'); END IF;

1258: --
1259: -- Process Flow step 10 : Database Writes
1260: --
1261:
1262: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Sub Comps: Performing Database write...'); END IF;
1263:
1264: Bom_Sub_Component_Util.Perform_Writes
1265: ( p_bom_sub_component_rec => l_bom_sub_component_rec
1266: , p_bom_sub_comp_unexp_rec => l_bom_sub_comp_unexp_rec

Line 1288: IF( l_bom_sub_component_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )

1284: --l_bom_sub_component_rec.return_status := l_return_status;
1285:
1286: l_bom_sub_component_tbl(I) := l_bom_sub_component_rec;
1287:
1288: IF( l_bom_sub_component_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )
1289: AND l_return_status = 'S')
1290: THEN
1291: G_SUB_COMP_FLAG := 1;
1292: END IF;

Line 1493: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

1489: IF ( G_SUB_COMP_FLAG = 1 AND l_sub_comp_processed) THEN
1490: Bom_Business_Event_PKG.Raise_Component_Event(
1491: p_event_load_type => 'Bulk'
1492: , p_request_identifier => FND_GLOBAL.CONC_REQUEST_ID
1493: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
1494: , p_event_entity_name => 'Substitute Component'
1495: , p_event_name => Bom_Business_Event_PKG.G_COMPONENT_MODIFIED_EVENT
1496: , p_last_update_date => sysdate
1497: , p_last_updated_by => fnd_global.user_id

Line 1572: l_bom_ref_desg_unexp_rec.organization_id := Bom_Globals.Get_org_id;

1568: l_bo_return_status := 'S';
1569:
1570: l_bom_ref_designator_tbl := p_bom_ref_designator_tbl;
1571:
1572: l_bom_ref_desg_unexp_rec.organization_id := Bom_Globals.Get_org_id;
1573:
1574:
1575: FOR I IN 1..l_bom_ref_designator_tbl.COUNT LOOP
1576: BEGIN

Line 1654: Bom_Globals.Transaction_Type_Validity

1650: --
1651: -- Check if transaction_type is valid
1652: --
1653:
1654: Bom_Globals.Transaction_Type_Validity
1655: ( p_transaction_type => l_bom_ref_designator_rec.transaction_type
1656: , p_entity => 'Ref_Desgs'
1657: , p_entity_id => l_bom_ref_designator_rec.assembly_item_name
1658: , x_valid => l_valid

Line 1764: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;

1760:
1761: -- Process Flow step 7: Check lineage
1762: --
1763:
1764: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
1765: Bom_Validate_Ref_Designator.Check_Lineage
1766: ( p_bom_ref_designator_rec => l_bom_ref_designator_rec
1767: , p_bom_ref_desg_unexp_rec => l_bom_ref_desg_unexp_rec
1768: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1855: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

1851: RAISE EXC_UNEXP_SKIP_OBJECT;
1852: END IF;
1853:
1854: IF l_bom_ref_designator_rec.transaction_type IN
1855: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
1856: THEN
1857:
1858: -- Process flow step 11 - Populate NULL columns for Update and
1859: -- Delete.

Line 1861: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populating NULL Columns'); END IF;

1857:
1858: -- Process flow step 11 - Populate NULL columns for Update and
1859: -- Delete.
1860:
1861: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populating NULL Columns'); END IF;
1862: Bom_Default_Ref_Designator.Populate_NULL_Columns
1863: ( p_bom_ref_designator_rec => l_bom_ref_designator_rec
1864: , p_old_bom_ref_designator_rec=> l_old_bom_ref_designator_rec
1865: , p_bom_ref_desg_unexp_rec => l_bom_ref_desg_unexp_rec

Line 1876: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation'); END IF;

1872:
1873: -- Process Flow step 12 - Entity Level Validation
1874: --
1875:
1876: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation'); END IF;
1877:
1878: IF l_bom_ref_designator_rec.transaction_type = 'DELETE'
1879: THEN
1880:

Line 1881: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Calling Entity Delete validation'); END IF;

1877:
1878: IF l_bom_ref_designator_rec.transaction_type = 'DELETE'
1879: THEN
1880:
1881: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Calling Entity Delete validation'); END IF;
1882:
1883: Bom_Validate_Ref_Designator.Check_Entity_Delete
1884: ( p_bom_ref_designator_rec => l_bom_ref_designator_rec
1885: , p_bom_ref_desg_unexp_rec => l_bom_ref_desg_unexp_rec

Line 1898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

1894: , x_return_status => l_Return_Status
1895: );
1896: END IF ;
1897:
1898: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
1899:
1900: IF l_return_status = Error_Handler.G_STATUS_ERROR
1901: THEN
1902: RAISE EXC_SEV_QUIT_RECORD;

Line 1932: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing to the database'); END IF;

1928: --
1929: -- Process Flow step 14 : Database Writes
1930: --
1931:
1932: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing to the database'); END IF;
1933: Bom_Ref_Designator_Util.Perform_Writes
1934: ( p_bom_ref_designator_rec => l_bom_ref_designator_rec
1935: , p_bom_ref_desg_unexp_rec => l_bom_ref_desg_unexp_rec
1936: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 1963: IF( l_bom_ref_designator_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )

1959: -- Load tables.
1960:
1961: l_bom_ref_designator_tbl(I) := l_bom_ref_designator_rec;
1962: --4306013
1963: IF( l_bom_ref_designator_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )
1964: AND l_return_status = 'S')
1965: THEN
1966: G_Ref_Desig_Flag := 1;
1967: END IF;

Line 2180: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

2176: IF ( G_Ref_Desig_Flag = 1 AND l_ref_desig_processed) THEN
2177: Bom_Business_Event_PKG.Raise_Component_Event(
2178: p_event_load_type => 'Bulk'
2179: , p_request_identifier => FND_GLOBAL.CONC_REQUEST_ID
2180: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
2181: , p_event_entity_name => 'Reference Designator'
2182: , p_event_name => Bom_Business_Event_PKG.G_COMPONENT_MODIFIED_EVENT
2183: , p_last_update_date => sysdate
2184: , p_last_updated_by => fnd_global.user_id

Line 2256: l_bom_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;

2252: l_bo_return_status := 'S';
2253:
2254: l_bom_component_tbl := p_bom_component_tbl;
2255:
2256: l_bom_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
2257:
2258: FOR I IN 1..l_bom_component_tbl.COUNT LOOP
2259: BEGIN
2260:

Line 2269: l_bom_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;

2265: l_process_children := false;
2266:
2267: -- Initialize the unexposed record;
2268: l_bom_comp_unexp_rec := Bom_Bo_Pub.G_MISS_BOM_COMP_UNEXP_REC;
2269: l_bom_comp_unexp_rec.organization_id := Bom_Globals.Get_org_id;
2270:
2271:
2272: l_bom_component_rec.transaction_type :=
2273: UPPER(l_bom_component_rec.transaction_type);

Line 2312: Bom_Globals.Transaction_Type_Validity

2308: --
2309: -- Check if transaction_type is valid
2310: --
2311:
2312: Bom_Globals.Transaction_Type_Validity
2313: ( p_transaction_type => l_bom_component_rec.transaction_type
2314: , p_entity => 'Rev_Comps'
2315: , p_entity_id => l_bom_component_rec.assembly_item_name
2316: , x_valid => l_valid

Line 2338: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

2334: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2335: , x_Return_Status => l_return_status
2336: );
2337:
2338: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
2339:
2340: IF l_return_status = Error_Handler.G_STATUS_ERROR
2341: THEN
2342: l_other_message := 'BOM_CMP_UUI_SEV_ERROR';

Line 2382: Bom_Globals.Set_Unit_Controlled_Item (

2378: l_other_token_tbl(1).token_value :=
2379: l_bom_component_rec.component_item_name;
2380: RAISE EXC_UNEXP_SKIP_OBJECT;
2381: END IF;
2382: Bom_Globals.Set_Unit_Controlled_Item (
2383: p_inventory_item_id => l_bom_comp_unexp_rec.assembly_item_id,
2384: p_organization_id => l_bom_comp_unexp_rec.organization_id);
2385:
2386: --

Line 2398: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

2394: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2395: , x_return_status => l_Return_Status
2396: );
2397:
2398: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
2399:
2400: IF l_return_status = Error_Handler.G_STATUS_ERROR
2401: THEN
2402: l_other_message := 'BOM_CMP_EXS_SEV_ERROR';

Line 2432: IF l_bom_component_rec.transaction_type = Bom_Globals.G_OPR_CREATE

2428: END IF;
2429:
2430: -- 5a.Check for the count of components if the current transaction is CREATE
2431:
2432: IF l_bom_component_rec.transaction_type = Bom_Globals.G_OPR_CREATE
2433: THEN
2434: create_rec_flag := 'Y';
2435: END IF;
2436:

Line 2487: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;

2483:
2484: -- Process Flow step 6: Check lineage
2485: --
2486:
2487: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Check lineage'); END IF;
2488: Bom_Validate_Bom_Component.Check_Lineage
2489: ( p_bom_component_rec => l_bom_component_rec
2490: , p_bom_comp_unexp_rec => l_bom_comp_unexp_rec
2491: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 2627: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Value-id conversions'); END IF;

2623:
2624: -- Process Flow step 11: Value to Id conversions
2625: --
2626:
2627: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Value-id conversions'); END IF;
2628: Bom_Val_To_Id.Bom_Component_VID
2629: ( x_Return_Status => l_return_status
2630: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2631: , p_bom_comp_unexp_Rec => l_bom_comp_unexp_rec

Line 2636: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

2632: , x_bom_comp_unexp_Rec => l_bom_comp_unexp_rec
2633: , p_bom_component_Rec => l_bom_component_rec
2634: );
2635:
2636: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
2637:
2638: IF l_return_status = Error_Handler.G_STATUS_ERROR
2639: THEN
2640: IF l_bom_component_rec.transaction_type = 'CREATE'

Line 2717: (Bom_Globals.G_OPR_CREATE, Bom_Globals.G_OPR_UPDATE)

2713: -- Process Flow step : Attribute Validation for CREATE and UPDATE
2714: --
2715:
2716: IF l_bom_component_rec.Transaction_Type IN
2717: (Bom_Globals.G_OPR_CREATE, Bom_Globals.G_OPR_UPDATE)
2718: THEN
2719: Bom_Validate_Bom_Component.Check_Attributes
2720: ( x_return_status => l_return_status
2721: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 2773: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

2769: -- Process flow step - Populate NULL columns for Update and
2770: -- Delete, and Creates with ACD_Type 'Add'.
2771:
2772: IF l_bom_component_rec.transaction_type IN
2773: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
2774: THEN
2775: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;
2776: Bom_Default_Bom_Component.Populate_Null_Columns
2777: ( p_bom_component_rec => l_bom_Component_Rec

Line 2775: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;

2771:
2772: IF l_bom_component_rec.transaction_type IN
2773: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
2774: THEN
2775: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Populate NULL columns'); END IF;
2776: Bom_Default_Bom_Component.Populate_Null_Columns
2777: ( p_bom_component_rec => l_bom_Component_Rec
2778: , p_old_bom_Component_Rec => l_old_bom_Component_Rec
2779: , p_bom_comp_unexp_rec => l_bom_comp_unexp_rec

Line 2785: ELSIF l_bom_component_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE

2781: , x_bom_Component_Rec => l_bom_Component_Rec
2782: , x_bom_comp_unexp_rec => l_bom_comp_unexp_rec
2783: );
2784:
2785: ELSIF l_bom_component_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE
2786: THEN
2787:
2788: --
2789: -- Process Flow step : Default missing values for Operation

Line 2793: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting'); END IF;

2789: -- Process Flow step : Default missing values for Operation
2790: -- CREATE
2791: --
2792:
2793: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Attribute Defaulting'); END IF;
2794: Bom_Default_Bom_Component.Attribute_Defaulting
2795: ( p_bom_component_rec => l_bom_component_rec
2796: , p_bom_comp_unexp_rec => l_bom_comp_unexp_rec
2797: , x_bom_component_rec => l_bom_component_rec

Line 2803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;

2799: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
2800: , x_return_status => l_return_status
2801: );
2802:
2803: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('return_status: ' || l_return_status); END IF;
2804:
2805: IF l_return_status = Error_Handler.G_STATUS_ERROR
2806: THEN
2807: l_other_message := 'BOM_CMP_ATTDEF_CSEV_SKIP';

Line 2847: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting'); END IF;

2843: --
2844: -- Process Flow step 17: Entity defaulting for CREATE and UPDATE
2845: --
2846:
2847: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting'); END IF;
2848: IF l_bom_component_rec.Transaction_Type IN
2849: (Bom_Globals.G_OPR_CREATE, Bom_Globals.G_OPR_UPDATE)
2850: THEN
2851: Bom_Default_Bom_Component.Entity_Defaulting

Line 2849: (Bom_Globals.G_OPR_CREATE, Bom_Globals.G_OPR_UPDATE)

2845: --
2846:
2847: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity defaulting'); END IF;
2848: IF l_bom_component_rec.Transaction_Type IN
2849: (Bom_Globals.G_OPR_CREATE, Bom_Globals.G_OPR_UPDATE)
2850: THEN
2851: Bom_Default_Bom_Component.Entity_Defaulting
2852: ( p_bom_component_rec => l_bom_component_rec
2853: , p_old_bom_component_rec => l_old_bom_component_rec

Line 2903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Defaulting completed with ' || l_return_Status || ' starting with Components entity validation . . . '); END IF;

2899:
2900: --
2901: -- Process Flow step 18 - Entity Level Validation
2902: --
2903: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity Defaulting completed with ' || l_return_Status || ' starting with Components entity validation . . . '); END IF;
2904:
2905: Bom_Validate_Bom_Component.Check_Entity
2906: ( p_bom_component_rec => l_bom_component_rec
2907: , p_bom_comp_unexp_rec => l_bom_comp_unexp_rec

Line 2954: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with ' || l_return_Status || ' proceeding for database writes . . . '); END IF;

2950: , x_bom_sub_component_tbl => l_bom_sub_component_tbl
2951: );
2952: Error_Handler.Get_Bom_Specific(x_bom_comp_ops_tbl => l_bom_comp_ops_tbl);
2953: END IF;
2954: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Entity validation completed with ' || l_return_Status || ' proceeding for database writes . . . '); END IF;
2955:
2956: --
2957: -- Process Flow step 16 : Database Writes
2958: --

Line 2994: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status. . . ' || l_return_status); END IF;

2990: );
2991: Error_Handler.Get_Bom_Specific(x_bom_comp_ops_tbl => l_bom_comp_ops_tbl);
2992: END IF;
2993:
2994: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Database writes completed with status. . . ' || l_return_status); END IF;
2995:
2996: END IF; -- END IF statement that checks RETURN STATUS
2997:
2998: -- Load tables.

Line 3285: IF( l_bom_component_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )

3281: RETURN;
3282: END IF;
3283:
3284: --4306013
3285: IF( l_bom_component_tbl(I).transaction_type in ( Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE )
3286: AND l_return_status = 'S')
3287: THEN
3288: G_Comp_Flag := 1;
3289: END IF;

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

3289: END IF;
3290:
3291: IF l_process_children
3292: THEN
3293: IF Bom_Globals.Get_Debug = 'Y' THEN
3294: Error_Handler.Write_Debug('Component processing completed, process_child true so proceeding with ref desg and then sub comps. . . ' || l_return_status); END IF;
3295:
3296: -- Process Reference Designators that are direct children of this
3297: -- component

Line 3383: IF ( G_Comp_Flag = 1 and (Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO)

3379: x_return_status := l_return_status;
3380: END IF;
3381:
3382: /*********Business Event************/
3383: IF ( G_Comp_Flag = 1 and (Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO)
3384: AND l_comps_processed
3385: ) THEN
3386: Bom_Business_Event_PKG.Raise_Bill_Event(
3387: p_event_load_type => 'Bulk'

Line 3389: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

3385: ) THEN
3386: Bom_Business_Event_PKG.Raise_Bill_Event(
3387: p_event_load_type => 'Bulk'
3388: , p_request_identifier => FND_GLOBAL.CONC_REQUEST_ID
3389: , p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
3390: , p_event_entity_name => 'Component'
3391: , p_event_name => Bom_Business_Event_PKG.G_STRUCTURE_MODIFIED_EVENT
3392: , p_last_update_date => sysdate
3393: , p_last_updated_by => fnd_global.user_id

Line 3477: l_bom_rev_unexp_rec.organization_id := Bom_Globals.Get_org_id;

3473: -- Init local table variables.
3474:
3475: l_bom_revision_tbl := p_bom_revision_tbl;
3476:
3477: l_bom_rev_unexp_rec.organization_id := Bom_Globals.Get_org_id;
3478:
3479: FOR I IN 1..l_bom_revision_tbl.COUNT LOOP
3480: BEGIN
3481:

Line 3523: Bom_Globals.Transaction_Type_Validity

3519: --
3520: -- Check if transaction_type is valid
3521: --
3522:
3523: Bom_Globals.Transaction_Type_Validity
3524: ( p_transaction_type => l_bom_revision_rec.transaction_type
3525: , p_entity => 'Bom_Rev'
3526: , p_entity_id => l_bom_revision_rec.revision
3527: , x_valid => l_valid

Line 3590: IF l_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE

3586: -- If revision is being created and the business object does not
3587: -- carry the BOM header, then it is imperative to check for the
3588: -- BOM Header's existence
3589:
3590: IF l_bom_revision_rec.transaction_type = Bom_Globals.G_OPR_CREATE
3591: AND
3592: NOT l_bom_parent_exists
3593: THEN
3594: l_bom_header_rec.alternate_bom_code := p_alternate_bom_code;

Line 3698: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

3694:
3695: END IF;
3696:
3697: IF l_bom_revision_rec.Transaction_Type IN
3698: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
3699: THEN
3700:
3701: -- Process flow step 7 - Populate NULL columns for Update and
3702: -- Delete.

Line 3713: ELSIF l_bom_revision_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE

3709: , x_bom_revision_rec => l_bom_revision_rec
3710: , x_bom_rev_unexp_rec => l_bom_rev_unexp_rec
3711: );
3712:
3713: ELSIF l_bom_revision_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE
3714: THEN
3715:
3716: --
3717: -- Process Flow step 8: Default missing values for Operation

Line 4000: l_bom_header_Unexp_rec.organization_id := Bom_Globals.Get_Org_Id;

3996:
3997: -- Load entity and record-specific details into system_information
3998: -- record
3999:
4000: l_bom_header_Unexp_rec.organization_id := Bom_Globals.Get_Org_Id;
4001:
4002:
4003: l_bom_header_rec := p_bom_header_rec;
4004: l_bom_header_rec.transaction_type :=

Line 4028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Transaction Type Validity . . . '); END IF;

4024:
4025: --
4026: -- Process Flow Step 3: Check if transaction_type is valid
4027: --
4028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Transaction Type Validity . . . '); END IF;
4029:
4030: Bom_Globals.Transaction_Type_Validity
4031: ( p_transaction_type => l_bom_header_rec.transaction_type
4032: , p_entity => 'Bom_Header'

Line 4030: Bom_Globals.Transaction_Type_Validity

4026: -- Process Flow Step 3: Check if transaction_type is valid
4027: --
4028: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Transaction Type Validity . . . '); END IF;
4029:
4030: Bom_Globals.Transaction_Type_Validity
4031: ( p_transaction_type => l_bom_header_rec.transaction_type
4032: , p_entity => 'Bom_Header'
4033: , p_entity_id => l_bom_header_rec.assembly_item_name
4034: , x_valid => l_valid

Line 4048: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: UUI-"UI Conversion . . .'); END IF;

4044:
4045: --
4046: -- Process Flow Step 4: Convert User Unique Index to Unique Index
4047: --
4048: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: UUI-"UI Conversion . . .'); END IF;
4049:
4050: Bom_Val_To_Id.BOM_Header_UUI_To_UI
4051: ( p_bom_header_rec => l_bom_header_rec
4052: , p_bom_header_unexp_rec => l_bom_header_unexp_rec

Line 4077: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Existence . . .'); END IF;

4073: --
4074: -- Process Flow step 5: Verify Bom Header's existence
4075: --
4076:
4077: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Existence . . .'); END IF;
4078:
4079: Bom_Validate_Bom_Header.Check_Existence
4080: ( p_bom_header_rec => l_bom_header_rec
4081: , p_bom_head_unexp_rec=> l_bom_header_unexp_rec

Line 4115: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Access . . .'); END IF;

4111:
4112: --
4113: -- Process Flow Step:6 Check Access to the Bill Item's Bom Item Type
4114: --
4115: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Access . . .'); END IF;
4116:
4117: Bom_Validate_Bom_Header.Check_Access
4118: ( p_assembly_item_id => l_bom_header_unexp_rec.assembly_item_id
4119: , p_alternate_bom_code => l_bom_header_rec.alternate_bom_code

Line 4144: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Value-Id Conversion . . .'); END IF;

4140:
4141: --
4142: -- Process Flow Step: 7 Value to ID Conversion
4143: --
4144: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Value-Id Conversion . . .'); END IF;
4145: Bom_Val_To_Id.Bom_Header_VID
4146: ( x_Return_Status => l_return_status
4147: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
4148: , p_bom_header_rec => l_bom_header_rec

Line 4198: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)

4194: -- Process Flow step 8: Attribute Validation for Create and Update
4195: --
4196:
4197: IF l_bom_header_rec.transaction_type IN
4198: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
4199: THEN
4200: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Attributes . . .'); END IF;
4201:
4202: Bom_Validate_Bom_Header.Check_Attributes

Line 4200: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Attributes . . .'); END IF;

4196:
4197: IF l_bom_header_rec.transaction_type IN
4198: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_CREATE)
4199: THEN
4200: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Check Attributes . . .'); END IF;
4201:
4202: Bom_Validate_Bom_Header.Check_Attributes
4203: ( x_return_status => l_return_status
4204: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl

Line 4262: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)

4258: -- If the Transaction Type is Update/Delete, then Populate_Null_Columns
4259: -- Else Attribute_Defaulting
4260: --
4261: IF l_bom_header_rec.Transaction_Type IN
4262: (Bom_Globals.G_OPR_UPDATE, Bom_Globals.G_OPR_DELETE)
4263: THEN
4264:
4265: --
4266: -- Process flow step 9 - Populate NULL columns for Update and

Line 4270: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Populate Null Columns . . .'); END IF;

4266: -- Process flow step 9 - Populate NULL columns for Update and
4267: -- Delete.
4268: --
4269:
4270: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Populate Null Columns . . .'); END IF;
4271:
4272: Bom_Default_Bom_Header.Populate_NULL_Columns
4273: ( p_bom_header_rec => l_bom_header_rec
4274: , p_bom_head_unexp_rec => l_bom_header_unexp_rec

Line 4281: ELSIF l_bom_header_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE THEN

4277: , x_bom_header_rec => l_bom_header_rec
4278: , x_bom_head_unexp_rec => l_bom_header_unexp_rec
4279: );
4280:
4281: ELSIF l_bom_header_rec.Transaction_Type = Bom_Globals.G_OPR_CREATE THEN
4282:
4283: --
4284: -- Process Flow step 9: Default missing values for Operation CREATE
4285: --

Line 4287: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Attribute Defaulting . . .'); END IF;

4283: --
4284: -- Process Flow step 9: Default missing values for Operation CREATE
4285: --
4286:
4287: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bom Header: Attribute Defaulting . . .'); END IF;
4288:
4289: Bom_Default_Bom_Header.Attribute_Defaulting
4290: ( p_bom_header_rec => l_bom_header_rec
4291: , p_bom_head_unexp_rec => l_bom_header_unexp_rec

Line 4352: IF l_bom_header_rec.transaction_type = Bom_Globals.G_OPR_CREATE

4348: );
4349:
4350: IF l_return_status = Error_Handler.G_STATUS_ERROR
4351: THEN
4352: IF l_bom_header_rec.transaction_type = Bom_Globals.G_OPR_CREATE
4353: THEN
4354: l_other_message := 'BOM_BOM_CONREQ_CSEV_SKIP';
4355: l_other_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
4356: l_other_token_tbl(1).token_value :=

Line 4421: IF l_bom_header_rec.transaction_type = Bom_Globals.G_OPR_CREATE

4417: );
4418: END IF;
4419: IF l_return_status = Error_Handler.G_STATUS_ERROR
4420: THEN
4421: IF l_bom_header_rec.transaction_type = Bom_Globals.G_OPR_CREATE
4422: THEN
4423: l_other_message := 'BOM_BOM_CHECKENT_CSEV_SKIP';
4424: l_other_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';
4425: l_other_token_tbl(1).token_value :=

Line 4816: if (Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO) then

4812: END IF;
4813:
4814: /*****************Business Event*********/
4815: IF ( l_return_status = 'S') THEN
4816: if (Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO) then
4817: IF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_CREATE) THEN
4818: Bom_Business_Event_PKG.Raise_Bill_Event
4819: (p_Event_Load_Type => 'Bulk'
4820: ,p_Request_Identifier => FND_GLOBAL.CONC_REQUEST_ID

Line 4817: IF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_CREATE) THEN

4813:
4814: /*****************Business Event*********/
4815: IF ( l_return_status = 'S') THEN
4816: if (Bom_Globals.Get_Bo_Identifier = Bom_Globals.G_BOM_BO) then
4817: IF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_CREATE) THEN
4818: Bom_Business_Event_PKG.Raise_Bill_Event
4819: (p_Event_Load_Type => 'Bulk'
4820: ,p_Request_Identifier => FND_GLOBAL.CONC_REQUEST_ID
4821: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

Line 4821: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

4817: IF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_CREATE) THEN
4818: Bom_Business_Event_PKG.Raise_Bill_Event
4819: (p_Event_Load_Type => 'Bulk'
4820: ,p_Request_Identifier => FND_GLOBAL.CONC_REQUEST_ID
4821: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
4822: ,p_Event_Entity_Name => 'Structure'
4823: ,p_Event_Entity_Parent_Id => G_Bill_Seq_Id
4824: ,p_Event_Name => Bom_Business_Event_PKG.G_STRUCTURE_CREATION_EVENT
4825: ,p_last_update_date => sysdate

Line 4828: ELSIF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_UPDATE) THEN

4824: ,p_Event_Name => Bom_Business_Event_PKG.G_STRUCTURE_CREATION_EVENT
4825: ,p_last_update_date => sysdate
4826: ,p_last_updated_by => FND_GLOBAL.user_id
4827: );
4828: ELSIF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_UPDATE) THEN
4829: Bom_Business_Event_PKG.Raise_Bill_Event
4830: (p_Event_Load_Type => 'Bulk'
4831: ,p_Request_Identifier => FND_GLOBAL.CONC_REQUEST_ID
4832: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

Line 4832: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID

4828: ELSIF l_bom_header_rec.transaction_type in ( Bom_Globals.G_OPR_UPDATE) THEN
4829: Bom_Business_Event_PKG.Raise_Bill_Event
4830: (p_Event_Load_Type => 'Bulk'
4831: ,p_Request_Identifier => FND_GLOBAL.CONC_REQUEST_ID
4832: ,p_batch_identifier => BOM_GLOBALS.G_BATCH_ID
4833: ,p_Event_Entity_Name => 'Structure'
4834: ,p_Event_Entity_Parent_Id => G_Bill_Seq_Id
4835: ,p_Event_Name => Bom_Business_Event_PKG.G_STRUCTURE_MODIFIED_EVENT
4836: ,p_last_update_date => sysdate

Line 4937: Bom_Globals.Init_System_Info_Rec

4933:
4934: --Load environment information into the SYSTEM_INFORMATION record
4935: -- (USER_ID, LOGIN_ID, PROG_APPID, PROG_ID)
4936:
4937: Bom_Globals.Init_System_Info_Rec
4938: ( x_mesg_token_tbl => l_mesg_token_tbl
4939: , x_return_status => l_return_status
4940: );
4941:

Line 4948: Bom_Globals.Set_Unit_Effectivity (TRUE);

4944: IF (FND_PROFILE.DEFINED('PJM:PJM_UNITEFF_NO_EFFECT') AND
4945: FND_PROFILE.VALUE('PJM:PJM_UNITEFF_NO_EFFECT') = 'Y')
4946: OR (BOM_EAMUTIL.Enabled = 'Y')
4947: THEN
4948: Bom_Globals.Set_Unit_Effectivity (TRUE);
4949: ELSE
4950: Bom_Globals.Set_Unit_Effectivity (FALSE);
4951: END IF;
4952:

Line 4950: Bom_Globals.Set_Unit_Effectivity (FALSE);

4946: OR (BOM_EAMUTIL.Enabled = 'Y')
4947: THEN
4948: Bom_Globals.Set_Unit_Effectivity (TRUE);
4949: ELSE
4950: Bom_Globals.Set_Unit_Effectivity (FALSE);
4951: END IF;
4952:
4953: IF l_return_status <> FND_API.G_RET_STS_SUCCESS
4954: THEN

Line 5152: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);

5148: x_bom_comp_ops_tbl := l_bom_comp_ops_tbl;
5149:
5150: -- Reset system_information business object flags
5151:
5152: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5153: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5154: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5155: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5156:

Line 5153: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);

5149:
5150: -- Reset system_information business object flags
5151:
5152: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5153: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5154: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5155: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5156:
5157: EXCEPTION

Line 5154: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);

5150: -- Reset system_information business object flags
5151:
5152: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5153: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5154: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5155: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5156:
5157: EXCEPTION
5158:

Line 5155: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);

5151:
5152: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5153: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5154: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5155: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5156:
5157: EXCEPTION
5158:
5159: WHEN EXC_ERR_PVT_API_MAIN THEN

Line 5192: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);

5188: x_bom_comp_ops_tbl := l_bom_comp_ops_tbl;
5189:
5190: -- Reset system_information business object flags
5191:
5192: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5193: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5194: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5195: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5196:

Line 5193: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);

5189:
5190: -- Reset system_information business object flags
5191:
5192: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5193: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5194: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5195: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5196:
5197: WHEN G_EXC_QUIT_IMPORT THEN

Line 5194: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);

5190: -- Reset system_information business object flags
5191:
5192: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5193: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5194: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5195: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5196:
5197: WHEN G_EXC_QUIT_IMPORT THEN
5198:

Line 5195: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);

5191:
5192: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5193: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5194: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5195: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5196:
5197: WHEN G_EXC_QUIT_IMPORT THEN
5198:
5199: x_return_status := l_return_status;

Line 5209: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);

5205: x_bom_comp_ops_tbl := l_bom_comp_ops_tbl;
5206:
5207: -- Reset system_information business object flags
5208:
5209: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5210: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5211: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5212: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5213:

Line 5210: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);

5206:
5207: -- Reset system_information business object flags
5208:
5209: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5210: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5211: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5212: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5213:
5214: WHEN OTHERS THEN

Line 5211: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);

5207: -- Reset system_information business object flags
5208:
5209: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5210: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5211: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5212: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5213:
5214: WHEN OTHERS THEN
5215:

Line 5212: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);

5208:
5209: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5210: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5211: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5212: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5213:
5214: WHEN OTHERS THEN
5215:
5216: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 5258: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);

5254: x_bom_comp_ops_tbl := l_bom_comp_ops_tbl;
5255:
5256: -- Reset system_information business object flags
5257:
5258: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5259: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5260: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5261: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5262:

Line 5259: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);

5255:
5256: -- Reset system_information business object flags
5257:
5258: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5259: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5260: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5261: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5262:
5263: END Process_BOM;

Line 5260: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);

5256: -- Reset system_information business object flags
5257:
5258: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5259: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5260: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5261: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5262:
5263: END Process_BOM;
5264: END Bom_Bo_Pvt;

Line 5261: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);

5257:
5258: Bom_GLOBALS.Set_STD_Item_Access( p_std_item_access => NULL);
5259: Bom_GLOBALS.Set_MDL_Item_Access( p_mdl_item_access => NULL);
5260: Bom_GLOBALS.Set_PLN_Item_Access( p_pln_item_access => NULL);
5261: Bom_GLOBALS.Set_OC_Item_Access( p_oc_item_access => NULL);
5262:
5263: END Process_BOM;
5264: END Bom_Bo_Pvt;