DBA Data[Home] [Help]

APPS.BOM_BOM_HEADER_UTIL dependencies on BOM_GLOBALS

Line 63: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alt: ' || l_dummy

59: SELECT decode(p_alternate_bom_code, FND_API.G_MISS_CHAR,
60: 'Missing', NULL, 'XXXX', p_alternate_bom_code)
61: INTO l_dummy
62: from sys.dual;
63: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alt: ' || l_dummy
64: ); END IF;
65:
66: SELECT assembly_item_id
67: , organization_id

Line 131: x_return_status := BOM_Globals.G_RECORD_FOUND;

127: NVL(DECODE( p_alternate_bom_code,FND_API.G_MISS_CHAR,
128: NULL, p_alternate_bom_code
129: ), 'XXXX');
130:
131: x_return_status := BOM_Globals.G_RECORD_FOUND;
132: x_bom_header_rec := l_bom_header_rec;
133: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
134:
135: EXCEPTION

Line 137: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;

133: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
134:
135: EXCEPTION
136: WHEN NO_DATA_FOUND THEN
137: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;
138: x_bom_header_rec := l_bom_header_rec;
139: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
140: WHEN OTHERS THEN
141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 179: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alt: ' || l_dummy

175: SELECT decode(p_alternate_bom_code, FND_API.G_MISS_CHAR,
176: 'Missing', NULL, 'XXXX', p_alternate_bom_code)
177: INTO l_dummy
178: from sys.dual;
179: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Alt: ' || l_dummy
180: ); END IF;
181:
182: SELECT assembly_item_id
183: , organization_id

Line 244: x_return_status := BOM_Globals.G_RECORD_FOUND;

240: NVL(DECODE( p_alternate_bom_code,FND_API.G_MISS_CHAR,
241: NULL, p_alternate_bom_code
242: ), 'XXXX');
243:
244: x_return_status := BOM_Globals.G_RECORD_FOUND;
245: x_bom_header_rec := l_bom_header_rec;
246: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
247:
248: EXCEPTION

Line 250: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;

246: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
247:
248: EXCEPTION
249: WHEN NO_DATA_FOUND THEN
250: x_return_status := BOM_Globals.G_RECORD_NOT_FOUND;
251: x_bom_header_rec := l_bom_header_rec;
252: x_bom_head_unexp_rec := l_bom_head_unexp_rec;
253: WHEN OTHERS THEN
254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 282: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing Bom Header rec for ' || p_bom_header_rec.assembly_item_name); END IF;

278: l_effectivity_control NUMBER;
279: x_err_text varchar2(2000);
280: BEGIN
281:
282: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Writing Bom Header rec for ' || p_bom_header_rec.assembly_item_name); END IF;
283:
284: l_effectivity_control := get_effectivity_control
285: (p_bom_head_unexp_rec.assembly_item_id,
286: p_bom_head_unexp_rec.organization_id);

Line 394: , BOM_Globals.Get_User_Id

390: , p_bom_header_rec.attribute13
391: , p_bom_header_rec.attribute14
392: , p_bom_header_rec.attribute15
393: , SYSDATE
394: , BOM_Globals.Get_User_Id
395: , SYSDATE
396: , BOM_Globals.Get_User_Id
397: , BOM_Globals.Get_User_Id
398: , p_bom_head_unexp_rec.structure_type_id

Line 396: , BOM_Globals.Get_User_Id

392: , p_bom_header_rec.attribute15
393: , SYSDATE
394: , BOM_Globals.Get_User_Id
395: , SYSDATE
396: , BOM_Globals.Get_User_Id
397: , BOM_Globals.Get_User_Id
398: , p_bom_head_unexp_rec.structure_type_id
399: , p_bom_header_rec.bom_implementation_date
400: , l_effectivity_control

Line 397: , BOM_Globals.Get_User_Id

393: , SYSDATE
394: , BOM_Globals.Get_User_Id
395: , SYSDATE
396: , BOM_Globals.Get_User_Id
397: , BOM_Globals.Get_User_Id
398: , p_bom_head_unexp_rec.structure_type_id
399: , p_bom_header_rec.bom_implementation_date
400: , l_effectivity_control
401: , NULL

Line 423: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Oracle Error in Writing Bom Header rec ' || to_char(sqlcode)||'/'||sqlerrm); END IF;

