[Ponta Grossa/PR com o provedor Elotech - Erro no CNPJ do prestador]

Bom dia,

Era isso mesmo, já não deu mais este erro, vou testar no cliente agora, valeu!! vc é fera!

Att

Jaisson

[Ponta Grossa/PR com o provedor Elotech - Erro no CNPJ do prestador]

Estou com problema para enviar NFSe para Ponta Grossa/PR - Provedor EloTech - v.203

Código  : X800
Mensagem: Erro de Validação:  --> 1824 - Element '{http://shad.elotech.com.br/schemas/iss/nfse_v2_03.xsd}Cnpj': '37.183.857/0001-02' is not a valid value of the atomic type '{http://shad.elotech.com.br/schemas/iss/nfse_v2_03.xsd}tsCnpj'.

Embora no XML esteja sem estes pontos, dá este erro, não chega a nem ir para a prefeitura, quem dá este erro é o ACBr, já "fucei" e não consegui encontrar o motivo.

XML que é enviado para a prefeitura em Anexo

Att

Jaisson

 

NFSe_Assinada_Cod_231.xml

[Danfe Fortes Paisagem - Descrição do Produto não quebra de linha quando tem EAN]

Segue unit, mas a única alteração foi comentar a linha

//rlmDescricao.SecondHolder := nil;

ACBrNFeDANFeRLPaisagem.pas

[Danfe Fortes Paisagem - Descrição do Produto não quebra de linha quando tem EAN]

Bom dia

A descrição quando pede para exibir o EAN está sobrepondo a próxima coluna, a correção se trata da propriedade SecondHolder que está preenchida no formulário porém no código ela é limpada com "nil", se retirar esta linha do nil funciona corretamente.

unit ACBrNFeDANFeRLPaisagem
procedure InicializarDados

 

Antes

Depois

Obg

 

Jaisson

 

[Provedor IPM com erro na consulta de Lote.]

Olé, desculpe a demora

Asism que pegar o XML, tira ele da visualização publica, eu ja tirei o CNPJ do prestador e tomador pq o xml é do cliente.

Att

Jaisson

 

[Provedor IPM com erro na consulta de Lote.]

Ítalo, possível correção para vc analisar se está de acordo, aqui funcionou.

[Provedor IPM com erro na consulta de Lote.]

Bom dia, está dando este mesmo erro com a tag data_nfse + hora_nfse e data_emissao_recibo_provisorio + hora_emissao_recibo_provisorio

 

Linha 303 +/-

    aValor := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_emissao_recibo_provisorio'), tcStr);
    aValor := aValor + ' ' +
              ObterConteudo(AuxNode.Childrens.FindAnyNs('hora_emissao_recibo_provisorio'), tcStr);

    NFSe.DataEmissao := EncodeDataHora(aValor, 'DD/MM/YYYY');
    NFSe.DataEmissaoRps := EncodeDataHora(aValor, 'DD/MM/YYYY');
 

Linha 220 +/-

        aValor := ObterConteudo(AuxNode.Childrens.FindAnyNs('data_nfse'), tcStr);
        aValor := aValor + ' ' +
                  ObterConteudo(AuxNode.Childrens.FindAnyNs('hora_nfse'), tcStr);

        DataEmissao := EncodeDataHora(aValor, 'DD/MM/YYYY');

 

 

Obg

[Parâmetro NaoDividir100 para Varzea Paulista]

Olá,

Favor incluir no ini o parametro abaixo para Varzea Paulista, para resolver o erro de "E165 - aliquota do serviço invalida", a aliquota aparece no xml como 0.02 caso não inclua este parametro, , pesquisando no fórum descobri este parametro que resolver.
Inclui o a parâmetro, compilei e resolveu, dessa forma começou a aparecer 2.00 na tag aliquota do xml.

Params=NaoDividir100:

Obg.

[C6 Bank - Boleto e CNAB400]

Boa Tarde,

Segue uma pequena correção baseado no manual.

procedure TACBrBancoC6.LerRetorno400(ARetorno: TStringList);

Obg

Jaisson

ACBrBancoC6.pas

[Novo layout - Sofisa Itaú]

Bom dia,

O erro é este:

Liquidações 29-08-23.ret
não é um arquivo de retorno do BANCO SOFISA SA

Vou encaminhar o arquivo de retorno no email

Obg

[Retenções Federais - Betha - 2.02]

