Limit the matnr matchcode in MMBE (4.7)

Question

I've been researching this and I'm not finding useful answers.
We have a client which uses release 4.7, and has requested that we limit the F4 help for MATNR in transaction MMBE.
MMBE uses the logical database MSM, and in it's selection screen it uses table view MARAV-MATNR with matchode object MAT1.  We already have table T023-BEGRU filled and are trying to use authorization object M_MATE_WGR to limit the materials the use can see in the matchcode.
Is there any way to copy that matchcode object into a Z one so that we can apply it in MSM ? Is this the way to go?
Any pointers and ideas will be appreciated.

Answer 1

I've been playing a little with the user exit that can be configured at TCODE OMSH, and at the SELECT step I execute this form.
If I use the function F4UT_RESULTS_MAP, I get a record_tab with 288 empty records. If I append manually to record_tab I get an empty help exit which says 288 records but shows nothing. I tried with or without the source structure (declared the same way as ls_data). I've also added fields SPRAS and MAKTG in tcode OMSH.
I think I'm missing something simple, but I can't figure out what it is.
        DATA: ls_t023 TYPE t023,
        lt_t023 TYPE STANDARD TABLE OF t023,
        BEGIN OF ls_data,
          maktg TYPE makt-maktg,
          matnr TYPE mara-matnr,
          spras TYPE makt-spras,
        END OF ls_data,
        lv_pos LIKE sy-tabix,
        v_tabix like sy-tabix,
        lt_data LIKE STANDARD TABLE OF ls_data,
        wa_fielddescr type dfies.
  SELECT *
    INTO TABLE lt_t023
    FROM t023.
  LOOP AT lt_t023 INTO ls_t023.
    AUTHORITY-CHECK OBJECT 'M_MATE_WGR'
             ID 'ACTVT' DUMMY
             ID 'BEGRU' FIELD ls_t023-begru.
    IF sy-subrc <> 0.
      lv_pos = sy-tabix.
      DELETE lt_t023 INDEX lv_pos.
    ENDIF.
  ENDLOOP.
  READ TABLE lt_t023 INDEX 1 TRANSPORTING NO FIELDS.
  IF sy-subrc = 0.
    SELECT makt~maktg mara~matnr makt~spras
    INTO TABLE lt_data
    FROM mara
    INNER JOIN makt
      ON makt~matnr = mara~matnr
    FOR ALL entries IN lt_t023
    WHERE mara~matkl = lt_t023-matkl
      AND makt~spras = sy-langu.
    LOOP AT lt_data INTO ls_data.
      CLEAR pu_record_tab.
      MOVE ls_data TO pu_record_tab-string.
      APPEND pu_record_tab.
    ENDLOOP.
    CLEAR pu_record_tab.
*    CALL FUNCTION 'F4UT_RESULTS_MAP'
*      EXPORTING
*        SOURCE_STRUCTURE         = 'ZF4_MAT1_ESTR'
**   APPLY_RESTRICTIONS       = ' '
*      TABLES
*        shlp_tab                 = pu_shlp_tab
*        record_tab               = pu_record_tab
*        source_tab               = lt_data
*      CHANGING
*        shlp                     = pc_shlp
*        callcontrol              = pc_callcontrol
* EXCEPTIONS
*   illegal_structure        = 1
*   OTHERS                   = 2.
    pc_rc = sy-subrc.
    IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
  ENDIF.