Is data file locked コマンドは、現在開いているデータベースのデータファイル、または少なくとも1つのセグメントがロックされている(つまり、書き込み禁止)場合にTrue(真)を返します。
 例えばにおいてこのコマンドを使用すると、ロックされたデータファイルを誤ってオープンする危険性を回避することができます。
このメソッドは、データファイルがロックされている場合、データベースが開かれることを回避します。
  If(Is data file locked)
    ALERT("データファイルがロックされています。このデータベースを開くことはできません。")
    QUIT 4D
 End if