Cita:
Empezado por Ramon88
Hola, me he decidido a probar a meter el WSDL y crear el XML como dios manda, pero no me aclaro... Por cierto, trabajo con visual studio
Lo primero es que hay veces que no encuentro la clase para crear el nodo.
Por ejemplo, estoy en la parte Detalles tengo la clase DetalleType, peero esta clase no tiene CalificacionOperacion.
En Encadenamiento, no encuentro nada que haga referencia a PrimerRegistro
Ahí ando atascado!
Alguien me puede orientar?
Gracias!
|
yo lo hago así:
Código:
CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Desglose(y).Item = New CalificacionOperacionType
CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Desglose(y).Item = CalificacionOperacionType.S1
en cuanto al encadenamiento:
Código:
CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento = New RegistroFacturacionAltaTypeEncadenamiento
If HuellaVerifactuAnterior = "" Then
CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item = New PrimerRegistroCadenaType
Else
CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item = New EncadenamientoFacturaAnteriorType
CType(CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item, EncadenamientoFacturaAnteriorType).IDEmisorFactura = RowVerifactu.Item("IdEmisorFacturaAnterior")
CType(CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item, EncadenamientoFacturaAnteriorType).NumSerieFactura = RowVerifactu.Item("NumSerieFacturaAnterior")
CType(CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item, EncadenamientoFacturaAnteriorType).FechaExpedicionFactura = Format(CDate(RowVerifactu.Item("FechaExpedicionFacturaAnterior")), "dd-MM-yyyy")
CType(CType(objectoFactEmitida.RegistroFactura(x).Item, RegistroFacturacionAltaType).Encadenamiento.Item, EncadenamientoFacturaAnteriorType).Huella = RowVerifactu.Item("HuellaVerifactuAnterior")
End If
Espero que te sirva!