datilas

eu resolvi assim: If Not FDConnection1.InTransaction Then FDConnection1.StartTransaction; ... If Not FDConnection1.InTransaction Then FDConnection1.CommitRetaining;

estou acessando aki e esta normal. acesse: https://github.com/fortesinformatica/fortesreport-ce clique no botao: Clone or download escolha o opcao: download zip descompacte o arquivo no diretorio que vc preferir execute: frceInstall.exe (como administrador)

vc vai acessar : http://www.anp.gov.br/simp/ clica em: Tabelas de Códigos i-SIMP (do lado esquedo) depois em: Tabelas de Códigos (Versão 445 - Abril/2018) baixa o arquivo: tabela_apoio_isimp_20180402.zip use o arquivo: T012-Codigos_de_produtos_20180402.xls

Esta em mysql se nao me engano 5.1 use a ultima versao do 7z para descompactar efd-icms-ipi.7z efd-pis-cofins.7z

esse é o db do emissor gratuito de mdfe, (pode servir como base para vc) esta em FB2.1. use a ultima versão do 7z para descompactar, MDFe.7z

ja tentou assim CreateProcessSimple('cmd.exe /c "'+local+'mysql.exe -u root --password=senha < ' + OpenDialog1.FileName+'"');

funcionou perfeito para Varzea Grande-MT

link off line

wscoreios também retorna IBGE

o webserservice dos correios não parou de funcionar, o que mudou foi a forma de usar, antes era feito um get no site dos correios, agora é usado o webservice propriamente dito, quando se usa get corre o risco de haver atualização no site e ter que alterar o componente, (foi o que aconteceu) hoje é usado um webservice, alem disso quando houve esse problema foi corrigido rapidamente por usuarios do acbr, eu ainda prefiro usar o wscorreios por ser de free e afinal de contas é dos correios. sobre a atualização dos outros webservices, recomendo vc entrar em contato com eles e pedir um historico de atualizações.

isso acontece comigo, quando a impressora padra é a de cupom, se mudar a impressora padrão para outra funciona normal

ja viu isso: https://br.answers.yahoo.com/question/index?qid=20130523063824AA9fNKj http://www.goldstarsoftware.com/down615.asp

muito obrigado, problema resolvido.

estou migrando meu projeto feito em delphi 7 para xe4, a minha dificuldade é com a cor de todos os forms que muda totalmente, alguem sabe como resolver? segue imagem no delphi7: segue imagem no xe4:

tenta usar Heigth := 0;

Boa Tarde Pessoal. To com uma duvida, preciso salvar imagem no banco (firebird). minha pergunta é: é melhor salvar como binário ou base64, pela questão de estabilidade, velocidade e tamanho do banco?

tenho vários relatórios usando quickreport e bde estamos migrando para firedac, o problema é o sequinte quando usa o TQuery(bde) o relatório agrupa certinho (por data, ou fornecedor) mas se eu uso TADQurey(Firedac) o agrupamento não fuciona mais, (é o mesmo relatório trocando apenas o componente TQuery por TADQurey), alguém já passou por isso? uso delphi7 e firedac 8.05

esse é no minimo interessante feito em delphi, https://github.com/senjaxus/AllaKore_Remote https://github.com/senjaxus https://www.facebook.com/groups/1202680153082328/

pelo que vi não é muito dificil. é só fazer um post em http://www2.correios.com.br/sistemas/rastreamento/resultado.cfm com os parametros botao=OK celulardois=(00) 0000-0000 //destinatario celularum=(00) 0000-0000 //remetente nao obrigatorio (enviar vazio) etiqueta=CodigoRastreamento //seu codigo de rastramento objetos=CodigoRastreamento//seu codigo de rastramento termo=on Ex: http://www2.correios.com.br/sistemas/rastreamento/resultado.cfm?botao=OK&celulardois=(00)%200000-0000&celularum=&etiqueta=CodigoRastreamento&objetos=CodigoRastreamento&termo=on ( (00)%20 %20 é espaço utf) tenta ai se conseguir adiciona na unit de rastramento

qual a url?

o app android foi feito em qual ide? obrigado por disponibilizar o codigo vai servir como base de estudo pra mim

e aqui vai minha contribuição para o firebird 3.0 create or alter function ROUNDABNT ( AVALOR double precision, ADECIMAIS smallint) returns double precision AS declare variable cDecimais varchar(100); declare variable vlrstr varchar(100); declare variable nSubsequente smallint; declare variable posponto smallint; BEGIN vlrstr = Cast(AVALOR as varchar(100)); posponto = POSITION('.',vlrstr); cDecimais = SUBSTRING(vlrstr from posponto+1 for CHAR_LENGTH(vlrstr)); nSubsequente = ADECIMAIS+1; if (:ADECIMAIS < 1) Then RETURN TRUNC(AVALOR); else If (CHAR_LENGTH(cDecimais) <= :ADECIMAIS) Then RETURN AVALOR; else Begin If ((Cast(SUBSTRING(cDecimais from nSubsequente for 1) as integer) > 5) Or (Cast(SUBSTRING(cDecimais From nSubsequente For 1)as double precision) < 5)) Then RETURN ROUND(AVALOR,ADECIMAIS); Else if (Cast(SUBSTRING(cDecimais From nSubsequente For 1)as double precision) = 5) Then If (MOD(Cast(SUBSTRING(cDecimais From ADECIMAIS For 1)as double precision) ,2) <> 0) Then RETURN ROUND(AVALOR,ADECIMAIS); Else If (Cast(SUBSTRING(cDecimais From nSubsequente+1 For 1)as double precision) > 0) Then RETURN ROUND(AVALOR,ADECIMAIS); Else RETURN TRUNC(AVALOR,ADECIMAIS); End END

o firebird 3.0 agora permite criar funções internas facilitando muito a nossa vida eu criei algumas funções para formatar documentos (cpf,cnpj,cep,ie,fone) usei como base o acbrvalidador para formar as mascaras usando firebird 3.0 RC1 e gostaria de compartilhar com os amigos do fórum Macaras-FB.zip

eu nem sabia que dava para gerar código de rastreamento visto que o código é gerado pelos correios no momento da postagem, o que eu sei que daria para fazer é um componente para acompanhar o objeto pelo código de rastreamento

alguem?