Ir para conteúdo
  • Cadastre-se

kauanny3

Membros
  • Total de ítens

    4
  • Registro em

  • Última visita

Tudo que kauanny3 postou

  1. Consegui encontrar a solução, segue o escopo do id Dados usados para gerar o Id: DPS + Cód.Mun:(7 dígitos) + Tipo Inscrição: (CNPJ) + Inscrição Federal: (14 dígitos) + Série DPS: (5 dígitos) + Número DPS: (15 dígitos com zeros à esquerda)
  2. Olá gente, sou nova por aqui e estou com esse erro para realizar a comparação entre os esquemas Tenho minha função de validação: Public Function ValidarXML(ByVal documento As XmlDocument, ByVal SchemaNf As String) As String Dim retorno As String = "" If documento IsNot Nothing AndAlso File.Exists(SchemaNf) Then Try Dim settings As New XmlReaderSettings() settings.ValidationType = ValidationType.Schema ' Adiciona o schema Dim schemas As New XmlSchemaSet() schemas.Add("http://www.sped.fazenda.gov.br/nfse", SchemaNf) settings.Schemas = schemas ' Configura o evento de validação AddHandler settings.ValidationEventHandler, AddressOf reader_ValidationEventHandler ' Converte o XmlDocument para string e cria um XmlReader a partir disso Dim xmlString As String = documento.OuterXml Using stringReader As New StringReader(xmlString) Using reader As XmlReader = XmlReader.Create(stringReader, settings) While reader.Read() ' Apenas lê para acionar a validação End While End Using End Using If Erro <> "" Then retorno = "Resultado da validação:" & vbCrLf & vbCrLf & Erro & vbCrLf & "...Fim da validação" End If Catch ex As Exception retorno = "Erro ao validar XML: " & ex.Message End Try Else retorno = "Documento XML inválido ou arquivo do Schema não foi encontrado." End If Return retorno End Function Nela, envio o esquema DPS_v1.00.xsd
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...