Snapshot: new training tasks (balanced generation), docs
Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
19
tasks_gen/train/G1911/reference/hire.tabl.asabap
Normal file
19
tasks_gen/train/G1911/reference/hire.tabl.asabap
Normal file
@@ -0,0 +1,19 @@
|
||||
@EndUserText.label : 'Beach item hire'
|
||||
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
|
||||
@AbapCatalog.tableCategory : #TRANSPARENT
|
||||
@AbapCatalog.deliveryClass : #A
|
||||
@AbapCatalog.dataMaintenance : #RESTRICTED
|
||||
define table {{p}}hire {
|
||||
key client : abap.clnt not null;
|
||||
key hire_id : abap.numc(10) not null;
|
||||
kiosk_id : abap.char(6) not null;
|
||||
hire_date : abap.dats not null;
|
||||
item_type : abap.char(4);
|
||||
item_count : abap.int4;
|
||||
hire_days : abap.int4;
|
||||
@Semantics.amount.currencyCode : '{{p}}hire.currency_code'
|
||||
daily_rate : abap.dec(13,2);
|
||||
currency_code : abap.cuky;
|
||||
customer_name : abap.char(30);
|
||||
is_returned : abap.char(1);
|
||||
}
|
||||
76
tasks_gen/train/G1911/reference/hire_test.clas.abap
Normal file
76
tasks_gen/train/G1911/reference/hire_test.clas.abap
Normal file
@@ -0,0 +1,76 @@
|
||||
CLASS {{p}}hire_test DEFINITION PUBLIC FINAL CREATE PUBLIC
|
||||
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
|
||||
PRIVATE SECTION.
|
||||
CLASS-DATA go_env TYPE REF TO if_osql_test_environment.
|
||||
CLASS-METHODS class_setup.
|
||||
CLASS-METHODS class_teardown.
|
||||
METHODS setup.
|
||||
METHODS structure_ok FOR TESTING.
|
||||
METHODS stores_and_reads FOR TESTING.
|
||||
METHODS duplicate_is_rejected FOR TESTING.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
CLASS {{p}}hire_test IMPLEMENTATION.
|
||||
METHOD class_setup.
|
||||
go_env = cl_osql_test_environment=>create(
|
||||
i_dependency_list = VALUE #( ( '{{P}}HIRE' ) ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD class_teardown.
|
||||
go_env->destroy( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD setup.
|
||||
go_env->clear_doubles( ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD structure_ok.
|
||||
DATA(lo_struct) = CAST cl_abap_structdescr(
|
||||
cl_abap_typedescr=>describe_by_name( '{{P}}HIRE' ) ).
|
||||
DATA(lt_fields) = lo_struct->get_ddic_field_list( ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 11 act = lines( lt_fields ) ).
|
||||
READ TABLE lt_fields INTO DATA(ls_field) WITH KEY fieldname = 'HIRE_ID'.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 'X' act = ls_field-keyflag ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 10 act = CONV i( ls_field-leng ) ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD stores_and_reads.
|
||||
DATA ls_hire TYPE {{p}}hire.
|
||||
DATA lt_hire TYPE STANDARD TABLE OF {{p}}hire WITH EMPTY KEY.
|
||||
ls_hire-hire_id = '0000000001'.
|
||||
ls_hire-kiosk_id = 'K1'.
|
||||
ls_hire-hire_date = '20250701'.
|
||||
ls_hire-item_type = 'CHAI'.
|
||||
ls_hire-item_count = 2.
|
||||
ls_hire-hire_days = 3.
|
||||
ls_hire-daily_rate = '4.50'.
|
||||
ls_hire-currency_code = 'EUR'.
|
||||
ls_hire-customer_name = 'SMITH'.
|
||||
ls_hire-is_returned = 'X'.
|
||||
APPEND ls_hire TO lt_hire.
|
||||
go_env->insert_test_data( lt_hire ).
|
||||
|
||||
SELECT SINGLE kiosk_id, item_count, hire_days, daily_rate, is_returned
|
||||
FROM {{p}}hire
|
||||
WHERE hire_id = '0000000001'
|
||||
INTO @DATA(ls_read).
|
||||
|
||||
cl_abap_unit_assert=>assert_equals( exp = 'K1' act = ls_read-kiosk_id ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 2 act = ls_read-item_count ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 3 act = ls_read-hire_days ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = CONV decfloat34( '4.50' )
|
||||
act = CONV decfloat34( ls_read-daily_rate ) ).
|
||||
cl_abap_unit_assert=>assert_equals( exp = 'X' act = ls_read-is_returned ).
|
||||
ENDMETHOD.
|
||||
|
||||
METHOD duplicate_is_rejected.
|
||||
DATA ls_hire TYPE {{p}}hire.
|
||||
ls_hire-hire_id = '0000000002'.
|
||||
ls_hire-kiosk_id = 'K2'.
|
||||
ls_hire-hire_date = '20250702'.
|
||||
INSERT {{p}}hire FROM @ls_hire.
|
||||
INSERT {{p}}hire FROM @ls_hire.
|
||||
cl_abap_unit_assert=>assert_equals( exp = 4 act = sy-subrc ).
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
||||
Reference in New Issue
Block a user