gb20

method get_locked_stock.
    data: lv_arg           type seqg3-gtarg,
          lt_enq           type table of seqg3,
          ls_enq           like line of lt_enq,

          lv_string        type string,

          ls_zeg_stock_enq type zeg_stock_enq.

    clear: e_locked_by_me, e_locked_by_others.

gb20

class ZCL_ZTEST_TBL_DPC_EXT implementation.
  method /iwbep/if_mgw_appl_srv_runtime~get_entity.
    data: lv_done.

    cl_fis_shlp_processor=>get_entity(
      exporting
        io_tech_request_context  = io_tech_request_context
        ir_request_details       = me->mr_request_details
      importing
        ev_done                  = lv_done

gb20

*&---------------------------------------------------------------------*
*& Report  ZMM35BWART2MTYPE_MNT
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

report zmm35bwart2mtype_mnt.

gb20

form get_etext using iv_fieldname changing ev_text.
  data: lt_fieldlist type table of d021s.

  clear ev_text.

  call function 'RS_SCRP_GET_SCREEN_INFOS'
    exporting
      dynnr                 = sy-dynnr
      progname              = sy-cprog
    tables

gb20

REPORT ztst_subroute_call.

CLASS lcl_class DEFINITION.
  PUBLIC SECTION.
    CLASS-METHODS:
      call_subroute.
ENDCLASS.

CLASS lcl_class IMPLEMENTATION.
  METHOD call_subroute.