Re: RES: [delphi-br] Sistema em Rede Nao Atualiza BD
mais o problema nao e so esse ele nao atualiza dados nenhum , nao e so
na tabela de vendas, tem , entradas, cadastros, transferencias,
financveiro, etc .
nao existe um um tipo de commit q atualiza na hora ?
--- Em delphi-br@yahoogrupos.com.br, Antonio ney.Silva [EMAIL PROTECTED]
escreveu
Creio que o melhor a ser feito é vc criar um Generator e uma Trigger
para
controlar seu número de romaneio!
Agradeço a atenção prestada,
Antonio ney.Silva
_
De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
nome de wellingtonamsantos
Enviada em: segunda-feira, 19 de maio de 2008 10:45
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Sistema em Rede Nao Atualiza BD
Ola a todos , tenho um sistema em delphi 5 + IBO + Firebird 2.0, a
aplicação ta rodando beleza, sistema de vendas e estoque.
Tipo tenho 3 maquinas na rede , eu abro o sistema nas tres normalmente ,
mais se eu entro na tela de vendas ele grava um numero de romaneio e
começa a efetuar a venda , se eu for na tela de venda de outra maquina
, ele teria q abrir um novo romaneio, mais ele nao abre um novo abre o
mesmo numero da maquina q abriu antes , pq pro Banco de Dados Nao
existe numero novo, estou fazendo o seguinte:-
DataModuleDados.IB_Query.Close;
DataModuleDados.IB_Query.SQL.Clear;
DataModuleDados.IB_Query.SQL.Add('INSERT INTO SAIDA
(Loja,CodigoPedido,CodigoVendedor,CodigoCliente,TipoPagamento,Pecas,Desconto
,TotalBruto,Status,DataVenda)
VALUES (');
DataModuleDados.IB_Query.SQL.Add(QuotedStr(StrCaracter(ArquivoRegistroLer('D
ATAEASY_GA','Loja'),3,'0'))+','+QuotedStr(RxCalcEditPedido.Text)+','+QuotedS
tr(vCodigoVendedor)+','+QuotedStr(vCodigoCliente)+','+QuotedStr('
')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('A
B')+','+QuotedStr(DateToStr(Date))+');');
DataModuleDados.IB_Query.ExecSQL;
DataModuleDados.IB_TransactionGA.Commit;
mais nao ta funcionando , ele so atualiza se eu sair do sistema .
alguem sabe como posso resolver o problema de atualização de registros.
[As partes desta mensagem que não continham texto foram removidas]
Re: RES: [delphi-br] Sistema em Rede Nao Atualiza BD
Olha colega, com certeza deve haver um erro de configuração em seu banco de
dados ou módulo de cliente que esta usando, pois tenho esta estrutura em uso
com IBO ou com Zeos no FB 2.0 e funciona perfeitamente.
Você usa estrutura servidor/client ?
Gerson
wellingtonamsantos [EMAIL PROTECTED] escreveu:
mais o problema nao e so esse ele nao atualiza dados nenhum , nao e so
na tabela de vendas, tem , entradas, cadastros, transferencias,
financveiro, etc .
nao existe um um tipo de commit q atualiza na hora ?
--- Em delphi-br@yahoogrupos.com.br, Antonio ney.Silva [EMAIL PROTECTED]
escreveu
Creio que o melhor a ser feito é vc criar um Generator e uma Trigger
para
controlar seu número de romaneio!
Agradeço a atenção prestada,
Antonio ney.Silva
_
De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED] Em
nome de wellingtonamsantos
Enviada em: segunda-feira, 19 de maio de 2008 10:45
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Sistema em Rede Nao Atualiza BD
Ola a todos , tenho um sistema em delphi 5 + IBO + Firebird 2.0, a
aplicação ta rodando beleza, sistema de vendas e estoque.
Tipo tenho 3 maquinas na rede , eu abro o sistema nas tres normalmente ,
mais se eu entro na tela de vendas ele grava um numero de romaneio e
começa a efetuar a venda , se eu for na tela de venda de outra maquina
, ele teria q abrir um novo romaneio, mais ele nao abre um novo abre o
mesmo numero da maquina q abriu antes , pq pro Banco de Dados Nao
existe numero novo, estou fazendo o seguinte:-
DataModuleDados.IB_Query.Close;
DataModuleDados.IB_Query.SQL.Clear;
DataModuleDados.IB_Query.SQL.Add('INSERT INTO SAIDA
(Loja,CodigoPedido,CodigoVendedor,CodigoCliente,TipoPagamento,Pecas,Desconto
,TotalBruto,Status,DataVenda)
VALUES (');
DataModuleDados.IB_Query.SQL.Add(QuotedStr(StrCaracter(ArquivoRegistroLer('D
ATAEASY_GA','Loja'),3,'0'))+','+QuotedStr(RxCalcEditPedido.Text)+','+QuotedS
tr(vCodigoVendedor)+','+QuotedStr(vCodigoCliente)+','+QuotedStr('
')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('A
B')+','+QuotedStr(DateToStr(Date))+');');
DataModuleDados.IB_Query.ExecSQL;
DataModuleDados.IB_TransactionGA.Commit;
mais nao ta funcionando , ele so atualiza se eu sair do sistema .
alguem sabe como posso resolver o problema de atualização de registros.
[As partes desta mensagem que não continham texto foram removidas]
-
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Sistema em Rede Nao Atualiza BD
Creio que o melhor a ser feito é vc criar um Generator e uma Trigger para
controlar seu número de romaneio!
Agradeço a atenção prestada,
Antonio ney.Silva
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de wellingtonamsantos
Enviada em: segunda-feira, 19 de maio de 2008 10:45
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Sistema em Rede Nao Atualiza BD
Ola a todos , tenho um sistema em delphi 5 + IBO + Firebird 2.0, a
aplicação ta rodando beleza, sistema de vendas e estoque.
Tipo tenho 3 maquinas na rede , eu abro o sistema nas tres normalmente ,
mais se eu entro na tela de vendas ele grava um numero de romaneio e
começa a efetuar a venda , se eu for na tela de venda de outra maquina
, ele teria q abrir um novo romaneio, mais ele nao abre um novo abre o
mesmo numero da maquina q abriu antes , pq pro Banco de Dados Nao
existe numero novo, estou fazendo o seguinte:-
DataModuleDados.IB_Query.Close;
DataModuleDados.IB_Query.SQL.Clear;
DataModuleDados.IB_Query.SQL.Add('INSERT INTO SAIDA
(Loja,CodigoPedido,CodigoVendedor,CodigoCliente,TipoPagamento,Pecas,Desconto
,TotalBruto,Status,DataVenda)
VALUES (');
DataModuleDados.IB_Query.SQL.Add(QuotedStr(StrCaracter(ArquivoRegistroLer('D
ATAEASY_GA','Loja'),3,'0'))+','+QuotedStr(RxCalcEditPedido.Text)+','+QuotedS
tr(vCodigoVendedor)+','+QuotedStr(vCodigoCliente)+','+QuotedStr('
')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('0')+','+QuotedStr('A
B')+','+QuotedStr(DateToStr(Date))+');');
DataModuleDados.IB_Query.ExecSQL;
DataModuleDados.IB_TransactionGA.Commit;
mais nao ta funcionando , ele so atualiza se eu sair do sistema .
alguem sabe como posso resolver o problema de atualização de registros.
[As partes desta mensagem que não continham texto foram removidas]
