Die Funktion Is data file locked gibt Wahr zurück, wenn die Datendatei der geöffneten Datenbank oder mindestens ein Segment davon gesperrt ist — z.B. schreibgeschützt.
Liegt diese Funktion in der Datenbankmethode On Startup, verhindert sie, dass versehentlich eine gesperrte Datendatei geöffnet wird.
Diese Methode verhindert das Öffnen der Datenbank, wenn die Datendatei gesperrt ist:
If(Is data file locked)
ALERT("Datendatei ist gesperrt. Datenbank kann nicht geöffnet werden.")
QUIT 4D
End if