po gilson, o problema do laptop e este jah foi resolvido, ou
vc num le direito os email .



  ----- Original Message ----- 
  From: Gilson 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, June 21, 2006 2:36 PM
  Subject: RES: [delphi-br] select e update


  Tente Assim:

         UPDATE PRODUTOS
          SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
          WHERE CODPRO IN (SELECT CODPRO FROM PRODUTOS
          WHERE CODFOR    = :CODFOR_FP
           AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2);

  Sds,


  Gilson

  -----Mensagem original-----
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
  nome de Elton
  Enviada em: terça-feira, 20 de junho de 2006 17:54
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] select e update

  O CODPRO penso que ele  tem valor do select.
    ----- Original Message ----- 
    From: Elazar Dornelles Ceza 
    To: delphi-br@yahoogrupos.com.br 
    Sent: Tuesday, June 20, 2006 5:29 PM
    Subject: RES: [delphi-br] select e update


    Elton

    e o CODPRO, tem algum valor quando no loop??

    Atenc.
    -----Mensagem original-----
    De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
    Em nome de Elton
    Enviada em: terça-feira, 20 de junho de 2006 15:43
    Para: delphi-br@yahoogrupos.com.br
    Assunto: [delphi-br] select e update


    vejam o select :
        
    FOR SELECT CODPRO, PREVENPRO
          FROM PRODUTOS
          WHERE CODFOR    = :CODFOR_FP
          AND   CODCLAEST BETWEEN  :CODCLAEST_FP1 AND  :CODCLAEST_FP2
          INTO CODPRO, PREVENPRO
          DO
          BEGIN
            UPDATE PRODUTOS
            SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
            WHERE CODPRO = :CODPRO;
             SUSPEND;
          END

    tem alguma coisa errada nisso ? porque nao da o update.

            UPDATE PRODUTOS
            SET PREVENPRO = PREVENPRO + (:NOVO_PREVENPRO * PREVENPRO)
            WHERE CODPRO = 1     <------------------------------  vejam , se
    eu colocar  o cod 1, ele da update
             SUSPEND;
          END


    [As partes desta mensagem que não continham texto foram removidas]




                
    _______________________________________________________ 
    Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
  Registre seu aparelho agora! 
    http://br.mobile.yahoo.com/mailalertas/ 


     

  [As partes desta mensagem que não continham texto foram removidas]



  -- 
  <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>



  Links do Yahoo! Grupos







   

[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a