39769afce8
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
21 lines
498 B
ABAP
21 lines
498 B
ABAP
CLASS {{p}}cx_claim_currency DEFINITION
|
|
PUBLIC
|
|
INHERITING FROM {{p}}cx_claim_error
|
|
FINAL
|
|
CREATE PUBLIC.
|
|
|
|
PUBLIC SECTION.
|
|
DATA mv_currency TYPE {{p}}if_expense_claim=>ty_currency READ-ONLY.
|
|
|
|
METHODS constructor
|
|
IMPORTING iv_currency TYPE {{p}}if_expense_claim=>ty_currency.
|
|
ENDCLASS.
|
|
|
|
|
|
CLASS {{p}}cx_claim_currency IMPLEMENTATION.
|
|
METHOD constructor.
|
|
super->constructor( iv_message = 'Currency is not supported' ).
|
|
mv_currency = iv_currency.
|
|
ENDMETHOD.
|
|
ENDCLASS.
|