{
{    The purpose of this procedure is to determine whether or not a user is
{ validated for a particular REMOVABLE_MEDIA_ACCESS and to return the modes of
{ access for which the user is validated.  If there is no
{ REMOVABLE_MEDIA_ACCESS validation defined that matches the specified name,
{ abnormal status is returned.
{
{       AVP$GET_REMOVABLE_MEDIA_ACCESS ( USER, FAMILY,
{             REMOVABLE_MEDIA_ACCESS_NAME, ACCESS, STATUS)
{
{    user: (input)  This parameter identifies the name of the user whose
{          validation is to be interrogated.
{
{    family: (input)  This parameter identifies the name of the family whose
{          validation is to be interrogated.  The family may be a file served
{          family.
{
{    removable_media_access_name: (input)  This parameter identifies the name
{          of the removable media access validation.  The
{          REMOVABLE_MEDIA_ACCESS validation consists of a name and an access.
{          The access may be ALL, NONE, READ, WRITE, or READ and WRITE.
{
{    access: (output)  This parameter returns the access to which the user is
{          validated by the REMOVABLE_MEDIA_ACCESS.
{
{          If the value ALL is in the validation, the full set [fsc$append,
{          fsc$execute, fsc$modify, fsc$read, fsc$shorten] is returned.
{
{          If the value NONE is in the validation, an empty set is returned.
{
{          If the value READ is in the validation, the set [fsc$execute,
{          fsc$read] is returned.
{
{          If the value WRITE is in the validation, the set [fsc$append,
{          fsc$modify, fsc$shorten] is returned.
{
{    status: (output)  The status of the request.
