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

 ItmPropertyStringGet() / ItmPropertyStringSet()
------------------------------------------------------------------------------
 Warning:
 USE WITH EXTREME CAUTION.

 Serious damage can be done to the bindery if misused.

 Purpose:
 Get or set an item property value as a string.

 Syntax:
 lpszValue = ItmPropertyStringGet(lpszObjName,iObjType,lpszPropName,iSegment)
 lpszValue = ItmPropertyStringSet(lpszObjName,iObjType,lpszPropName,iSegment,
             lpszNewValue )

 Parameters:
 lpszObjName  The object name.
 iObjType     The object type.
 lpszPropName The property name.
 iSegment     The segment number.
 lpszNewValue The new property value.

 Returns:
 A character string of up to 128 characters.

 The CA-Clipper names for these functions are:
 ItmPrpStrGet() / ItmPrpStrSet()

 Description:
 ItmPropertyStringGet() returns a string containing the specified property
 value up to and including the first NULL character. lpszObjName is the
 object name and iObjType its type. lpszPropName is the property name and
 iSegment is the segment.

 ItmPropertyStringSet() sets the property value to lpszNewValue and returns
 the previous setting if successful or an empty string if an error occurs.
 Property values are split into segments of 128 bytes each. While many are
 stored in binary form, some properties, such as IDENTIFICATION contain
 information in NULL terminated string form.

 These functions should only be used to manipulate properties that are
 stored in NULL terminated string form. The functions ItmPropertyValueGet()
 and ItmPropertyValueSet() should be used for manipulating binary property
 values.

 Example:
 // To change the full name of user JIM to Jim Smith, which
 // will be a string contained in segment 1 of a property called
 // IDENTIFICATION:
 lpszOldName = ItmPropertyStringSet("JIM", OT_USER,"IDENTIFICATION",;
               1,"Jim Smith" )
 lpszNewName = ItmPropertyStringGet("JIM", OT_USER,"IDENTIFICATION",1)
 if ( !empty( lpszNewName ) )
    ? "User JIM's full name is now", NewName
 endif

 Notes:
 For more information on properties and their values, see Bindery
 Functions, Chapter 3.

 May require Supervisor equivalence.