4D v13.4
REGENERATE MISSING TABLE
- 4D Language Reference
-
- Structure Access
-
- Structure Access Commands
- CREATE INDEX
- DELETE INDEX
- Field
- Field name
- Get external data pathNew
- GET FIELD ENTRY PROPERTIES
- GET FIELD PROPERTIES
- Get last field number
- Get last table number
- GET MISSING TABLE NAMES
- GET RELATION PROPERTIES
- GET TABLE PROPERTIES
- Is field number valid
- Is table number valid
- REGENERATE MISSING TABLE
- RELOAD EXTERNAL DATANew
- SET EXTERNAL DATA PATHNew
- SET INDEX
- Table
- Table name
REGENERATE MISSING TABLE
| REGENERATE MISSING TABLE ( tableName ) | ||||||||
| Parameter | Type | Description | ||||||
| tableName | Text |
|
Name of missing table to be regenerated | |||||
The REGENERATE MISSING TABLE command rebuilds the missing table whose name is passed in the tableName parameter. When a missing table is rebuilt, it becomes visible in the Structure editor and its data can once again be accessed.
Missing tables are tables whose data are present in the data file but that do not exist at the structure level. You can identify any missing tables that may be present in the application by using the GET MISSING TABLE NAMES command.
If the table designated by the tableName parameter is not a missing table of the database, the command does nothing.
This method regenerates all the missing tables that may be present in the database:
ARRAY TEXT($arrMissingTables;0)
GET MISSING TABLE NAMES($arrMissingTables)
$SizeArray:=Size of array($arrMissingTables)
If($SizeArray#0)
// Fills the array with the names of all the tables in the database
ARRAY TEXT(arrTables;Get last table number)
If(Get last table number>0) //If there are actually tables
For($vlTables;Size of array(arrTables);1;-1)
If(Is table number valid($vlTables))
arrTables{$vlTables}:=Table name($vlTables)
Else
DELETE FROM ARRAY(arrTables;$vlTables)
End if
End for
End if
For($i;1;$SizeArray)
If(Find in array(arrTables;$arrMissingTables{$i})=-1)
CONFIRM("Regenerate the table"+$arrMissingTables{$i}+"?")
If(OK=1)
REGENERATE MISSING TABLE($arrMissingTables{$i})
End if
Else
ALERT("Impossible to regenerate table "+$arrMissingTables{$i}+" because there is already a table with this name in the database.")
End if
End for
Else
ALERT("No tables to regenerate.")
End if
Product: 4D
Theme: Structure Access
Number:
1126
Created: 4D v12
missing tables***
