cancel
Showing results for 
Search instead for 
Did you mean: 

Convertir un documento DRAFT a DEFINITIVO por SDK

Former Member
0 Kudos

Estimados,

Alquien sabe como puedo convertir rapidamente un objeto DRAFT (Factura de compra por ejemplo) a definitiva con SDK?

Accepted Solutions (1)

Accepted Solutions (1)

Former Member
0 Kudos

Hay un post en el foro en inglés que te puede ser de ayuda:

[Create Delivery Note From Draft|;

Espero que te sea de ayuda,

Marta

Former Member
0 Kudos

Gracias, si lo habia encontrado, y lo hice con XML, pero me salta un error cuando quiero crear el objeto definitivo, porque al parecer el XML al guardar los datos por defecto de algunos campos, colo valores no permitidos. Por ejemplo el valor del campo OwnerCode lo guarda con CERO (0) y al tratar de guardar el documento definitivo me dice que no existe el empleado con codigo CERO.

Esto es error de la DI o hay que hacer algo mas?

Former Member
0 Kudos

Hola,

¿has probado a quitarle el DocObjectCode y el DocNum?

te adjunto el código que he utilizado para crear facturas de venta a partir de su borrador.

(2005A PL45)

Dim dXmlBorrador As XmlDocument

Dim objectType As String

Dim dxmlNodoDocObjectCode As XmlNode

Dim dxmlNodoDocNum As XmlNode

...

...

dXmlBorrador.Load(INTERCAMBIO_XML.xml)

'/ recuperar el tipo de objeto del borrador:

objectType = dXmlBorrador.SelectSingleNode("BOM/BO/Documents/row/DocObjectCode").InnerText

dXmlBorrador.SelectSingleNode("BOM/BO/AdmInfo/Object").InnerText = objectType

'/quitar el para que lo asigne automáticamente al crear el documento

dxmlNodoDocNum = dXmlBorrador.SelectSingleNode("BOM/BO/Documents/row/DocNum")

dXmlBorrador.SelectSingleNode("BOM/BO/Documents/row").RemoveChild(dxmlNodoDocNum)

dXmlBorrador.Save(INTERCAMBIO_XML_nuevo.xml)

'Retrieve the object back from the XML file

oFactura = oCompany.GetBusinessObjectFromXML(INTERCAMBIO_XML_nuevo.xml, 0)

resultAddFactura = oFactura.Add()

Espero que sea de ayuda.

Marta

Answers (0)