Ir para conteúdo
  • Cadastre-se
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Eleandro Be More Web

Membros
 Perfil  Explorar Conteúdo

  • Total de ítens

    192

  • Registro em

  • Última visita

 Tipo de Conteúdo 

Posts postados por Eleandro Be More Web

    Posição 93 informar 1

    em ACBrBoleto

    Postado

    Bom dia! Estou com o seguinte caso, meu cliente quer fazer a impressão dos boletos dentro do meu sistema e que o banco enviei os boletos para os clientes via correio.
    Até ai tudo bem, o banco vai alterar Tipo de papeleta esta= 92 Alterar para--> 02.
    Minha pergunta suporte do Bradesco me informou que na posição 93 tenho que informar número 1 em vez de 2 o que esta indo atual, como consigo fazer esta alteração, usando o ACBRBoleto?

    ACBR dando erro ao instalar

    em Dúvidas Gerais sobre o ACBr

    Postado

    24 minutos atrás, Felipe E. Resende Mesquita disse:

    Beleza. Caso não funcione, poste o log da instalação para que possamos tentar te ajudar. Lembre de executar o instalador como administrador, marcando para apagar aquivos antigos.

    Felipe o FortesReport deu certo, agora preciso do FastReport para 10.3.1 Rio, sabe onde consigo o linck?

    NFE devolução

    em ACBrNFe

    Postado

    Encontrei e seguinte maneira para fazer meu código, postar se alguém precisar.
    //function onde pego as chaves digitadas em um edit

    function TfrmNFE.ValidandoChaveNFeReferencia(fChaveNFe: String): Integer;
    var
      tamanho: currency;
      vqtdeRegistro, vtexto, vtexto1, vvirgula: string;
      vparei: Integer;
    begin
      pcInformacoes.TabIndex := 6;
      tamanho := Length(PegaNUmero(editNfe_Referencia.Text));
      tamanho := tamanho / 44;
      vqtdeRegistro := floattostr(Trunc(tamanho));
      result := 0;
      result := StrToInt(vqtdeRegistro);

      if result > 1 then
        showmessage('Temos esta qtde de chaves para referência ' + floattostr(Trunc(tamanho)))
      else
        showmessage('Temos esta qtde de chave para referência ' + floattostr(Trunc(tamanho)));

      vtexto := '';
      vtexto := Trim(PegaNUmero(editNfe_Referencia.Text));
      vparei := 0;

      lbChaveNFe.Clear;
      for I := 1 to result do
      begin
        vtexto1 := '';

        if vparei = 0 then
        begin
          vtexto1 := copy(vtexto, 1, 44);
          vparei := 44 + 1;
        end
        else
        begin
          vtexto1 := copy(vtexto, vparei, 44);
          vparei := vparei + 44;
        end;
        lbChaveNFe.Items.Add(vtexto1);
      end;
    end;

    //chamando ela para passar para o ACBR número da CHAVE-NFe que salvei no TListBox
    if ((cbFinalidadeNfe.ItemIndex = 1) or (cbFinalidadeNfe.ItemIndex = 3)) then
            for I := 0 to lbChaveNFe.Items.Count - 1 do
            begin
              Ide.NFref.Add.refNFe := alltrim(lbChaveNFe.Items.Strings);
            end;

     

     

    NFE devolução

    em ACBrNFe

    Postado

    25 minutos atrás, BigWings disse:

    O grupo NFRef aceita até 500 documentos referenciados.

    Que saiba não há restrição da quantidade de NFe que pode ser referenciada em uma devolução.

    Basta acrescentar cada chave na geração da nota: 

    
with ACBrNFe1.NotasFiscais.Items[0].NFe do
begin
  Ide.NFref.Add.refNFe := <chave_nfe>;
  Ide.NFref.Add.refNFe := <chave_nfe>;
  Ide.NFref.Add.refNFe := <chave_nfe>;
