4D Doc Center : Get last table number

4D v14.3

Get last table number


Get last table number -> Resultado de função

Parâmetro	Tipo	Descrição
Resultado de função	Inteiro longo	Número de tabela mais alto no banco de dados

Descrição

Get last table number retorna o maior número de tabela entre as tabelas no banco. As tabelas estão numeradas na ordem na qual foram criadas. Se nenhuma tabela tiver sido apagada do banco, o comando retorna o número de tabelas presentes no banco. No caso de loops iterativos sobre os números de tabelas do banco, deve utilizar o comando Is table number valid para verificar que a tabela não tenha sido apagada.

Exemplo

O seguinte exemplo inicializa os elementos do array arrayTabelas, com os nomes das tabelas definidos no banco. Este array pode ser utilizado como lista drop down (ou abas, área de deslocamento, etc.), para mostrar em um formulário a lista de tabelas do banco

 ARRAY STRING(31;arrayTabelas;Get last table number)

 If(Get last table number>0) `Se o banco de dados não tiver tabelas

    For($vlTabelas;Size of array(arrayTabelas);1;-1)

       If(Is table number valid($vlTabelas))

          arrayTabelas{$vlTabelas}:=Table name($vlTabelas)

       Else

          DELETE FROM ARRAY(asTabelas;$vlTabelas)

       End if

    End for

 End if