Ir para conteúdo
  • Cadastre-se

Thaís Caliman

Membros
  • Total de ítens

    18
  • Registro em

  • Última visita

Posts postados por Thaís Caliman

  1. Bom dia,

    estou tentando gerar o boleto de um cliente e quando tenta-se efetuar o pagamento pelo internet banking (de qualquer banco), aparece um outro valor e o nome do pagador muda em cada leitura que é feito.

    Esse problema ocorre somente em um cliente que utiliza o SICOOB.

     

    Alguma ideia do que pode estar acontecendo?

  2. 26 minutos atrás, Italo Jurisato Junior disse:

    Bom dia Thaís,

    Favor anexar o XML de envio e de retorno.

    Verifique junto a prefeitura e com o provedor se no cadastro da empresa (principalmente no provedor) qual é o CNAE.

    Bom dia Italo, segue em anexo os dois XML's.

    Quanto a verificação, fizemos e estava dando como correta

    1-env-lot.xml

    1-rec.xml

  3. Boa Tarde,

    estou tentando enviar um lote RPS pela DEMO do ACBrNFSe, porém retorna a seguinte mensagem "Código CNAE Inexistente".

    Verifiquei o CNAE da Empresa que estou utilizando e ele está correto. O XML está sendo gerado corretamente.

    Tenho preenchido o campo ItemListaServico no formato 00.00

     

  4. 1 minuto atrás, Luciano Rodrigues Pereira disse:

    Vc enviou a remessa? Conferiu se o banco retornou o registro dos boletos sem erro? 

    Pelos testes feitos e pelo do cliente foi enviada a remessa e registrou sem erros.

  5. Bom dia, estou gerando boleto normalmente, com a remessa também gerada normalmente mas o cliente informa que quando alguém tenta pagar um boleto emitido está constando como SEM REGISTRO. Isso esta ocorrendo para o cliente que usa banco itau com carteira registrada (109) e banco do brasil (carteira registrada - 17/019).

     

  6. 42 minutos atrás, LIDERNetwork disse:

    Não seria interessante colocar como foi resolvido? Tive esse problema de leitura em outro banco mas pode ser a mesma dificuldade, teria como compartilhar sua solução?

    Primeiramente eu percebi que estava deixando a propriedade LeRetornoCedente como falso, mudei para true e não estou mais tendo problemas. Alterei também o modo de tratamento do arquivo de retorno.

  7. Olá, sou iniciante mexendo no acbrboleto, e quando faço a leitura do retorno, após configurar os componentes, a leitura do retorno volta vazia. 

     

    me baseei nessas configurações e nessa rotina:

    procedure TForm1.Retorno;
    var 
      i : Integer;
    begin
      if OpenDialog1.Execute then
      begin
        //Configurar 
        ConfiguracoesACBr;
        //
        ACBrBoleto.NomeArqRetorno := OpenDialog1.FileName;
        ACBrBoleto.LerRetorno;
        for i := 0 to ACBrBoleto.ListadeBoletos.Count-1 do
        begin
          if ACBrBoleto.ListadeBoletos.Objects[i].ValorRecebido > 0 then
          begin
            SQLAux.Close;
            SQLAux.SQL.Clear;
            SQLAux.SQL.Add('update conrec set');
            SQLAux.SQL.Add('data_baixa = :pData,');
            SQLAux.SQL.Add('valor_pago = :pValor,');
            SQLAux.SQL.Add('taxa_cobranca = :pTaxa');
            SQLAux.SQL.Add('where nosso_numero = :pNossoNum');
            SQLAux.Params.ParamByName('pData').AsDate      := ACBrBoleto.ListadeBoletos.Objects[i].DataCredito;
            SQLAux.Params.ParamByName('pValor').AsFloat    := ACBrBoleto.ListadeBoletos.Objects[i].ValorRecebido;
            SQLAux.Params.ParamByName('pNossoNum').AsString:= Copy(ACBrBoleto.ListadeBoletos.Objects[i].NossoNumero,1,ACBrBoleto.Banco.TamanhoMaximoNossoNum); // vir sem o dígito, se quiser
            SQLAux.Params.ParamByName('pTaxa').AsFloat     := ACBrBoleto.ListadeBoletos.Objects[i].ValorDespesaCobranca;
            SQLAux.ExecSQL(False);
          end;
        end;
        SQLAux.Close;
      end;
    end;
    
    procedure TForm1.ConfiguracoesACBr;
    begin
      ACBrBoleto.ACBrBoletoFC.DirLogo     := sPathLogo;
      ACBrBoleto.ACBrBoletoFC.Filtro      := fiNenhum;
      ACBrBoleto.ACBrBoletoFC.LayOut      := lPadrao;
    
      ACBrBoleto.ACBrBoletoFC.MostrarSetup:= true;
      ACBrBoleto.ACBrBoletoFC.SoftwareHouse:= 'SUA EMPRESA';
    
      ACBrBoleto.Banco.TipoCobranca       := cobSantander; // escolha o seu tipo de cobrança
      ACBrBoleto.Banco.Digito             := iDigBanco; // 33
      ACBrBoleto.Banco.Numero             := iBanco; // 7
      ACBrBoleto.Banco.Nome               := sBanco; // 'Santander';
      ACBrBoleto.Banco.TamanhoMaximoNossoNum := iTamNossoNum; // 12
    
      ACBrBoleto.Cedente.CaracTitulo      := tcSimples; // simples com registro
    
      ACBrBoleto.Cedente.Nome             := sNomCedente;
      ACBrBoleto.Cedente.Telefone         := sTelefoneCedente;
      ACBrBoleto.Cedente.UF               := sUFCedente;
      ACBrBoleto.Cedente.Bairro           := sBairroCedente;
      ACBrBoleto.Cedente.CEP              := sCepCedente;
      ACBrBoleto.Cedente.Cidade           := sCidadeCedente;
      ACBrBoleto.Cedente.CNPJCPF          := sCnpjCedente;
      ACBrBoleto.Cedente.Complemento      := '';
      ACBrBoleto.Cedente.Conta            := sContaCorrente;
      ACBrBoleto.Cedente.ContaDigito      := sContaCorrenteDig;
      ACBrBoleto.Cedente.Logradouro       := sLogradouroCedente;
      ACBrBoleto.Cedente.NumeroRes        := '';
    
      ACBrBoleto.Cedente.Convenio         := sConvenio;   //  
      ACBrBoleto.Cedente.Modalidade       := sModalidade; //  
      ACBrBoleto.Cedente.CodigoCedente    := sCodCedente;
      ACBrBoleto.Cedente.CodigoTransmissao:= sCodigoTransmissao; // no santander tem
      ACBrBoleto.Cedente.ResponEmissao    := Iif(Trim(sBancoEmite)='SIM', tbBancoEmite, tbCliEmite);
    
      ACBrBoleto.Cedente.TipoInscricao    := pJuridica;
      ACBrBoleto.Cedente.TipoCarteira     := Iif(Trim(sRegistrar)='SIM', tctRegistrada, tctSimples);
      ACBrBoleto.DataArquivo              := Date;
      ACBrBoleto.NomeArqRemessa           := FormatDateTime('DDMMYYYYHHMMSS',Now)+'.TXT';
      ACBrBoleto.DirArqRemessa            := sPathRemessa;
      ACBrBoleto.DirArqRetorno            := sPathRetorno;
      ACBrBoleto.ImprimirMensagemPadrao   := False;
      ACBrBoleto.LayoutRemessa            := Iif(Pos(sLayoutArqRet,'400')>0,c400,c240);
      ACBrBoleto.LeCedenteRetorno         := true;
    end;
  8. Ola pessoal, tudo bem?

    Estou começando a mexer com o ACBrBoleto agora e consigo fazer a geração de boletos normais, porém em boletos com o valor do documento a partir de 800,00 quando tento pagar no banco retorna o seguinte erro: 0301 Pagamento não permitido. Contacte o beneficiário/favorecido do boleto.

    Alguém sabe como resolvo isso? É alguma configuração do ACBrBoleto?

    Agradeço desde já.

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

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...