Olá

Vi que houve alteração para apresentar os impostos deferais retidos, porém a tag que o ACBr tenta ler não tem no XML

 

XML Autorizado do Cliente

Danfe da Prefeitura

Danfe no ACBr

 

Neste caso do provedor Betha, sempre que é informado imposto federal ele trata como retenção, terei que fazer manualmente conforme abaixo antes de imprimir a danfe ou vcs ajustam no Acbr?
RetidoPis = snSim
RetidoCofins.... etc.

Vi no SV que teve alterações referente aos impostos federais, e antes mostrava como na danfe da prefeitura, depois da alteração não mostra mais o valor da retenção federal.

Obg

Jaisson

[Atualização para a Versão 2.02 - Provedor Betha - Ouro Branco/MG]

Boa tarde, não tem um local pra pesquisar a versão, mas quando vai transmitir na versão 1, se não me engano falava q estava desativada ou para transferir na versão 2.02, não lembro exatamento o erro por que fiz este acerto local pra mim faz un 5 ou 6 meses.

Agora quando atualizei o ACBr semana passada voltou a dar erro na transmissão, eu tinha esquecido de avisar vocês desta atualização.

Eu fiz este acerto para as cidades de Ouro Branco/MG e Conselheiro Lafayete/MG.

Veja um XML de Jun/2023 do cliente(ocultei alguns dados q possam identificar ele)

[Atualização para a Versão 2.02 - Provedor Betha - Ouro Branco/MG]

[3145901]
Nome=Ouro Branco
UF=MG
Provedor=Betha
Versao=2.02
ProRecepcionar=http://e-gov.betha.com.br/e-nota-contribuinte-ws/nfseWS
HomRecepcionar=http://e-gov.betha.com.br/e-nota-contribuinte-test-ws/nfseWS
 

Obg

Jaisson

[Banco Sofisa Itau]

Sim, claro.

Eu entendo que pode ocorrer a adequação, é que faltou códigos mesmo.....

A parte de retorno ficou por conta do padrão sendo que o Sofisa Itau tem layout proprio do retorno, como vc pode conferir no meu arquivo, tem a questao a procedure GerarTrailer400 tbm que ficou por conta do padrão que não sei se vai gerar corretamente.

[Novo layout - Sofisa Itaú]

Em 10/05/2023 at 16:13, rodrigoluizprg disse:

Boa tarde a todos.

Ao executar a leitura do arquivo retorno do banco Sofisa Itaú, o conteúdo da posição 77 vem como 637 e não como 341, impossibilitando a leitura do arquivo retorno. Realizado ajuste na unit ACBrBancoItau.pas, em anexo.

ACBrBancoItau.pas 110.61 kB · 3 downloads

Percebi hoje que não está no SVN a unit que enviei, no SVN não tem a leitura do retorno.

Segue com meses de atraso.

ACBrBancoSofisaItau.pas

[Banco Sofisa Itau]

Bom dia,

Eu fiz o desenvolvimento completo do Banco Sofisa Itau como contribuição para o ACBr e mandei a unit para vocês colocarem no SVN, porém atualizei o ACBR semana passada deu problema no cliente que usa este CNAB, na remessa e retorno.

Olhei a unit, e não esta igual a minha, faltando centenas de linhas de codigo, vou anexar novamente ai vcs colocam no lugar da que esta hoje, porque a minha esta validada e homologada corretamente, inclusive com TODOS os codigos de ocorrâncias tratadas.

Para se ter ideia, a unit ACBrBancoSofisaItau.pas do SVN esta com 33KB a minha tem 43KB

Obrigado

Jaisson

ACBrBancoSofisaItau.pas

[Provedor IPM buscando CondicaoPagToStr da unit errada]

Faltou a unit IPM.Provider.pas

Incluir o override no final das 2 funções para que funcione o "virtual"

IPM.Provider.pas

[Provedor IPM buscando CondicaoPagToStr da unit errada]

Segue arquivo alterado.

Linha 295 e 296 incluído "virtual" no final da linha.

ACBrNFSeXProviderBase.pas

[Provedor IPM buscando CondicaoPagToStr da unit errada]

Acabei de fazer o teste, era isso mesmo, faltou o "virtual" para chamar a função "CondicaoPagToStr" da unit "IPM.Provider.pas"

[Provedor IPM buscando CondicaoPagToStr da unit errada]

