Falha Na Consulta Do Status Do Serviço

[jpsleao]

Boa noite a todos!!

 

Acabei de atualizar os fontes e não consigo mais consultar o status do serviço, nem enviar nfe.

 

Testei o ambiente de homologação e produto de GOIAS e SÃO PAULO, e nada.

 

O pior q não me retorna um erro, para eu ter um começo.

 

Testei pelo demo do acbr e acontece mesma coisa. A visualização do status do serviço retorna em branco.

 

Na aba do demo de XML DE RESPOSTA, aparece a mensagem q está em anexo.

 

 

Desde já, agradeço.

 

João Paulo

 

[jpsleao]

A propósito, estou utilizando o XE6.

 

Testei na versão 2.00 e 3.10.

 

Já a consulta do status da CTe funciona.

 

Utilizei os schemas da pasta do demo mesmo.

 

Tentei validar o XML de uma nota e ele me dá um erro falando que não foi possível carregar o schema ou ele está corrompido.

Editado 24 Setembro, 2014 por jpsleao

[André Ferreira de Moraes]

Veja

[jpsleao]

Boa tarde André!!!

 

Desculpa a demora, é pq estava fazendo uns testes.

 

Tenho uma máquina virtual com o delphi 7 no Windows xp.

 

Atualizei nela os fontes do ACBr e funcionou direitinho o demo.

 

Peguei o mesmo demo e copie para outra máquina virtual com delphi xe6 e Windows 7.

 

Antes de compilar, testei o demo compilado no win7 e funcionou. Então não é o sistema operacional.

 

Apaguei o ACBr, limpei todas as bpls e dcps do ACBr. E reinstalei ele. Só não apaguei as dlls.

 

Compilei o demo e não funcionou.

 

Será q está com alguma incompatibilidade com o XE6??

 

Estou usando OPENSSL.

 

O define HttpSOAP só funciona para o CAPICOM, ou estou errado?/

Editado 24 Setembro, 2014 por jpsleao

[Juliomar Marchetti]

Boa tarde

Tente debugar ele e ir usando o F7 e verifique as strings para ver se alguma delas não está ficando com problema em função do Unicode !

[jpsleao]

Realmente parece ser algo referente ao Unicode mesmo. Alterei a unit ACBrNFeWebServices, trocando tudo que era String para AnsiString e consegui consultar o ambiente de produção.

 

O estranho é q eu já tinha compilado o sistema em julho e não precisei mexer em nada, por causa do unicode.

 

Até a validação de XML, que gerei em julho, já no XE6, não está funcionando.

 

Alguem tem alguma idéia??

Editado 24 Setembro, 2014 por jpsleao

[Juliomar Marchetti]

Sim nessas units que alterou verifique se no começo delas tem a seguinte declaração

{$I ACBr.inc}

caso negativo acrescente e volte para a string e refaça a consulta!

poste o resultado

[jpsleao]

Boa noite!!!

 

Verifiquei a existência da linha e ela já existia.

 

Resolvi começar do zero.

 

Apaguei todo o ACBr.

 

Comecei a testar pela revision 7267 que estava tudo ok e fui atualizando para cada revision novo. 

 

Realizei uma bateria de testes e constatei os seguintes problemas em relação ao XE6.

 

Na revision 7385 a consulta do Status do Serviço parou de funcionar e o erro está na função EnviarDadosWebService.

 

Alterei os parâmetros de entrada de String para AnsiString.

 

Na revision 7483 a consulta a validação do XML também para de funcionar e o erro está na função ValidaLibXML.

 

Fiz um cast para AnsiString do retorno da função ACBrSTR que é String.

 

Segue em anexo os dois arquivos com as correções. A revision corrigida foi é a 7502.

 

Ainda não testei o resto das funções do ACBrNFe, porque aparentemente o ambiente de homologação de goiás, está fora do ar.

 

Mas os dois erros relatados acima, foram causados pelo Unicode.

 

Assim q conseguir testar mais funções, vou postando aqui.

ACBrNFeWebServices.pas

ACBrNFeUtil.pas

Editado 25 Setembro, 2014 por jpsleao

[Juliomar Marchetti]

Boa noite efetuei o commit da alteração no svn!

obrigado pelo debug e esperamos resposta de mais colegas para ver como se comporta!