end;

     

    Realmente, consegue fazer, e foi da maneira que vc postou. Obrigado

    • Curtir 2

    NFE devolução

    em ACBrNFe

    Postado

    2 minutos atrás, Dercide Alvarez disse:

    Bom dia,

     

    Pelo o que eu sei, para cada NF-e a ser devolvida você deverá gerar uma NF-e, pois a chave referenciada é unica na NF-e.

     

    Dercide Alvarez

    Eu pensava desta mesma maneira!
    Mas olha o que o contador me passou!
    [10:31, 7/15/2019] Leonardo Contador Imperium: Sim, é permitido
    [10:32, 7/15/2019] Leonardo Contador Imperium: Unificar vários produtos que serão devolvidos de notas diversas em uma única nota, desde que todas elas sejam referenciadas,No sistema gratuito é possível

    Banco Itau

    em ACBrBoleto

    Postado

    1 minuto atrás, Felipe E. Resende Mesquita disse:

    Bom dia, Eleandro fistsoft.

    Seria interessante você postar a solução. Assim você estará contribuindo com o projeto e ajudando outros usuários.

    Sim vou postar obrigado pela atenção e dica!

    Solução que encontrei foi bem simples, minha variável fDataProtesto eu tinha criado ela como String, bastou eu alterar ela para TDate, que funcionou tudo certo. Obrigado ACBR.

    • Curtir 2

    Banco Itau

    em ACBrBoleto

    Postado

    31 minutos atrás, Eleandro fistsoft disse:

    Wellington Alamino obrigado pela atenção.
    Engraçado que estou passando valor com dias para protesto, porém mesmo eu passando valor de 6 dias para protesto na tag vTitulo.DiasDeProtesto, eu debugando ele recebe como 0, sendo assim ele sempre trás a vTitulo.DataProtesto='30.12.1899'
    o que devo fazer?

     

    Muito obrigado. Consegui resolver o problema, grato pela atenção.

    • Curtir 1

    Banco Itau

    em ACBrBoleto

    Postado

    Wellington Alamino obrigado pela atenção.
    Engraçado que estou passando valor com dias para protesto, porém mesmo eu passando valor de 6 dias para protesto na tag vTitulo.DiasDeProtesto, eu debugando ele recebe como 0, sendo assim ele sempre trás a vTitulo.DataProtesto='30.12.1899'
    o que devo fazer?

     

    Banco Itau

    em ACBrBoleto

    Postado

    Bom dia! Alguém pode me ajudar por favor, quando envio boleto para o banco Itau, com protesto. olha o que o suporte do banco me enviou segue abaixo

    Suporte Banco Itau--> onde consta no arquivo instrução de protesto, mas a mesma não foi impressa no boleto físico para ciência do pagador.
    Como devo fazer para ser impresso no boleto físico quanto tiver protesto?

    Retorno SICOOB

    em ACBrBoleto

    Postado

    Bom dia!
    o Arquivo de retorno do SICOOB CANAB 240. Quando meu cliente desconta o título vem com ocorrência 48. o ACBRBoleto me trás nos seguintes campos

    Vem como o cliente pagou, mas na realidade o cliente ainda não pagou o mesmo, apenas descontou
    ACBrBoleto.ListadeBoletos.Objects.ValorPago>0
    ACBrBoleto.ListadeBoletos.Objects.ValorRecebido>0
    ACBrBoleto.ListadeBoletos.Objects.DataOcorrencia= data que o cliente descontou
    ACBrBoleto.ListadeBoletos.Objects.DataCredito=data qu e o cliente descontou
    Porem os valores de juros que o cliente pagou para descontar vem como 0 zero
    Esta correto isso no componente?
    Pois teria que vir os juros e despesas que o cliente teve no desconto do mesmo
    Segue foto da tela que uso para ler e baixar o retorno

    retorno SICOOB.jpg

    Erro Balança Toledo

    em ACBrSerial

    Postado

    Em 20/03/2019 at 09:50, EMBarbosa disse:

    Parece que você está informando dados no item 000004 que não foi cadastrado na balança anteriormente.

    Difícil analisar sem saber exatamente o conteúdo do seu arquivo.

    Amigo desculpe pela demora, mas muito obrigado deu certinho o arquivo agora.

    • Curtir 1

    Erro Balança Toledo

    em ACBrSerial

    Postado

    Bom dia! Estou gerando o arquivo .TXT para Toledo modToledoMGV6, gero o arquivo normal porém o MGV6 me envia a seguinte msg no final.
    Item código 000004: Informação extra código 4 não cadastrado(a) no banco de dados.
    Alguém poderia me ajudar neste sentido?

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