none
Factura con Varios Detalles RRS feed

  • Pregunta

  • Saludos estimados.

    mi consulta es la siguientes quiero traer varios datos de una taba APFACTURADET que tiene relacion con APFACTURACAB es decir una factura puede tener varios detalles.

    lo que quiero hacer es lo siguiente un xml de factura con sus datos respectivos y sus varios detalles

    tengo el siguiente codigo donde traigo datos de la base y genero la parte del xml de los detalles

    writer.WriteStartElement("detalles") 'Inicio detalles
            For Each row As DataRow In dt3.Rows
                writer.WriteStartElement("detalle") 'Inicio detalle
                writer.WriteStartElement("codigoPrincipal")
                writer.WriteString(Convert.ToString(row("CODIGOPRI")))
                writer.WriteEndElement()
                writer.WriteStartElement("codigoAuxiliar")
                writer.WriteString(Convert.ToString(row("CODIGOSEC")))
                writer.WriteEndElement()
                writer.WriteStartElement("descripcion")
                writer.WriteString(Convert.ToString(row("NOMBREITEM")))
                writer.WriteEndElement()
                writer.WriteStartElement("cantidad")
                writer.WriteString(Convert.ToDecimal(row("CANTIDAD")))
                writer.WriteEndElement()
                writer.WriteStartElement("precioUnitario")
                writer.WriteString(Convert.ToDecimal(row("PRECIO")))
                writer.WriteEndElement()
                Dim total As Decimal = Convert.ToDecimal(row("PRECIO")) * Convert.ToDecimal(row("CANTIDAD"))
                writer.WriteStartElement("descuento")
                writer.WriteString("0")
                writer.WriteEndElement()
                writer.WriteStartElement("precioTotalSinImpuesto")
                writer.WriteString(total)
                writer.WriteEndElement()
                writer.WriteStartElement("detallesAdicionales")
                writer.WriteStartElement("campoAdicional")
                writer.WriteAttributeString("nombre", Convert.ToString(row("NOMBREITEM")), "valor", Convert.ToString(row("NOMBREITEM")))
                writer.WriteEndElement()
                writer.WriteEndElement() 'Fin detalles adicionales
                writer.WriteStartElement("impuestos")
                writer.WriteStartElement("impuesto")
                writer.WriteStartElement("codigo")
                writer.WriteString("2")
                writer.WriteEndElement()
                If GRABAIVA = "S" And Convert.ToDecimal(row("PORIVA")) = 12.0 Then
                    writer.WriteStartElement("codigoPorcentaje")
                    writer.WriteString("2")
                    writer.WriteEndElement()
                    writer.WriteStartElement("tarifa")
                    writer.WriteString("12.00")
                    writer.WriteEndElement()
                    writer.WriteStartElement("baseImponible")
                    writer.WriteString(total)
                    writer.WriteEndElement()
                    writer.WriteStartElement("valor")
                    writer.WriteString(VALOR_IVA)
                    writer.WriteEndElement()
                ElseIf GRABAIVA = "N" Then
                    writer.WriteStartElement("codigoPorcentaje")
                    writer.WriteString("0")
                    writer.WriteEndElement()
                    writer.WriteStartElement("tarifa")
                    writer.WriteString("0.00")
                    writer.WriteEndElement()
                    writer.WriteStartElement("baseImponible")
                    writer.WriteString(TOTAL_SINIVA)
                    writer.WriteEndElement()
                    writer.WriteStartElement("valor")
                    writer.WriteString("0.00")
                    writer.WriteEndElement()
                End If
                writer.WriteEndElement() 'Fin impuesto
                writer.WriteEndElement() 'Fin impuestos
                writer.WriteEndElement() 'Fin detalle
            Next

    aqui el problema es que no se como hacer para que esos datos sean guardados de manera dinamica y a partir de ahi generar la parte del detalle del xml alguien me podria pasar algun ejemplo de como hacerlo yo decirme que estoy haciendo mal.

    • Editado Ricardo España jueves, 2 de octubre de 2014 14:54
    • Cambiado Enrique M. Montejo viernes, 3 de octubre de 2014 15:29 Pregunta relacionada con el acceso a datos.
    miércoles, 1 de octubre de 2014 23:30