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

 ItmPropertyByteGet() / ItmPropertyByteSet()
------------------------------------------------------------------------------
 Warning:
 USE WITH EXTREME CAUTION.

 Serious damage can be done to the bindery if misused.

 Purpose:
 Get or set a byte in an item property value.

 Syntax:
 wASCVal = ItmPropertyByteGet(lpszObjName, iObjType, lpszPropName, iOffset)
 wASCVal = ItmPropertyByteSet(lpszObjName, iObjType, lpszPropName, iOffset,
           lpszNewByte )

 Parameters:
 lpszObjName  The object name.
 iObjType     The object type.
 lpszPropName The property name.
 iOffset      The offset into the value.
 lpszNewByte  The new byte value.

 Returns:
 A numeric value (unsigned short int).

 The CA-Clipper names for these functions are:
 ItmPrpBytGet() / ItmPrpBytSet()

 Description:
 ItmPropertyByteGet() returns a single byte from the specified property
 value of an object. lpszObjName is the object name and iObjType its type.
 lpszPropName is the name of the property and iOffset is the offset into
 the property value containing the byte. A property value can contain
 straight binary information, therefore it may be useful to change
 specific portions of the value.

 ItmPropertyByteSet() changes the byte at iOffset to lpszNewByte, and
 returns the old byte value (range 0 to 255), or NOVERRINT if an error
 occurs.

 Example:
 // To change the number of grace logins user DAVE is allowed to 3.
 // Grace logins is a single byte contained in a property called
 // LOGIN_CONTROL; its exact position is offset 7:
 iOldGrace=ItmPropertyByteSet("DAVE", OT_USER, "LOGIN_CONTROL", 7, CHR(3))
 iNewGrace=ItmPropertyByteGet("DAVE", OT_USER, "LOGIN_CONTROL", 7)
 if ( iNewGrace != NOVERRINT )
    ? "User DAVE's new grace login count is", iNewGrace
 endif

 Notes:
 For more information on properties, their values and how they are
 constructed, please refer to Bindery Functions, Chapter 3.

 May require Supervisor equivalence.