Problems in creating a Goods Receipt Draft

Question

Hello,
I am trying to use the DI-API and the SDK to create a Goods Receipt Draft document and link it to an existing Purchase Order.  When I try to add the draft object, I receive an internal error (-2010).  Here is the code that I am using.  Can someone see if anything is wrong with this, or does anyone have any insights into this type of error?
SAPbobsCOM.Documents draft = null;
draft = company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oDrafts);
draft.Reference1 = tempDocEntry;
draft.CardCode = tempCardCode;
draft.DocDate = DateTime.Now;
draft.NumAtCard = tempOrderNumber;
draft.DocObjectCode = SAPbobsCOM.BoObjectTypes.oPurchaseDeliveryNotes;     // Used so that the objType will be 20 for a Goods Receipt Draft
draft.Comments = "";
draft.Lines.BaseEntry = System.Convert.ToInt32(tempDocEntry);
draft.Lines.BaseLine = System.Convert.ToInt32(row["Line #"].ToString());
draft.Lines.BaseType = System.Convert.ToInt32(SAPbobsCOM.BoObjectTypes.oPurchaseOrders);
draft.Lines.ItemCode = row["Item #"].ToString();
draft.Lines.Quantity = System.Convert.ToInt32(row["Qty"].ToString());
draft.Lines.Price = System.Convert.ToDouble(row["unit price (USD)"].ToString());
draft.Lines.WarehouseCode = "0" + row["Whse Code"].ToString();   // prepend with zero, if the code is of length 1
draft.Lines.Add();
result = draft.Add();        // Add the draft now
if (result != 0)
      thisError = company.GetLastErrorDescription();     //*** THE ERROR RESULT IS RETURNED HERE...
I am hoping that someone can provide some feedback and direction on this one fairly quickly as I am on a pretty tight time constraint to implement this solution.
Thanks,
Jonathan

Answer 1

Hi Jonathan,
I haven't tested your code but I notice that you are calling the Add method of the Lines child object incorrectly. It's a bit confusing but the Lines.Add method should be called first and then you use the SetCurrentLine method to access the properties of this line. To make it more confusing, a new instance of the Documents object automatically gets one, blank line so you only need to call Lines.Add when adding a second line (and each subsequent line).
For example, say I have a recordset of line details from a base PO that I want to add to a new, draft GRPO:
int lineIndex = 0;
while (!rec.EOF)
     if (lineIndex > 0) draft.Lines.Add(); // Only need to add new line after first one
     draft.Lines.SetCurrentLine(lineIndex); // Set focus to newly added line so I can set properties
     draft.Lines.BaseEntry = System.Convert.ToInt32(rec.Fields.Item("DocEntry").Value);
     draft.Lines.BaseLine = System.Convert.ToInt32(rec.Fields.Item("LineNum").Value);
     draft.Lines.BaseType = System.Convert.ToInt32(SAPbobsCOM.BoObjectTypes.oPurchaseOrders);
     draft.Lines.ItemCode = System.Convert.ToString(rec.Fields.Item("ItemCode").Value);
     draft.Lines.Quantity = System.Convert.ToDouble(rec.Fields.Item("Quantity").Value);
     draft.Lines.Price = System.Convert.ToDouble(rec.Fields.Item("Price").Value);
     draft.Lines.WarehouseCode = System.Convert.ToString(rec.Fields.Item("WhsCode").Value);
     lineIndex++;
     rec.MoveNext();
Kind Regards,
Owen