Fr3 com conexão com o banco de dados

Owned by Luciana Barboza, created
jun. 05, 2024
6 min read

Ocorrência

Como criar conexão com o banco de dados no Fr3, criando novos campos na aba Data.

Solução

Abrir o FR3 do relatório desejado (Imagens 1 e 2).

82779f5b-0add-4dbc-8a76-c89b9e1318dc 1.png
Imagem 1 - Tela Relatório Acumulado

 

e8b539c6-a4e6-4f86-91fa-244304932e9d 2.png
Imagem 2 - Tela Impressão do Relatório Acumulado

 

Neste exemplo, será apresentada a conexão com o banco de dados, para inclusão do campo “Peso” de forma que, ele seja apresentado multiplicando a quantidade comercializada. Como não existe o peso do produto para arrastar para a masterdata, será necessário conectar com o banco (Imagem 3).

 

Para isso, necessário selecionar a aba “Data” e clicar em “IBX Database” (Imagens 4 e 5).

 

 

Clicando no campo “IBX Database” e optando em qualquer local da área branca da tela, será apresentado um ícone “IBXDatabase1” e acessando-o, ele abrirá a tela “Connection Wizard” (Imagem 6).

 

Na tela “Connection Wizard” será necessário informar as seguintes informações nos campos:

  • Choose the database: informar o caminho do banco de dados, sendo: IP_servidor:caminho_banco , ex: 127.0.0.1:D:\Bases\1489.252\Dados\Guarani.FDB (Imagem 7).

Marque a opção: Use login/password

  • Login: informe o login de conexão com o banco de dados

  • Password: informar a senha para conexão com o banco de dados

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Para ajustar isso, será necessário:

  • Clique duplo sobre o campo que queremos ajustar no quadro “MasterData” (Imagem 19).

 

  • Será aberta a tela “Memo”, com o campo que arrastamos para o quadro. E é neste local que devemos ajustar a fórmula desejada, contando com a ajuda do botão “ABC” para buscarmos os campos já existentes.

 

 

 

Inserindo o trecho:

procedure Memo121OnBeforePrint(Sender: TfrxComponent);
begin
IBXQuery1.Close;
IBXQuery1.ParamByName('PRODUTO').Value := <frxDBAcumulado."ITE_CODIGO">;
IBXQuery1.Open;
IBXQuery1.Close;
IBXQuery1.ParamByName('PRODUTO').Value := <frxDBAcumulado."ITE_CODIGO">;
IBXQuery1.Open;
end;

 

 

 

 

 

Segue FR3 final, seguindo os passos acima.

 

 

Para salvar o arquivo FR3 basta fazer o seguinte, após abrir o FR3 antes de realizar qualquer alteração, clique em “File” >> Save as (Imagem 27).