[Resolvido]Extrair Campo de XML Com Erro.

Olá amigos, boa noite!

Tenho este código criado por Alvaro Teixeira, e que sofreu adaptações e hoje não está trazendo a informação correta deste novo modelo de arquivo XML, conforme exemplo em anexo:
Link: dropbox.com/s/pgspr8ccm4nvsoa/ExtrairXML_v1.rar?dl=0



Em suma eu pretendo que no momento da importação o código ignore esta informação:


Deixo um modelo com a maneira correta que deveria ser importado o dado.

Certos da ajuda dos amigos, agradeço antecipadamente.

Up.

Olá, explique melhor.
1) o que faz mal ou não faz?
2) como deveria fazer ?

Abraço

Olá ahteixeira, bom dia,

Obrigado pela pronta resposta, segue:

No momento da importação o código deveria ignorar e não importar a TAG grifada no print anexo, só que isso não acontece.
Ou seja, o código está pegando os dados do GILDASIO e sobrepondo nos dados da Klivia que estão na TAG seguinte.

Olá Gomes,
O que pretende ignorar na importação o que tem de diferente em relação aos outros.
Como podemos identificar o "tipo" para ignorar.
Abraço

Olá ahteixeira,

Pretendo ignorar porque o que está em vermelho não existe não existe uma uma conta da TAG ans:relacaoGuias.

ans:nomeBeneficiario
ans:numeroCarteira
ans:numeroGuiaPrestador
ans:dataInicioFat
ans:codigoProcedimento
ans:qtdExecutada
ans:descricaoProcedimento
ans:valorLiberado

Up.

Olá Gomes,
De momento tenho andado sem disponibilidade, assim que seja possivel, vou ver no que posso ajudar.
Pode ser que mais alguem possa ajudar.
Entretanto complete melhor a descrição, repare que quem está ajudar não conhece o formato nem estrutura do ficheiro XML reportado que pretende importar.
A técnica utilizada é para pesquisa no texto delimitada.
Abraço

Ok, vou tentar detalhar melhor.

Tenho este modelo de XML com as TAGs (ans:relacaoGuias) com os dados para importação de alguns campos do arquivo descrito.

