1 02/02/84  get_lock_id_
 2 
 3 
 4 Entry points in get_lock_id_:
 5    (List is generated by the help command)
 6 
 7 
 8 :Entry: get_lock_id_: 02/02/84  get_lock_id_
 9 
10 
11 Function: returns the 36-bit unique lock identifier to be used by a
12 process in setting locks.  By using this lock identifier, a convention
13 can be established so that a process wishing to lock a data base and
14 finding it already locked can verify that the lock is set by an
15 existing process.
16 
17 
18 Syntax:
19 declare get_lock_id_ entry (bit(36) aligned);
20 call get_lock_id_ (lock_id);
21 
22 
23 Arguments:
24 lock_id
25    is the unique identifier of this process used in locking.  (Output)
26 
27 
28 Notes:  For a more detailed discussion of locking see the set_lock_
29 subroutine description.