Homologacao Nfse Vassouras

[Quality Automação]

Solicito a integracao da NFse do municipio de Vassouras-RJ.

Segue uma nova documeManualUsuarioWS.pdfntação entregue pela prefeitura.

 

Qualquer duvida estou a disposição.

ManualUsuarioRPS.pdf

[Italo Giurizzato Junior]

Boa tarde,

Chegou a ler o tópico abaixo?

 

[Quality Automação]

Boa noite, vi sim Italo.
O desafio é descobrir qual o provedor, pela sua experiencia vendo os documentos, consegue extrair essa informação?

[Italo Giurizzato Junior]

Boa tarde,

Segundo os manuais que você anexou esse provedor possui um layout próprio.

Neste caso a implementação é mais complicada e demorada.

É preciso entrar em contato com a prefeitura e perguntar qual é a empresa que foi contratada para recepcionar as notas de serviço eletrônicas.

Se eles tem os schemas para que possamos validar o XML antes do seu envio.

[Quality Automação]

Bom dia Italo. Estou na busca dessas informações tambem. Obrigado.

[Quality Automação]

Boa tarde, segue contato da pessoa responsável pela empresa "CTA - Centro de Tecnologia Avançada Ltda" junto com os manuais onde ele insiste em dizer que a informação "schemas dos xml" pode ser encontrada neles:

Ademir - (24) 992697396

ManualUsuarioWS (3).pdfManualUsuarioRPS (1).pdf

[Italo Giurizzato Junior]

Boa tarde,

Muito obrigado pelas informações, já inclui na minha lista de tarefas. TK-2930

[Italo Giurizzato Junior]

Boa tarde,

Já esta pronto a unit que gera o XML, vou fazer agora a unit que estabelece a conexão com o webservice e realiza o envio e processa o retorno.

[Italo Giurizzato Junior]

Boa tarde,

Já se encontra no SVN a implementação do provedor CTA, esta pronto a unit responsável por gerar o XML e a unit Provider que gera o Lote de envio de Rps bem como o de pedido de cancelamento.

Mas ainda não consegui êxito, o webservice me retorna a seguinte mensagem:

 "[ERRO CRÍTICO] XML NÃO RECEBIDO PELO WEBSERVICE - Verifique se o XML está sendo 
    enviado como arquivo anexo pelo protocolo POST e Media Type = multipart/form-data"

Veja se consegue um contato com o provedor para juntos tentarmos resolver esse problema.

[Quality Automação]

Boa noite, solicitei o contato, assim que tiver um retorno informo.

Muito Obrigado.

[Italo Giurizzato Junior]

Bom dia,

Vamos aguardar o retorno.

[Quality Automação]

Boa tarde.

Consegui esse contato:

Ademir - (24) 992697396

[Italo Giurizzato Junior]

Boa tarde,

Veja se consegue conversar com essa pessoa e expõe o problema.

[Quality Automação]

Bom dia,

Realizei os testes da implementação feita e encontrei alguns problemas:

1. Autenticação de usuário - HASH

O manual instrui que o hash deve ser do tipo SHA256 porém o que foi implementado estava sendo feito diferente e por consequência não estava sendo aceito pelo webservice. Fiz a alteração necessária e já validei o correto funcionamento.

        CTA.Provider >> TACBrNFSeProviderCTA200.GerarMsgDadosEmitir:

        

 

2. Content-Length

Outro erro encontrado foi a falta do Header "Content-Length" na chamada do webservice. Sem ele as chamadas continuariam a retornar erro pois este é obrigatório. Também fiz a alteração necessária e já validei o correto funcionamento.

        ACBrNFSeXWebserviceBase >> TACBrNFSeXWebserviceMulti2.DefinirMsgEnvio:

        

 

3. Xml da nota enviado como file

Por último, foi observado ainda que o envio do xml está sendo feito como texto concatenado à requisição, porém o webservice espera um arquivo. O xml deveria ser salvo como um TFileStream e anexado ao envio e não enviado como texto corrido na requisição. Este último não cheguei a fazer a implementação.

[Italo Giurizzato Junior]

Boa tarde,

Favor anexar as units alteadas para que possamos analisar.

Desde já muito obrigado pela contribuição.

[Quality Automação]

Bom dia,

Os arquivos seguem em anexo.

CTA.Provider.pas ACBrNFSeXWebserviceBase.pas

[Italo Giurizzato Junior]

Boa tarde,

A alteração que você fez na unit ACBrNFSeXWebServiceBase não funciona no Delphi 7, vai ser necessário encontrar outra forma de calcular o tamanho da string.

Já a alteração na unit CTA.Provider fiz outra forma, que acredito que vai gerar o mesmo resultado.

Vou anexar ela aqui para que você possa testar.

CTA.Provider.pas

[Quality Automação]

Bom dia,

A alteração que você fez não está funcionando. Ela retorna uma chave diferente da que o webservice está esperando.

A prefeitura disponibiliza um validador que você pode usar para comparar o resultado: https://prefeituradevassouras.online/wsnfse/hash.php

[Italo Giurizzato Junior]

Boa noite,

Voltando a prancheta novamente.

[Italo Giurizzato Junior]

Boa tarde,

Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

[Quality Automação]

Boa tarde,

Atualizei os fontes e o envio continua sendo feito incorretamente.

O terceiro tópico apontado por mim na resposta do dia 3 de outubro continua errado.

O envio do xml está sendo feito como texto concatenado à requisição, porém o webservice espera um arquivo.

Eu configurei o envio usando o Postman e funcionou corretamente. Estou anexando aqui as configurações que podem ser importadas para o Postman para que você possa ver como está sendo feito.

Nota Vassouras.postman_collection.json

[Quality Automação]

Boa tarde,

Estou enviando novamente. Acho que foi errado.

 

Vassouras 3.xml

Nota Vassouras.postman_collection.json

 

[Italo Giurizzato Junior]

Bom dia,

Vou reunir a Equipe ACBr para juntos encontrarmos uma solução.

[Quality Automação]

Boa tarde Italo,

Você teria uma previsão de retorno sobre o que foi apontado nos posts anteriores?

[Italo Giurizzato Junior]

Boa tarde,

Dos 3 pontos que você apontou no tópico do dia 03/10/2022, os 2 primeiros eu alterei visando compatibilizar com o Delphi 7 e enviei para o SVN.

Caso não tenha ainda atualizados os fontes, favor atualizar, reinstalar o ACBr e verificar se a minha alteração esta gerando o resultado esperado.

Quando ao terceiro ponto estou vendo com a Equipe ACBr de como podemos resolver ele.