DBA Data[Home] [Help]

APPS.BOM_OP_RES_UTIL dependencies on ERROR_HANDLER

Line 44: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

40: PROCEDURE Query_Row
41: ( p_resource_sequence_number IN NUMBER
42: , p_operation_sequence_id IN NUMBER
43: , p_acd_type IN NUMBER
44: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
45: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
46: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
47: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
48: , x_return_status IN OUT NOCOPY VARCHAR2

Line 47: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

43: , p_acd_type IN NUMBER
44: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
45: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
46: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
47: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
48: , x_return_status IN OUT NOCOPY VARCHAR2
49: )
50:
51: IS

Line 100: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type

96: PROCEDURE Query_Row
97: ( p_resource_sequence_number IN NUMBER
98: , p_operation_sequence_id IN NUMBER
99: , p_acd_type IN NUMBER
100: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
101: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
102: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
103: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
104: , x_return_status IN OUT NOCOPY VARCHAR2

Line 103: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

99: , p_acd_type IN NUMBER
100: , p_mesg_token_tbl IN Error_Handler.Mesg_Token_Tbl_Type
101: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
102: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
103: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
104: , x_return_status IN OUT NOCOPY VARCHAR2
105: )
106: IS
107:

Line 113: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type ;

109: /* Define Variable */
110: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
111: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type;
112: l_err_text VARCHAR2(2000) ;
113: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type ;
114: l_bo_id VARCHAR2(3) ;
115: l_operation_sequence_id NUMBER := p_operation_sequence_id ;
116:
117: /* Define Cursor */

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

142:
143: x_mesg_token_tbl := p_mesg_token_tbl;
144: l_bo_id := BOM_Rtg_Globals.Get_Bo_Identifier ;
145:
146: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
147: ('Querying an operation resource record : Res Seq Number ' || to_char(p_resource_sequence_number) || '. . . ' ) ;
148: END IF ;
149:
150: -- Calling from revised operation resource with

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

217: l_rev_op_resource_rec.Attribute14 := op_res_rec.ATTRIBUTE14 ;
218: l_rev_op_resource_rec.Attribute15 := op_res_rec.ATTRIBUTE15 ;
219: l_rev_op_resource_rec.Original_System_Reference := op_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_op_resource_rec := l_rev_op_resource_rec ;

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 Query Row. . .' || SQLERRM );
244: END IF ;
245:
246: l_err_text := G_PKG_NAME || ' Utility (Op Resource Query Row) '

Line 251: Error_Handler.Add_Error_Token

247: || substrb(SQLERRM,1,200);
248:
249: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
250:
251: Error_Handler.Add_Error_Token
252: ( p_message_name => NULL
253: , p_message_text => l_err_text
254: , p_mesg_token_tbl => l_mesg_token_tbl
255: , x_mesg_token_tbl => l_mesg_token_tbl

Line 282: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

278:
279: PROCEDURE Perform_Writes
280: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
281: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
282: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
283: , x_return_status IN OUT NOCOPY VARCHAR2
284: )
285: IS
286: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;

Line 325: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

321: PROCEDURE Perform_Writes
322: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
323: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
324: , p_control_rec IN Bom_Rtg_Pub.Control_Rec_Type
325: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
326: , x_return_status IN OUT NOCOPY VARCHAR2
327: )
328: IS
329:

Line 337: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

333:
334: -- Error Handlig Variables
335: l_return_status VARCHAR2(1);
336: l_err_text VARCHAR2(2000) ;
337: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
338:
339:
340: BEGIN
341: --

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

345: l_rev_op_res_unexp_rec := p_rev_op_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 355: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

351: END IF ;
352:
353:
354: IF l_rev_op_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: ('Operatin Resource : Executing Insert Row. . . ') ;
357: END IF;
358:
359: Insert_Row

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

365:
366:
367: ELSIF l_rev_op_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: ('Operatin Resource : Executing Update Row. . . ') ;
371: END IF ;
372:
373: Update_Row

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

