| 4D v18Get last field number | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| 
 | 
    4D v18
 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 v18)
	
	
	
	
	
 Adicionar um comentário
Adicionar um comentário