Quelltext der Seite Klasse Vorlage

[[Kategorie:Codeschnipsel]]

=== Definition ===
<syntaxhighlight lang="abap" line start="1">
CLASS lcl DEFINITION.
  PUBLIC SECTION.

    TYPES: tt_mat_range TYPE RANGE OF matnr.
    CLASS-DATA: gt_log TYPE bal_t_msg.
    CONSTANTS:
      BEGIN OF gcs_mode,
        single TYPE char01 VALUE 'S',
        multi  TYPE char01 VALUE 'M',
      END OF gcs_mode.

    METHODS constructor
      IMPORTING
                !iv_mode              TYPE char01
                !iv_test              TYPE abap_bool
      RAISING   zcx_bc_basic.

    METHODS get_mode
      RETURNING VALUE(rv_mode) TYPE char01.

  PRIVATE SECTION.
    DATA: _gv_mode                    TYPE char01,
          _gv_test                    TYPE abap_bool.

ENDCLASS.
</syntaxhighlight> 

<syntaxhighlight lang="abap" line start="26">
CLASS lcl IMPLEMENTATION.
 METHOD constructor.
  _gv_mode = iv_mode.
  _gv_test = iv_test.
 ENDMETHOD.

 METHOD get_mode.
  CLEAR rv_mode.
  rv_mode = _gv_mode.
 ENDMETHOD. 
ENDCLASS.
</syntaxhighlight>