DBA Data[Home] [Help]

APPS.BOM_SUB_OP_RES_UTIL dependencies on BOM_RTG_GLOBALS

Line 141: WHERE (( l_bo_id = BOM_Rtg_Globals.G_ECO_BO

137: )
138: IS
139:
140: SELECT * FROM BOM_SUB_OPERATION_RESOURCES
141: WHERE (( l_bo_id = BOM_Rtg_Globals.G_ECO_BO
142: AND ACD_TYPE = p_acd_type )
143: OR
144: ( l_bo_id = BOM_Rtg_Globals.G_RTG_BO
145: AND ACD_TYPE IS NULL )

Line 144: ( l_bo_id = BOM_Rtg_Globals.G_RTG_BO

140: SELECT * FROM BOM_SUB_OPERATION_RESOURCES
141: WHERE (( l_bo_id = BOM_Rtg_Globals.G_ECO_BO
142: AND ACD_TYPE = p_acd_type )
143: OR
144: ( l_bo_id = BOM_Rtg_Globals.G_RTG_BO
145: AND ACD_TYPE IS NULL )
146: )
147: AND BASIS_TYPE = p_basis_type
148: AND RESOURCE_ID = p_resource_id

Line 160: l_bo_id := BOM_Rtg_Globals.Get_Bo_Identifier ;

156:
157: BEGIN
158:
159: x_mesg_token_tbl := p_mesg_token_tbl;
160: l_bo_id := BOM_Rtg_Globals.Get_Bo_Identifier ;
161:
162: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
163: ('Querying a sub operation resource record : Sub Res Id ' || to_char(p_resource_id)
164: || ' - Schedule Seq Num ' || to_char(p_substitute_group_number) || '. ' ) ;

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

158:
159: x_mesg_token_tbl := p_mesg_token_tbl;
160: l_bo_id := BOM_Rtg_Globals.Get_Bo_Identifier ;
161:
162: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
163: ('Querying a sub operation resource record : Sub Res Id ' || to_char(p_resource_id)
164: || ' - Schedule Seq Num ' || to_char(p_substitute_group_number) || '. ' ) ;
165: END IF ;
166:

Line 227: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning operation record . . .') ;

223: l_rev_sub_resource_rec.Attribute14 := sub_res_rec.ATTRIBUTE14 ;
224: l_rev_sub_resource_rec.Attribute15 := sub_res_rec.ATTRIBUTE15 ;
225: l_rev_sub_resource_rec.Original_System_Reference := sub_res_rec.ORIGINAL_SYSTEM_REFERENCE ;
226:
227: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning operation record . . .') ;
228: END IF ;
229:
230: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
231: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;

Line 230: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;

226:
227: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning operation record . . .') ;
228: END IF ;
229:
230: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
231: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
232: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
233:
234: ELSE

Line 235: x_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;

231: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
232: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
233:
234: ELSE
235: x_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;
236: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
237: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
238:
239: END IF ;

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

244: END IF ;
245:
246: EXCEPTION
247: WHEN OTHERS THEN
248: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
249: ('Some unknown error in Perform Writes . . .' || SQLERRM );
250: END IF ;
251:
252: l_err_text := G_PKG_NAME || ' Utility (Sub Op Resource Query Row) '

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

351: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
352: l_return_status := FND_API.G_RET_STS_SUCCESS ;
353: x_return_status := FND_API.G_RET_STS_SUCCESS ;
354:
355: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
356: ('Performing Database Writes . . .') ;
357: END IF ;
358:
359:

Line 360: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN

356: ('Performing Database Writes . . .') ;
357: END IF ;
358:
359:
360: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
361: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
362: ('Sub Operatin Sequence: Executing Insert Row. . . ') ;
363: END IF;
364:

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

357: END IF ;
358:
359:
360: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
361: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
362: ('Sub Operatin Sequence: Executing Insert Row. . . ') ;
363: END IF;
364:
365: Insert_Row

Line 373: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

369: , x_mesg_token_tbl => x_mesg_token_tbl
370: ) ;
371:
372:
373: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
374: THEN
375: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
376: ('Sub Operatin Sequence: Executing Update Row. . . ') ;
377: END IF ;

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

371:
372:
373: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
374: THEN
375: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
376: ('Sub Operatin Sequence: Executing Update Row. . . ') ;
377: END IF ;
378:
379: Update_Row

Line 386: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE

382: , x_return_status => l_return_status
383: , x_mesg_token_tbl => x_mesg_token_tbl
384: ) ;
385:
386: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
387: THEN
388:
389: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
390: ('Sub Operatin Sequence: Executing Delete Row. . . ') ;

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

385:
386: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
387: THEN
388:
389: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
390: ('Sub Operatin Sequence: Executing Delete Row. . . ') ;
391: END IF ;
392:
393: Delete_Row

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

406: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl ;
407:
408: EXCEPTION
409: WHEN OTHERS THEN
410: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
411: ('Some unknown error in Perform Writes . . .' || SQLERRM );
412: END IF ;
413:
414: l_err_text := G_PKG_NAME || ' Utility (Perform Writes) '

Line 520: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By

516: , p_rev_sub_resource_rec.usage_rate_or_amount_inverse
517: , p_rev_sub_resource_rec.basis_type
518: , p_rev_sub_resource_rec.schedule_flag
519: , SYSDATE -- Last Update Date
520: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
521: , SYSDATE -- Creation Date
522: , BOM_Rtg_Globals.Get_User_Id -- Created By
523: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
524: , p_rev_sub_resource_rec.resource_offset_percent

Line 522: , BOM_Rtg_Globals.Get_User_Id -- Created By

518: , p_rev_sub_resource_rec.schedule_flag
519: , SYSDATE -- Last Update Date
520: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
521: , SYSDATE -- Creation Date
522: , BOM_Rtg_Globals.Get_User_Id -- Created By
523: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
524: , p_rev_sub_resource_rec.resource_offset_percent
525: , p_rev_sub_resource_rec.autocharge_type
526: , p_rev_sub_resource_rec.principle_flag

Line 523: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login

519: , SYSDATE -- Last Update Date
520: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
521: , SYSDATE -- Creation Date
522: , BOM_Rtg_Globals.Get_User_Id -- Created By
523: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
524: , p_rev_sub_resource_rec.resource_offset_percent
525: , p_rev_sub_resource_rec.autocharge_type
526: , p_rev_sub_resource_rec.principle_flag
527: , p_rev_sub_resource_rec.attribute_category

Line 544: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id

540: , p_rev_sub_resource_rec.attribute13
541: , p_rev_sub_resource_rec.attribute14
542: , p_rev_sub_resource_rec.attribute15
543: , Fnd_Global.Conc_Request_Id -- Request Id
544: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id
545: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id
546: , SYSDATE -- program_update_date
547: , p_rev_sub_resource_rec.schedule_sequence_number
548: , p_rev_sub_resource_rec.eco_name

Line 545: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id

541: , p_rev_sub_resource_rec.attribute14
542: , p_rev_sub_resource_rec.attribute15
543: , Fnd_Global.Conc_Request_Id -- Request Id
544: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id
545: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id
546: , SYSDATE -- program_update_date
547: , p_rev_sub_resource_rec.schedule_sequence_number
548: , p_rev_sub_resource_rec.eco_name
549: , p_rev_sub_resource_rec.acd_type

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

554:
555: EXCEPTION
556:
557: WHEN OTHERS THEN
558: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
559: ('Unexpected Error occured in Insert . . .' || SQLERRM);
560: END IF;
561:
562: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 608: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing update operation . . .') ;

604: BEGIN
605:
606: x_return_status := FND_API.G_RET_STS_SUCCESS ;
607:
608: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing update operation . . .') ;
609: END IF ;
610:
611:
612: UPDATE BOM_SUB_OPERATION_RESOURCES

Line 625: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */

621: , usage_rate_or_amount_inverse = p_rev_sub_resource_rec.usage_rate_or_amount_inverse
622: , basis_type = NVL(p_rev_sub_resource_rec.new_basis_type,p_rev_sub_resource_rec.basis_type)
623: , schedule_flag = NVL(p_rev_sub_resource_rec.new_schedule_flag, p_rev_sub_resource_rec.schedule_flag) /*Fix for bug 13005178*/
624: , last_update_date = SYSDATE /* Last Update Date */
625: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
626: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
627: , resource_offset_percent = p_rev_sub_resource_rec.resource_offset_percent
628: , autocharge_type = p_rev_sub_resource_rec.autocharge_type
629: , principle_flag = p_rev_sub_resource_rec.principle_flag

Line 626: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */

622: , basis_type = NVL(p_rev_sub_resource_rec.new_basis_type,p_rev_sub_resource_rec.basis_type)
623: , schedule_flag = NVL(p_rev_sub_resource_rec.new_schedule_flag, p_rev_sub_resource_rec.schedule_flag) /*Fix for bug 13005178*/
624: , last_update_date = SYSDATE /* Last Update Date */
625: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
626: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
627: , resource_offset_percent = p_rev_sub_resource_rec.resource_offset_percent
628: , autocharge_type = p_rev_sub_resource_rec.autocharge_type
629: , principle_flag = p_rev_sub_resource_rec.principle_flag
630: , attribute_category = p_rev_sub_resource_rec.attribute_category

Line 646: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */

642: , attribute12 = p_rev_sub_resource_rec.attribute12
643: , attribute13 = p_rev_sub_resource_rec.attribute13
644: , attribute14 = p_rev_sub_resource_rec.attribute14
645: , attribute15 = p_rev_sub_resource_rec.attribute15
646: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
647: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
648: , program_update_date = SYSDATE /* program_update_date */
649: , original_system_reference = p_rev_sub_resource_rec.original_system_reference
650: , setup_Id = p_rev_sub_res_unexp_rec.setup_id

Line 647: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */

643: , attribute13 = p_rev_sub_resource_rec.attribute13
644: , attribute14 = p_rev_sub_resource_rec.attribute14
645: , attribute15 = p_rev_sub_resource_rec.attribute15
646: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
647: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
648: , program_update_date = SYSDATE /* program_update_date */
649: , original_system_reference = p_rev_sub_resource_rec.original_system_reference
650: , setup_Id = p_rev_sub_res_unexp_rec.setup_id
651: , request_id = Fnd_Global.Conc_Request_Id

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

660:
661:
662: EXCEPTION
663: WHEN OTHERS THEN
664: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
665: ('Unexpected Error occured in Update . . .' || SQLERRM);
666: END IF;
667:
668: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 728: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished deleting revised sub operation resource record . . .') ;

724: ;
725:
726: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
727:
728: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished deleting revised sub operation resource record . . .') ;
729: END IF ;
730:
731:
732: EXCEPTION

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

730:
731:
732: EXCEPTION
733: WHEN OTHERS THEN
734: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
735: ('Unexpected Error occured in Delete . . .' || SQLERRM);
736: END IF;
737:
738: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)