Snapshot: new training tasks (balanced generation), docs

Co-Authored-By: Claude Sonnet 5.5 <noreply@anthropic.com>
This commit is contained in:
Kral
2026-10-05 22:08:59 +02:00
parent eb13453097
commit 6984fc7917
572 changed files with 30024 additions and 0 deletions

View File

@@ -0,0 +1,6 @@
@EndUserText.label : 'Service job base fields'
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
define structure {{p}}svc_base {
created_by : abap.char(12);
created_on : abap.dats;
}

View File

@@ -0,0 +1,14 @@
@EndUserText.label : 'Service job line type'
@AbapCatalog.enhancement.category : #NOT_EXTENSIBLE
define structure {{p}}svc_job {
created_by : abap.char(12);
created_on : abap.dats;
job_id : abap.char(10);
work_hours : abap.dec(5,2);
calc_mode : abap.char(2);
order_ref : abap.char(12);
service_date : abap.dats;
part_count : abap.int4;
group_code : abap.char(4);
net_value : abap.dec(13,2);
}

View File

@@ -0,0 +1,55 @@
CLASS {{p}}svc_job_test DEFINITION PUBLIC FINAL CREATE PUBLIC
FOR TESTING DURATION SHORT RISK LEVEL HARMLESS.
PRIVATE SECTION.
METHODS structure_exists FOR TESTING.
METHODS field_count FOR TESTING.
METHODS net_value_type FOR TESTING.
METHODS base_created_by_type FOR TESTING.
ENDCLASS.
CLASS {{p}}svc_job_test IMPLEMENTATION.
METHOD structure_exists.
DATA lo_descr TYPE REF TO cl_abap_typedescr.
TRY.
lo_descr = cl_abap_typedescr=>describe_by_name( '{{P}}SVC_JOB' ).
CATCH cx_root.
CLEAR lo_descr.
ENDTRY.
cl_abap_unit_assert=>assert_bound( act = lo_descr ).
ENDMETHOD.
METHOD field_count.
DATA lo_structdescr TYPE REF TO cl_abap_structdescr.
DATA lt_fields TYPE ddfields.
lo_structdescr ?= cl_abap_typedescr=>describe_by_name( '{{P}}SVC_JOB' ).
lt_fields = lo_structdescr->get_ddic_field_list( ).
DELETE lt_fields WHERE fieldname CP '.*'.
cl_abap_unit_assert=>assert_equals( exp = 10 act = lines( lt_fields ) ).
ENDMETHOD.
METHOD net_value_type.
DATA lo_structdescr TYPE REF TO cl_abap_structdescr.
DATA lt_fields TYPE ddfields.
DATA ls_field TYPE dfies.
lo_structdescr ?= cl_abap_typedescr=>describe_by_name( '{{P}}SVC_JOB' ).
lt_fields = lo_structdescr->get_ddic_field_list( ).
READ TABLE lt_fields INTO ls_field WITH KEY fieldname = 'NET_VALUE'.
cl_abap_unit_assert=>assert_equals( exp = `DEC`
act = CONV string( ls_field-datatype ) ).
cl_abap_unit_assert=>assert_equals( exp = 13 act = ls_field-leng ).
cl_abap_unit_assert=>assert_equals( exp = 2 act = ls_field-decimals ).
ENDMETHOD.
METHOD base_created_by_type.
DATA lo_structdescr TYPE REF TO cl_abap_structdescr.
DATA lt_fields TYPE ddfields.
DATA ls_field TYPE dfies.
lo_structdescr ?= cl_abap_typedescr=>describe_by_name( '{{P}}SVC_BASE' ).
lt_fields = lo_structdescr->get_ddic_field_list( ).
READ TABLE lt_fields INTO ls_field WITH KEY fieldname = 'CREATED_BY'.
cl_abap_unit_assert=>assert_equals( exp = `CHAR`
act = CONV string( ls_field-datatype ) ).
cl_abap_unit_assert=>assert_equals( exp = 12 act = ls_field-leng ).
ENDMETHOD.
ENDCLASS.