/*------------------------------------------------------------------------
    File        : 99bottles.p
    Purpose     : http://www.99-bottles-of-beer.net/
    Description : 99 bottles of beer
    Author(s)   : Elwin van der Meer
                : elwin@star-lite.nl
                : http://www.star-lite.nl
    Created     : Fri Jan 11 13:31:49 CET 2008
  ----------------------------------------------------------------------*/
DEFINE VARIABLE amountofbottles AS INTEGER NO-UNDO INITIAL 99.
&GLOBAL-DEFINE bbm bottles of beer
&GLOBAL-DEFINE bbs bottle of beer
&GLOBAL-DEFINE otw on the wall
&GL