diff --git a/CHANGELOG.md b/CHANGELOG.md index 9e0662c..437530e 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -1,3 +1,6 @@ +v 1.3.0 +- Added SET-/GET-Parameter ZCDS_ALV_NO_MAX to allow unrestricted selection as personal default setting. + v 1.2.0 - New version to stay in sync with the S/4 Edition, which gets some RAP support. diff --git a/src/zcds_alv_no_max.dtel.xml b/src/zcds_alv_no_max.dtel.xml new file mode 100644 index 0000000..61dd872 --- /dev/null +++ b/src/zcds_alv_no_max.dtel.xml @@ -0,0 +1,37 @@ + + + + + + ZCDS_ALV_NO_MAX + E + XFELD + ZCDS_ALV_NO_MAX + 55 + 10 + 20 + 40 + Flag: No restriction + No restriction + No restr. + No restriction + No restriction + D + D + + + D + + + + D + Kennzeichen: Keine Beschränkung + Keine Beschränkung + K. Beschr. + Keine Beschränkung + Keine Beschränkung + + + + + diff --git a/src/zcds_alv_no_max.para.xml b/src/zcds_alv_no_max.para.xml new file mode 100644 index 0000000..b7803d2 --- /dev/null +++ b/src/zcds_alv_no_max.para.xml @@ -0,0 +1,15 @@ + + + + + + ZCDS_ALV_NO_MAX + + + ZCDS_ALV_NO_MAX + E + Default: No restriction for selection + + + + diff --git a/src/zcl_cds_alv_report_strategy.clas.abap b/src/zcl_cds_alv_report_strategy.clas.abap index 1fc9e2a..46c47d8 100644 --- a/src/zcl_cds_alv_report_strategy.clas.abap +++ b/src/zcl_cds_alv_report_strategy.clas.abap @@ -335,7 +335,7 @@ CLASS ZCL_CDS_ALV_REPORT_STRATEGY IMPLEMENTATION. " Default parameters APPEND LINES OF VALUE zcds_alv_source_lines( ( |PARAMETERS p_maxrec TYPE ddshmaxrec DEFAULT 500 MODIF ID max.| ) - ( |PARAMETERS p_no_max TYPE xfeld USER-COMMAND no_max. | ) + ( |PARAMETERS p_no_max TYPE zcds_alv_no_max USER-COMMAND no_max.| ) ( |SELECTION-SCREEN SKIP. | ) ( |PARAMETERS p_selext TYPE zcds_alv_report_extension_name AS LISTBOX visible length 40 USER-COMMAND switch_sel MODIF ID sel.| ) ( |PARAMETERS p_disext TYPE zcds_alv_report_extension_name AS LISTBOX visible length 40 USER-COMMAND switch_dis MODIF ID dis.| ) @@ -373,14 +373,16 @@ CLASS ZCL_CDS_ALV_REPORT_STRATEGY IMPLEMENTATION. append_initial_line. " INITIALIZATION - APPEND LINES OF VALUE zcds_alv_source_lines( ( |INITIALIZATION. | ) - ( | sy-title = title. | ) - ( | | ) - ( | TRY. | ) - ( | controller->initialization( ). | ) - ( | CATCH zcx_cds_alv_message INTO message. | ) - ( | MESSAGE message TYPE 'I' DISPLAY LIKE 'E'.| ) - ( | ENDTRY. | ) ) TO r_program-source_lines. + APPEND LINES OF VALUE zcds_alv_source_lines( ( |INITIALIZATION. | ) + ( | sy-title = title. | ) + ( | | ) + ( | GET PARAMETER ID 'ZCDS_ALV_NO_MAX' FIELD p_no_max.| ) + ( | | ) + ( | TRY. | ) + ( | controller->initialization( ). | ) + ( | CATCH zcx_cds_alv_message INTO message. | ) + ( | MESSAGE message TYPE 'I' DISPLAY LIKE 'E'. | ) + ( | ENDTRY. | ) ) TO r_program-source_lines. append_initial_line. " AT SELECTION-SCREEN OUTPUT diff --git a/src/zcl_cds_alv_version.clas.abap b/src/zcl_cds_alv_version.clas.abap index 1431026..d695e5b 100644 --- a/src/zcl_cds_alv_version.clas.abap +++ b/src/zcl_cds_alv_version.clas.abap @@ -1,6 +1,6 @@ CLASS zcl_cds_alv_version DEFINITION PUBLIC ABSTRACT FINAL CREATE PUBLIC. PUBLIC SECTION. - CONSTANTS version TYPE string VALUE '1.2.0' ##NO_TEXT. + CONSTANTS version TYPE string VALUE '1.3.0' ##NO_TEXT. PROTECTED SECTION. PRIVATE SECTION. ENDCLASS.