DBA Data[Home] [Help]

APPS.BOM_DEFAULT_OP_RES dependencies on ERROR_HANDLER

Line 379: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

375: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
376: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
377: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
378: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
379: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
380: , x_return_status IN OUT NOCOPY VARCHAR2
381: )
382: IS
383: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;

Line 442: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

438: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
439: , p_control_Rec IN Bom_Rtg_Pub.Control_Rec_Type
440: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
441: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
442: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
443: , x_return_status IN OUT NOCOPY VARCHAR2
444: )
445:
446: IS

Line 453: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

449: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
450:
451: l_return_status VARCHAR2(1);
452: l_err_text VARCHAR2(2000) ;
453: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
454:
455:
456: BEGIN
457:

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

454:
455:
456: BEGIN
457:
458: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
459: ('Within the Operation Resource Attr. Defaulting...') ;
460: END IF ;
461:
462: x_return_status := FND_API.G_RET_STS_SUCCESS ;

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

540: x_rev_op_resource_rec := l_rev_op_resource_rec ;
541: x_rev_op_res_unexp_rec := l_rev_op_res_unexp_rec ;
542:
543: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN
544: Error_Handler.Write_Debug('Getting out of Operation Resource Attribute Defualting...');
545: END IF ;
546:
547:
548: EXCEPTION

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

546:
547:
548: EXCEPTION
549: WHEN OTHERS THEN
550: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
551: ('Some unknown error in Attribute Defaulting . . .' || SQLERRM );
552: END IF ;
553:
554:

Line 559: Error_Handler.Add_Error_Token

555: l_err_text := G_PKG_NAME || ' Default (Attr. Defaulting) '
556: || substrb(SQLERRM,1,200);
557: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
558:
559: Error_Handler.Add_Error_Token
560: ( p_message_name => NULL
561: , p_message_text => l_err_text
562: , p_mesg_token_tbl => l_mesg_token_tbl
563: , x_mesg_token_tbl => l_mesg_token_tbl

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

679: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;
680: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
681:
682: BEGIN
683: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
684: ('Within the Operation Resource Populate null columns...') ;
685: END IF ;
686:
687: -- Initialize operation exp and unexp record

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

688: l_rev_op_resource_rec := p_rev_op_resource_rec ;
689: l_rev_op_res_unexp_rec := p_rev_op_res_unexp_rec ;
690:
691: -- Exposed Column
692: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
693: ('Populate null exposed columns......') ;
694: END IF ;
695:
696: IF l_rev_op_resource_rec.ACD_Type IS NULL

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

860: -- Also copy the Unexposed Columns from Database to New record
861: --
862:
863:
864: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
865: ('Populate Null Unexposed columns......') ;
866: END IF ;
867:
868:

Line 937: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

933: ( p_op_resource_rec IN Bom_Rtg_Pub.Op_Resource_Rec_Type
934: , p_op_res_unexp_rec IN Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
935: , x_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Resource_Rec_Type
936: , x_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Op_Res_Unexposed_Rec_Type
937: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
938: , x_return_status IN OUT NOCOPY VARCHAR2
939: )
940: IS
941: l_rev_op_resource_rec Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type ;

Line 946: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;

942: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
943:
944: l_return_status VARCHAR2(1);
945: l_err_text VARCHAR2(2000) ;
946: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
947:
948: BEGIN
949:
950: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1011: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type

1007: , p_rev_op_res_unexp_rec IN Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1008: , p_control_Rec IN Bom_Rtg_Pub.Control_Rec_Type
1009: , x_rev_op_resource_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Resource_Rec_Type
1010: , x_rev_op_res_unexp_rec IN OUT NOCOPY Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type
1011: , x_mesg_token_tbl IN OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
1012: , x_return_status IN OUT NOCOPY VARCHAR2
1013: )
1014:
1015: IS

Line 1021: l_Token_Tbl Error_Handler.Token_Tbl_Type ;

1017: l_rev_op_res_unexp_rec Bom_Rtg_Pub.Rev_Op_Res_Unexposed_Rec_Type ;
1018:
1019: l_return_status VARCHAR2(1);
1020: l_err_text VARCHAR2(2000) ;
1021: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
1022: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1023:
1024: BEGIN
1025:

Line 1022: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;

1018:
1019: l_return_status VARCHAR2(1);
1020: l_err_text VARCHAR2(2000) ;
1021: l_Token_Tbl Error_Handler.Token_Tbl_Type ;
1022: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1023:
1024: BEGIN
1025:
1026: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug

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

1022: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type ;
1023:
1024: BEGIN
1025:
1026: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1027: ('Within the Operation Resource Entity Defaulting...') ;
1028: END IF ;
1029:
1030: l_return_status := FND_API.G_RET_STS_SUCCESS;

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

1111: --
1112: --
1113: ************************************************************/
1114: /**** Commenting the following validation as per bug 2661684
1115: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1116: ('Default Assigned Units. . . . ' || l_return_status) ;
1117: END IF ;
1118:
1119: IF NVL(l_rev_op_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD

Line 1138: Error_Handler.Add_Error_Token

1134: l_Token_Tbl(1).token_name := 'RES_SEQ_NUMBER';
1135: l_Token_Tbl(1).token_value :=
1136: p_rev_op_resource_rec.resource_sequence_number ;
1137: -- Set Warning Message
1138: Error_Handler.Add_Error_Token
1139: ( p_message_name => 'BOM_RES_DEF_ASSGN_UNIT'
1140: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1141: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1142: , p_Token_Tbl => l_Token_Tbl

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

1153: -- If resource is batchable, basis type should always be LOT
1154: --
1155: ************************************************************/
1156:
1157: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1158: ('Default Basis type. . . . ' || l_return_status) ;
1159: END IF ;
1160:
1161: IF NVL(l_rev_op_resource_rec.acd_type,l_ACD_ADD) = l_ACD_ADD

Line 1177: Error_Handler.Add_Error_Token

1173: l_Token_Tbl(1).token_name := 'RES_SEQ_NUMBER';
1174: l_Token_Tbl(1).token_value :=
1175: p_rev_op_resource_rec.resource_sequence_number ;
1176: -- Set Warning Message
1177: Error_Handler.Add_Error_Token
1178: ( p_message_name => 'BOM_RES_DEF_BASIS_TYPE' -- new message
1179: , p_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1180: , x_Mesg_Token_Tbl => l_Mesg_Token_Tbl
1181: , p_Token_Tbl => l_Token_Tbl

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

1292: x_rev_op_res_unexp_rec := l_rev_op_res_unexp_rec ;
1293:
1294: EXCEPTION
1295: WHEN OTHERS THEN
1296: IF BOM_Rtg_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug
1297: ('Some unknown error in Entity Defaulting . . .' || SQLERRM );
1298: END IF ;
1299:
1300:

Line 1305: Error_Handler.Add_Error_Token

1301: l_err_text := G_PKG_NAME || ' Defaulting (Entity Defaulting) '
1302: || substrb(SQLERRM,1,200);
1303: -- dbms_output.put_line('Unexpected Error: '||l_err_text);
1304:
1305: Error_Handler.Add_Error_Token
1306: ( p_message_name => NULL
1307: , p_message_text => l_err_text
1308: , p_mesg_token_tbl => l_mesg_token_tbl
1309: , x_mesg_token_tbl => l_mesg_token_tbl