DBA Data[Home] [Help]

APPS.BOM_DEFAULT_SUB_OP_RES dependencies on ERROR_HANDLER

Line 147: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

143: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
144: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
145: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
146: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
147: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
148: , x_return_status IN OUT NOCOPY VARCHAR2
149: )
150: IS
151: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_Rec_Type ;

Line 209: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

205: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
206: , p_control_Rec IN Bom_Rtg_Pub.Control_Rec_Type
207: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_Rec_Type
208: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
209: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
210: , x_return_status IN OUT NOCOPY VARCHAR2
211: )
212:
213: IS

Line 220: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

216: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
217:
218: l_return_status VARCHAR2(1);
219: l_err_text VARCHAR2(2000) ;
220: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
221:
222:
223: BEGIN
224:

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

221:
222:
223: BEGIN
224:
225: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
226: ('Within the Sub Operation Resource Attr. Defaulting...') ;
227: END IF ;
228:
229: l_return_status := FND_API.G_RET_STS_SUCCESS ;

Line 314: Error_Handler.Write_Debug('Getting out of Operation Resource Attribute Defualting...');

310: x_rev_sub_resource_rec := l_rev_sub_resource_rec ;
311: x_rev_sub_res_unexp_rec := l_rev_sub_res_unexp_rec ;
312:
313: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
314: Error_Handler.Write_Debug('Getting out of Operation Resource Attribute Defualting...');
315: END IF ;
316:
317:
318: EXCEPTION

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

316:
317:
318: EXCEPTION
319: WHEN OTHERS THEN
320: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
321: ('Some unknown error in Attribute Defaulting . . .' || SQLERRM );
322: END IF ;
323:
324:

Line 329: Error_Handler.Add_Error_Token

325: l_err_text := G_PKG_NAME || ' Default (Attr. Defaulting) '
326: || substrb(SQLERRM,1,200);
327: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
328:
329: Error_Handler.Add_Error_Token
330: ( p_message_name => NULL
331: , p_message_text => l_err_text
332: , p_mesg_token_tbl => l_mesg_token_tbl
333: , x_mesg_token_tbl => l_mesg_token_tbl

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

449: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_Rec_Type ;
450: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
451:
452: BEGIN
453: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
454: ('Within the Sub Operation Resource Populate null columns...') ;
455: END IF ;
456:
457: -- Initialize operation exp and unexp record

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

458: l_rev_sub_resource_rec := p_rev_sub_resource_rec ;
459: l_rev_sub_res_unexp_rec := p_rev_sub_res_unexp_rec ;
460:
461: -- Exposed Column
462: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
463: ('Populate null exposed columns......') ;
464: END IF ;
465:
466: IF l_rev_sub_resource_rec.ACD_Type IS NULL

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

625: -- Also copy the Unexposed Columns from Database to New record
626: --
627:
628:
629: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
630: ('Populate Null Unexposed columns......') ;
631: END IF ;
632:
633:

Line 702: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

698: ( p_sub_resource_rec IN Bom_Rtg_Pub.Sub_Resource_Rec_Type
699: , p_sub_res_unexp_rec IN Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
700: , x_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Resource_Rec_Type
701: , x_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Sub_Res_Unexposed_Rec_Type
702: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
703: , x_return_status IN OUT NOCOPY VARCHAR2
704: )
705: IS
706: l_rev_sub_resource_rec Bom_Rtg_Pub.Rev_Sub_Resource_Rec_Type ;

Line 774: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

770: , p_rev_sub_res_unexp_rec IN Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
771: , p_control_Rec IN Bom_Rtg_Pub.Control_Rec_Type
772: , x_rev_sub_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Resource_Rec_Type
773: , x_rev_sub_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type
774: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
775: , x_return_status IN OUT NOCOPY VARCHAR2
776: )
777:
778: IS

Line 784: l_Token_Tbl Error_Handler.Token_Tbl_Type ;

780: l_rev_sub_res_unexp_rec Bom_Rtg_Pub.Rev_Sub_Res_Unexposed_Rec_Type ;
781:
782: l_return_status VARCHAR2(1);
783: l_err_text VARCHAR2(2000) ;
784: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
785: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
786:
787:
788:

Line 785: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

781:
782: l_return_status VARCHAR2(1);
783: l_err_text VARCHAR2(2000) ;
784: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
785: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
786:
787:
788:
789:

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

788:
789:
790: BEGIN
791:
792: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
793: ('Within the Sub Operation Resource Entity Defaulting...') ;
794: END IF ;
795:
796: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

874: -- Call Op Resource : BOM_Default_Op_Res.Get_Available_24hs_flag
875: --
876: ************************************************************/
877: /**** Commenting the following validation as per bug 2661684
878: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
879: ('Default Assigned Units. . . . ' || l_return_status) ;
880: END IF ;
881:
882: IF NVL(l_rev_sub_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD

Line 905: Error_Handler.Add_Error_Token

901: l_Token_Tbl(2).token_value :=
902: p_rev_sub_resource_rec.schedule_sequence_number ;
903:
904: -- Set Warning Message
905: Error_Handler.Add_Error_Token
906: ( p_message_name => 'BOM_SUB_RES_DEF_ASSGN_UNIT'
907: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
908: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
909: , p_Token_Tbl => l_Token_Tbl

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

1041:
1042:
1043: EXCEPTION
1044: WHEN OTHERS THEN
1045: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1046: ('Some unknown error in Entity Defaulting . . .' || SQLERRM );
1047: END IF ;
1048:
1049:

Line 1054: Error_Handler.Add_Error_Token

1050: l_err_text := G_PKG_NAME || ' Defaulting (Entity Defaulting) '
1051: || substrb(SQLERRM,1,200);
1052: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
1053:
1054: Error_Handler.Add_Error_Token
1055: ( p_message_name => NULL
1056: , p_message_text => l_err_text
1057: , p_mesg_token_tbl => l_mesg_token_tbl
1058: , x_mesg_token_tbl => l_mesg_token_tbl