Adding Sales Order with multiple lines

Question

Hi all,
I have a C# program whereby I am trying to get Sales Orders from one database (source) and create them in another database (destination). I can't get the code to work properly as lRetCode is never equal to 0 but is -5002.
How can I fix it so that it adds the sales orders properly?
Here is the code snippet:
            unaddedSOs = sList.Except(dList).ToList(); // contains the header information
            // Add the Sales Orders that are missing to destination database
            SAPbobsCOM.Documents sboSO =   (SAPbobsCOM.Documents)oCompanyDestination.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oOrders);  // Destination
            // Loop through unadded Sales Orders
            foreach (var item in unaddedSOs)
                // Set properties of the Sales Order object
                sboSO.CardCode = item.cardCode;
                sboSO.CardName = item.cardName;
                sboSO.DocDate = item.docDate;
                sboSO.DocDueDate = item.docDueDate;
                // Add Sales Order Document Lines
                SAPbobsCOM.Recordset rsLines = oCompanySource.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset); // Source of lines
                // Get Sales Orders from source database
                rsLines.DoQuery("SELECT ItemCode, Quantity, Price FROM RDR1 WHERE DocEntry = '" + item.docNum + "'");
                rsLines.MoveFirst();
                if (rsLines.RecordCount > 0)
                    while (!rsLines.EoF)
                        sboSO.Lines.ItemCode = rsLines.Fields.Item("ItemCode").Value;
                        sboSO.Lines.Quantity = rsLines.Fields.Item("Quantity").Value;
                        sboSO.Lines.Price = rsLines.Fields.Item("Price").Value;
                        sboSO.Lines.Add();
                        rsLines.MoveNext();
                // Try to add the Sales Order to the database
                int lErrCode = 0;
                string sErrMsg = "";
                int lRetCode = sboSO.Add();
                if (lRetCode != 0)
                    int temp_int = lErrCode;
                    string temp_string = sErrMsg;
                    oCompanyDestination.GetLastError(out temp_int, out temp_string);
                    // Incase adding a Sales Order failed
                    if (lErrCode != -4006)
                        // Display error message
                        MessageBox.Show(lErrCode + " " + sErrMsg);
            MessageBox.Show("Done!!!");
Kind Regards,
Kinyanjui.

Answer 1

Hi Kinyanjui,
I think you're always writing to the same line:
int row = 0;
while (!rsLines.EoF)
    sboSO.Lines.SetCurrentLine(row);
    sboSO.Lines.ItemCode = rsLines.Fields.Item("ItemCode").Value;
    sboSO.Lines.Quantity = rsLines.Fields.Item("Quantity").Value;
    sboSO.Lines.Price = rsLines.Fields.Item("Price").Value;
    sboSO.Lines.Add();
    rsLines.MoveNext();
    row++;
Best regards,
Pedro Magueija