Este é o site histórico da documentação 4D. As documentações estão sendo movidas progressivamente para developer.4d.com |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
4D v20 R7
Get last field number
|
Get last field number ( numTabela|pontTabela ) -> Resultado de função | ||||||||
Parâmetro | Tipo | Descrição | ||||||
numTabela|pontTabela | Inteiro longo, Ponteiro |
![]() |
Número da tabela ou ponteiro a tabela | |||||
Resultado de função | Inteiro longo |
![]() |
Maior número de campo na tabela | |||||
O comando Get last field number retorna o número de campo mais alto dos campos na tabela cujo número ou ponteiro se passa en numTabela ou pontTabela.
Os campos estão numerados na ordem na qual foram criados. Se nenhum campo foi apagado da tabela, este comando retorna o número de campos que a tabela contém. No caso de loops interativos sobre os números de campo da tabela, deve utilizar o comando Is field number valid com o objetivo de verificar que o campo não tenha sido eliminado.
O seguinte método de projeto cria o array arrayCampos, com os nomes dos campos da tabela cujo ponteiro se recebe como primeiro parâmetro
$vlTabela:=Table($1)
ARRAY STRING(31;arrayCampos;Get last field number($vlTabela))
For($vlCampo;Size of array(asCampos);1;-1)
If(Is field number valid($vlTabela;$vlCampo)
arrayCampos{$vlCampo}:=Field name($vlTabela;$vlCampo)
Else
DELETE FROM ARRAY(arrayCampos;$vlCampo)
End if
End for
Field name
GET FIELD PROPERTIES
Get last table number
Is field number valid
Produto: 4D
Tema: Acesso a Estrutura
Número
255
Modificado: 4D v11 SQL
Manual de linguagem 4D ( 4D v20 R7)