Até ai tudo certo, o problema é quando loop encontra os campos (ans:nomeBeneficiario; ans:numeroCarteira; ans:numeroGuiaPrestador e ans:dataInicioFat AND (ans:codigoProcedimento; ans:qtdExecutada; ans:descricaoProcedimento e ans:valorLiberado, são nulos.

Qualquer dúvida pode solicitar que tento esclarecer melhor.

Att,

Olá Gomes, obrigado pelo retorno.
Os utilizadores do fórum agradecem.
Abraço

Disponha,

Precisando de maiores esclarecimentos é só falar, pois esta dúvida vem martelando minha mente à algum tempo.

Grato,

Att,

Olá amigos,

Para exemplificar melhor, fiz a importação do ficheiro para planilha em Excel de como deveria ficar na tabela.

Perceba que no arquivo Excel na linha 11 da coluna; coluna E até a coluna H possui uma tarja vermelha, e pelo fato deste campos está em branco que está me causando este transtorno todo na importação do XML.

Agradeço a ajuda dos amigos!

Up.

Up.

Up.

Olá Gomes, vai ter mesmo que por a "mão na massa"
Estive a ver o projeto e requer algum estudo da estrutura do XML.
De momento não estou com disponibilidade para poder ajudar.
Pode ser que outro colega possa ajudar.
No entanto já fez outra importação XML, não é novo, apenas diferente.
Deverá estudar e caso tenha alguma dificuldade mais concreta, poste para ver se é possível ajudar em pouco tempo.
Abraço

Pois é,

Os laços do XML para importação eu consegui entender um pouco com as orientações do fórum.

Minha dúvida é somente em colocar uma condição diferente de Nulo.

If Not isnull (Não existir o campo TAL) then

Grato,

Olá, em VBA será como postou.
Creio que a dificuladade de verificar o campo null será no XML, é isso?
Caso afirmativo poste como exemplo uma linha que tenha o campo null
E outra linha com o mesmo campo sem ser null, para se veriifcar como podemos identificar.
Abraço

Ola ahteixeira, boa noite,

Sua afirmativa está correta, será verificada no XML mesmo.

Veja um print de como dos campos que não deveriam ser importados para tabela no Access (em vermelho).

Pois na TAG (ans:relacaoGuias) não existe os campo abaixo grifado em vermelho dentro apenas de uma conta (121709) no XML, lembro que, o que grifei em vermelho não é NULL, ele não existe dentro da estrutura do XML para a conta (121709), os demais a importação ocorre com sucesso. ans:relacaoGuias:

ans:nomeBeneficiario> GILDASIO SOUZA OLIVEIRA
ans:numeroCarteira>773554014516001
ans:numeroGuiaPrestador>121709
ans:dataInicioFat>2016-09-03
ans:codigoProcedimento>
ans:qtdExecutada>
ans:descricaoProcedimento>
ans:valorLiberado>

Exemplo de testes na Mensagem nº3.

Up.

Up.

Up.

Up.

Up.

Olá Gomes,
Tem que por mão no seu projecto e ser mais concreto com a duvida.
Não disponho dentempo para estar a estudar o xml para compreender.
Se já conseguiu no outro caso, volte ao inicio o método será sempre o mesmo.

Ter o XSD desse xml facilitava a compreensão.
Nunca se esqueça, existe várias formas de se obter o mesmo resultado.
Toca a por a mão na massa.
Neste momento estou com dois trabalhos em XML, lamento não poder ajudar como da outra vez.
Abraço

Olá ahteixeira,

Estou debruçado neste projeto.

O que seria (Ter o XSD desse xml facilitava a compreensão.)???

Olá Gomes,
Às 04 da madrugada, esqueci que está a fazer importação e não exportação.
Quanto à questão, origem: pt.wikipedia.org/wiki/XML_Schema

XML Schema é uma linguagem baseada no formato XML para definição de regras de validação ("esquemas") em documentos no formato XML. Foi a primeira linguagem de esquema para XML a obter o status de recomendação por parte do W3C. Esta linguagem é uma alternativa ao DTD, cuja sintaxe não é baseada no formato XML.[1]

Foi amplamente utilizado para desenvolvimento da NF-e (Nota Fiscal Eletrônica) Brasileira.

Um arquivo contendo as definições na linguagem XML Schema é chamado de XSD (XML Schema Definition), este descreve a estrutura de um documento XML.

Abraço

Amigo Ahteixeira estava me perguntando se não seria possivel realizar a Extração desses dados, da mesma forma como são feitos nesses dois exemplos de Consulta CEP:
https://www.maximoaccess.com/t29055-enderecos-buscar-no-site-dos-correios#202606
https://www.maximoaccess.com/t29060-busca-cep-site-viacep

Não fui muito a fundo nesses exemplos mas pelo que ví ali é bem simples a extração dos dados!

Olá obrigado,

Também dei uma pesquisada e encontrei esta definição do Schema.

Grato,

Olá a todos
Amigo Fabio, estou sem tempo de ver esses exemplos.
Mas como costumo dizer "o céu é o limite"
O colega Gomes, pretende fazer uma importação, só que divide em varios nós e sub nós que não pretende.
Então, como já disse existe varias formas de atingir o objectivo.
O colega já tem um exemplo a funcionar, será a mesma lógica.

Alternativa "rápida", efetuar a importação de tudo para tabelas temporarias, eliminar depois o que não pretende, em vez de ser por analise via código que é como está a fazer em ambos os casos.

Se poder dar uma força, ...
Abraço

Ok,

Vou estudar este exemplo do colega.

Obrigado a todos pela ajuda!

Alternativa "rápida", efetuar a importação de tudo para tabelas temporarias, eliminar depois ...

Realmente, talvez o mais rápido seja fazer isso mesmo!

Ok, obrigado FabioPaes!

Vou começar importar apenas um campo do XML que está em meu Desktop para teste. Se conseguir eu avanço aos demais

Olá FabioPaes,

Para importação o ficheiro deve está no desktop ou no site onde o mesmo é extraído?
Pois, usando seu exemplo eu tentei importar apenas um campo como teste, mas não deu certo.

No exemplo em questão é realizado a leitura de um site...
Porem acredito que pode passar o caminho do arquivo para a Variavel, que no exemplo passado é: Oxmldoc.Load ()

Experimente passar o caminho completo do Arquivo .XML

Olá,

Obrigado por sua pronta resposta.

Fiz da seguinte forma oXmlDoc.Load ("C:\Base dados SAC\Arquivo XML\18140892.xml/" + valorcep + "/xml/")


Mas o codigo percorre e nao retorna valor nem erro.

Agradeço se puder tecer mais alguma dica.

("C:\Base dados SAC\Arquivo XML\18140892.xml/" + valorcep + "/xml/")

Mude para:

("C:\Base dados SAC\Arquivo XML\18140892.xml")

No exemplo continha (+ valorcep + "/xml/") pois era a URL do site: site/69900/xml

Olá FabioPaes, boa tarde,

Segui suas orientações, veja a adaptação que fiz no modelo que indicou para testes.

Tentei importar do .XML apenas um campo como exemplo (nomeBeneficiario), mas ainda não retorna nehum resultado.

Aonde posso está errando neste código?

Grato,

Amigo, depois de umas pesquisa aqui na net tive uma evolução considerada no seu caso...

No exemplo a seguir está abrindo e lendo as informações...
Veja e da sequencia... Ao final se conseguir evoluir posta aqui pra nós o resultado.

dropbox.com/s/a6q7cvcukkki2vl/Extrair%20Valor%20do%20XML%20AbrindoArquivo.zip?dl=0

Olá amigo,

Este exemplo me parece interessante.

Vou estudá-lo.

A segunda opção funcionou legal, pois declarei o NÓ e o Item que eu preciso que me retorne ans:RelacaoGuias.

Código:

doc.getElementsByTagName("ans:relacaoGuias")(1).Text

Fiz o teste em um por um e realmente atende ao que pretendo.

Agora só preciso jogar em uma variável para salvar em uma tabela temporária e pegar os dados que preciso.

Veja no exemplo.

Grato,

Realmente dessa forma da pra ter acesso as informação... Mas ficou algumas duvidas:

E o Loop, como definiu? Pois tem vários clientes...

E como vai fazer a extração dos valores, ja que eles são extraídos sem delimitadores...

Xml é uma parte que nunca havia mexido o...

O loop e o método para extração dos dados sem delimitador eu ainda não os defini.

Vou estudar um pouco mais para prosseguir.

Veja aqui como fiz com Nota Fiscal Eletrônica:
https://www.maximoaccess.com/t29286-importar-todas-as-nfe-nota-fiscal-eletronica-xml-de-uma-pasta-versao-xml-1-10-2-00-e-3-0#203955

Prezado FabioPaes, boa noite,

Seu exemplo é show!

Vou estudá-lo para me aprimorar e resolver este problema com certeza.

PS: "Acredito que se eu conseguir gravar o item em uma variável eu consigo resolver o loop no arquivo (doc.getElementsByTagName("ans:relacaoGuias")(1).Text)"

Exatamente... Veja no exemplo que la eu fiz com os produtos...

Observe que se Mudar .text para .xml a variável assume um xml apenas com o produto selecionado!

Obs:
Eu só não entendi até hoje o porque que a Guia Nº 03 do GILDASIO não deve ser incluida...

Pois ela existe... veja: dropbox.com/s/rvyojp2w90eaiko/Sem%20t%C3%ADtulo.png

Isso mesmo,

Fiz uns testes aqui no final de semana os quais alterei a variavel para para ver como retornavam os registros.

Editei a mensagem anterior... Veja la!

Respondendo a sua pergunta na mensagem anterior:

Não pretendia importar porque nas demais Guias todas possuem o Nó ans:relacaoGuias e o SubNó ans:detalhesGuia, e somente a Guia do Gildasio que não tem o SubNó ans:detalhesGuia.

Realme, somente agora que fui entender o pq... Alem de nao ter detalhes, o ele pega os dados da Aline e joga pro Gildasio.

Pra resolver isso, basta antes de pegar a Guia verificar se ela tem a tag ans:detalhesGuia se tiver entao vc processa, se nao... Ignora. Vai pro proximo. Fiz isso la no exemplo, com campo Data, pq muda o nome do campo de acordo com a versao do Xml.