ActiveDelphi

[hdempresas]

Boa Tarde a Todos
Meu nome é Djonatan estou querendo desenvolver um sistema de Orçamento para Industrias de Moveis Sobmedida, venho com a sequinte proposta de desenvolvermos juntos o sistema e ao final publicarmos os fontes para a comunidade
caso alguem tenha interese posto aqui o link para download do BD que desenvolvi em access

Grato

Djonatan P Kruger
Desenvolvedores Independetes

[Ghost_Rider]

Cara, tenho interesse sim, desde que o banco seja firebird...o que me diz ???

[faccruz]

[hdempresas]

Boa tarde

Ghost_Rider e faccruz

sem problemas podemos faser um levantamento do BD que ficar melhor
estava fasendo em access por não aver a necessidade de setar ele no serviço do SO

não trabalho com firebird mas trabalho com MySQL
que vcs preferem?

posso criar um diagrama do BD para discutirmos antes de implementarmos o BD

espero a colaboração de todos
até mais

[Ghost_Rider]

Se puder mandar o diagrama...dai a gente analisa..

[hdempresas]

[Ghost_Rider]

Hum....cara, seguinte, não leva a mal o que vou falar....
Sei lá pra quem vc quer fazer esse sistema, mas ta meio "fraco"...
Voce disse que o sistema é pra loja de móveis, certo ??? Não sei o porte dessa loja de moveis, mas se ela fabrica moveis, já se enquadra, desde outubro do ano passado na obrigatoriedade da emissão da NF-e, logo, falta uma tonelada de campos nos seus cadastros, vou citar alguns :

- tabela de clientes : falta definir se o cliente é pessoa fisica ou juridica, porque o cara pode vender um movel para uma empresa, certo...falta cep, endereço, numero, etc...
- tabela de produtos : situação tributaria, aliquota, código da tabela CSOSN, unidade, valor unitario, margem de lucro, desconto permitido, entre outros...
- tabela de CIDADES : tem que ter o código do IBGE do municipio.
código do IBGE para o municipio.
- tabela de ITENSMOVEL : tem codigo do movel e codigo do produto, não entedi os dois campos...
- na tabela de pedidos tem o nome do cliente, na de orçamento tem o código, na de pedidos tem que ser o código do cliente tambem, concorda ???

Se for um sistema para uma loja especifica que voce pegou como cliente, sinceramente não tenho interesse...te dou uma força, mas não tenho interesse no projeto.
Se for um sistema completo, coisa que posso utilizar o fonte depois, dai tenho interesse...mas tem que ser feito de novo...
Abraço...

[hdempresas]

[faccruz]

[Ghost_Rider]

Cara, acessa esse site, faccruz tambem...

http://imageshack.us/photo/my-images/220/diagrama.png/

É igual o diagrama que vc disse que fez ???

[hdempresas]

[Ghost_Rider]

Cara, acho assim....fazer um sistema "compartilhado" é compartilhado...ou seja, eu monto o banco e vc faz o resto isso ???
Dai vc vai programar usando o que, CDS ???

[hdempresas]

Blza
pode ser assim então
me passa o BD que eu comeso a implementar os fontes
em Delphi 7 ou XE dependendo da necessidade de componentes

abroços

[Ghost_Rider]

tá...vou te passar 3 tabelas, desenvolve e me manda o código pra eu ver...

Tabela, indice, generator e trigger de CLIENTES

CREATE GENERATOR GEN_CLIENTES;

CREATE TABLE CLIENTES (
CLI_ID INTEGER NOT NULL,
CLI_TIPO CHAR(1),
CLI_DATACADASTRO DATE,
CLI_NOME01 VARCHAR(100),
CLI_NOME02 VARCHAR(100),
CLI_DOCUMENTO01 VARCHAR(20),
CLI_DOCUMENTO02 VARCHAR(20),
CLI_STATUS CHAR(1),
CLI_ESTADOCIVIL CHAR(1),
CLI_DATANASCIMENTO DATE,
CLI_IDCIDADE INTEGER,
CLI_CEP VARCHAR(,
CLI_ENDERECO VARCHAR(70),
CLI_NUMERO VARCHAR(10),
CLI_COMPLEMENTO VARCHAR(30),
CLI_BAIRRO VARCHAR(30),
CLI_TELEFONE VARCHAR(11),
CLI_CELULAR VARCHAR(11),
CLI_FAX VARCHAR(10),
CLI_EMAIL VARCHAR(70),
CLI_IDGRUPO INTEGER,
CLI_DESCONTO NUMERIC(5,2),
CLI_LIMITE NUMERIC(15,2),
CLI_SALDO NUMERIC(15,2),
CLI_VENCIMENTO INTEGER,
CLI_CONTATO VARCHAR(30),
CLI_OBS BLOB SUB_TYPE 1 SEGMENT SIZE 80,
CLI_ISENTO VARCHAR(1),
CLI_CARENCIA INTEGER,
CLI_PENDENCIA NUMERIC(15,2),
CLI_DATAPENDENCIA DATE,
CLI_ESPECIAL INTEGER,
CLI_ATU INTEGER
);


ALTER TABLE CLIENTES ADD CONSTRAINT PK_CLIENTES PRIMARY KEY (CLI_ID);


CREATE INDEX CLIENTES_IDX1 ON CLIENTES (CLI_IDCIDADE);


CREATE TRIGGER INC_CLIENTES FOR CLIENTES
ACTIVE BEFORE INSERT POSITION 0
AS
begin
IF (NEW.CLI_ID IS NULL OR NEW.CLI_ID <= 0 ) THEN
NEW.CLI_ID = GEN_ID(gen_clientes,1);
end

Tabela, indice, generator e trigger de GRUPOCLIENTES

CREATE GENERATOR GEN_GRUPOCLIENTES;

CREATE TABLE GRUPOCLIENTES (
GRUCLI_ID INTEGER NOT NULL,
GRUCLI_DESCRICAO VARCHAR(50),
GRUCLI_OPERACAO CHAR(1),
GRUCLI_PERCENTUAL NUMERIC(7,2)
);


ALTER TABLE GRUPOCLIENTES ADD CONSTRAINT PK_GRUPOCLIENTES PRIMARY KEY (GRUCLI_ID);

Tabela, indice, generator e trigger de MARCAS


CREATE TRIGGER INC_GRUPOCLIENTES FOR GRUPOCLIENTES
ACTIVE BEFORE INSERT POSITION 0
AS
begin
IF (NEW.GRUCLI_ID IS NULL OR NEW.GRUCLI_ID <= 0 ) THEN
NEW.GRUCLI_ID = GEN_ID(gen_grupoclientes,1);
end


CREATE GENERATOR GEN_MARCAS;

CREATE TABLE MARCAS (
MAR_ID INTEGER NOT NULL,
MAR_NOME VARCHAR(50)
);


ALTER TABLE MARCAS ADD CONSTRAINT PK_MARCAS PRIMARY KEY (MAR_ID);

CREATE TRIGGER INC_MARCAS FOR MARCAS
ACTIVE BEFORE INSERT POSITION 0
AS
begin
IF (NEW.MAR_ID IS NULL OR NEW.MAR_ID <= 0 ) THEN
NEW.MAR_ID = GEN_ID(gen_marcas,1);
end


Monta o exe com esses 3 cadastros que quero ver como voce programa.
Banco FIREBIRD 2.0

[faccruz]

Se possível me envia tbm
_________________
Facc System - Sistemas para Computador