Ir para conteúdo
  • Cadastre-se

koplin

Membros
  • Total de ítens

    23
  • Registro em

  • Última visita

  • Days Won

    1

koplin last won the day on 22 Novembro 2013

koplin had the most liked content!

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

koplin's Achievements

Explorer

Explorer (4/14)

  • First Post
  • Collaborator Rare
  • Conversation Starter
  • Week One Done
  • One Month Later

Recent Badges

5

Reputação

2

Community Answers

  1. koplin

    Banco DayCoval - NFe

    Saudações: Disponibilizo Alterações na Unit ACBrBancoDaycoval.pas para incluir a geração de arquivos NFe. Uma alteração que fizemos na empresa para permitir o uso com o banco. Foi incluída a procedure: procedure TACBrBancoDaycoval.GerarRegistrosNFe(ACBrTitulo: TACBrTitulo; aRemessa: TStringList); Em Anexo, o .pas alterado + o manual do banco, em arquivo compactado. BancoDayCoval.zip
  2. Fico feliz em ajudar. Ainda mais neste caso que a ajuda foi recíproca. Resolveu para ambos. Já que resolveu, segue ai a unit para apreciação dos desenvolvedores. Att, Alfredo. ACBrCaixaEconomicaSICOB.pas
  3. koplin

    Obter A Linha Digitada

    Saudações: Eu havia sugerido uma propriedade para a leitura da linha digita do boleto gerado. A implementação foi iniciada mas ficou inacabada. Eu completei as rotinas e está funcionando. Segue a Unit para sua apreciação. Att, Alfredo Koplin. ACBrBoleto.pas ACBrBoleto.pas
  4. Aqui mesmo no forum o colega Luiz Carlos Silvestrini apresentou esta solução: que, segundo ele foi testado para 15 posições. Estranhamente, ninguém disse se aprovou e o componente não apresenta esta mudança. Por favor, faz um teste (eu não tenho o app da caixa) e retorna se deu certo pra você. eu só mudei um trecho para garantir que ele faça com SR e 15 posições, não interferindo nos demais. if (UpperCase(ACBrTitulo.Carteira) = 'SR')and(CalcularTamMaximoNossoNumero(ACBrTitulo.Carteira,ANossoNumero)=15) then CampoLivre := Copy(aCodCedente, 7, 5) + RightStr(ACBrTitulo.ACBrBoleto.Cedente.Agencia, 4) + '87' + RightStr(ANossoNumero, 14) else CampoLivre := ANossoNumero + RightStr(ACBrTitulo.ACBrBoleto.Cedente.Agencia, 4) + aCodCedente Att, Alfredo koplin.
  5. Olá, O componente está fazendo correto, pelo menos pelo manual que tenho em mãos: ESPECIFICAÇÃO DO CÓDIGO DE BARRAS PARA BLOQUETOS DE COBRANÇAS RÁPIDA E SEM REGISTRO SICOB - NOSSO NÚMERO 11 POSIÇÕES. Não consegui baixar no site da CEF, mas vi que tem manual para tamanhos diferentes de nosso numero. Infelizmente o que tenho está em papel e as páginas de download da caixa estão off. Mas, em relação ao nosso número, este manual, na pag 5 diz: cobrança sem registro : 82NNNNNNNN-DV COBRANÇA RÁPIDA: 9NNNNNNNNN-DV Eu solicitei que um boleto fosse enviado e pago ao banco e vou aguardar o retorno e posto aqui. Mas de antemão, creio que a caixa tem várias formas de fazer a codificação dos boletos. Me parece que o componente adotou a sistemática deste manual. Provavelmente o app da caixa usa outra forma. O que vai bater o martelo será o pagamento do boleto. Tomara que dê certo. Também estou na busca da solução. Se alguém puder ajudar a resolver este embate, agradecemos. Att, Alfredo Koplin.
  6. Saudações: Eu tive o mesmo problema e creio que descobri a causa, pelo menos no meu caso (SICOB). Para o caso do boleto da caixa, formate o NOSSO NÚMERO com 8 dígitos. Percebi que se o nosso numero for menor do que 8, o componente formata com 15 e no processo da geração do código de barras, suprime os 5 dígitos finais do código cedente. Por consequência o boleto é aceito mas não cai em conta alguma. Ainda vou enviar um boleto para pagamento, mas o código do cedente apareceu na linha digitada corretamente, após este procedimento. Da forma como está, é necessário enviar o nosso número formatado com tamanhos diferentes para boletos de bancos diferentes. Por exemplo: o BANCOOB só aceita 7 dígitos no nosso número. Uma sugestão aos desenvolvedores do componente é que no mesmo seja feita uma formatação mínima, para prevenir que o nosso número fique fora do padrão mínimo de tamanho, o que eliminaria este problema. Aqui estou enviando o código do cedente sem o numero da agencia. O componente obriga a informar o código da agencia e se informar o mesmo código no cedente o numero se repete. assim: código do cedente informado pelo banco: 1822870000000999 (1822 - 870000000999) informo no código do cedente apenas 870000000999. 10498.20002 02565.182082 70000.009994 2 63020000000100 - linha correta 10490.00001 00000.025627 18208.700007 1 63020000000100 - linha incorreta Att, Alfredo Koplin.
  7. Grato pelas respostas. Eu me adiantei colocando aqui, devido ao fato de meu ECF já rodar com data de fevereiro de 2014 e não conseguiria validar o SPED na versão 007. Vou atualizar e testar. Grato mais uma vez pela atenção e sempre meus parabéns a todos os colaboradores ACBR.
  8. Saudações: Estou gerando um arquivo SPED com data referente a fev / 2014, isto devido ao fato de meu ECF estar adiantado no seu relógio interno. Ao validar, me deparei com o erro: "A versão de leiaute não é valida para o período informado." Analisando os fontes, vi que a ultima versão é a vlVersao106 (007). O ACBR aqui, está atualizado. Existe alguma previsão para a inclusão da nova versão? Eu mudei internamente no arquivo gerado a versão de 007 para 008, para continuar meus testes. Estou usando o PVA 2.0.3.3 (a última versão do validador). Att, Alfredo Koplin.
  9. Saudações a todos: O problema: Sob Windows 8, o bloqueio de teclado/mouse não funciona. Testei, inclusive a função BlockInput em um aplicação simples, sem ACBR e realmente não funciona. O problema está no nível de privilégio requerido para que o Windows processe a função. Uma forma de fazer com que o aplicativo funcione é mudar o nível de privilégio do arquivo .exe manualmente (marcando a opção Executar este programa como administrador). O desejável é que o aplicativo não requeira esta mudança. A solução: Ao pesquisar na NET encontrei este artigo bem explicado.(http://www.cesarromero.com.br/embutindo-o-manifesto-na-aplicao-com-delphi/). Lá tem uma boa explicação do mecanismo de permissões. Fiz os simples procedimentos e embuti o RES na minha aplicação. abaixo um exemplo .dpr simples com a adição do RES program Project1; uses Vcl.Forms, Unit2 in 'Unit2.pas' {Form2}; {$R *.res} {$R UAC.res} begin Application.Initialize; Application.MainFormOnTaskbar := True; Application.CreateForm(TForm2, Form2); Application.Run; end. Vá em Project/Options/Application e coloque "none" em runtimes themes. Se estiver diferente de None, não funciona. Após a compilação o bloqueio passou a funcionar normalmente. Uma dica: o Delphi deve estar rodando com privilégios administrativos, do contrário ele compila e gera o exe mas não o roda, além de exibir uma mensagem informando que necessita de elevação. O arquivo compilado (.RES) deve estar junto aos principais arquivos do projeto, ou ao compilar, o Delphi informará que o .RES não foi encontrado. Eu testei o executável na minha maquina de desenvolvimento (W8) e em outras duas, rodando W8 e W8.1. Não testei no W7 com o UAC ativo. Espero que a dica ajude aos colegas que possam ter a mesma dificuldade.
  10. Juliomar, Bom dia. Grato pelas explicações. Liguei lá e foi como você disse. O manual está realmente incorreto. Muito obrigado.
  11. Juliomar, grato por sua resposta. No manual do PAY&Go Demo diz: Acata desfazimento: Não utilizar esta opção. Ao marcar, o emulador ele pede uma senha que é diferente das que estão no manual (tentei as duas listadas nele). Entendi que ao marcar, esta opção, o emulador não vai apresentar a tela. Mas e nos testes? Se for usada esta opção ainda assim o problema surgirá. Se o amigo puder acrescentar algo, agradeço. Att, Alfredo Koplin.
  12. Saudações: Ao fazer um teste de desligamento do ECF, a automação procede o cancelamento TEF corretamente. Ocorre que, quando a automação exibe a tela com o NSU e o botão OK, o aplicativo da PAyGO abre junto, uma segunda tela de confirmação da anulação. Esta nova tela bagunça o foco, porque ela fica abaixo do Application message da automação. Desta forma não dá pra fazer o OK com a tecla ENTER. Fiz o mesmo procedimento com o demo e resultou igual. Os fontes do ACBR e os aplicativos TEFS são os mais recentes. Na rotina de controle de foco estou usando: Application.ProcessMessages; Application.BringToFront; Application.NormalizeAllTopMosts; Tratado := False; Lembro que, no demo esta fazendo da mesma forma. Estou desligando o ECF e mantendo-o desligado até o fim do processo. Att, Alfredo Koplin
  13. Fala Regys! Obrigado pelo reply. Esta funcionalidade atende MG somente, até onde eu sei. Mas pode ser feito via WebService, conforme o manual em http://portalnfe.fazenda.mg.gov.br/downloads/Manual_do_Registro_de_Saida_100512.pdf O SIARE é realmente utilizado para este fim. Mas a implementação desta funcionalidade no ACBR seria útil. Como não vi postagens recentes a respeito, quero saber se já tem alguém fazendo algo neste sentido. Abc.
  14. koplin

    Registro De Saída De Nf-E

    Saudações: Existe já, algum trabalho no sentido de implementar o Registro de Saída de NF-e no ACBR? Att, Alfredo Koplin.
  15. Valeu, Regys, pela informação. Detalhe, não tem a opção RESOLVIDO para marcar. Att, Alfredo Koplin.
×
×
  • 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...