FUNCTION z_util_src_compress. *"---------------------------------------------------------------------- *"*"Lokale Schnittstelle: *" IMPORTING *" REFERENCE(IT_SRC) TYPE TABLE *" REFERENCE(IV_COMPRESS_BETTER) TYPE FLAG OPTIONAL *" EXPORTING *" REFERENCE(ET_COMPRESSED) TYPE TABLE *"---------------------------------------------------------------------- *&---------------------------------------------------------------------* *& Function Module Z_UTIL_SRC_COMPRESS * *& * *&---------------------------------------------------------------------* *& * *& This program is free software: you can redistribute it and/or * *& modify it under the terms of the GNU General Public License as * *& published by the Free Software Foundation, either version 3 of the * *& License, or any later version. * *& * *& This program is distributed in the hope that it will be useful, * *& but WITHOUT ANY WARRANTY; without even the implied warranty of * *& MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. * *& See the GNU General Public License for more details. * *& * *& You should have received a copy of the GNU General Public License * *& along with this program. If not, see .* *& * *&---------------------------------------------------------------------* *& * *& Author: Ruediger von Creytz ruediger.creytz@globalbit.net * *& Copyright: globalBIT, LLC http://www.globalbit.net * *& Version: 20210302 * *& * *&---------------------------------------------------------------------* REFRESH et_compressed. PERFORM get_src_compressed USING it_src iv_compress_better CHANGING et_compressed. ENDFUNCTION.