8:
9: -- Function Convert_Miss_To_Null
10:
11: FUNCTION Convert_Miss_To_Null
12: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
13: ) RETURN Bom_Bo_Pub.Sub_Component_Rec_Type
14: IS
15: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type := p_sub_component_rec;
16: BEGIN
9: -- Function Convert_Miss_To_Null
10:
11: FUNCTION Convert_Miss_To_Null
12: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
13: ) RETURN Bom_Bo_Pub.Sub_Component_Rec_Type
14: IS
15: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type := p_sub_component_rec;
16: BEGIN
17:
11: FUNCTION Convert_Miss_To_Null
12: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
13: ) RETURN Bom_Bo_Pub.Sub_Component_Rec_Type
14: IS
15: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type := p_sub_component_rec;
16: BEGIN
17:
18: /*
19: IF l_sub_component_rec.substitute_component_id = FND_API.G_MISS_NUM THEN
155: *
156: ********************************************************************/
157:
158: PROCEDURE Update_Row
159: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
160: , p_Sub_Comp_Unexp_Rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
161: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
162: , x_return_status OUT NOCOPY VARCHAR2
163: )
156: ********************************************************************/
157:
158: PROCEDURE Update_Row
159: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
160: , p_Sub_Comp_Unexp_Rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
161: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
162: , x_return_status OUT NOCOPY VARCHAR2
163: )
164: IS
162: , x_return_status OUT NOCOPY VARCHAR2
163: )
164: IS
165: l_processed BOOLEAN;
166: l_sub_component_rec Bom_Bo_Pub.SUB_COMPONENT_REC_TYPE :=
167: p_sub_component_rec;
168: l_return_status VARCHAR2(200);
169: l_err_text VARCHAR2(255);
170: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
259: * Bom_Substitute_Components table.
260: *
261: ********************************************************************/
262: PROCEDURE Insert_Row
263: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
264: , p_Sub_Comp_Unexp_Rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
265: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
266: , x_return_status OUT NOCOPY VARCHAR2
267: )
260: *
261: ********************************************************************/
262: PROCEDURE Insert_Row
263: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
264: , p_Sub_Comp_Unexp_Rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
265: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
266: , x_return_status OUT NOCOPY VARCHAR2
267: )
268: IS
446: PROCEDURE Query_Row
447: ( p_substitute_component_id IN NUMBER
448: , p_component_sequence_id IN NUMBER
449: , p_acd_type IN NUMBER
450: , x_Sub_Component_Rec OUT NOCOPY Bom_Bo_Pub.Sub_Component_Rec_Type
451: , x_Sub_Comp_Unexp_Rec OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
452: , x_return_status OUT NOCOPY VARCHAR2
453: )
454: IS
447: ( p_substitute_component_id IN NUMBER
448: , p_component_sequence_id IN NUMBER
449: , p_acd_type IN NUMBER
450: , x_Sub_Component_Rec OUT NOCOPY Bom_Bo_Pub.Sub_Component_Rec_Type
451: , x_Sub_Comp_Unexp_Rec OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
452: , x_return_status OUT NOCOPY VARCHAR2
453: )
454: IS
455: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
451: , x_Sub_Comp_Unexp_Rec OUT NOCOPY Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
452: , x_return_status OUT NOCOPY VARCHAR2
453: )
454: IS
455: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
456: l_Token_Tbl Error_Handler.Token_Tbl_Type;
457: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
458: BEGIN
459:
522: --
523:
524: PROCEDURE Lock_Row
525: ( x_return_status OUT NOCOPY VARCHAR2
526: , p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
527: , x_sub_component_rec OUT NOCOPY Bom_Bo_Pub.Sub_Component_Rec_Type
528: , x_err_text OUT NOCOPY VARCHAR2
529: )
530: IS
523:
524: PROCEDURE Lock_Row
525: ( x_return_status OUT NOCOPY VARCHAR2
526: , p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
527: , x_sub_component_rec OUT NOCOPY Bom_Bo_Pub.Sub_Component_Rec_Type
528: , x_err_text OUT NOCOPY VARCHAR2
529: )
530: IS
531: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
527: , x_sub_component_rec OUT NOCOPY Bom_Bo_Pub.Sub_Component_Rec_Type
528: , x_err_text OUT NOCOPY VARCHAR2
529: )
530: IS
531: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
532: l_err_text VARCHAR2(255);
533: BEGIN
534: NULL;
535: END Lock_Row;
534: NULL;
535: END Lock_Row;
536:
537: PROCEDURE Perform_Writes
538: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
539: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
540: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
541: , x_Return_Status OUT NOCOPY VARCHAR2
542: )
535: END Lock_Row;
536:
537: PROCEDURE Perform_Writes
538: ( p_sub_component_rec IN Bom_Bo_Pub.Sub_Component_Rec_Type
539: , p_sub_comp_unexp_rec IN Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type
540: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
541: , x_Return_Status OUT NOCOPY VARCHAR2
542: )
543: IS
542: )
543: IS
544: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
545: l_return_status VARCHAR2(1);
546: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
547: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
548: BEGIN
549: l_sub_component_rec := p_sub_component_rec;
550: l_sub_comp_unexp_rec := p_sub_comp_unexp_rec;
543: IS
544: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
545: l_return_status VARCHAR2(1);
546: l_sub_component_rec Bom_Bo_Pub.Sub_Component_Rec_Type;
547: l_sub_comp_unexp_rec Bom_Bo_Pub.Sub_Comp_Unexposed_Rec_Type;
548: BEGIN
549: l_sub_component_rec := p_sub_component_rec;
550: l_sub_comp_unexp_rec := p_sub_comp_unexp_rec;
551: