Problemas com Multicamadas

Delphi

19/08/2004

:?: Estou com um problema.
Estou modificando meu sistema cliente/servidor em multicamadas mas o problema e que nao sei como fazer para extrair os dados do servidor se coloco o comando na interface do cliente tudo fica bem mas nao cosigo colocar todas as regras no servidor COM.

Tenho que validar um produto mas so consigo no ClientDataSet que esta na aplicacao cliente:

if not ClienteProdutos.Locate(´CodBarras´, ClienteItensProduto.AsString,[])
then begin
MessageDlg(´Produto não encontrado, favor cadastre-o´,mtError,[mbOk],0);
Abort;
end
else
ClienteItensValUnitario.Value := ClienteProdutosPreco.Value;
ClienteitensValLucro.Value := (ClienteProdutosPreco.Value - ClienteProdutosLucro.Value) * ClienteItensQuantidade.Value;
ClienteItensDesconto.Value := ClienteProdutosPrecoMedio.Value;
ClienteItensValTotal.Value := ClienteItensQuantidade.Value * ClienteItensValUnitario.Value;
ClienteItensSomaTotal.Value := ClienteItensValTotal.Value;
ClienteVendasValor.Value := ClienteVendasValor.Value + ClienteItensValUnitario.Value * ClienteItensQuantidade.Value;
ClienteProdutos.Edit;
ClienteProdutosEstoque.Value := ClienteProdutosEstoque.Value - ClienteItensQuantidade.Value;
end;

gostaria de colocar todas as regras no Servidor COM.

O Banco e INTERBASE e esta crescendo muito de acordo com o fluxo, com isso existe um demora.

URGENTE!


Jmsistemas

Jmsistemas

Curtidas 0

Respostas

Rodolpho123

Rodolpho123

19/08/2004

Vc está usando DbObjects e ControlObjects?


GOSTEI 0
Ipc$

Ipc$

19/08/2004

Olá !
Pelo que entendí, vc não quer as regras de negócio em cada cliente e sim num único servidor e o Com não está atendendo.
Bom, se for isso, creio que está faltando uma camada que seria o servidor de aplicações que faria a intermediação dos clientes conectados à ele com o servidor Com / banco de dados.


GOSTEI 0
POSTAR