F�rum Valor negativo em query SQL #387823

04/10/2010

Caros

Tenho a seguinte query montanda no c�digo.

    if chkEstMin.Checked then
      CommandText := CommandText + ' AND ((' + SaldoPrinc + ')) - P.QTE_RES) < P.EST_MIN)';

Acontece que quando esse valor P.EST_MIN � negativo, a query n�o funciona.
O que pode ser?

Valeu

Elton �squi

Curtir t�pico

+ 0

Responder

Posts

04/10/2010

Eduardo Marcolongo

Por favor, passe um exemplo de valor.Provavelmente o resultado da (' + SaldoPrinc + ')) - P.QTE_RES) seja maior que o P.EST_MIN

Responder

Gostei + 0

04/10/2010

Deivison Melo

Elton �squi, Qual o banco de dados utilizado? 1� - Poderia efetuar o tratamento j� direto na query! 2� - Voc� poder� utilizar a function ABS (para pegar o valor absoluto) Exemplos no link: http://www.delphibasics.co.uk/RTL.asp?Name=Abs Qualquer coisa estou � disposi��o!!! Emanoel Deivison

Responder

Gostei + 0

04/10/2010

Leonardo Xavier

Cara � o seguinte a query trabalha com dois valores -1 e 0, quando o valor � 0 � porque a querry nao localizou o registro, mas quando a querry � -1 o registro foi localizado. Se seu sistema esta dando erro com o valor de indice a ser localizado ou comparado seria interesnte vc verificar seu c�digo para ver onde poderia estar o problema, pode ser inclusive com o relacionamenteo de suas tabelas. Mas verifique ai se houver alguma coisa que eu possa ajudar voc� poste aqui.

Responder

Gostei + 0

04/10/2010

Elton �squi

Ent�o...mais ou menos assim:

Saldo disp.: 15
Estoque min.: 50

Nesse caso, se o check estiver marcado ele vai exibir o produto, porque o saldo disp. � menor que o est. min.
Acontece que o prod. pode ser reservado e gerar o estoque begativo, a� qdo o est. min � -15, por exemplo, n�o exibe.

Nesse momento ele faz isso no c�digo:
Trecho

    if chkEstMin.Checked then
      CommandText := CommandText + ' AND ((' + SaldoPrinc + ')) - P.QTE_RES) < P.EST_MIN)';

    if radioTipo.ItemIndex = 0 then
      CommandText := CommandText +
      ' ORDER BY P.DESC_DEN,P.COD_DEN, P.NOME, P.CODIGO'
    else
      CommandText := CommandText +
      ' ORDER BY P.DESC_DEN,P.COD_DEN, P.NOME, P.COD_REF';

    AbreTabela(True, cdsProd, 'Produto');

    if RecordCount = 0 then
    begin
      MessageBeep(0);
      Application.MessageBox('Nenhum produto selecionado.', 'Informa��o',
        MB_ICONINFORMATION
        + MB_OK);
      btOk.Enabled := True;
      ProdIni.SetFocus;
      Exit;
    end;

O banco � ORACLE, mas utilizo v�rios aqui que podem utilizar o programa, como MSSQL, Firebird, Interbase e etc.

Responder

Gostei + 0

07/10/2010

Elton �squi

Como fa�o pra finalizar o t�pico?

Responder

Gostei + 0

07/10/2010

Eriley Barbosa

Para finalizar algu�m tem que responder para voc�.

Responder

Gostei + 0