diff --git a/src/zif_trm.intf.abap b/src/zif_trm.intf.abap index 62e4ca2..9f06c66 100644 --- a/src/zif_trm.intf.abap +++ b/src/zif_trm.intf.abap @@ -1,6 +1,6 @@ INTERFACE zif_trm PUBLIC . - CONSTANTS version TYPE string VALUE '2.0.0' ##NO_TEXT. + CONSTANTS version TYPE string VALUE '2.0.1' ##NO_TEXT. ENDINTERFACE. diff --git a/src/ztrm.fugr.xml b/src/ztrm.fugr.xml index 83e9541..acc9163 100644 --- a/src/ztrm.fugr.xml +++ b/src/ztrm.fugr.xml @@ -1645,12 +1645,20 @@ EV_VERSION STRING + + EV_REST + STRING + EV_VERSION P + + EV_REST + P + diff --git a/src/ztrm.fugr.ztrm_version.abap b/src/ztrm.fugr.ztrm_version.abap index 6b35fbf..a92538c 100644 --- a/src/ztrm.fugr.ztrm_version.abap +++ b/src/ztrm.fugr.ztrm_version.abap @@ -1,8 +1,9 @@ -FUNCTION ZTRM_VERSION. +FUNCTION ztrm_version. *"---------------------------------------------------------------------- *"*"Local Interface: *" EXPORTING *" VALUE(EV_VERSION) TYPE STRING +*" VALUE(EV_REST) TYPE STRING *"---------------------------------------------------------------------- "Avoid raising TRM_RFC_UNAUTHORIZED "otherwise clients may not be able to find out if this system has @@ -10,5 +11,11 @@ FUNCTION ZTRM_VERSION. ev_version = zif_trm=>version. + "read other versions + FIELD-SYMBOLS TYPE string. + ASSIGN ('ZIF_TRM_REST')=>('VERSION') TO . + IF IS ASSIGNED. + ev_rest = . + ENDIF. ENDFUNCTION.