DBA Data[Home] [Help]

APPS.BOM_VALIDATE_OP_NETWORK dependencies on BOM_RTG_GLOBALS

Line 65: IF BOM_Rtg_Globals.Get_Debug = 'Y'

61: l_return_status := FND_API.G_RET_STS_SUCCESS;
62: x_return_status := FND_API.G_RET_STS_SUCCESS;
63: l_mesg_token_tbl := p_mesg_token_tbl;
64:
65: IF BOM_Rtg_Globals.Get_Debug = 'Y'
66: THEN Error_Handler.Write_Debug
67: ('Within Operation Network Check Eam Rtg Network. . . ');
68: END IF;
69:

Line 73: l_common_routing_sequence_id := BOM_Rtg_Globals.Get_Common_Rtg_Seq_id ;

69:
70:
71: -- Get Common Routing Seq Id from System Info Rec.
72: -- If the value is Null, set Common Routing Seq Id.
73: l_common_routing_sequence_id := BOM_Rtg_Globals.Get_Common_Rtg_Seq_id ;
74:
75: IF l_common_routing_sequence_id IS NULL OR
76: l_common_routing_sequence_id = FND_API.G_MISS_NUM
77: THEN

Line 86: BOM_Rtg_Globals.Set_Common_Rtg_Seq_id

82: WHERE routing_sequence_id =
83: p_op_network_unexp_rec.routing_sequence_id ;
84: END ;
85:
86: BOM_Rtg_Globals.Set_Common_Rtg_Seq_id
87: ( p_common_rtg_seq_id => l_common_routing_sequence_id );
88:
89: END IF;
90:

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

87: ( p_common_rtg_seq_id => l_common_routing_sequence_id );
88:
89: END IF;
90:
91: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
92: Error_Handler.Write_Debug('Call eAM Rtg Network validation API. . . ');
93: END IF;
94:
95: -- Call Routing eAM API for eAM Rtg Network validation

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

161: l_return_status VARCHAR2(1);
162: cfm_flag NUMBER := NULL ;
163: BEGIN
164:
165: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
166: Error_Handler.Write_Debug('Quering Op Network . . .' ) ;
167: END IF;
168:
169: Bom_Op_Network_Util.Query_Row

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

175: , x_op_network_unexp_rec => x_old_op_network_unexp_rec
176: , x_return_status => l_return_status
177: );
178:
179: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
180: Error_Handler.Write_Debug('Query Row Returned with : ' || l_return_status);
181: END IF;
182:
183: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND

Line 183: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND

179: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
180: Error_Handler.Write_Debug('Query Row Returned with : ' || l_return_status);
181: END IF;
182:
183: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
184: p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
185: THEN
186: l_token_tbl(1).token_name := 'FROM_OP_SEQ_NUMBER';
187: l_token_tbl(1).token_value :=

Line 184: p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

180: Error_Handler.Write_Debug('Query Row Returned with : ' || l_return_status);
181: END IF;
182:
183: IF l_return_status = BOM_Rtg_Globals.G_RECORD_FOUND AND
184: p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
185: THEN
186: l_token_tbl(1).token_name := 'FROM_OP_SEQ_NUMBER';
187: l_token_tbl(1).token_value :=
188: p_op_network_rec.from_op_seq_number;

Line 199: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND

195: , p_message_name => 'BOM_OP_NWK_ALREADY_EXISTS'
196: , p_token_tbl => l_token_tbl
197: );
198: l_return_status := FND_API.G_RET_STS_ERROR;
199: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
200: p_op_network_rec.transaction_type IN
201: ( BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
202: THEN
203: l_token_tbl(1).token_name := 'FROM_OP_SEQ_NUMBER';

Line 201: ( BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)

197: );
198: l_return_status := FND_API.G_RET_STS_ERROR;
199: ELSIF l_return_status = BOM_Rtg_Globals.G_RECORD_NOT_FOUND AND
200: p_op_network_rec.transaction_type IN
201: ( BOM_Rtg_Globals.G_OPR_UPDATE, BOM_Rtg_Globals.G_OPR_DELETE)
202: THEN
203: l_token_tbl(1).token_name := 'FROM_OP_SEQ_NUMBER';
204: l_token_tbl(1).token_value :=
205: p_op_network_rec.from_op_seq_number;

