Cadastro simples Multi-Usuarios

Delphi

13/11/2003

uma dica

Supondo que vc tem um sistema multi usuarios desenvolvido
e que vc tem 3 formularios simples.

Primeiro formulario:
cadastro simples de Clientes.

Segundo formulario:
Cadastro de Telefones dos Clientes,
(levando em conta que vcs possuem para cada 1 Cliente temos 4 telefones) seria então Uma tabela

de Clientes * tb_telefones_Clientes.

Terceiro formulario:
Cadastro de perguntas e respostas de satisfaçao do cliente.
(se o Cliente está gostando do sistema,o que deve ser melhorado no sistema...)
e assim umas 40 perguntas já formuladas para cada cliente e com 40 respostas dadas por este

cliente.

obs: As tabelas as triggers e os generator estão todos formulados!
tabela de Clientes tem como auto incremento o codigo_Cliente
que será colocado na tabela de telefones e pergunta_resposta do cliente.

sabendo que para cada cliente existe 4 telefones
e para cada cliente devo tbem cadastrar 40 perguntas e as 40 respostas!!


A pergunta!
Exemplo:
tenho 10 funcionários responsáveis pelo cadastramento dos Clientes, destes telefones e tbém das

perguntas e respostas dos clientes.

Funcionario1 - cadastrou o primeiro cliente que leva como codigo = 1
agora terá que cadastrar os telefones que são 4 para este mesmo cliente e não esquecendo que

ele tem que cadastrar tambem, ´ mais 40 perguntas e 40 respostas para este mesmo cliente (=1)´

em formulários diferentes.

Como farei para que em formulários diferentes e sabendo que temos mais de ´10 Funcionários

cadastrando vários clientes ao mesmo tempo´, que estas 40 pergunta e 40 respostas e mais estes 4

telefones
não serão incluidas no banco de dados com um outro codigo a não ser o cliente 1 que o

funcionário 1 está <<cadastrando agora>>!!!??

Levando em conta tbém que um outro funcionario,

Funcionário 2 já começou a cadastrar o cliente 2

VIA PROGRAMÇÃO EU FAÇO ASSIM:

formulario de cadastro de cliente simples
formulario 1

Depois de dar um insert ´por SQL´

////////Se possivel pode até ignorar estas linhas///////
//////// nao foi estipulado o codigo_cliente neste insert pois ele é autoIncremento

//////////////

close;
sql.clear;
SQL.Add(´Insert into TB_cliente (nome,endereco,bairro)´);
SQl.Add(´Values (´);
SQL.Add(QuotEdStr( Edt_nome.Text)+´,´);
SQL.Add(QuotEdStr( Edt_endereco_cliente.Text)+´,´);
SQL.Add(QuotEdStr( Edt_bairro.Text)+´)´);
ExecSQL;
////////**************///////////////////////////////////////

depois faço

tb_cliente.OPEN; ///abro a tabela
tb_cliente.refresh; /// atualizo as informaçoes desta tabela
tb_cliente.last;// pego o ultimo registro que seria o cliente=1 digitado pelo funcionario1
formulario1.Edt_cliente.Text:=INTTOSTR(tb_clienteCODIGO_CLIENTE.VALUE);// transfiro para o

edit_cliente do formulario 1.

Cadastrando os telefones AGORA!

Para o formulario 2 que se refere ao cadastro de Telefones,

eu faço o seguinte, passo a informação do edit_cliente do formulario1
para um edit do formulario 2.
Para que seja seja cadastrado os 4 telefones para o cliente=1.

formulario2. edit_cliente:=formulario1.edt_cliente; ///Formulario2 recebe o cliente =1

e assim consigo cadstrar os telfones do cliente=1.

Mas isto está errado em se pensar em Sistema MULTI USUARIOS!

Se alguem tiver uma apostila, um site ou uma dica de como tratar isto
por favor me passe!
E se não fui muito claro me Perdoem!

Desde já Agradeço


Omegatrue

Omegatrue

Curtidas 0
POSTAR