Bom dia

Teve uma alteração na unit IPM.GravarXML.pas na função GerarFormaPagamento.

Vi que se trata de organização do código fonte, porém a função FpAOwner.CondicaoPagToStr está buscando na unit ACBrNFSeXProviderBase.pas e não na própria unit IPM.GravarXML.pas

Dessa forma a opção cpAPrazo está vindo com o valor 3 e não o valor 2, dessa forma não consegue transmitir a NFSe

Obrigado

Jaisson

[Conselheiro Lafaiete-MG - Provedor]

Olá, a prefeitura de Conselheiro Lafayete atualizou para a versão 2.02, faz algum tempo já, fiz a alteração no ini, compilei com o arquivo "Compila_RES.BAT" para atualizar gerar o rc/res, deste forma consegui transmitir NFSe.

 

Nome=Conselheiro Lafaiete
UF=MG
Provedor=Betha
Versao=2.02
ProRecepcionar=http://e-gov.betha.com.br/e-nota-contribuinte-ws/nfseWS
HomRecepcionar=http://e-gov.betha.com.br/e-nota-contribuinte-test-ws/nfseWS

Obrigado.

Jaisson

[Danfe no Fortes, código do Produto sobrepõe a Descrição quando o código é grande e não tem espaços - Função para ajuste]

Esta função faz o ajuste automático da largura da coluna em até 100px, quando chega a 100 é inserido espaço em branco a cada 19 caractres para que o fortes faça a quebra com o WordWrap.

Antes de chamar a função imprimir do ACBRNFe, chame esta procedure DanfeFortesAjustaQuebraLinha.

Atenção, depois que chamar esta procedure não exporte xml, pois a Tag cProd foi modificada.

Att

Jaisson

procedure DanfeFortesAjustaQuebraLinha;
var i, iNota: Integer;
begin
   if ACBrNFe1.DANFE=DanfeFortes1 then
      if DanfeFortes1.TipoDANFE = tiRetrato then
      begin
         DanfeFortes1.LarguraCodProd := 61;
         if ACBrNFe1.NotasFiscais.Count>0 then
            for iNota := 0 to ACBrNFe1.NotasFiscais.Count-1 do
               for i := 0 to ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Count-1 do
               begin
                  if Length(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd) > 11 then
                     if (DanfeFortes1.LarguraCodProd < (Length(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd)-11) * 5.3 + 61) then
                     begin
                        DanfeFortes1.LarguraCodProd := Trunc((Length(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd)-11) * 5.3 + 61);
                        if DanfeFortes1.LarguraCodProd > 100 then
                        begin
                           DanfeFortes1.LarguraCodProd := 100;
                           ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd :=
                              Copy(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd,1,19) + ' '+
                              Copy(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd,20,19) + ' '+
                              Copy(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd,39,19) + ' '+
                              Copy(ACBrNFe1.NotasFiscais.Items[iNota].NFe.Det.Items[i].Prod.cProd,58,19); //tem no max 60 carac o codigo
                        end;
                     end;
               end;
      end;
end;

 

[Novo layout - Sofisa Itaú]

Boa Tarde.

Não sei exatamente o que vc fez na parte de retorno, mas pra mim funciona o retorno pefeitamente.

Antes de realizar o retorno, faça isso
ACBrBoleto1.Banco.TipoCobranca := cobBancoSofisaItau

Dessa forma a unit que vai fazer a leitura do retorno é a ACBrBancoSofisaItau.pas

Vi que vc anexou ACBrBancoItau.pas sendo que a leitura do Banco Sofisa itaú é feita pela unit ACBrBancoSofisaItau.pas

[Novo layout - Sofisa Itaú]

Boa tarde, por nada!
Obrigado a vcs também que fazem um esforço enorme!

Eu passei onde modifiquei, porque não está 100% atualizado com as últimas modificações do SVN, de qualquer maneira segue anexo.
Por isso que passei os pontos em que foram ajustados, que foram poucos.

ACBrBoleto.pas

[Boleto Sicredi]

Bom dia

Já configurei várias vezes Sicredi, e a agência é sempre com 4 casas e o dígito da agência, no caso o posto com 2 casas.

DigitoVerificadorAgenciaConta  não preencho.

Sobre o nosso numero, eu passo um código que crio para cada boleto e o Acbr se encarrega de formatar ele, exemplo: 5775