Line 286: IF BOM_Rtg_Globals.Get_Debug = 'Y'

282: BEGIN
283:
284: l_return_status := FND_API.G_RET_STS_SUCCESS;
285:
286: IF BOM_Rtg_Globals.Get_Debug = 'Y'
287: THEN Error_Handler.Write_Debug
288: ('Within Operation Network Check Access. . . ');
289: END IF;
290:

Line 305: l_cfm_flag := BOM_Rtg_Globals.Get_CFM_Rtg_Flag ;

301:
302:
303: -- Check if operation is valid on current date when the current operation
304: -- is for Lot Based routing.
305: l_cfm_flag := BOM_Rtg_Globals.Get_CFM_Rtg_Flag ;
306:
307:
308: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
309: ('Cfm Routing Flag is ' || to_char(l_cfm_flag) ||

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

304: -- is for Lot Based routing.
305: l_cfm_flag := BOM_Rtg_Globals.Get_CFM_Rtg_Flag ;
306:
307:
308: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
309: ('Cfm Routing Flag is ' || to_char(l_cfm_flag) ||
310: '. . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;
311: END IF ;
312:

Line 310: '. . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;

306:
307:
308: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
309: ('Cfm Routing Flag is ' || to_char(l_cfm_flag) ||
310: '. . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;
311: END IF ;
312:
313: IF l_cfm_flag IS NULL OR
314: l_cfm_flag = FND_API.G_MISS_NUM

Line 318: BOM_Rtg_Globals.Set_CFM_Rtg_Flag(p_cfm_rtg_type => l_cfm_flag) ;

314: l_cfm_flag = FND_API.G_MISS_NUM
315: THEN
316: l_cfm_flag := Bom_Rtg_Validate.Get_Flow_Routing_Flag
317: (p_op_network_unexp_rec.routing_sequence_id) ;
318: BOM_Rtg_Globals.Set_CFM_Rtg_Flag(p_cfm_rtg_type => l_cfm_flag) ;
319: END IF;
320:
321: IF l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG
322: THEN

Line 321: IF l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG

317: (p_op_network_unexp_rec.routing_sequence_id) ;
318: BOM_Rtg_Globals.Set_CFM_Rtg_Flag(p_cfm_rtg_type => l_cfm_flag) ;
319: END IF;
320:
321: IF l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG
322: THEN
323:
324: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
325: ('Check flow routing network . . . ' ) ;

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

320:
321: IF l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG
322: THEN
323:
324: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
325: ('Check flow routing network . . . ' ) ;
326: END IF ;
327:
328: -- In current release, validations for Check Access

Line 332: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_LOT_RTG

328: -- In current release, validations for Check Access
329: -- in Flow Rtg's Op Network do not exist.
330: NULL ;
331:
332: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_LOT_RTG
333: THEN
334:
335: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
336: ('Check WSM routing network . . . ' ) ;

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

331:
332: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_LOT_RTG
333: THEN
334:
335: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
336: ('Check WSM routing network . . . ' ) ;
337: END IF ;
338: if BOM_Rtg_GLobals.Get_CFM_Rtg_Flag <> BOM_Rtg_Globals.G_Lot_Rtg then --for bug 3132411
339: FOR l_nwkop_rec IN l_nwkop_csr

Line 338: if BOM_Rtg_GLobals.Get_CFM_Rtg_Flag <> BOM_Rtg_Globals.G_Lot_Rtg then --for bug 3132411

334:
335: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
336: ('Check WSM routing network . . . ' ) ;
337: END IF ;
338: if BOM_Rtg_GLobals.Get_CFM_Rtg_Flag <> BOM_Rtg_Globals.G_Lot_Rtg then --for bug 3132411
339: FOR l_nwkop_rec IN l_nwkop_csr
340: ( p_op_seq_id => NVL(p_op_network_unexp_rec.new_from_op_seq_id,
341: p_op_network_unexp_rec.from_op_seq_id )
342: )

Line 416: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_STD_RTG

412: end if; --for bug 3132411
413:
414: -- For eAM enhancement
415: -- Check access for network of Maintenace Routings
416: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_STD_RTG
417: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
418: THEN
419:
420: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 417: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY

413:
414: -- For eAM enhancement
415: -- Check access for network of Maintenace Routings
416: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_STD_RTG
417: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
418: THEN
419:
420: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
421: ('Check maintenance routing network . . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;

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

416: ELSIF l_cfm_flag = BOM_Rtg_Globals.G_STD_RTG
417: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
418: THEN
419:
420: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
421: ('Check maintenance routing network . . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;
422: END IF ;
423:
424: -- Check if the from operation has been disabled

Line 421: ('Check maintenance routing network . . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;

417: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
418: THEN
419:
420: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
421: ('Check maintenance routing network . . . Eam Item Type is ' || to_char(BOM_Rtg_Globals.Get_Eam_Item_Type) ) ;
422: END IF ;
423:
424: -- Check if the from operation has been disabled
425: FOR l_nwkop_rec IN l_nwkop_csr

Line 481: ELSIF l_cfm_flag <> BOM_Rtg_Globals.G_FLOW_RTG

477:
478: -- For eAM enhancement, following cfm routing flag validation
479: -- is moved from BOM_RTG_Val_To_Id.OP_Network_UUI_To_UI procedure
480: -- and added condition for maintenance routing
481: ELSIF l_cfm_flag <> BOM_Rtg_Globals.G_FLOW_RTG
482: AND l_cfm_flag <> BOM_Rtg_Globals.G_LOT_RTG
483: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
484: THEN
485:

Line 482: AND l_cfm_flag <> BOM_Rtg_Globals.G_LOT_RTG

478: -- For eAM enhancement, following cfm routing flag validation
479: -- is moved from BOM_RTG_Val_To_Id.OP_Network_UUI_To_UI procedure
480: -- and added condition for maintenance routing
481: ELSIF l_cfm_flag <> BOM_Rtg_Globals.G_FLOW_RTG
482: AND l_cfm_flag <> BOM_Rtg_Globals.G_LOT_RTG
483: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
484: THEN
485:
486: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 483: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY

479: -- is moved from BOM_RTG_Val_To_Id.OP_Network_UUI_To_UI procedure
480: -- and added condition for maintenance routing
481: ELSIF l_cfm_flag <> BOM_Rtg_Globals.G_FLOW_RTG
482: AND l_cfm_flag <> BOM_Rtg_Globals.G_LOT_RTG
483: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
484: THEN
485:
486: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
487: ('Check if parenet routing is a standard routing. ' || l_return_status) ;

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

482: AND l_cfm_flag <> BOM_Rtg_Globals.G_LOT_RTG
483: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
484: THEN
485:
486: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
487: ('Check if parenet routing is a standard routing. ' || l_return_status) ;
488: END IF ;
489: l_token_tbl.delete ;
490: l_token_tbl(1).token_name := 'ASSEMBLY_ITEM_NAME';

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

499: l_return_status := FND_API.G_RET_STS_ERROR ;
500:
501: END IF ;
502:
503: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
504: ('Check if operations for network are valid. ' || l_return_status) ;
505: END IF ;
506: -- Return Status and Message Token
507: x_return_status := l_return_status;

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

508: x_mesg_token_tbl := l_mesg_token_tbl;
509:
510: EXCEPTION
511: WHEN OTHERS THEN
512: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
513: ('Some unknown error in Check Access. . .' || SQLERRM );
514: END IF ;
515:
516:

Line 565: IF BOM_Rtg_Globals.Get_Debug = 'Y'

561: BEGIN
562:
563: x_return_status := FND_API.G_RET_STS_SUCCESS;
564:
565: IF BOM_Rtg_Globals.Get_Debug = 'Y'
566: THEN Error_Handler.Write_Debug
567: ('Within Operation Network Check Attributes . . . ');
568: END IF;
569:

Line 584: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

580: -- Check if the user is trying to update a record with
581: -- missing value when the column value is required.
582: --
583:
584: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
585: THEN
586:
587:
588: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

Line 588: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

584: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
585: THEN
586:
587:
588: IF Bom_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
589: ('Operation Attr Validation: Missing Value. . . ' || x_return_status) ;
590: END IF;
591:
592: -- Connection(Transition) Type

Line 676: l_cfm_flag := BOM_Rtg_Globals.Get_CFM_Rtg_Flag ;

672: END IF;
673:
674: END LOOP;
675: */
676: l_cfm_flag := BOM_Rtg_Globals.Get_CFM_Rtg_Flag ;
677:
678:
679: IF l_cfm_flag IS NULL OR
680: l_cfm_flag = FND_API.G_MISS_NUM

Line 684: BOM_Rtg_Globals.Set_CFM_Rtg_Flag(p_cfm_rtg_type => l_cfm_flag) ;

680: l_cfm_flag = FND_API.G_MISS_NUM
681: THEN
682: l_cfm_flag := Bom_Rtg_Validate.Get_Flow_Routing_Flag
683: (p_op_network_unexp_rec.routing_sequence_id) ;
684: BOM_Rtg_Globals.Set_CFM_Rtg_Flag(p_cfm_rtg_type => l_cfm_flag) ;
685: END IF;
686:
687: IF p_op_network_rec.connection_type NOT IN (1, 2)
688: AND p_op_network_rec.connection_type is NOT NULL

Line 690: AND l_cfm_flag = BOM_Rtg_Globals.G_LOT_RTG

686:
687: IF p_op_network_rec.connection_type NOT IN (1, 2)
688: AND p_op_network_rec.connection_type is NOT NULL
689: AND p_op_network_rec.connection_type <> FND_API.G_MISS_NUM
690: AND l_cfm_flag = BOM_Rtg_Globals.G_LOT_RTG
691: THEN
692: Error_Handler.Add_Error_Token
693: ( p_message_name => 'BOM_OP_NWK_CNTYPE_INVALID'
694: , p_token_tbl => l_token_tbl

Line 705: AND l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG

701: -- Flow Routing's Network can have connetion type : 3 - Rework
702: ELSIF p_op_network_rec.connection_type NOT IN (1, 2, 3)
703: AND p_op_network_rec.connection_type is NOT NULL
704: AND p_op_network_rec.connection_type <> FND_API.G_MISS_NUM
705: AND l_cfm_flag = BOM_Rtg_Globals.G_FLOW_RTG
706: THEN
707:
708: Error_Handler.Add_Error_Token
709: ( p_message_name => 'BOM_OP_NWK_CNTYPE_INVALID'

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

734: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
735:
736: EXCEPTION
737: WHEN OTHERS THEN
738: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
739: ('Some unknown error in Attribute Validation . . .' || SQLERRM );
740: END IF ;
741:
742:

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

825:
826:
827: x_return_status := FND_API.G_RET_STS_SUCCESS;
828:
829: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
830: Error_Handler.Write_Debug ('Within Operation Network Check Entity1 . . . ');
831: END IF;
832:
833: -- Set Token Value

Line 843: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

839: l_token_tbl(2).token_value :=
840: NVL( p_op_network_rec.new_to_op_seq_number
841: , p_op_network_rec.to_op_seq_number ) ;
842:
843: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
844: AND ( p_op_network_unexp_rec.new_from_op_seq_id IS NOT NULL OR
845: p_op_network_unexp_rec.new_to_op_seq_id IS NOT NULL )
846: THEN
847:

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

844: AND ( p_op_network_unexp_rec.new_from_op_seq_id IS NOT NULL OR
845: p_op_network_unexp_rec.new_to_op_seq_id IS NOT NULL )
846: THEN
847:
848: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
849: Error_Handler.Write_Debug('Check op network uniqueness for UPDATE . . . ');
850: END IF;
851:
852: FOR l_uniqe_rec in check_unique_network_csr

Line 873: IF BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY

869: END IF ;
870:
871:
872: -- For eAM enhancement.
873: IF BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
874: THEN
875: NULL ;
876:
877:

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

874: THEN
875: NULL ;
876:
877:
878: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
879: Error_Handler.Write_Debug('Call eAM Rtg Network validation API. . . ');
880: END IF;
881: /*
882: -- This validation no longer used

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

907:
908: -- If operation network is for maintenance routing,
909: -- pass through followings validations.
910:
911: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
912: Error_Handler.Write_Debug ('Pass Operation Network Check Entity1 in maintenance routings . . . ');
913: END IF;
914: */
915:

Line 941: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE AND

937:
938: --
939: -- If connection type =1, there must be only one primary from operation. --
940: --
941: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE AND
942: p_op_network_rec.connection_type = 1
943: THEN
944: FOR l_opnet_rec in c_op_network
945: ( P_From_Op_Seq_Id => NVL(p_op_network_unexp_rec.new_from_op_seq_id,

Line 997: -- IF p_op_network_rec.transaction_type IN (BOM_Rtg_Globals.G_OPR_CREATE ,

993: -- Network must be smaller than 100%.
994: --
995:
996: -- Changed the condition to support updating from op and to op id
997: -- IF p_op_network_rec.transaction_type IN (BOM_Rtg_Globals.G_OPR_CREATE ,
998: -- BOM_Rtg_Globals.G_OPR_UPDATE)
999: -- Added similar validation in Check_Entity2 for updating.
1000:
1001: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

Line 998: -- BOM_Rtg_Globals.G_OPR_UPDATE)

994: --
995:
996: -- Changed the condition to support updating from op and to op id
997: -- IF p_op_network_rec.transaction_type IN (BOM_Rtg_Globals.G_OPR_CREATE ,
998: -- BOM_Rtg_Globals.G_OPR_UPDATE)
999: -- Added similar validation in Check_Entity2 for updating.
1000:
1001: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1002: AND p_op_network_rec.connection_type IN (1, 2)

Line 1001: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE

997: -- IF p_op_network_rec.transaction_type IN (BOM_Rtg_Globals.G_OPR_CREATE ,
998: -- BOM_Rtg_Globals.G_OPR_UPDATE)
999: -- Added similar validation in Check_Entity2 for updating.
1000:
1001: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE
1002: AND p_op_network_rec.connection_type IN (1, 2)
1003: THEN
1004: SELECT NVL(SUM(planning_pct), 0)
1005: INTO l_total_planning_pct

Line 1012: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

1008: AND to_op_seq_id <> p_op_network_unexp_rec.to_op_seq_id
1009: AND transition_type IN (1, 2);
1010:
1011: -- select planning percent for update process
1012: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1013: THEN
1014: SELECT NVL(planning_pct,0)
1015: INTO l_planning_pct
1016: FROM bom_operation_networks

Line 1064: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE

1060: END IF;
1061:
1062: --For Delete Link OSFM constraint
1063:
1064: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
1065: AND BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag
1066: AND
1067: WSMPUTIL.JOBS_WITH_QTY_AT_FROM_OP (x_err_code => l_err_code,
1068: x_err_msg => l_err_text,

Line 1065: AND BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag

1061:
1062: --For Delete Link OSFM constraint
1063:
1064: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
1065: AND BOM_RTG_Globals.Is_Osfm_NW_Calc_Flag
1066: AND
1067: WSMPUTIL.JOBS_WITH_QTY_AT_FROM_OP (x_err_code => l_err_code,
1068: x_err_msg => l_err_text,
1069: p_routing_sequence_id => p_op_network_unexp_rec.Routing_Sequence_Id,

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

1085: WHEN PASS_CHECK_ENTITY1_FOR_EAM THEN
1086: x_mesg_token_tbl := l_mesg_token_tbl;
1087:
1088: WHEN OTHERS THEN
1089: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1090: ('Some unknown error in Entity Validation1. . .' || SQLERRM );
1091: END IF ;
1092:
1093:

Line 1149: IF BOM_Rtg_Globals.Get_Debug = 'Y'

1145:
1146:
1147: x_return_status := FND_API.G_RET_STS_SUCCESS;
1148:
1149: IF BOM_Rtg_Globals.Get_Debug = 'Y'
1150: THEN Error_Handler.Write_Debug
1151: ('Within operation network entity level check2 . . . ');
1152: END IF;
1153:

Line 1183: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

1179: -- For update, total of Planning Percent for Operation
1180: -- Network must be smaller than 100%.
1181: -- Added to support updating from op and to op id
1182:
1183: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1184: AND p_op_network_rec.connection_type IN (1, 2)
1185: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
1186: THEN
1187:

Line 1185: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY

1181: -- Added to support updating from op and to op id
1182:
1183: IF p_op_network_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
1184: AND p_op_network_rec.connection_type IN (1, 2)
1185: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
1186: THEN
1187:
1188: SELECT NVL(SUM(planning_pct), 0)
1189: INTO l_total_planning_pct

Line 1201: IF BOM_Rtg_Globals.Get_Debug = 'Y'

1197: --l_total_planning_pct := l_total_planning_pct;
1198: -- + p_op_network_rec.planning_percent ;
1199:
1200:
1201: IF BOM_Rtg_Globals.Get_Debug = 'Y'
1202: THEN Error_Handler.Write_Debug
1203: ('Check planning percentage '|| to_char(l_total_planning_pct) );
1204: END IF;
1205:

Line 1244: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY

1240: not at the creation/modification of each link. Although the code checks a link
1241: attributes , it should run after the entire netowrk has been created/modified
1242: -- Added condition for eAM enhancement
1243: IF p_op_network_rec.connection_type <> 3 -- Not Rework
1244: AND BOM_Rtg_Globals.Get_Eam_Item_Type <> BOM_Rtg_Globals.G_ASSET_ACTIVITY
1245: THEN
1246:
1247: bom_rtg_network_validate_api.validate_routing_network
1248: ( p_rtg_sequence_id => p_op_network_unexp_rec.routing_sequence_id

Line 1257: IF BOM_Rtg_Globals.Get_Debug = 'Y'

1253: , x_status => x_status
1254: , x_message => x_message
1255: ) ;
1256:
1257: IF BOM_Rtg_Globals.Get_Debug = 'Y'
1258: THEN Error_Handler.Write_Debug
1259: ('After calling Rtg Network Validate API. Retrun status is '|| x_status );
1260: END IF;
1261:

Line 1307: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY

1303: */
1304: -- For eAM enhancement
1305: -- Maintenance Routing Network Validation
1306: IF p_op_network_rec.operation_type = 1
1307: AND BOM_Rtg_Globals.Get_Eam_Item_Type = BOM_Rtg_Globals.G_ASSET_ACTIVITY
1308: THEN
1309:
1310: Check_Eam_Rtg_Network
1311: ( p_op_network_rec => p_op_network_rec

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

1321: x_return_status := FND_API.G_RET_STS_ERROR;
1322: END IF ;
1323:
1324:
1325: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
1326: Error_Handler.Write_Debug
1327: ('Validation for eAM Op Network is completed with status '|| x_return_status);
1328: END IF;
1329:

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

1334: x_mesg_token_tbl := l_mesg_token_tbl;
1335:
1336: EXCEPTION
1337: WHEN OTHERS THEN
1338: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1339: ('Some unknown error in Entity Validation2. . .' || SQLERRM );
1340: END IF ;
1341:
1342:

Line 1406: l_common_routing_sequence_id := BOM_Rtg_Globals.Get_Common_Rtg_Seq_id ;

1402: routing_sequence_id = p_routing_sequence_id;
1403:
1404: -- Get Common Routing Seq Id from System Info Rec.
1405: -- If the value is Null, set Common Routing Seq Id.
1406: l_common_routing_sequence_id := BOM_Rtg_Globals.Get_Common_Rtg_Seq_id ;
1407: IF l_common_routing_sequence_id IS NULL OR
1408: l_common_routing_sequence_id = FND_API.G_MISS_NUM THEN
1409: BEGIN
1410: SELECT common_routing_sequence_id

Line 1415: BOM_Rtg_Globals.Set_Common_Rtg_Seq_id

1411: INTO l_common_routing_sequence_id
1412: FROM bom_operational_routings
1413: WHERE routing_sequence_id = l_routing_sequence_id;
1414: END ;
1415: BOM_Rtg_Globals.Set_Common_Rtg_Seq_id
1416: ( p_common_rtg_seq_id => l_common_routing_sequence_id );
1417: END IF;
1418: IF nvl(l_cfm_routing_flag,2) = 3 THEN
1419: --IF ( p_prev_start_id IS NOT NULL AND p_prev_start_id <> 0 ) THEN -- commented for bug3134027