34: l_user_id NUMBER := FND_GLOBAL.User_Id;
35: l_login_id NUMBER := FND_GLOBAL.Login_Id;
36: BEGIN
37: --bug:3254815 Update request id, prog id, prog appl id and prog update date.
38: INSERT INTO MTL_ITEM_REVISIONS_B(
39: inventory_item_id,
40: organization_id,
41: revision,
42: revision_label,
101: p_bom_revision_rec.Attribute13,
102: p_bom_revision_rec.Attribute14,
103: p_bom_revision_rec.Attribute15,
104: --p_bom_revision_rec.Description
105: mtl_item_revisions_b_s.NEXTVAL,
106: 1,
107: Fnd_Global.Conc_Request_Id,
108: Fnd_Global.Conc_Program_Id,
109: Fnd_Global.Prog_Appl_Id,
113: SELECT userenv('LANG') INTO l_language_code FROM dual;
114:
115: -- Insert into TL table
116:
117: INSERT INTO mtl_item_revisions_TL
118: ( Inventory_Item_Id
119: , Organization_Id
120: , Revision_id
121: , Language
180: l_revision_id NUMBER;
181: l_user_id NUMBER := FND_GLOBAL.User_Id;
182: l_login_id NUMBER := FND_GLOBAL.Login_Id;
183: BEGIN
184: UPDATE Mtl_Item_Revisions_b
185: SET --description = p_bom_revision_rec.Description,
186: effectivity_date = NVL(p_bom_revision_rec.start_effective_date,sysdate),--bug:4242412 Replace NULL effectivity date by SYSDATE
187: revision_label= p_bom_revision_rec.revision_label,
188: revision_reason= p_bom_revision_rec.revision_reason,
219: SELECT userenv('LANG') INTO l_language_code FROM dual;
220:
221: -- Update the description in the TL table
222: --
223: UPDATE mtl_item_revisions_TL
224: SET description = decode(p_bom_Revision_rec.description, null, description, p_bom_Revision_rec.description)
225: , last_updated_by = l_user_Id
226: , last_update_date = sysdate
227: WHERE revision_id = l_revision_id
348: x_bom_revision_rec.Attribute13,
349: x_bom_revision_rec.Attribute14,
350: x_bom_revision_rec.Attribute15,
351: x_bom_revision_rec.Description
352: FROM mtl_item_revisions
353: WHERE revision = p_revision
354: AND inventory_item_id = p_assembly_item_id
355: AND organization_id = p_organization_id;
356: