FoxPro/Visual FoxPro - Empty Tabla

 
Vista:

Empty Tabla

Publicado por Carlos Diaz (65 intervenciones) el 17/03/2009 23:26:52
Hola amigos como le hago para saber i mi tabla esta vacia, ejemplo :

If Empty 'MI TABLA' messagebox('Debe agregar al menos un producto')
Else
Append Blank
Y lo que sigue....

EndIf

Como se hace esto, del EMpty?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Empty Tabla

Publicado por HELDER MARTINEZ (COUNDY)  (711 intervenciones) el 18/03/2009 00:16:10
Para saber si la tabla no tiene registros, puedes hacer un conteo de registros.
SI la tabla contiene cero 0 registro que te lanze un mensaje.

public nRegistro
select tabla
count to nRegistro

if nRegistro <= 0
messagebox("Debe agregar al menos un producto")
else
append blank
y lo que sigue
endif

saludes amigo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Empty Tabla

Publicado por Miguel (115 intervenciones) el 18/03/2009 03:44:42
comparto esta solución, Empty solo se utiliza para validar un campo o variable.

Slds.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Empty Tabla - otra forma

Publicado por ANDRES CORTEZ M (162 intervenciones) el 18/03/2009 15:21:08
HOLA CARLOS

- otra forma

set dele on
select tabla
go bottom
if bof() && si es comienzo de archivo
messagebox("Debe agregar al menos un producto")
else
append blank
y lo que sigue
endif

Espero te sirva

ACM
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Mauricio
Val: 471
Plata
Ha mantenido su posición en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

Empty Tabla

Publicado por Mauricio (1541 intervenciones) el 18/03/2009 02:05:35
Algo muy sencillo es con la instruccion RECCOUNT()
select tabla
IF RECC = 0
=MESSAGEBOX('No existen registros'
ELSE
* Otras opciones
ENDIF
Espero te funciones, con la salvedad que si tienes registros eliminados el RECCOUNT sera diferente de cero....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 4
Ha aumentado su posición en 2 puestos en FoxPro/Visual FoxPro (en relación al último mes)
Gráfica de FoxPro/Visual FoxPro

RE:Empty Tabla

Publicado por kong (682 intervenciones) el 18/03/2009 03:20:23
en el caso de que uses el COUNT TO es preferible añadir unas dos variables

nRegistroActual=
lRegistroBorrado=

y luego ubicar el puntero si el registro no estaba borrado
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar