DBA Data[Home] [Help]

APPS.BOM_SUB_OP_RES_UTIL dependencies on BOM_RTG_GLOBALS

Line 137: WHERE (( l_bo_id = BOM_Rtg_Globals.G_ECO_BO

133: )
134: IS
135:
136: SELECT * FROM BOM_SUB_OPERATION_RESOURCES
137: WHERE (( l_bo_id = BOM_Rtg_Globals.G_ECO_BO
138: AND ACD_TYPE = p_acd_type )
139: OR
140: ( l_bo_id = BOM_Rtg_Globals.G_RTG_BO
141: AND ACD_TYPE IS NULL )

Line 140: ( l_bo_id = BOM_Rtg_Globals.G_RTG_BO

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

Line 155: l_bo_id := BOM_Rtg_Globals.Get_Bo_Identifier ;

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

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

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

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

217: l_rev_sub_resource_rec.Attribute14 := sub_res_rec.ATTRIBUTE14 ;
218: l_rev_sub_resource_rec.Attribute15 := sub_res_rec.ATTRIBUTE15 ;
219: l_rev_sub_resource_rec.Original_System_Reference := sub_res_rec.ORIGINAL_SYSTEM_REFERENCE ;
220:
221: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning operation record . . .') ;
222: END IF ;
223:
224: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
225: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;

Line 224: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;

220:
221: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished querying and assigning operation record . . .') ;
222: END IF ;
223:
224: x_return_status := BOM_Rtg_Globals.G_RECORD_FOUND ;
225: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
226: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
227:
228: ELSE

Line 229: x_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;

225: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
226: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
227:
228: ELSE
229: x_return_status := BOM_Rtg_Globals.G_RECORD_NOT_FOUND ;
230: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
231: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
232:
233: END IF ;

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

238: END IF ;
239:
240: EXCEPTION
241: WHEN OTHERS THEN
242: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
243: ('Some unknown error in Perform Writes . . .' || SQLERRM );
244: END IF ;
245:
246: l_err_text := G_PKG_NAME || ' Utility (Sub Op Resource Query Row) '

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

345: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
346: l_return_status := FND_API.G_RET_STS_SUCCESS ;
347: x_return_status := FND_API.G_RET_STS_SUCCESS ;
348:
349: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
350: ('Performing Database Writes . . .') ;
351: END IF ;
352:
353:

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

350: ('Performing Database Writes . . .') ;
351: END IF ;
352:
353:
354: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
355: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
356: ('Sub Operatin Sequence: Executing Insert Row. . . ') ;
357: END IF;
358:

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

351: END IF ;
352:
353:
354: IF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_CREATE THEN
355: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
356: ('Sub Operatin Sequence: Executing Insert Row. . . ') ;
357: END IF;
358:
359: Insert_Row

Line 367: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE

363: , x_mesg_token_tbl => x_mesg_token_tbl
364: ) ;
365:
366:
367: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
368: THEN
369: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
370: ('Sub Operatin Sequence: Executing Update Row. . . ') ;
371: END IF ;

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

365:
366:
367: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_UPDATE
368: THEN
369: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
370: ('Sub Operatin Sequence: Executing Update Row. . . ') ;
371: END IF ;
372:
373: Update_Row

Line 380: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE

376: , x_return_status => l_return_status
377: , x_mesg_token_tbl => x_mesg_token_tbl
378: ) ;
379:
380: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
381: THEN
382:
383: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
384: ('Sub Operatin Sequence: Executing Delete Row. . . ') ;

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

379:
380: ELSIF l_rev_sub_resource_rec.transaction_type = BOM_Rtg_Globals.G_OPR_DELETE
381: THEN
382:
383: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
384: ('Sub Operatin Sequence: Executing Delete Row. . . ') ;
385: END IF ;
386:
387: Delete_Row

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

400: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl ;
401:
402: EXCEPTION
403: WHEN OTHERS THEN
404: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
405: ('Some unknown error in Perform Writes . . .' || SQLERRM );
406: END IF ;
407:
408: l_err_text := G_PKG_NAME || ' Utility (Perform Writes) '

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

510: , p_rev_sub_resource_rec.usage_rate_or_amount_inverse
511: , p_rev_sub_resource_rec.basis_type
512: , p_rev_sub_resource_rec.schedule_flag
513: , SYSDATE -- Last Update Date
514: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
515: , SYSDATE -- Creation Date
516: , BOM_Rtg_Globals.Get_User_Id -- Created By
517: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
518: , p_rev_sub_resource_rec.resource_offset_percent

Line 516: , BOM_Rtg_Globals.Get_User_Id -- Created By

512: , p_rev_sub_resource_rec.schedule_flag
513: , SYSDATE -- Last Update Date
514: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
515: , SYSDATE -- Creation Date
516: , BOM_Rtg_Globals.Get_User_Id -- Created By
517: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
518: , p_rev_sub_resource_rec.resource_offset_percent
519: , p_rev_sub_resource_rec.autocharge_type
520: , p_rev_sub_resource_rec.principle_flag

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

513: , SYSDATE -- Last Update Date
514: , BOM_Rtg_Globals.Get_User_Id -- Last Updated By
515: , SYSDATE -- Creation Date
516: , BOM_Rtg_Globals.Get_User_Id -- Created By
517: , BOM_Rtg_Globals.Get_Login_Id -- Last Update Login
518: , p_rev_sub_resource_rec.resource_offset_percent
519: , p_rev_sub_resource_rec.autocharge_type
520: , p_rev_sub_resource_rec.principle_flag
521: , p_rev_sub_resource_rec.attribute_category

Line 538: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id

534: , p_rev_sub_resource_rec.attribute13
535: , p_rev_sub_resource_rec.attribute14
536: , p_rev_sub_resource_rec.attribute15
537: , Fnd_Global.Conc_Request_Id -- Request Id
538: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id
539: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id
540: , SYSDATE -- program_update_date
541: , p_rev_sub_resource_rec.schedule_sequence_number
542: , p_rev_sub_resource_rec.eco_name

Line 539: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id

535: , p_rev_sub_resource_rec.attribute14
536: , p_rev_sub_resource_rec.attribute15
537: , Fnd_Global.Conc_Request_Id -- Request Id
538: , BOM_Rtg_Globals.Get_Prog_AppId -- Application Id
539: , BOM_Rtg_Globals.Get_Prog_Id -- Program Id
540: , SYSDATE -- program_update_date
541: , p_rev_sub_resource_rec.schedule_sequence_number
542: , p_rev_sub_resource_rec.eco_name
543: , p_rev_sub_resource_rec.acd_type

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

548:
549: EXCEPTION
550:
551: WHEN OTHERS THEN
552: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
553: ('Unexpected Error occured in Insert . . .' || SQLERRM);
554: END IF;
555:
556: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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

598: BEGIN
599:
600: x_return_status := FND_API.G_RET_STS_SUCCESS ;
601:
602: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Performing update operation . . .') ;
603: END IF ;
604:
605:
606: UPDATE BOM_SUB_OPERATION_RESOURCES

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

615: , usage_rate_or_amount_inverse = p_rev_sub_resource_rec.usage_rate_or_amount_inverse
616: , basis_type = NVL(p_rev_sub_resource_rec.new_basis_type,p_rev_sub_resource_rec.basis_type)
617: , schedule_flag = p_rev_sub_resource_rec.schedule_flag
618: , last_update_date = SYSDATE /* Last Update Date */
619: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
620: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
621: , resource_offset_percent = p_rev_sub_resource_rec.resource_offset_percent
622: , autocharge_type = p_rev_sub_resource_rec.autocharge_type
623: , principle_flag = p_rev_sub_resource_rec.principle_flag

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

616: , basis_type = NVL(p_rev_sub_resource_rec.new_basis_type,p_rev_sub_resource_rec.basis_type)
617: , schedule_flag = p_rev_sub_resource_rec.schedule_flag
618: , last_update_date = SYSDATE /* Last Update Date */
619: , last_updated_by = BOM_Rtg_Globals.Get_User_Id /* Last Updated By */
620: , last_update_login = BOM_Rtg_Globals.Get_Login_Id /* Last Update Login */
621: , resource_offset_percent = p_rev_sub_resource_rec.resource_offset_percent
622: , autocharge_type = p_rev_sub_resource_rec.autocharge_type
623: , principle_flag = p_rev_sub_resource_rec.principle_flag
624: , attribute_category = p_rev_sub_resource_rec.attribute_category

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

636: , attribute12 = p_rev_sub_resource_rec.attribute12
637: , attribute13 = p_rev_sub_resource_rec.attribute13
638: , attribute14 = p_rev_sub_resource_rec.attribute14
639: , attribute15 = p_rev_sub_resource_rec.attribute15
640: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
641: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
642: , program_update_date = SYSDATE /* program_update_date */
643: , original_system_reference = p_rev_sub_resource_rec.original_system_reference
644: , setup_Id = p_rev_sub_res_unexp_rec.setup_id

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

637: , attribute13 = p_rev_sub_resource_rec.attribute13
638: , attribute14 = p_rev_sub_resource_rec.attribute14
639: , attribute15 = p_rev_sub_resource_rec.attribute15
640: , program_application_id = BOM_Rtg_Globals.Get_Prog_AppId /* Application Id */
641: , program_id = BOM_Rtg_Globals.Get_Prog_Id /* Program Id */
642: , program_update_date = SYSDATE /* program_update_date */
643: , original_system_reference = p_rev_sub_resource_rec.original_system_reference
644: , setup_Id = p_rev_sub_res_unexp_rec.setup_id
645: , request_id = Fnd_Global.Conc_Request_Id

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

653:
654:
655: EXCEPTION
656: WHEN OTHERS THEN
657: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
658: ('Unexpected Error occured in Update . . .' || SQLERRM);
659: END IF;
660:
661: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

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

716: ;
717:
718: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
719:
720: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished deleting revised sub operation resource record . . .') ;
721: END IF ;
722:
723:
724: EXCEPTION

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

722:
723:
724: EXCEPTION
725: WHEN OTHERS THEN
726: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
727: ('Unexpected Error occured in Delete . . .' || SQLERRM);
728: END IF;
729:
730: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)