Fiebird em duas máquinas ao mesmo tempo dand erro de pk_primary key

 EStou começando no firebird. Quando mando gravar na tabela do servidor está tudo bem, agora quando roda o servidor e cliente ao mesmo tempo ta dando o erro de pk_primary key. meu código de gavação: mando através de uma sql pear o maior código e acrescentar mais um: DMAMIZ.ibqMaxVenda.Close; DMAMIZ.ibqMaxVenda.SQL.Clear; DMAMIZ.ibqMaxVenda.SQL.Add('select max(CodVenda) from Venda'); DMAMIZ.ibqMaxVenda.Open; Codvenda:=dmamiz.ibqMaxVendamax.AsInteger +1 ; dmamiz.ibtVenda.Append; dmamiz.ibtVendaCODVENDA.AsInteger:=Codvenda; dmamiz.ibtVenda.post; dmamiz.ibtVenda.refresh; dmamiz.ibtVenda.ApplyUpdates; DMAMIZ.IBTransaction1.CommitRetaining; //esse aqui não adiantou, mais quando troquei para: DMAMIZ.IBTransaction1.Commit; //funcionou mais tenho que abrir todas as tabelas e querys aí fica lento, será que errei aonde? o que fazer para gravar fisicamente os registros e pela rede o computador cliente acumular mais um no código da venda?       OBS.: Estou usando Delphi 6, Firebird 1.5 e paleta IBX   obrigado pela atenção