Ir para conteúdo
  • Cadastre-se

Werner_Marques

Membros Pro
  • Total de ítens

    780
  • Registro em

  • Última visita

Tudo que Werner_Marques postou

  1. obrigado Juliana.
  2. Boa tarde, me ocupei com outras coisas e não pude responder. Eu encontrei o problema, tinha gerado no formato FEBRABAN240 enquanto que o formato do cliente é CBR641. Mais uma Dúvida, No Boleto tem algo que eu possa identificar a variação? ou apenas no arquivo de remessa?
  3. Já perguntei porque meu contador não está ajudando, mas já estou com tudo encaminhado. Muito obrigado novamente.
  4. Muito Obrigado Italo. Sabe se existe algum manual para calcular essa nova regra do ICMS?
  5. Já conferi que o DEMO está com os novos campos, obrigado pela ajuda e qualquer dúvida volto a postar.
  6. Obrigado pelo auxilio, consegui resolver o problema.
  7. Obrigado pela resposta, confesso que na pressa, não procurei em outras postagens. O DEMO também está em conformidade com essa NT?
  8. Boa tarde, Pessoal gostaria de saber se o ACBr já adaptado com as mudanças presentes na nota técnica 2015/003 da nfe, e também se o DEMO está com os novos campos.
  9. Obrigado amigo pela resposta. Mais essa mudança ocorreu recentemente, depois do trunk2 ? Pois o meu sistema estava funcionando normalmente, conseguíamos passar várias formas de pagamento, retornando sempre o valor restante correto. No caso debugando o meu código verifiquei que como ele não tinha essa variável de operação "ineTotalAPagar" está em um lupe e meu TEF não é acionando em nenhum caso seja discado ou dedicado.
  10. Juliomar, obrigado pela resposta. Eu detectei o problema, realmente não tem nada de errado no componente, mas gostaria que você me explicasse algo que não entendi como está no DEMO. No evento oninfoecf do componente acbrtefd no DEMO tem o seguinte codigo: case Operacao of ineSubTotal : begin ASubTotal := ACBrECF1.Subtotal ; ASubTotal := ASubTotal - ACBrECF1.TotalPago + StringToFloatDef(edValorDescAcre.Text, 0); RetornoECF := FloatToStr( ASubTotal ) ; end; ineTotalAPagar : RetornoECF := FloatToStr( CalculaTotalPago ); ineEstadoECF : begin Case ACBrECF1.Estado of estLivre : RetornoECF := 'L' ; estVenda : RetornoECF := 'V' ; estPagamento : RetornoECF := 'P' ; estRelatorio : RetornoECF := 'R' ; estNaoFiscal : RetornoECF := 'N' ; else RetornoECF := 'O' ; end; end; end; O que acontece é que no meu código não tem nesse case a implementação caso a variável operacao seja "ineTotalAPagar". Só que não entendi como funciona a função CalculaTotalPago. Poderia me explicar? function TForm1.CalculaTotalPago: Double; var I: Integer; Linha: String; Valor: Double; begin Result := 0 ; { Adicionando valores de Pagamentos a Fazer } For I := 0 to mPagamentos.Lines.Count-1 do begin Linha := mPagamentos.Lines; Valor := StringToFloatDef( copy( Linha, Pos('|',Linha)+1, Length(Linha)), 0 ); Result := Result + Valor; end; end;
  11. Werner_Marques

    Tef não inicia

    Boa tarde colegas, Após a atualização do trunk2 não consigo realizar vendas através de cartão. Ao executar o ACBrTEFD.CRT, minha aplicação trava e não é executa. Isso está acontecendo tanto com o gpCliSiTef como também no gpTefDial, sendo que o ADM é executado normalmente e sua comunicação está ativa. Alguém poderia me ajudar? OBS: No trunk estava funcionando normalmente, e o código da aplicação também esta igual ao do DEMO.
  12. Boa tarde. Exato. No meu caso, o cliente já emite boletos pela carteira 17 com variação 19 e agora ele quer emitir também com a variação 27. Passei a variação na propriedade modalidade, porém quando recebi o retorno do banco do brasil, eles disseram que os boletos estavam OK, porém a variação que eles identificaram foi a 19 e não a 27.
  13. Obrigado Juliana pela resposta. Eu já havia tentado colocar nessa propriedade, e até mandei os boletos para homologação,porém o banco do brasil aprovou com uma outra variação diferente da qual eu havia mandado. Tenho que fazer alguma outra configuração?
  14. Werner_Marques

    Numero da variação

    Bom dia, Estou com uma dúvida. Onde informo ao componente o numero da Variação da carteira? Um cliente meu está precisando gerar boletos com uma variação diferente da que ele já gerava anteriormente, porém não encontrei o Demo onde posso passar essa informação. Desde já agradeço pela ajuda. ah, os boletos são do Banco do Brasil.
  15. Está tudo atualizado, nada em vermelho ou amarelo. Vou tentar por outro email em outra maquina para ver se eu consigo. Estranho, pois tenho um outro sistema que também envia email pelo ACBr, com o código idêntico e não acontece isso
  16. Obrigado pela resposta. Sim, ocorre o mesmo erro
  17. Bom dia amigo, Exatamente se escolho a velocidade e a porta eles encontram. Deixo a configuração a velocidade da porta e também a porta, quando busco o modelo ele não encontra. Se configurar a porta e procurar o modelo ele não encontra.
  18. A ECF está configurada na porta 115200 também assim como a sua velocidade. Quanto a procurar ou não o problema é que na hora de executar o ACBr1.AcharECF, quando procura o modelo (TACBrECFModelo) ele passa direto no modelo Daruma e não é reconhecido, estou passando por esse problema no meu sistema, em relação ao Demo ECFteste sei que posso informar já que sei qual impressora que estou usando, só gostaria de saber porque esse problema esta ocorrendo.
  19. Bom dia Colegas, Estou com uma impressora Daruma FS700 com velocidade 115200, tentando Ativa-la pelo ECFteste, quando coloco para "Procurar" o modelo e a porta ela me retorna "ECF não encontrado", mais quando preencho dentro de modelo "ecfDaruma" e busco a porta ela é ativada normalmente. Alguém já passou por essa situação e poderia me ajudar? OBS: Estou fazendo esses teste no DEMO, pois na minha aplicação também não está reconhecendo a impressora, e o interessante que está ocorrendo apenas com velocidade 115200, a 9600 reconhece normal.
  20. Bom dia Italo, Muito Obrigado pela orientação, caso tenha dúvidas volto a postar.
  21. Italo, estava precisando que a parte de Componente de Prestação de Serviço fosse implementada e consequentemente saísse no XML, só que o que encontrei estava comentado. Queria saber como usar essa opção através do componente. Tipo essa tag que antes era usada, não sei se ainda continua dessa forma. [Comp] xNome - nome do componente vComp - valor do componente
  22. Bom dia colegas, Estou precisando de ajuda quanto ao Componente de Prestação de Serviço do Cte, para ser informado dentro do XML. No Demo esta comentado essa parte, então não tive como testar, precisa saber quais as tags que posso utilizar.
  23. Estou enviando uma NF-e. Antes de entrar procedure que está na imagem, ele passa pela unit ACBrNFeNotasFiscais.pas e vai para a seguinte função: function TNotasFiscais.GetItem(Index: integer): NotaFiscal; begin Result := NotaFiscal(inherited Items[Index]); end; este parâmetro index etá vindo com o valor 0. Depois disso ele entra na procedure que eu mostrei na imagem.
  24. Regys, atualizei os fontes, dei um build no meu projeto, porem o erro persiste. Ele é disparado quando chega na linha que está destacada na imagem anexada. debug_email.bmp
  25. Obrigado Regys, Vou atualizar os fontes e debugar, qualquer novidade posto aqui. É como falei Regys, Também estava funcionando e tenho clientes que estão usando em produção também, o problema aconteceu depois que fiz uma atualização dos fontes.
×
×
  • 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.