Claudiomiro

Pessoal, super obrigado, aqui deu tudo certo, meu problema foi resolvido. Na tela que o @Júlio Cavalcanti me mandou do teste, eu percebi que o digito verificador do Nosso Numero ele digitou no mesmo campo do Nosso Numero. Eu fiz o mesmo e deu certo. Muito obrigado Júlio. Tentei também atualizar o SVN de acordo com a tela do @Daniel InfoCotidiano e tambem deu certo, aprendi a atualizar o Acbr no Lazarus. Muito obrigado Daniel. Abraços amigos

Beleza, vou tentar. Muito obrigado.

Certo, poderia me explicar como faço para atualizar o SVN aqui no meu computador ? (Estou começando agora a usar o ACBR)

Boa tarde @Daniel InfoCotidiano Acabei de enviar o email para [email protected] Muito obrigado

Ola Daniel, Eu estou fornecendo o meu codigocedente, inclusive ele ate aparece no codigo da linha digitavel. Meu codigo cedente é o: 0921255, ele aparece no acbrboleto mas dai para frente ele monta errado. O NOSSO NUMERO é 9002194200-1 (ja com o digito). Somente alguns numeros estão diferente do boleto que esta no banco, veja: No Banco esta assim: 07790001161209212559500219420015198010000027000 acbrboleto: 07790001161209212550490021942009798010000027000 Olhei a documentação do cnab do inter de como montar a linha do codigo de barras e da linha digitavel, ao meu ver esta tudo certo, parece que o problema é entre o codigo cedente e o Nosso numero. Mas nao consigo achar. Sera que eu poderia enviar meu código para voce no seu email ? o meu email é: [email protected] no aguardo Ass: Claudiomiro Souza

No ACBRBoleto, ao gerar o codigo de barras e a linha digitavel ele gera alguns numeros diferente do que esta no boleto no banco. Tem algum segredo nesse campo LayoutVersaoArquivo ou no LayoutVersaoLote ?? Banco.TipoCobranca := cobBancoInter; Banco.Nome := 'INTER'; Banco.numero := 77; Banco.LayoutVersaoArquivo := 101; // StrToIntDef(edtCNABLVArquivo.Text,0); Banco.LayoutVersaoLote := 060; // StrToIntDef(edtCNABLVLote.Text,0); Banco.CIP := ''; // edtCIP.Text; Banco.DensidadeGravacao := ''; // edtDensidadeGravacao.Text; Banco.LocalPagamento := ''; // Pagar prefencialmente no banco itau ... ... vcbarra := Titulo.ACBrBoleto.Banco.MontarCodigoBarras(titulo); vccoddigitavel := Titulo.ACBrBoleto.Banco.MontarLinhaDigitavel(vcbarra,titulo); Alguem poderia me enviar um exemplo do preenchimento correto dos campos para o banco INTER ? Obs: Uso o Lazarus abraços

Juliomar, estudei o seu exemplo e consegui resolver o problema, super obrigado. Fiz da seguinte forma e deu certo: Titulo.DataLimitePagto := Titulo.Vencimento + 30; abraços

Ao gerar remessa CNAB, nao estou conseguindo preencher o campo Titulo.DataLimitePagto para o banco inter ja coloquei Titulo.DataLimitePagto := strtodate('xx/xx/xxxx') e Titulo.DataLimitePagto := 30; Mas ao gerar o arquivo cnab o campo aparece como 00 na posição 140

Zeos e postgresql. No banco esta UTF8. Mas parece não ser com o banco. fiz um FOR no conteúdo da edit para ver caracter a caracter. na depuração por exemplo o Ç vem como #$C3 a mesma rotina no delphi funciona normalmente anos, mas ao converter para o lazarus da esse problema de caracter. abraços

Sou novo no Lazarus, uso a versão 2.2.4 Percebi que a edit fica com caracteres estranhos (as vezes sim e as vezes não) depende do texto. Na tela antes de gravar no banco de dados fica legivel, mas percebi que quando grava no banco de dados fica com caracteres estranhos. Fiz muitos testes e nao é problema no banco de dados e sim ja EDIT, pois quando estou jogando da edit para o banco ja vai com caracteres estranhos. Exemplo: edit.text := 'CONFIGURAÇÃO POR MÁQUINA' e a edit vira para 'CONFIGURAÇÃƑO POR MÃQUINA' Existe alguma configuração de CHARSET para configurar na própria IDE do Lazarus. Teria que configurar para UTF8 (mas não seria no editor de texto).

Sou novo aqui, consigo obter ajuda aqui referente ao Lazarus