Jump to content

botao.pngbotao.png

PARA DEVS E SW. HOUSES
Novos Palestrantes e Patrocinadores confirmados!

dia-do-acbr-online.png  

Saiba Mais

botao.pngbotao.png

botao.pngbotao.png

Ofertas Embarcadero
Descontos de até 35%

Saiba Mais

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

bilogyn

Membros
  • Content Count

    220
  • Joined

  • Last visited

Community Reputation

29 Excellent

1 Follower

About bilogyn

  • Rank
    Membro
  • Birthday 07/11/1982

Contact Methods

  • Skype
    fabricio_ftm

Profile Information

  • Sexo
    Masculino
  • Location
    Aparecida de Goiânia - Go
  • Interesses
    Delphi

Recent Profile Visitors

1,581 profile views
  1. Na classe acima não tem a opção de modificar as informações depois de criado o componente e carregado os fields, então lembre que precisamos modificar em algum momento sem mexer no que esta pronto... {---------------------------------------------------------} { Autor: Fabrício Melo } { e-Mail: [email protected] } { skype: fabricio_ftm } { Desenvolvedor Delphi } { } { Componente derivado da TFDQuery,
  2. Pra ajudar quem se interessou a fazer sua classe, esta aqui o comando SQL para Firebird: Só uma observação, o Nome da Tabela tem que ser exatamente igual ao que esta no banco respeitando palavras Maiúsculas / Minúsculas! SELECT SUBSTRING(A.RDB$FIELD_NAME FROM 1 FOR 4) AS MINEMONICO ,A.RDB$RELATION_NAME AS TABELA ,REPLACE(A.RDB$RELATION_NAME, '_', ' ') AS TABELA_TITULO ,CAST(E.RDB$DESCRIPTION AS VARCHAR(5000)) AS TABELA_DESCRICAO ,A.RDB$FIELD_NAME AS CAMPO ,A.RDB$FIELD_POSITION +1 AS POSICAO ,REPLACE(A.RDB$FIELD_NAME, '_', ' ') AS CAMPO
  3. Boa noite. Eu consegui resolver fazendo um "miau". Depois de horas tentando fazer igual ao Fields Editor do Delphi eu percebi que não precisava de nada disso, o meu único problema era que, como eu crie uma propriedade que cria os Fields da minha classe e os configurava na query, ao abrir meu DM o componente é criado juntamente com suas propriedades, como eu coloquei no método "SET" da propriedade "ActiveFields" as funções que executavam a criação e as configurações dos Fields, dava o erro... Resolvi criando uma variável que eu inicializo no create da classe pra não deixar executar nova
  4. Boa noite. Eu tentei validar se existem sim, mas não acertei o ponto, nem consegui descobrir como o Delphi faz no Fields Editor, até vasculhei o código por dias, o problema é que sempre que abro o Form proprietário a Query tenta recriar esses campos, é como se eles não estivessem registrados pra ela... O Field ao ser criado ele recebe o proprietário da Query como seu proprietário, isso faz com que ele apareça no DM ou Form, mas pra aparecer no Fields Editor eu seto somente .DataSet := Self, assim ele aparece la, creio eu, mas acredito que tenha mas algum detalhe, pois a Query não o reconh
  5. Bom dia. Querendo agilizar o desenvolvimento, resolvi criar um gerador de Querys baseado na classe do FDQuery da Biblioteca do FireDac. O meu gerador conecta na Tabela do banco de Dados e gera uma classe dessa tabela configurada para o uso no sistema, acho que é simples assim... Do jeito que desenhei funciona muito bem, assim defino no meu gerador os Títulos dos campos e suas configurações, tudo em um lugar só... Pra mim ficou muito bom, mas, nem sempre a facilidade vem acompanhada de maravilhas, o meu componente funciona do jeito que eu queria, gero as classe de minhas tabelas e aplic
  6. ? BOLETO_PROTESTAR_DIAS := 5; TipoDiasProtesto := diUteis; DataProtesto := (Vencimento + BOLETO_PROTESTAR_DIAS); Entendi, tenho que já mandar essa data certa então...
  7. Me deparei com esse problema aqui, então não seria conveniente o componente ja carrgar o "nosso número" sem o dígito? pois é um valor gerado para atender o Leaute, ou talvez um campo "nosso numero digito"... ficaria mais fácil pra fazer o retorno em nossas aplicações sem se preocupar com esse dígito por banco...
  8. Bom dia. Estou com dúvidas no cálculo de dias úteis do componente ACBr Boleto no seguinte: O Boleto acima esta configurado para protestar apos o 5º dia util nos parametros do sistema, porem a mensagem vem com o "4º dia", pelo nosso entendimento e do cliente, o protesto deveria ocorrer no 5º dia 02/04 e não no 4º dia 01/02... Não entendi porque ele retroagiu um dia sendo que temos um sábado e um domingo dentro desse período pelo cálculo do componente . Grato.
  9. Reeinstalei as impressoras e tentei de novo, já que deu certo pra você, não deu mais o erro, mas continuo com uma só impressão, teste na impressora virtual e na física, ambas recebem dois comandos, mas umas das linhas sempre somem e fica sá a primeira, é bem rápido... so imprime uma via... seria esse o ponto certo?
  10. Bom dia, implementei no meu sistema a opção "NumCopias" mas nunca tinha usado, até um cliente querer imprimir mais de uma via do boleto, descobri que a propriedade não funciona. Fui na função "TACBrBoletoFCFR.PreparaRelatorio" e inclui a linha "frxReport.PrintOptions.Copies := NumCopias" e passou a dar erro na tentativa de impressão... Resolvi fazendo um laço na chamada do AcbrBoleto.Imprimir... Então: Tem como corrigir essa opção e fazer o Boleto imprimir mais de uma via? ou senão Tem como tirar a propriedade ja que ela não é usada? Não consegui corrigir o erro, entã
  11. Realmente, usando essa configuração deu certo "LT_TLSv1_2", valeu por compartilhar, estava insistindo no WinCrypt, por isso dava tanto erro de TimeOut.
  12. Bom dia. Eu já tentei de tudo achar uma configuração válida, mas não acertei ainda, permaneço com o erro em alguns momentos, é aleatorio mas continua, tenho que tentar ate 3 vezes pra conseguir um retorno... A que mais dá certo pra mim é essa, mas não concordo com ela pois o SSLLib volta pra CUSTOM por conta de usar o xsMsXML e ter que usar o Tipo LT_all, poderiam postar aqui suas configurações?
  13. Realmente, baixei um dia antes da ocorrência do Luishbr, e não achei a ocorrencia no forum... Atualizar com mais freqência! ?
  14. Bom dia. Recentemente meu cliente reclamou de que no DANFe o Campo " modFrete " sai impresso somente "1 - DEST/REM" e que as transportadoras dele estão reclamando, falei que o nosso DANFe obedece as normas técnicas, mas ele não aceitou a resposta, resolvi debugar para ver o que poderia ser feito, vi que na função "modFreteToDesStr()" ja tem essa opção para a versão ve400 "1 - DESTINATARIO", porem estava chegando sempre o mesmo valor "versao = ve200", por isso o DANFe sempre sai com "1 - DEST/REM", fiz a alteração na classe e estou enviando para correção na procedure "CarregaTransportador"
  15. Não recomendo dá muito trabalho, mas ainda é possivel carregar a pagina do SEFAZ Consulta completa em um WebBrowser dentro de sua aplicação, informar a chave de acesso, informar o captcha e carregar a nota, dai em diante vc tem todo o codigo HTML da pagina, se souber trabalhar com ele e só ir montando as informações e alimentar o componente ACBrNFe, mas repito, dá muito trabalho... ?
×
×
  • Create New...