"localhost:/firebird/data/ILICHEVSK2.FDB". ���������

DATALOCKS_LOCKDATE

������� ���������

�������� ���������

��������

(��� �������� ��� ��������� DATALOCKS_LOCKDATE)

�����������

CREATE PROCEDURE DATALOCKS_LOCKDATE(
    DATALEVEL INTEGER)
RETURNS (
    LOCKDATE DATE)
AS
DECLARE VARIABLE DATALOCKID INTEGER;
begin
  select Max(DataLockID)
    from DataLocks
    where DataLockLevel > :DataLevel
  into :DataLockID;

  select LockDate
    from DataLocks
    where DataLockID = :DataLockID
  into :LockDate;
  suspend;
end