CLASS {{p}}tool_master DEFINITION PUBLIC FINAL CREATE PUBLIC.
  PUBLIC SECTION.
    TYPES ty_tool_id TYPE c LENGTH 10.
    CLASS-METHODS is_valid_tool
      IMPORTING iv_tool_id      TYPE ty_tool_id
      RETURNING VALUE(rv_valid) TYPE abap_bool.
ENDCLASS.


CLASS {{p}}tool_master IMPLEMENTATION.
  METHOD is_valid_tool.
    DATA(lv_tool_id) = to_upper( replace( val = iv_tool_id sub = ` ` with = `` occ = 0 ) ).
    CASE lv_tool_id.
      WHEN 'DRILL' OR 'SAW' OR 'GRINDER' OR 'WRENCH' OR 'SANDER' OR 'RIVETER'.
        rv_valid = abap_true.
      WHEN OTHERS.
        rv_valid = abap_false.
    ENDCASE.
  ENDMETHOD.
ENDCLASS.