lock_read

	status.i4.v = lock_read(object_name.i1a.r, lock_data.s.r
				[,check_dropped.i4.v])

	This routine checks for the presence of a lock on a named object.
	The scope of locks are for the lifetime of the process requesting
	the lock.  Lock are maintained in software and are only as good as
	the applications that adhere to it.

	object_name	ASCII string naming the object
			maximum length of a name is LOCK_MAX_NAME_LEN
	lock_data	returned lock information
			(structure of type LOCK_ENTRY_DATA)
			(A value of NULL can be passed for this argument
			 if this information is not needed.)
	[check_dropped]	flag indicating whether or not to check if a
			lock has been dropped
			(TRUE -> if lock is held, make sure that it has
				 not been dropped,
			 FALSE -> don't check for dropped locks (default))

	This function returns ACNET status values as follows:

	OK			no lock present
	LOCK_OTHER		locked by another task
	LOCK_ALREADY		locked by you
	SQL_xxx			lock status not read -
				this system error occurred

	This function requires the following include files:

	cnsparam_h, cbslib_h, cns_data_structs_h, acnet_errors_h

	Related functions:

	lock_release, lock_request

	C/C++ usage:

	static const char	object_name[] = "my_lock";
	int	status;
	int	check_dropped = TRUE;
	LOCK_ENTRY_DATA	lock_data;

	status = lock_read(object_name,&lock_data,check_dropped);