Page 1 of 1

Como puedo saber si un numero en un campo es negativo

Posted: Fri Feb 08, 2008 1:22 am
by devwin2010
Estimados Colegas

Alguien tiene alguna rutina o funcion para saber si el en numero en un campo de una dbf es negativo

desde ya muchisimas gracias
Fabian

Posted: Fri Feb 08, 2008 2:18 am
by horacio
Fabian:

Function DimeSiElNumeroEsNegativo( nNumeroGuardadoEnDbf )

Do Case
Case( nNumeroGuardadoEnDbf < 0 )
Return .t.
Otherwise
Return .f.
EndCase
Return .f.

No sé si es lo que necesitas
Saludos

Posted: Fri Feb 08, 2008 1:03 pm
by ADBLANCO
Fabian:

Function DimeSiElNumeroEsNegativo( nNumeroGuardadoEnDbf )
Return ( nNumeroGuardadoEnDbf < 0 )

Posted: Sat Feb 09, 2008 6:33 am
by joseluisysturiz
FUNCTION menorqcero(nVar) // VALIDA VALOR ENTRADO SEA MAYOR O IGUAL A CERO (0) - NO SEA NEGATIVO
IF nVar < 0
MSGWAIT("Valor Invalido", "ATENCION", 2)
RETURN .F.
ENDIF
RETURN .T.