FUNCTION SPOPORDER()

  Short:
  ------
  SPOPORDER() Popup allows user to change viewing (index) order

  Returns:
  --------
  <nOrder> => current index order

  Syntax:
  -------
  SPOPORDER()

  Description:
  ------------
  Pops up a list of current index keys, with first
  option being <Natural (record) order>. If an index order is
  selected, index order is set to that order. Current index order (after
  selection and change) is returned.

  Examples:
  ---------
   nIndexOrd := spoporder()

  Source:
  -------
  S_POPORD.PRG