419: x_return_status := FND_API.G_RET_STS_SUCCESS;
420:
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Oracle Error in Writing Bom Header rec ' || to_char(sqlcode)||'/'||sqlerrm); END IF;
424: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('The mandatory values are, Assembly_item_id : ' ||to_char(p_bom_head_unexp_rec.assembly_item_id)); END IF;
425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bill_Sequence_Id : '||to_char(p_bom_head_unexp_rec.bill_sequence_id)||'. User Id : '||to_char(Bom_Globals.Get_User_Id)); END IF;
426: Error_Handler.Add_Error_Token
427: ( p_message_name => NULL

Line 424: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('The mandatory values are, Assembly_item_id : ' ||to_char(p_bom_head_unexp_rec.assembly_item_id)); END IF;

420:
421: EXCEPTION
422: WHEN OTHERS THEN
423: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Oracle Error in Writing Bom Header rec ' || to_char(sqlcode)||'/'||sqlerrm); END IF;
424: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('The mandatory values are, Assembly_item_id : ' ||to_char(p_bom_head_unexp_rec.assembly_item_id)); END IF;
425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bill_Sequence_Id : '||to_char(p_bom_head_unexp_rec.bill_sequence_id)||'. User Id : '||to_char(Bom_Globals.Get_User_Id)); END IF;
426: Error_Handler.Add_Error_Token
427: ( p_message_name => NULL
428: , p_message_text => G_PKG_NAME ||

Line 425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bill_Sequence_Id : '||to_char(p_bom_head_unexp_rec.bill_sequence_id)||'. User Id : '||to_char(Bom_Globals.Get_User_Id)); END IF;

421: EXCEPTION
422: WHEN OTHERS THEN
423: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Oracle Error in Writing Bom Header rec ' || to_char(sqlcode)||'/'||sqlerrm); END IF;
424: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('The mandatory values are, Assembly_item_id : ' ||to_char(p_bom_head_unexp_rec.assembly_item_id)); END IF;
425: IF Bom_Globals.Get_Debug = 'Y' THEN Error_Handler.Write_Debug('Bill_Sequence_Id : '||to_char(p_bom_head_unexp_rec.bill_sequence_id)||'. User Id : '||to_char(Bom_Globals.Get_User_Id)); END IF;
426: Error_Handler.Add_Error_Token
427: ( p_message_name => NULL
428: , p_message_text => G_PKG_NAME ||
429: ' :Inserting Record ' ||

Line 459: IF Bom_Globals.Get_Debug = 'Y' THEN

455: --
456: -- The only fields that are updateable in BOM Header is the
457: -- common bill information
458: --
459: IF Bom_Globals.Get_Debug = 'Y' THEN
460: Error_Handler.Write_Debug('Updating bill seq ' || p_bom_head_unexp_rec.bill_sequence_id);
461: END IF;
462:
463: UPDATE bom_bill_of_materials

Line 505: , last_updated_by = BOM_Globals.Get_User_Id

501: p_bom_head_unexp_rec.bill_sequence_id,
502: p_bom_head_unexp_rec.source_bill_sequence_id
503: )
504: , last_update_date = SYSDATE
505: , last_updated_by = BOM_Globals.Get_User_Id
506: , last_update_login = BOM_Globals.Get_User_Id
507: , attribute_category = p_bom_header_rec.attribute_category
508: , attribute1 = p_bom_header_rec.attribute1
509: , attribute2 = p_bom_header_rec.attribute2

Line 506: , last_update_login = BOM_Globals.Get_User_Id

502: p_bom_head_unexp_rec.source_bill_sequence_id
503: )
504: , last_update_date = SYSDATE
505: , last_updated_by = BOM_Globals.Get_User_Id
506: , last_update_login = BOM_Globals.Get_User_Id
507: , attribute_category = p_bom_header_rec.attribute_category
508: , attribute1 = p_bom_header_rec.attribute1
509: , attribute2 = p_bom_header_rec.attribute2
510: , attribute3 = p_bom_header_rec.attribute3

Line 630: user_id => BOM_Globals.Get_User_Id

626: ent_inv_item_id => l_bom_head_unexp_rec.assembly_item_id,
627: ent_alt_designator => l_bom_header_rec.alternate_bom_code,
628: ent_comp_seq_id => NULL,
629: ent_op_seq_id => NULL,
630: user_id => BOM_Globals.Get_User_Id
631: );
632:
633: x_mesg_token_tbl := l_mesg_token_tbl;
634:

Line 657: IF p_bom_header_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE

653: IS
654: l_Mesg_Token_tbl Error_Handler.Mesg_Token_Tbl_Type;
655: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
656: BEGIN
657: IF p_bom_header_rec.transaction_type = BOM_GLOBALS.G_OPR_CREATE
658: THEN
659: Insert_Row
660: ( p_bom_header_rec => p_bom_header_rec
661: , p_bom_head_unexp_rec => p_bom_head_unexp_rec

Line 666: BOM_GLOBALS.G_OPR_UPDATE

662: , x_mesg_token_Tbl => l_mesg_token_tbl
663: , x_return_Status => l_return_status
664: );
665: ELSIF p_bom_header_rec.transaction_type =
666: BOM_GLOBALS.G_OPR_UPDATE
667: THEN
668: Update_Row
669: ( p_bom_header_rec => p_bom_header_rec
670: , p_bom_head_unexp_rec => p_bom_head_unexp_rec

Line 676: BOM_GLOBALS.G_OPR_DELETE

672: , x_return_Status => l_return_status
673: );
674:
675: ELSIF p_bom_header_rec.transaction_type =
676: BOM_GLOBALS.G_OPR_DELETE
677: THEN
678: Delete_Row
679: ( p_bom_header_rec => p_bom_header_rec
680: , p_bom_head_unexp_rec => p_bom_head_unexp_rec