SYNTAX VHA_LOCKF(P1) PURPOSE User-interuptable file lock attempt ARGUMENTS P1 - CHARACTER - OPTIONAL - DEFAULT: aliasname - description of database RETURNS LOGICAL .T. if locked .F. if not locked