03ab36149e
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
21 lines
630 B
ABAP
21 lines
630 B
ABAP
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.
|