Record Lock

In RLA you can test if the last IO operation ended with you waiting for a locked record exceeding the wait timeout:

  if %Status(YourFile) =  1218;  //Status 1218 = Record Lock
    // record locked
  endif;
,