Adding serial number in A/R Invoice

Question

Hi Experts,
I am with a problem.I have 1 Records in the Database Table..In My SDKCode,Based on the Invoice Object I am adding the database tables values to the A/R Invoice LinesItems (itemcode,itemdescription,Taxcode,Quantity,Unitprice and serial number).When I am Updating, i am encountering an error "Cannot add row 1 without complete selection of batch/serial numbers"
kindly guide me with this problem....and how we can insert serial number in A/R Invoice for a item carrying serial number
Regards
Pradeep
Edited by: Pradeep.grd on Feb 15, 2012 7:36 PM

Answer 1

Hi Pradeep,
You can try this code for batch and serial no management in A/R Invoice:
oItem.GetByKey(sku);
SAPbobsCOM.Recordset oRecordset = (SAPbobsCOM.Recordset)(oCompany.GetBusinessObject(BoObjectTypes.BoRecordset));
if (oItem.ManageBatchNumbers == BoYesNoEnum.tYES)
string sqlstr = string.Format("SELECT sum(Quantity) FROM OIBT WHERE ItemCode = '{0}' AND STATUS = 0", oItem.ItemCode);
oRecordset.DoQuery(sqlstr);
if (!oRecordset.EoF)
if (lInvoice.Lines.Quantity <= Convert.ToDouble(oRecordset.Fields.Item(0).Value))
iRequired = lInvoice.Lines.Quantity;
                                            iAvailable = 0;
                                            iLineNo = 0;
                                            sqlstr = string.Format("SELECT * FROM OIBT WHERE ItemCode = '{0}' AND STATUS =                      0",oItem.ItemCode);
                                            oRecordset.DoQuery(sqlstr);
while (!oRecordset.EoF)
                                                if (Convert.ToDouble(oRecordset.Fields.Item("Quantity").Value) >= iRequired)
                                                    lInvoice.Lines.BatchNumbers.SetCurrentLine(iLineNo);
                                                    lInvoice.Lines.BatchNumbers.BatchNumber = oRecordset.Fields.Item("BatchNum").Value.ToString();
                                                    lInvoice.Lines.WarehouseCode = oRecordset.Fields.Item("WhsCode").Value.ToString();
                                                    lInvoice.Lines.BatchNumbers.Quantity = iRequired;
                                                    lInvoice.Lines.BatchNumbers.Add();
                                                    break;
                                                else if ((Convert.ToDouble(oRecordset.Fields.Item("Quantity").Value) < lInvoice.Lines.Quantity))
                                                    iAvailable = Information.IsNumeric(oRecordset.Fields.Item("Quantity").Value) ? Convert.ToDouble(oRecordset.Fields.Item("Quantity").Value) : 0;
                                                    lInvoice.Lines.BatchNumbers.SetCurrentLine(iLineNo);
                                                    lInvoice.Lines.BatchNumbers.BatchNumber = oRecordset.Fields.Item("BatchNum").Value.ToString();
                                                    lInvoice.Lines.WarehouseCode = oRecordset.Fields.Item("WhsCode").Value.ToString();
                                                    lInvoice.Lines.BatchNumbers.Quantity = iAvailable;
                                                    lInvoice.Lines.BatchNumbers.Add();
                                                    iRequired -= iAvailable;
                                                    iLineNo += 1;
                                                oRecordset.MoveNext();
else if (oItem.ManageSerialNumbers == BoYesNoEnum.tYES)
                                    sqlstr = string.Format("SELECT TOP {0} * FROM OSRI WHERE ItemCode = '' AND STATUS = 0", Quantity, oItem.ItemCode);
                                    oRecordset.DoQuery(sqlstr);
                                    if (!oRecordset.EoF)
                                        if (oRecordset.RecordCount >= lInvoice.Lines.Quantity)
                                            iLineNo = 0;
                                            while (!oRecordset.EoF)
                                                lInvoice.Lines.SerialNumbers.SetCurrentLine(iLineNo);
                                                lInvoice.Lines.SerialNumbers.SystemSerialNumber = Convert.ToInt32(oRecordset.Fields.Item("SysSerial").Value);
                                                lInvoice.Lines.SerialNumbers.InternalSerialNumber = Convert.ToString(oRecordset.Fields.Item("IntrSerial").Value);
                                                lInvoice.Lines.WarehouseCode = Convert.ToString(oRecordset.Fields.Item("WhsCode").Value);
                                                lInvoice.Lines.SerialNumbers.Add();
                                                iLineNo += 1;
                                                oRecordset.MoveNext();
Edited by: utpal_maity on Feb 16, 2012 7:12 AM