/* Example 1: This procedure call (attached to a menu item)
** plays a sound object from the specified sound item:
*/
   GO_ITEM('about.abc_inc');
   PLAY_SOUND('about.abc_inc');

/* Example 2: These procedure calls (attached to a
** When-Button-Pressed trigger) read a sound object from the
** file system and play it. Note: since an item must have focus
** in order to play a sound, the trigger code includes a call
** to the built-in procedure GO_ITEM:
*/
BEGIN
   IF :clerks.last_name = 'BARNES' THEN
      GO_ITEM ('orders.filled_by');
      READ_SOUND_FILE ('t:\orders\clerk\barnes.wav', 'wave',
                       'orders.filled_by');
      PLAY_SOUND ('orders.filled_by');
   END IF;
END;