Get last table number

4D v20 R7


Get last table number -> Resultado

Parámetro	Tipo	Descripción
Resultado	Entero largo	Número de tabla más alto en la base

Descripción

Get last table number devuelve el número de tablas en la base. Las tablas están numeradas en el orden en el cual fueron creadas. Si ninguna tabla ha sido borrada de la base, el comando devuelve el número de tablas presentes en la base. En el caso de bucles iterativos sobre los números de tablas de la base, debe utilizar el comando Is table number valid para verificar que la tabla no haya sido borrada.

Ejemplo

El siguiente ejemplo inicializa los elementos del array asTablas, con los nombres de las tablas definidos en la base. Este array puede utilizarse como lista desplegable (o pestañas, área de desplazamiento, etc.), para mostrar en un formulario la lista de tablas de la base:

 ARRAY TEXT(asTablas;Get last table number)

 If(Get last table number>0) //Si la Base de datos no tiene tablas

    For($vlTablas;Size of array(asTablas);1;-1)

       If(Is table number valid($vlTablas))

          asTablas{$vlTablas}:=Table name($vlTablas)

       Else

          DELETE FROM ARRAY(asTablas;$vlTablas)

       End if

    End for

 End if

Ver también

Get last field number
Is table number valid
Table name