Click above to get retro games delivered to your door ever month!

 UsrVolumeRestrictGet() / UsrVolumeRestrictSet()
------------------------------------------------------------------------------
 Purpose:
 Get or set the volume space restriction of a user.

 Syntax:
 dwVolRes = UsrVolumeRestrictGet( iVolNum, dwUserID )
 dwVolRes = UsrVolumeRestrictSet( iVolNum, dwUserID, cdwNewRes )

 Parameters:
 iVolNum  The volume number - 0 for the first volume, 1 for the second
 andso on.
 dwUserID The bindery ID number of the user.
 dwNewRes The new amount of space to which a user is restricted.

 Returns:
 A numeric value (unsigned long int).

 The CA-Clipper names for these functions are:
 UsrVolResGet() / UsrVolResSet()

 Description:
 UsrVolumeRestrictGet() returns the number of disk blocks a user is
 restricted to on the specified volume. iVolNum is the volume number and
 dwUserID is the bindery object ID number of the user.

 UsrVolumeRestrictSet() sets the number of disk blocks that the user is
 restricted to on the specified volume to dwNewRes and returns the previous
 restriction.

 Returns a value representing the number of blocks on the specified volume,
 NOVNOVOLRES if no restriction applies or NOVERRLONG if an error occurs.

 Example:
 // To return how much volume space KATIE is allowed on volume SYS (0):
 dwUserRes = UsrVolumeRestrictGet( 0, UsrIDGet( "KATIE" ) )
 do case
    case dwUserRes > 0
       ? "User KATIE is restricted to ", dwUserRes
       ?? "blocks on volume 0"
    case dwUserRes = NOVNOVOLRES
       ? "User KATIE has unrestricted disk space on volume 0"
    otherwise
       ? "Error"
 endcase
 // To set user PETE's allowed space on volume 0 (SYS) to 4000 blocks:
 UsrVolumeRestrictSet( 0, UsrIDGet( "PETE" ), 4000 )
 dwBlocks = UsrVolumeRestrictGet( 0, UsrIDGet( "PETE" ) )
 iBlocksize = VolBlockSizeGet( 0 )
 dwTotalspace = dwBlocks * iBlocksize
 ? "User Pete is restricted to ", dwBlocks, " blocks on volume 0 "
 ?? "which amounts to ", dwTotalspace, " bytes"

 Notes:
 These functions only work with NetWare 386 and require Supervisor
 equivalence. The block size normally defaults to 4Kb and varies between 4Kb
 and 16Kb depending on the setup of the file server. If the configured block
 size of the file server is 4Kb (4096) and a user is restricted to 1000
 blocks, the actual space is 4,096,000 bytes.

 The block size in bytes of the specified volume is returned by the function
 VolBlockSizeGet().