Restore faz1/yol-haritasi docs (overwritten by copy); stage1 docs; G0174 new gap; stage1 25-task subset
Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
This commit is contained in:
82
tasks_gen/eval/G0144/seed/museum_fee_old.func.abap
Normal file
82
tasks_gen/eval/G0144/seed/museum_fee_old.func.abap
Normal file
@@ -0,0 +1,82 @@
|
||||
FUNCTION {{p}}museum_fee_old
|
||||
IMPORTING
|
||||
iv_visitor TYPE string
|
||||
iv_day TYPE string
|
||||
iv_size TYPE i
|
||||
iv_member TYPE abap_bool
|
||||
EXPORTING
|
||||
ev_fee TYPE decfloat34
|
||||
ev_note TYPE string
|
||||
EXCEPTIONS
|
||||
invalid_input.
|
||||
|
||||
DATA lv_base TYPE decfloat34.
|
||||
DATA lv_total TYPE decfloat34.
|
||||
|
||||
IF iv_size <= 0.
|
||||
RAISE invalid_input.
|
||||
ENDIF.
|
||||
|
||||
IF iv_visitor = 'ADULT'.
|
||||
lv_base = 12.
|
||||
ELSEIF iv_visitor = 'CHILD'.
|
||||
lv_base = 6.
|
||||
ELSEIF iv_visitor = 'SENIOR'.
|
||||
lv_base = 8.
|
||||
ELSEIF iv_visitor = 'STUDENT'.
|
||||
lv_base = 7.
|
||||
ELSEIF iv_visitor = 'FAMILY'.
|
||||
lv_base = 30.
|
||||
ELSE.
|
||||
RAISE invalid_input.
|
||||
ENDIF.
|
||||
|
||||
IF iv_visitor = 'FAMILY'.
|
||||
IF iv_size <= 4.
|
||||
lv_total = 30.
|
||||
ELSE.
|
||||
lv_total = 30 + ( iv_size - 4 ) * 6.
|
||||
ENDIF.
|
||||
ELSE.
|
||||
lv_total = lv_base * iv_size.
|
||||
ENDIF.
|
||||
|
||||
IF iv_day = 'SAT'.
|
||||
lv_total = lv_total * '1.2'.
|
||||
ELSEIF iv_day = 'SUN'.
|
||||
lv_total = lv_total * '1.2'.
|
||||
ENDIF.
|
||||
|
||||
IF iv_member = abap_true.
|
||||
lv_total = lv_total - 10.
|
||||
IF lv_total < 0.
|
||||
lv_total = 0.
|
||||
ENDIF.
|
||||
ENDIF.
|
||||
|
||||
IF iv_size >= 10.
|
||||
lv_total = lv_total * '0.9'.
|
||||
ENDIF.
|
||||
|
||||
ev_fee = lv_total.
|
||||
|
||||
IF iv_visitor = 'ADULT'.
|
||||
ev_note = 'Adult'.
|
||||
ELSEIF iv_visitor = 'CHILD'.
|
||||
ev_note = 'Child'.
|
||||
ELSEIF iv_visitor = 'SENIOR'.
|
||||
ev_note = 'Senior'.
|
||||
ELSEIF iv_visitor = 'STUDENT'.
|
||||
ev_note = 'Student'.
|
||||
ELSEIF iv_visitor = 'FAMILY'.
|
||||
ev_note = 'Family'.
|
||||
ENDIF.
|
||||
|
||||
IF iv_member = abap_true.
|
||||
ev_note = ev_note && ' member'.
|
||||
ENDIF.
|
||||
|
||||
IF iv_size >= 10.
|
||||
ev_note = ev_note && ' group'.
|
||||
ENDIF.
|
||||
ENDFUNCTION.
|
||||
Reference in New Issue
Block a user