/* BookMagik Commodity demo and documentation script */

/****** BookMagikCx/IMPORT **************************************

   NAME
      IMPORT

   SYNOPSIS
      result = IMPORT FROM/A,TYPE/N/A

   FUNCTION
      Imports the specified addressbook type to the aml addressbook

   INPUTS
      from - file to import
      type - file type to import

   RESULT
     result = 1 for success, 0 for failure

**************************************************************************

*/

/****** BookMagikCx/HIDE **************************************

   NAME
      HIDE

   SYNOPSIS
      result = HIDE

   FUNCTION
      hides the application window

   INPUTS
      none

   RESULT
     result - returns FALSE if not successful

**************************************************************************

*/

/****** BookMagikCx/UNHIDE **************************************

   NAME
      UNHIDE

   SYNOPSIS
      result = UNHIDE

   FUNCTION
      restores the application window

   INPUTS
      none

   RESULT
      result - returns FALSE if not successful

**************************************************************************

*/

/****** BookMagikCx/ICONIFY **************************************

   NAME
      ICONIFY

   SYNOPSIS
      result = ICONIFY

   FUNCTION
      iconifies the application

   INPUTS
      none

   RESULT
      1 if successful, 0 for failure

**************************************************************************

*/

/****** BookMagikCx/UNICONIFY **************************************

   NAME
      UNICONIFY

   SYNOPSIS
      result = UNICONIFY

   FUNCTION
      uniconifies the application

   INPUTS
      none

   RESULT
      result - 1 if successful, 0 for failure

**************************************************************************

*/

/****** BookMagikCx/VERSION **************************************
   NAME
      VERSION

   SYNOPSIS
      result = VERSION

   FUNCTION
      returns the version string

   INPUTS
      none

   RESULT
      result - returns the version string of BookMagikCx

**************************************************************************

*/

/****** BookMagikCx/AUTHOR **************************************
   NAME
      AUTHOR

   SYNOPSIS
      result = AUTHOR

   FUNCTION
      returns the author information

   INPUTS
      none

   RESULT
      result - returns the author string of BookMagikCx

**************************************************************************

*/

/****** BookMagikCx/QUIT **************************************

   NAME
      QUIT

   SYNOPSIS
      void = QUIT

   FUNCTION
      quits the application

   INPUTS
      none

   RESULT
      none

**************************************************************************

*/

options results

ADDRESS BookMagik.1

say 'Hiding..'
HIDE

Call mywait()
say 'UnHiding..'
UNHIDE

Call mywait()
say 'Iconify..'
ICONIFY

Call mywait()
say 'UnIconify..'
UNICONIFY

Call mywait()
VERSION
say 'Version: 'RESULT

Call mywait()
AUTHOR
say ' Author: 'RESULT

Call mywait()
say 'Quitting..'
QUIT

exit

mywait: procedure
   address command 'c:wait 2'
   return