GARANTIR DESCONTO

Fórum Comando while ,combobox nao grava via rede #350071

05/12/2007

0

Estou desenvolvendo uma aplicação e estou com dificuldades
com while só roda em localhost hora que coloco em rede ele nao funciona
tipo assim ajuste do campo ´preço´ dos produtos pela condição do campo
´grupo´
veja se entendem
uso DBExpresss com TSQLDataset,DataSetProvider,ClientDataSet
DataSource com um Dbgrid onde vejo os produtos e 2 edits onde insiro porcentual e grupo, banco MySQL
ficou assim:
begin
    DS1.Dataset.First;
    repeat
    x:= strtofloat(edtaj.Text);
    y:=DS1.Dataset.FieldByName(´v_venda´).Value;
    DS1.Dataset.Edit;
    if DS1.Dataset.FieldByName(´grupo´).AsString = edtrec.Text then
    if DS1.Dataset.FieldByName(´grupo´).AsString <> ´´ then
    DS1.Dataset.FieldByName(´v_venda´).Value:= Y + (x *
    DS1.Dataset.FieldByName(´V_venda´).Value)/100;
    DS1.Dataset.Post;
    TClientDataset(DS1.Dataset).ApplyUpdates(0);
    DS1.DataSet.Next;
    until DS1.DataSet.Eof;
end;



Por Favor Alguem Pode me ajudar a resolver isto com comandos SQL em tempo de execução......ou outra alternativa que funcione em rede.

o camondo abaixo funciona pelo MySQL-Front: via rede

update produto set v_venda = (v_venda +(v_venda * 10)/100)
where grupo=´viga´


sou novo em delphi e em SQL ..... grato


Charlles

Charlles

Responder

Posts

05/12/2007

Charlles

resolvido problema de configuração dos Providerflags


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar