REPORT  z_99_bottles_of_beer.
*&---------------------------------------------------------------------*
*& Author: Dominik Ritter                                              *
*& Sprache: ABAP-Objects                                               *
*& Version: SAP R/3 4.6c
*&---------------------------------------------------------------------*

CLASS shelf DEFINITION.
  PUBLIC SECTION.
    METHODS:  constructor      IMPORTING value(bottles) TYPE i,
              take_bottles     IMPORTING value(n) TYPE i,