Ir para conteúdo
  • Cadastre-se

Paulo C. L. Vicente

Membros
  • Total de ítens

    60
  • Registro em

  • Última visita

Posts postados por Paulo C. L. Vicente

  1. Bom dia Italo

    Pesquisando um pouco mais encontrei os tópicos

    onde já aconteceu o mesmo.
     

    function TACBrNFSeXWebserviceDSF200.TratarXmlRetornado(
      const aXML: string): string;
    begin
      Result := inherited TratarXmlRetornado(aXML);

      Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf});
      Result := StringReplace(Result, '&', '&', [rfReplaceAll]);
      Result := string(NativeStringToUTF8(Result));
    end;

    Acrescentando a linha em negrito na unit TACBrNFSeXWebserviceDSF200.TratarXmlRetornado resolve o problema.

     

    DSF.Provider.pas

  2. Boa tarde

    Ao enviar lote para Sorocaba: ocorre a mensagem de erro: Input is not proper UTF-8

    ACBrXmlDocument.LoadFromXml(1261)
    ACBrNFSeXWebServiceBase.ExtrairRetorno(846)
    ACBrNFSeXWebserviceBase.Executar(1024)
    ACBrNFSeXProviderBase.Emite(1642)

    Está sendo retornada uma mensagem de erro de alíquota que está acentuada.
    Ao ser lida essa mensagem, ocorre o erro.

    Para prosseguir preciso contornar esse erro. 
    Desde já agradeço pelo apoio.
     

    65556750-env-lot-sinc-soap.xml 65556750-lista-nfse-sinc-soap.xml

  3. Boa tarde.

    Nas compras que faço na web tenho recebido cada vez mais um DANFe completo no formato A5.

    Pesquisei um pouco se é permitido fazer impressão em papel menor que A4 e encontrei informações da situação em que se faz venda não presencial ser permitido um DANFe simplificado.

    O Layout que envio em anexo não é um DANFe simplificado é completo, só que menor. Parti de uma versão que encontrei aqui no forum e implementei tudo(acredito que sim) que há no layout A4 padrão. 

    Meu objetivo é usar a mesma impressora onde são feitas outras impressões em A5 por isso optei por fazer a impressão na orientação paisagem.

    Compartilho por achar que pode servir para mais alguém.

    DANFeA5.fr3

  4. Bom dia.

    Erro Input is not proper UTF-8, indicate encoding ! Bytes
    em DSF.Provider.TACBrNFSeXWebserviceDSF200.RecepcionarSincrono
    em ACBrNFSeXWebserviceBase.TACBrNFSeXWebservice.ExtrairRetorno

    Neste caso que estou testando faltou informar a alíquota de ISS e retorna uma mensagem de erro.

    Se o xml retornado tiver caracteres acentuados/especiais, ao carregá-lo para obter a mensagem de erro, esse erro secundário atrapalha o tratamento do retorno.

    na unit ACBrNFSeXWebserviceBase

    alterei a linha 630 de
        Document.LoadFromXml(xRetorno);

    para
        try
          Document.LoadFromXml(xRetorno);
        except
          Document.LoadFromXml(NativeStringToUTF8(xRetorno));
        end;

    Provavelmente não é a melhor solução mas foi o que pude fazer para contornar o problema.

    ACBrNFSeXWebserviceBase.pas 65650328-lista-nfse-sinc.xml

  5. Bom dia

    A sugestão do João Antônio
    ACBrNFSeX - Correção para ExtrairRetorno Xml provedor VersaTecnologia (Ubá-MG) - ACBrNFSe - Projeto ACBr
    deve resolver

    function TACBrNFSeXWebserviceGovDigital200.TratarXmlRetornado(
      const aXML: string): string;
    begin
      Result := inherited TratarXmlRetornado(aXML);

      Result := ParseText(AnsiString(Result), True, False);
      Result := NativeStringToUTF8(RemoverDeclaracaoXML(Result);
      Result := RemoverCaracteresDesnecessarios(Result);
    end;

    Fiz isso para o provedor DSF em São José dos Campos e resolveu.

    GovDigital.Provider.pas

  6. Bom dia.

    Erro Input is not proper UTF-8, indicate encoding ! Bytes
    em TACBrNFSeXWebserviceDSF.TratarXmlRetornado
    ao consultar lote pelo rps.

    Segui a sugestão do João Antônio
    ACBrNFSeX - Correção para ExtrairRetorno Xml provedor VersaTecnologia (Ubá-MG) - ACBrNFSe - Projeto ACBr
    fiz uma conversão do XML retornado para UTF8 e resolveu.

    function TACBrNFSeXWebserviceDSF.TratarXmlRetornado(const aXML: string): string;
    begin
      Result := inherited TratarXmlRetornado(aXML);

      Result := ParseText(AnsiString(Result), True, False);
      Result := NativeStringToUTF8(RemoverDeclaracaoXML(Result));
    end;

    Obrigado.

    DSF.Provider.pas

  7. Bom dia.

    Não encontrei explicação mas desde ontem o provedor BHISS está rejeitando o XML se a alíquota não for dividida por 100.

    Tive que fazer uma alteração na unit BHISS.GravarXml (em anexo)

    procedure TNFSeW_BHISS.Configuracao;
    begin
      inherited Configuracao;

      NrOcorrCodPaisTomador := -1;
      FormatoItemListaServico := filsComFormatacaoSemZeroEsquerda;
      DivAliq100 := True;
    end;

    Há alguma outra forma de configurar a propriedade DivAliq100 em tempo de execução ?

    Obrigado.

    BHISS.GravarXml.pas

  8. Sim o RPS gerado pelo ACBrNFSe está sendo aceito.

    Recebi essa resposta de uma consulta via [email protected]
    Empresas optante no simples nacional poderão ter o tipo de recolhimento divergente quando o tomador tiver IM em SJC e o código de serviço for um item de retenção, então peço que verifique o decreto 18.825 no art.42, quando o tomador tiver Im em SJC e o código estiver com item de retenção abaixo, deverá ser realizado a inclusão da aliquota como retido fonte em configuração empresa.

    Não entendi o que mais precisa ser feito.

  9. Bom dia.

    Estou com uma dificuldade na migração do ACBrNFSe para o ACBrNFSeX em São José dos Campos.

    Segue anexo um XML aceito a partir do envio com o ACBrNFSe
    ItemListaServico 14.02
    CodigoTributacaoMunicipio 21402001
    Aliquota 5.0000
    Sem informar o CNAE

    Segundo anexo rejeitado a partir do envio do ACBrNFSeX usando o mesmo preenchimento.
    Erro: L75 / O valor da alíquota não corresponde a atividade informada. / Verifique o campo de alíquota.

    Peço apoio para entender como resolver a questão.
    Obrigado.

    ACBrNFSe MO2000724-NFSeAssinada.xml ACBrNFSeX 20193-env-lot-soap.xml

  10. Boa tarde.

    Estou migrando do componente ACBrNFSe para o componente ACBrNFSeX

    Ao processar o retorno do envio de RPS faltou o código de verificação.

    Na unit BHISS.provider seria necessário acrescentar uma linha no método TratarRetornoEmitir após atribuir Response.Protocolo 
    Response.CodVerificacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('CodigoVerificacao'), tcStr);

    Obrigado.

    AL3496311G21g349BRX5O3p2-lista-nfse-con-lot-soap.xml

  11. Boa tarde.

    Estou fazendo alterações para usar o ACBrNFSeX na Prefeitura de Pinhais atendida pelo provedor IPM.

    Ao alimentar o componente informo o valor em Servico.ItemListaServico mas não está sendo gravado no XML.

    Também estou atribuindo os campos para o provedor: TribMunPrestador, CodMunPrestacao e SituacaoTributaria

    Código  : XSD E
    Mensagem: r 1824: Element 'codigo_item_lista_servico': '' is not a valid value of the atomic type 'xs:integer'. Line: 1

    Segundo resposta da Prefeitura é uma tag obrigatória.

    O que preciso fazer para contornar isso?

    Obrigado

    30296-ger-nfse-soap.xml Manual Integração NFSe - Base Oficial.pdf

×
×
  • 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.