No repositório do ACBr existe um exemplo de como listar as notas:
C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\DistribuicaoDFe.txt
Dá pra ter uma boa ideia do funcionamento baseando-se por lá.
Reinaldo Silveira's post in PESQUISA was marked as the answer
Observe que se você fazer a consulta assim: LIKE '%AFASTADOR%MEDIO%' você obterá resultado. Ou seja, substituindo o caractere espaço por porcentagem, sua pesquisa ficará mais flexível.
Tente algo assim:
qry.Close;
qry.SQL.Add('SELECT * FROM TB_PRODUTO WHERE DESCRICAO LIKE :pesquisa');
qry.Params[0].Value := '%'+ StringReplace(edtPesquisa.Text, ' ', '%', [rfReplaceAll]) +'%';
qry.Open;
Eu uso desta forma e nunca tive problemas.
Olá italoluz!
Eu me expressei mal, na verdade eu me referia à Unit principal (e não Form), onde eu declarei: Windows, Forms e ActiveX em uses.
Se não estou esquecendo de nada, os passos foram os seguintes:
1) após criado o serviço no Delphi, é necessário instalá-lo (via prompt: C:\caminho_do_servico\nome_do_servico.exe /install
2) após instalado, vá em services.msc (menu executar). Botão direito sobre o serviço, propriedades, logon. Em 'esta conta', informe um nome de usuário e senha que possua privilégios administrativos (é importante que a senha deste usuário esteja definida para nunca expirar - para evitar problemas futuros)
3) logue no Windows usando esse mesmo usuário, e instale o certificado digital por lá
4) volte em services.msc e inicie o serviço.
Bom, acho que foi somente isso. Espero ter ajudado.
Abraços.
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.
