Este es el sitio web histórico de la documentación de 4D. La documentación se está trasladando progresivamente a developer.4d.com |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
Get last field number
|
Get last field number ( numTabla | ptrTabla ) -> Resultado | ||||||||
Parámetro | Tipo | Descripción | ||||||
numTabla | ptrTabla | Entero largo, Puntero |
![]() |
Número de tabla o puntero a una tabla | |||||
Resultado | Entero largo |
![]() |
Número de campo más alto en la tabla | |||||
El comando Get last field number devuelve el número de campo más alto de los campos en la tabla cuyo número o puntero se pasa en numTabla o ptrTabla.
Los campos están numerados en el orden en el cual fueron creados. Si ningún campo ha sido borrado de la tabla, este comando devuelve el número de campos que contiene la tabla. En el caso de bucles interactivos sobre los números de campo de la tabla, debe utilizar el comando Is field number valid con el fin de verificar que el campo no ha sido eliminado.
El siguiente método de proyecto crea el array asCampos, con los nombres de los campos de la tabla cuyo puntero se recibe como primer parámetro:
$vlTabla:=Table($1)
ARRAY STRING(31;asCampos;Get last field number($vlTabla))
For($vlCampo;Size of array(asCampos);1;-1)
If(Is field number valid($vlTabla;$vlCampo)
asCampos{$vlCampo}:=Field name($vlTabla;$vlCampo)
Else
DELETE FROM ARRAY(asCampos;$vlCampo)
End if
End for
Field name
GET FIELD PROPERTIES
Get last table number
Is field number valid
Producto: 4D
Tema: Estructura
Número
255
Modificado: 4D v11 SQL
Manual de lenguaje 4D ( 4D v20 R7)