Ir para conteúdo
  • Cadastre-se

theiller

Membros
  • Total de ítens

    47
  • Registro em

  • Última visita

Community Answers

  1. theiller's post in ACBrSchemasMatera falha em TMateraDocumentType ao carregar JSON em StringToMateraDocumentType was marked as the answer   
    Identifiquei uma falha ao carregar dados usando json text.
    A conversão do tipo mdtUnknown estão divergentes, causando falha em WriteToJSon = "UNKNOWN" enquanto ReadFromJSon = "UNKNOW".

    Isso resulta em não encontrar o tipo associado ficando "mdtNone" indevidamente, que consequentemente fica vazio ao fazer o envio o conteúdo em "body":

    Fiz a correção, segue contribuição do fonte:
    ACBrSchemasMatera.pas
     
  2. theiller's post in Provedor CTAConsult - Retorno emissão RPS was marked as the answer   
    O provedor CTAConsult não retorna o "xml da nota fiscal autorizada", e sim um "xml do protocolo da autorização", foi identificado que existem algumas tags que não estão sendo carregadas, embora existam no xml e no classe de retorno:
    NumeroNota Link CodigoVerificacao Segue exemplo do retorno xml em ambiente homologação

    Ajuste:
    Fontes\ACBrDFe\ACBrNFSeX\Provedores\CTAConsult.Provider.pas TACBrNFSeProviderCTAConsult.TratarRetornoEmitir       Response.Protocolo := ObterConteudoTag(ANode.Childrens.FindAnyNs('protocolo'), tcStr);       Response.Situacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('codigoStatus'), tcStr);       Response.NumeroNota := ObterConteudoTag(ANode.Childrens.FindAnyNs('numeroNota'), tcStr);       Response.Link := ObterConteudoTag(ANode.Childrens.FindAnyNs('linkPdfNota'), tcStr);       Response.CodigoVerificacao := ObterConteudoTag(ANode.Childrens.FindAnyNs('chaveSeguranca'), tcStr); Segue em anexo o fonte atualizado.
    CTAConsult.Provider.pas
×
×
  • 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.