*&---------------------------------------------------------------------*
*&  Include           YXA006_OOP_SEL
*&---------------------------------------------------------------------*

CLASS document DEFINITION.
  PUBLIC SECTION.
    CLASS-DATA numdocuments TYPE i READ-ONLY.
    DATA  doc_number TYPE num06 READ-ONLY .
    DATA      date TYPE date READ-ONLY .
    DATA      doc_type TYPE char01 READ-ONLY .

    METHODS constructor
      IMPORTING docnumber TYPE i OPTIONAL
                date      TYPE date OPTIONAL
                doctype   TYPE doc_type OPTIONAL
      .

    METHODS set_doc_number
      IMPORTING docnumber TYPE i.

    METHODS set_date
      IMPORTING newdate TYPE dte
      .

    METHODS display_doc.


ENDCLASS.


CLASS document IMPLEMENTATION.
  METHOD constructor.

  ENDMETHOD.
  METHOD set_doc_number.

  ENDMETHOD.
  METHOD set_date.

  ENDMETHOD.
  METHOD display_doc.

  ENDMETHOD.

ENDCLASS.