379:
380: ELSIF l_rev_op_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: ('Operatin Resource : 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 413: Error_Handler.Add_Error_Token

409: || substrb(SQLERRM,1,200);
410:
411: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
412:
413: Error_Handler.Add_Error_Token
414: ( p_message_name => NULL
415: , p_message_text => l_err_text
416: , p_mesg_token_tbl => l_mesg_token_tbl
417: , x_mesg_token_tbl => l_mesg_token_tbl

Line 440: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

436: *****************************************************************************/
437: PROCEDURE Insert_Row
438: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
439: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
440: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
441: , x_return_status IN OUT NOCOPY VARCHAR2
442: )
443: IS
444:

Line 447: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

443: IS
444:
445: -- Error Handlig Variables
446: l_err_text VARCHAR2(2000) ;
447: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
448:
449: BEGIN
450:
451: x_return_status := FND_API.G_RET_STS_SUCCESS ;

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 561: Error_Handler.Add_Error_Token

557: THEN
558: l_err_text := G_PKG_NAME || ' : Utility (Op Resource Insert) ' ||
559: SUBSTR(SQLERRM, 1, 200);
560:
561: Error_Handler.Add_Error_Token
562: ( p_message_name => NULL
563: , p_message_text => l_err_text
564: , p_mesg_token_tbl => l_mesg_token_tbl
565: , x_mesg_token_tbl => l_mesg_token_tbl

Line 589: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

585: ****************************************************************************/
586: PROCEDURE Update_Row
587: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
588: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
589: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
590: , x_return_status IN OUT NOCOPY VARCHAR2
591: )
592: IS
593:

Line 596: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

592: IS
593:
594: -- Error Handlig Variables
595: l_err_text VARCHAR2(2000) ;
596: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
597:
598: BEGIN
599:
600: x_return_status := FND_API.G_RET_STS_SUCCESS ;

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: UPDATE BOM_OPERATION_RESOURCES
606: SET

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

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

Line 661: Error_Handler.Add_Error_Token

657: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
658: THEN
659: l_err_text := G_PKG_NAME || ' : Utility (Op Resource Update) ' ||
660: SUBSTR(SQLERRM, 1, 200);
661: Error_Handler.Add_Error_Token
662: ( p_message_name => NULL
663: , p_message_text => l_err_text
664: , p_mesg_token_tbl => l_mesg_token_tbl
665: , x_mesg_token_tbl => l_mesg_token_tbl

Line 691: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

687: *********************************************************************/
688: PROCEDURE Delete_Row
689: ( p_rev_op_resource_rec IN Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
690: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
691: , x_Mesg_Token_Tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
692: , x_return_status IN OUT NOCOPY VARCHAR2
693: )
694: IS
695:

Line 698: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

694: IS
695:
696: -- Error Handlig Variables
697: l_err_text VARCHAR2(2000) ;
698: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
699: l_token_tbl Error_Handler.Token_Tbl_Type;
700:
701: BEGIN
702:

Line 699: l_token_tbl Error_Handler.Token_Tbl_Type;

695:
696: -- Error Handlig Variables
697: l_err_text VARCHAR2(2000) ;
698: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
699: l_token_tbl Error_Handler.Token_Tbl_Type;
700:
701: BEGIN
702:
703: x_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 735: Error_Handler.Add_Error_Token

731: THEN
732: l_token_tbl(1).token_name := 'RES_SEQ_NUMBER';
733: l_token_tbl(1).token_value := p_rev_op_resource_rec.resource_sequence_number ;
734:
735: Error_Handler.Add_Error_Token
736: ( p_Message_Name => 'BOM_RES_DELETE_SUB_RES'
737: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
738: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
739: , p_Message_Type => 'W'

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

744: END IF ;
745:
746: x_Mesg_Token_Tbl := l_Mesg_Token_Tbl;
747:
748: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Finished deleting revised operation record . . .') ;
749: END IF ;
750:
751:
752: EXCEPTION

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

750:
751:
752: EXCEPTION
753: WHEN OTHERS THEN
754: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
755: ('Unexpected Error occured in Delete . . .' || SQLERRM);
756: END IF;
757:
758: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

Line 764: Error_Handler.Add_Error_Token

760: l_err_text := G_PKG_NAME || ' : Utility (Op Resource Delete) ' ||
761: SUBSTR(SQLERRM, 1, 200);
762: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
763:
764: Error_Handler.Add_Error_Token
765: ( p_message_name => NULL
766: , p_message_text => l_err_text
767: , p_mesg_token_tbl => l_mesg_token_tbl
768: , x_mesg_token_tbl => l_mesg_token_tbl