TACL Reference Manual

Built-In Functions and Variables
HP NonStop TACL Reference Manual—429513-018
9-168
#FILEGETLOCKINFO Built-In Function
The control STRUCT must be initialized prior to a series of calls to
#FILEGETLOCKINFO. This statement initializes the sample STRUCT defined
previously:
#SET control 0
lockdesc
is a STRUCT that is to receive the lock information; it must be defined as follows:
either,
[#DEF lockdesc STRUCT
BEGIN
INT lock^type; == 0 = file, 1 = record
UINT flags; == <0> set if generic lock
== <1:15> are reserved
INT n^participants; == number of holders/waiters
== for lock
INT2 record^id; == if record lock and not
== key-sequenced
INT key^length; == for key-sequenced record
== locks; 0 if not
== key-sequenced
CHAR key(0:255); == key for key-sequenced
END;
] == record locks
or
[#DEF lockdesc STRUCT
BEGIN
INT lock^type; == 0 = file, 1 = record
UINT flags; == <0> set if generic lock
== <1:15> are reserved
INT n^participants; == number of holders/waiters
== for lock
INT2 record^id; == if record lock and not
== key-sequenced
INT key^length; == for key-sequenced record
== locks; 0 if not
== key-sequenced
CHAR key(0:2047); == key for key-sequenced
END;
] == record locks
Note: When Enscribe key-sequenced file is having key size less than or equal to 256.
Note: When Enscribe key-sequenced file is having key size less than or equal to 2048.