Create a Invoice based in a Order

Question

How can I create a Invoice using the object Documents?.
If I have a Document of a Order and i want copy these Order in a Invoice.
I don't want copy field to field.

Answer 1

Hi Santiago,
You should set the values for the fields BaseEntry BaseLine and BaseType for the invoice lines.
Here you have an example:
Public Sub baseDocument()
    Dim oinv As SAPbobsCOM.Documents
    Set oinv = sbocompany.GetBusinessObject(oInvoices)
    oinv.CardCode = "CardCode001"
    oinv.DocDueDate = Now
    oinv.Lines.BaseEntry = 105
    oinv.Lines.BaseLine = 0
    oinv.Lines.BaseType = 17
    oinv.Lines.Add
    oinv.Lines.BaseEntry = 105
    oinv.Lines.BaseLine = 1
    oinv.Lines.BaseType = 17
    ret = oinv.Add
    If ret <> 0 Then
        sbocompany.GetLastError ret, errStr
        sboappl.MessageBox ("Error creating the invoice " & ret & " " & errStr)
    Else
        sboappl.MessageBox ("Invoice created")
    End If
End Sub
Hope helps,
Ibai Peñ