137:
138: PROCEDURE Update_Row
139: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
140: , p_Ref_Desg_Unexp_Rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
141: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
142: , x_Return_Status OUT NOCOPY VARCHAR2
143: )
144: IS
145: l_return_status varchar2(80);
142: , x_Return_Status OUT NOCOPY VARCHAR2
143: )
144: IS
145: l_return_status varchar2(80);
146: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
147: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
148: l_Token_Tbl Error_Handler.Token_Tbl_Type;
149: BEGIN
150:
144: IS
145: l_return_status varchar2(80);
146: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
147: l_ref_designator_rec Bom_Bo_Pub.Ref_Designator_Rec_Type;
148: l_Token_Tbl Error_Handler.Token_Tbl_Type;
149: BEGIN
150:
151: UPDATE BOM_REFERENCE_DESIGNATORS
152: SET LAST_UPDATE_DATE = SYSDATE
182: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
183:
184: EXCEPTION
185: WHEN OTHERS THEN
186: Error_Handler.Add_Error_Token
187: ( p_Message_Name => NULL
188: , p_Message_Text => 'ERROR in Update Row (Ref Desgs)' ||
189: substr(SQLERRM, 1, 100) || ' ' ||
190: to_char(SQLCODE)
210:
211: PROCEDURE Insert_Row
212: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_Rec_Type
213: , p_Ref_Desg_Unexp_Rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
214: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
215: , x_Return_Status OUT NOCOPY VARCHAR2
216: )
217: IS
218: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
214: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
215: , x_Return_Status OUT NOCOPY VARCHAR2
216: )
217: IS
218: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
219: BEGIN
220:
221: INSERT INTO BOM_REFERENCE_DESIGNATORS
222: ( COMPONENT_REFERENCE_DESIGNATOR
288: x_return_status := FND_API.G_RET_STS_SUCCESS;
289: EXCEPTION
290:
291: WHEN OTHERS THEN
292: Error_Handler.Add_Error_Token
293: ( p_Message_Name => NULL
294: , p_Message_Text => 'ERROR in Insert Row (Ref Desgs)' ||
295: substr(SQLERRM, 1, 100) || ' ' ||
296: to_char(SQLCODE)
322: PROCEDURE Delete_Row
323: ( p_ref_designator IN VARCHAR2
324: , p_component_sequence_id IN NUMBER
325: , p_acd_type IN NUMBER
326: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
327: , x_Return_Status OUT NOCOPY VARCHAR2
328: )
329: IS
330: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
326: , x_Mesg_Token_Tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
327: , x_Return_Status OUT NOCOPY VARCHAR2
328: )
329: IS
330: l_Mesg_Token_Tbl Error_Handler.Mesg_Token_Tbl_Type;
331:
332: BEGIN
333:
334: DELETE FROM BOM_REFERENCE_DESIGNATORS
340: x_Return_Status := FND_API.G_RET_STS_SUCCESS;
341:
342: EXCEPTION
343: WHEN OTHERS THEN
344: Error_Handler.Add_Error_Token
345: ( p_Message_Name => NULL
346: , p_Message_Text => 'ERROR in Delete Row (Ref Desgs)' ||
347: substr(SQLERRM, 1, 100) || ' ' ||
348: to_char(SQLCODE)
447:
448: PROCEDURE Perform_Writes
449: ( p_ref_designator_rec IN Bom_Bo_Pub.Ref_Designator_rec_Type
450: , p_ref_desg_unexp_rec IN Bom_Bo_Pub.Ref_Desg_Unexposed_Rec_Type
451: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
452: , x_return_status OUT NOCOPY VARCHAR2
453: )
454: IS
455: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
451: , x_mesg_token_tbl OUT NOCOPY Error_Handler.Mesg_Token_Tbl_Type
452: , x_return_status OUT NOCOPY VARCHAR2
453: )
454: IS
455: l_mesg_token_tbl Error_Handler.Mesg_Token_Tbl_Type;
456: l_return_status VARCHAR2(1);
457: BEGIN
458: l_return_status := FND_API.G_RET_STS_SUCCESS;
459: