Inventory Revaluation Entry by SDK

Hello Experts  I want to create  Inventory Revaluation Entry by SDK.for  FIFO type items.

when I run code it   will not give me any error but record not added in inventory revaluation.

Code is...

SAPbobsCOM.MaterialRevaluation oInvReval;

                                    oInvReval = clsAddOn.LDNA_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oMaterialRevaluation);

                                    oInvReval.DocDate = DateTime.Now;

                                    oInvReval.RevalType = "P";

                                    oInvReval.Lines.ItemCode = "RM00114";

                                    oInvReval.Lines.WarehouseCode ="PUNE";                                  

                                    oInvReval.Lines.FIFOLayers.SetCurrentLine(0);

                                    oInvReval.Lines.FIFOLayers.Price = 2000;

                                    oInvReval.Lines.FIFOLayers.Add(); 

                                    oInvReval.Lines.Add();

                                        if (oInvReval.Add() != 0)

                                        {

                                            clsAddOn.LDNA_Application.StatusBar.SetText("Inventory Revaluation  created Sucessfully.", SAPbouiCOM.BoMessageTime.bmt_Medium, SAPbouiCOM.BoStatusBarMessageType.smt_Success);

                                        }

Please help me........

Regard's,

Pritam