Step F first pass: 81/92 accepted; budget floor 60 calls; rejected slots moved for regeneration

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_014aUaQeLnwbb1zTpN7kHeat
This commit is contained in:
Kral
2026-10-03 12:10:52 +02:00
parent d3250acfb8
commit 39769afce8
741 changed files with 40573 additions and 317 deletions

View File

@@ -0,0 +1,27 @@
CLASS {{p}}cx_donor_check DEFINITION
PUBLIC
INHERITING FROM cx_static_check
FINAL
CREATE PUBLIC.
PUBLIC SECTION.
DATA mv_reason TYPE string READ-ONLY.
DATA mv_retry_days TYPE i READ-ONLY.
METHODS constructor
IMPORTING
iv_reason TYPE string
iv_retry_days TYPE i DEFAULT 0.
ENDCLASS.
CLASS {{p}}cx_donor_check IMPLEMENTATION.
METHOD constructor.
super->constructor( ).
mv_reason = iv_reason.
mv_retry_days = iv_retry_days.
ENDMETHOD.
ENDCLASS.

View File

@@ -0,0 +1,37 @@
FUNCTION {{p}}donor_check
IMPORTING
iv_age TYPE i
iv_weight TYPE decfloat34
iv_hb TYPE decfloat34
iv_days_since_last TYPE i
RAISING
{{p}}cx_donor_check.
IF iv_age < 0 OR iv_weight < 0 OR iv_hb < 0 OR iv_days_since_last < 0.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'INVALID_INPUT'.
ELSEIF iv_age < 18.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'TOO_YOUNG'.
ELSEIF iv_age > 65.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'TOO_OLD'.
ELSEIF iv_weight < 50.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'UNDERWEIGHT'.
ELSEIF iv_hb < '12.5'.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'LOW_HB'.
ELSEIF iv_days_since_last < 56.
RAISE EXCEPTION TYPE {{p}}cx_donor_check
EXPORTING
iv_reason = 'TOO_SOON'
iv_retry_days = 56 - iv_days_since_last.
ENDIF.
ENDFUNCTION.

View File

@@ -0,0 +1,71 @@
CLASS {{p}}t14_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS run_check
IMPORTING
iv_age TYPE i
iv_weight TYPE decfloat34
iv_hb TYPE decfloat34
iv_days TYPE i
EXPORTING
ev_reason TYPE string
ev_retry TYPE i.
METHODS eligible_donor FOR TESTING.
METHODS rejects_too_young FOR TESTING.
METHODS rejects_low_hb FOR TESTING.
METHODS rejects_too_soon FOR TESTING.
METHODS rejects_invalid FOR TESTING.
ENDCLASS.
CLASS {{p}}t14_test IMPLEMENTATION.
METHOD run_check.
CLEAR: ev_reason, ev_retry.
TRY.
CALL FUNCTION '{{P}}DONOR_CHECK'
EXPORTING
iv_age = iv_age
iv_weight = iv_weight
iv_hb = iv_hb
iv_days_since_last = iv_days.
CATCH {{p}}cx_donor_check INTO DATA(lx_check).
ev_reason = lx_check->mv_reason.
ev_retry = lx_check->mv_retry_days.
ENDTRY.
ENDMETHOD.
METHOD eligible_donor.
run_check( EXPORTING iv_age = 30 iv_weight = 70 iv_hb = 14 iv_days = 200
IMPORTING ev_reason = DATA(lv_reason) ).
cl_abap_unit_assert=>assert_initial( act = lv_reason ).
ENDMETHOD.
METHOD rejects_too_young.
run_check( EXPORTING iv_age = 17 iv_weight = 70 iv_hb = 14 iv_days = 200
IMPORTING ev_reason = DATA(lv_reason) ).
cl_abap_unit_assert=>assert_equals( exp = 'TOO_YOUNG' act = lv_reason ).
ENDMETHOD.
METHOD rejects_low_hb.
run_check( EXPORTING iv_age = 30 iv_weight = 70 iv_hb = 12 iv_days = 200
IMPORTING ev_reason = DATA(lv_reason) ).
cl_abap_unit_assert=>assert_equals( exp = 'LOW_HB' act = lv_reason ).
ENDMETHOD.
METHOD rejects_too_soon.
run_check( EXPORTING iv_age = 30 iv_weight = 70 iv_hb = 14 iv_days = 20
IMPORTING ev_reason = DATA(lv_reason) ev_retry = DATA(lv_retry) ).
cl_abap_unit_assert=>assert_equals( exp = 'TOO_SOON' act = lv_reason ).
cl_abap_unit_assert=>assert_equals( exp = 36 act = lv_retry ).
ENDMETHOD.
METHOD rejects_invalid.
run_check( EXPORTING iv_age = 30 iv_weight = -1 iv_hb = 14 iv_days = 200
IMPORTING ev_reason = DATA(lv_reason) ).
cl_abap_unit_assert=>assert_equals( exp = 'INVALID_INPUT' act = lv_reason ).
ENDMETHOD.
ENDCLASS.