mso-element: para-border-div; mso-border-alt: solid windowtext .5pt">
Metodologia O exemplo deste artigo utiliza a arquitetura cliente/servidor. Para mais informações sobre essa arquitetura e outras, visite //www.devmedia.com.br/articles/viewcomp.asp?comp=5219
Criando o banco de dados
Para iniciar o projeto, vamos primeiramente criar o banco de dados e as tabelas necessárias para cada tela de cadastro. As tabelas são: Clientes, Fornecedores e Contas. Neste artigo, criaremos o banco de dados utilizando a ferramenta IBExpert em sua versão Standard. Por isso, acesse o link www.ibexpert.com e em seguida entre no item IBExpert.
ClubeDelphi PLUS!
Acesse agora o mesmo o portal do assinante ClubeDelphi e assista a uma vídeo aula de Luciano Pimenta que mostra como baixar e instalar o IBExpert em sua versão gratuita.
www.devmedia.com.br/articles/viewcomp.asp?comp=3082
À esquerda do site do fabricante clique em Download>Free. Preencha o formulário de cadastro e aguarde o e-mail com as instruções de download da ferramenta. Após isso, abra o IBExpert e vamos criar o banco de dados usando a opção Script Executive presente no menu Tools.
Com a tela de scripts aberta, digite o código da Listagem 1. Nele estão contidos os esquemas para a criação do banco de dados assim como de cada tabela do sistema. Digitado o script, basta executá-lo usando o botão Run Script ou pressione a tecla F9.
Nota: Substitua <Caminho>\SYSPAGUE.FDB pelo diretório do banco de dados e seu nome, ex: C:\BancoDeDados\SysPague.fdb.
Listagem 1. Criação do banco, tabelas e índices
SET SQL DIALECT 3;
SET NAMES WIN1252;
CREATE DATABASE '<Caminho>\SYSPAGUE.FDB'
USER 'SYSDBA' PASSWORD 'masterkey'
PAGE_SIZE 8192
DEFAULT CHARACTER SET WIN1252;
CREATE TABLE CLIENTES (
CNPJ VARCHAR(18) NOT NULL,
FANTASIA VARCHAR(20) NOT NULL,
RAZAO VARCHAR(150),
IE VARCHAR(18) NOT NULL,
ENDERECO VARCHAR(100),
BAIRRO VARCHAR(50),
COMPLEMENTO VARCHAR(30),
CIDADE VARCHAR(50),
ESTADO VARCHAR(2),
CEP VARCHAR(9),
TELEFONE VARCHAR(15),
FAX VARCHAR(15),
DT_CADASTRO TIMESTAMP,
STATUS VARCHAR(1),
DT_ALTERACAO TIMESTAMP);
CREATE TABLE CONTAS (
BANCO INTEGER NOT NULL,
AGENCIA VARCHAR(10) NOT NULL,
CONTA VARCHAR(10) NOT NULL,
NOME_AGENCIA VARCHAR(30),
NOME_CONTA VARCHAR(30),
ENDERECO VARCHAR(100),
BAIRRO VARCHAR(50),
COMPLEMENTO VARCHAR(30),
CIDADE VARCHAR(50),
ESTADO VARCHAR(2),
CEP VARCHAR(9),
TELEFONE VARCHAR(15),
FAX VARCHAR(15),
DT_CADASTRO TIMESTAMP,
CONTATO VARCHAR(50),
STATUS VARCHAR(1),
DT_ALTERACAO TIMESTAMP);
CREATE TABLE FORNECEDORES (
CNPJ VARCHAR(18) NOT NULL,
FANTASIA VARCHAR(20) NOT NULL,
RAZAO VARCHAR(150),
IE VARCHAR(18) NOT NULL,
ENDERECO VARCHAR(100),
BAIRRO VARCHAR(50),
COMPLEMENTO VARCHAR(30),
CIDADE VARCHAR(50),
ESTADO VARCHAR(2),
CEP VARCHAR(9),
TELEFONE VARCHAR(15),
FAX VARCHAR(15),
...
