Ir para conteúdo
  • Cadastre-se

Enderson

Membros
  • Total de ítens

    21
  • Registro em

  • Última visita

Posts postados por Enderson

  1. 1 minuto atrás, EMBarbosa disse:

    Muito obrigado pela contribuição.
    Fiz a implementação baseada nela.
    Subi essas alterações para o SVN na Revisão  31699.

    Essas alterações não enviei ao SVN. Porque esses campos nos registros M100 e M500 podem ser nulos e podem ser zero.

    Então precisamos das funções VDFILL ou VLFILL para tratar o caso dos campos nulos mas não são zero.

    Você pode até reparar que o tratamento da função VDFILL e DFILL para máscara de decimais é o mesmo e só muda o tratamento para campo "nulo".

    Além disso, eu fiz um teste aqui usando o exemplo do ACBrSpedPisCofins e o código funcionou normalmente. Veja na imagem:

    image.png

     

    Muito obrigado pelo retorno !

    Boas festas !

    • Obrigado 1
  2. Olá bom dia a todos !

    Tenho uma situação em que um cliente usa uma alíquota de 1,2375 para gerar o bloco A170, analisando o fonte percebi que o mesmo sempre arredonda esse conteúdo para duas casas gerando assim diversos erro no validador porque o cálculos dos valores foram feitos com o valor acima. Para resolver meu problema adotei o mesmo critério feito para o bloco D do mesmo sped.

    Segue abaixo o arquivo do fonte para análise.

    Alterações feitas nas linhas 505 e 509.

    Grato a todos e um excelente final de ano.

    ACBrEPCBloco_A_Class.pas

  3. Olá boa tarde a todos !

    Minha suspeita que a dll da paygoweb não está preparada para o Delphi FMX se dá devido ao erro que ocorre conforme o print abaixo:

    image.png.04aa4688f499d5976b49f308c06ecb03.png

    Inicialmente minha suspeita estava no componente, mas com a mensagem acima acredito que seja a dll.

    Essa propriedade em destaque não se encontra em nenhum objeto de botão testado no FMX (TButton, TSpeedButton e TCornerButton).

    Se alguém tiver alguma sugestão agradeço.

  4. Em 02/11/2023 at 01:10, William Di Domenico disse:

    Olá, Estou implementando o TEFAPI no FMX da mesma forma que você.... Estou perdendo os cabelos aqui com o mesmo erro no evento quandoPerguntarMenu.... Na primeira vez que chama o form funciona OK... na segunda  da acces violation.... Já tentei de tudo e nada. Destruí todos os formulários, free, release, nil... recriei... e NADA..... Alguém conseguiu a solução??? comparei os logs da minha aplicação e da aplicação TESTE e são iguais...

    Olá boa tarde, tive que dar uma pausa e agora voltei. Fiz o seguinte teste, no formulário "Obtem campo", comentei todos os métodos e eventos, não abriu, retirei todos os objetos deixando o formulário sem nada, abril com uma mensagem de erro: "Invalid pointer operation". Fui voltando objeto por objeto até que voltei os botões de confirmar e cancelar, quando o fiz o sistema travou novamente. Então voltei somente o botão de "confirmar" gera a mensagem de erro acima (invalid...) porém abre a tela e funciona, informei senha ponto de captura etc. Agora quando coloco o botão de cancelar a tela não abre e o sistema trava. Outro teste feito também, foi deixar somente o botão de cancelar, a tela não abre.

    No exemplo dos fontes quando é Paygoweb pede-se para deixar a propriedade visível com false, mesmo deixando a propriedade como false o travamento ocorre.

    Se essa informação e alguém tiver alguma dica, agradeço.

    Erro_Tef.png

  5. Agora, Daniel Simoes disse:

    Eu não vejo diferenças nas chamadas...

    Verifique se o evento está sendo chamado de forma recorrente, ou seja, ele está chamando o evento várias vezes, de forma recursiva... isso estoura a pilha, que causa um A.V.

    No Log do ACBrTEFAPI, ficam registradas todas as chamadas ao evento

    Não está chamando o evento várias vezes porque o processo é o seguinte: clico no botão onde executa a função administrativa do TEF, como ainda não está instalado, aparece poucas opções com a primeira "Instalar" e a segunda "Configurar", então clico na segunda (Configurar) ai já trava. Tentei também em Instalar, gera erro também.

  6. 41 minutos atrás, Daniel Simoes disse:

    Eu realmente não sei o que pode ser... o código que você mostrou é dos fontes do Delphi...

    Talvez seja bom acionar o suporte da Embarcadero

    Ok, iremos entrar em contato com o pessoal da Embarcadero, porem fiz o seguinte teste, peguei o formulário em questão e executei passando os parâmetros fixos por fora do evento do componente e o formulário abriu e fechou normalmente por diversas vezes.

    Grato.

  7. 57 minutos atrás, Daniel Simoes disse:

    o problema pode estar dentro do Form que está sendo criado... acompanhe o Onshow dele, no Debug

    Fiz um novo formulário acrescentando as propriedades uma a uma e compilava debugando mas mesmo colocando todas as propriedades o erro ocorre na unit da imagem anexo.

    Conforme disse criando um formulário vazio ou com as propriedades que a função exige, ocorre sempre o mesmo problema no ponto indicado na imagem. A aplicação está com a diretiva FMX.

    Mas independente da diretiva o problema ocorre.

    Perdão pelo texto, não sei se fui claro.

    Erro_Teste_TEF.png

  8. 39 minutos atrás, Daniel Simoes disse:

    O problema não parece ter relação com o TEF em si... mas com a construção de aplicações em FMX...

    Tente mudar isso:

      FormObtemCampo := TFrm_mbl_TEF_ObtemCampo.Create(Nil);

    Pois você está destruindo o Form, e não o "Application"

    Olá boa tarde, já foi tentado com o Application, Self (conforme está no exemplo) e nil, em todos ocorre o mesmo erro na linha onde executa o showmodal.

  9. Agora, Daniel Simoes disse:

    Essa construção parece errada..

        FormObtemCampo.ShowModal(procedure(ModalResult: TModalResult)
        begin
          MR := ModalResult;
        end);

    Para programação assíncrona, você teria que tratar todo o retorno, dentro da Procedure... Veja exemplos no Demo em Android

    provavelmente ocorre o A.V., porque o valor atribuído a variável MR irá sair do contexto, quando sair da procedure...

    Creio que você possa substituir o código acima, para:

        MR := FormObtemCampo.ShowModal;

     

    Das duas formas o problema acontece, essa que está ai foi uma tentativa.

  10. Em 19/10/2023 at 17:42, Daniel Simoes disse:

    Não vejo problemas em usar formulários em FMX

    Os componentes do ACBr são não visuais, ou seja, não usam a VCL

    Eu recomendaria você usar o ACBrTEFAPI, pois o ACBrTEFD é mais antigo, e depende da emulação de estados do ECF

    Olá bom dia, obrigado pela resposta ! Conforme sugerido fiz a mudança do TEFD para o API e mesmo assim ocorre um problema ao tentar abrir um segundo formulário. Tentei instalar o acbr usando como diretiva o FMX conforme um vídeo no Youtube (

    ) alterando o ACBR.inc porém não instala todos os componentes como por exemplo os danfes. Voltado para VCL instala tudo normalmente, então acrescentei no projeto a diretiva FMX e fiz um build, porem também resultou no mesmo problema.

    Fiz um protótipo para exemplificar minha situação. O exemplo copia o demo do AcbrTEFAPI, porém somente com a função administrativa.

    Desde já agradeço a ajuda.

    Teste_TEF.zip

  11. Olá boa tarde!

    Estou criando um emissor de NFC utilizando o Delphi Alexandria em um projeto para windows com formulários FMX. Porém, ao executar qualquer operação utilizando o TEF pela segunda vez o sistema gera uma violação de acesso.

    Primeiro eu achei que fosse porque estava usando os componentes sendo criados em runtime através de uma classe, então adicionei um DM e adicionei todos os componentes e passei os códigos dos eventos para ele. Devo frisar que o código que estou utilizando é uma cópia do projeto de exemplo, a única mudança foi as telas que o TEFD utiliza foram criadas como FMX ao invés de VCL como no exemplo.

    Fazendo um debug tive a impressão que o problema ocorre quando executa como modal (ShowModal), mas não posso afirmar com certeza.

    Grato pela ajuda.

  12. Bom dia Srs.

    Fazendo a implementação do contribuições para 2020, utilizando um arquivo com informações do registro 1010 (Processo Referenciado – Ação Judicial) seu registro filho 1011 (Detalhamento das Contribuições com Exigibilidade Suspensa) não estava totalizando no bloco 9900 gerando erro de estrutura ao validar o arquivo pelo aplicativo do governo. Para conseguir o mesmo fiz essa implementação conforme imagem abaixo

    2020-01-07 10_58_20-Window.png

    2020-01-07 11_00_20-.png

    ACBrSpedPisCofins.pas

    • Curtir 2
  13. Olá a todos, estou com problema ao conectar a impressora MP4200 da Bematech com a porta USB, segundo pesquisa aqui mesmo no forum, seria apenas criar uma opção de porta com o nome "USB" porém sempre ocorre erro de conexão e quando ocorre logo perde, tendo que reiniciar a máquina. Os drives da impressora estão instalados, gerando uma COM virtual e foi baixado a velocidade para 9600 deixado em 115 mil... Em fim existe algum procedimento que tem que ser feito ? Nossos clientes todos usam a impressora na serial, esse cliente novo comprou essa impressora nova que não vem mais com a mesma.

    Grato pela ajuda.

    Enderson.

  14. Obrigado pela resposta, porém ao implementar o método gerou a mensagem de erro conforme imagem abaixo.

    OBS.: o certificado não está vencido.

     

    post-15752-0-12034600-1434567116.png

     

    Método ficou assim:

          NFe.DistribuicaoDFe(qUFCODIGOIBGE.AsInteger,
                              vsCnpj,
                              vsUltimoNSU,
                              vsUltimoNSU);
     
    Grato.
  15. Olá boa tarde, tenho um problema: alguns clientes que usam a consulta de manifesto a partir da última consulta só traz até a última data já consultada. Ex. a ultima consulta trouxe informação até 08/06 por exemplo, independente de consultar os últimos 15 dias ou pelo último NSU, traz sempre o mesmo resultado.

     

    Quando executo pelo software gratuito funciona normal.

     

    No caso ao fazer essas consultas não gera nenhuma exceção.

     

    grato.

     

    Enderson.

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