I wrote this tip to embrace many – sometimes strange – needs of ABAP programmers.

To find a logical database having database table name only you should use transaction SE36 – Logical database builder. We choose Extras -> Table usage and write table name. The result is a list of logical databases, which use this table.

And for instance for PERNR table we got LDBs: PNP (HR Master Data) i PNPCE (HR Master Data including concurrent employment).

This knowledge may be useful for example during exploration of not known ERP modules, when your only anchor point is table name from that area. Quick&useful.

After quick googling the answer is found for instance in this post. In brief you have to use a macro called rhxmacro by adding these four lines:

At top of the report…

INCLUDE rhxmacro.

…in INITIALIZATION section…

rhx-f4-objid-data.

…and finally…

AT SELECTION-SCREEN ON VALUE-REQUEST FOR so_obj_o-low.

rhx-f4-objid-low pchplvar pchotype so_obj_o ” ”.

Everything would be perfect, if only there wasn’t an error in rhxmacro, which causes the code not to compile (it’s SAP, indeed). Last change provided by SAP comes from March 2009 and it looks like someone started doing some corrections in the macro, but didn’t finish his work. Later on, this ‘correction’ went to users with one of the notes. The error, which makes macro not compiling is very common – to solve it you should delete one line of code, which tries to clear non-existing parameter (deleted during ‘correction’ of the macro).

So taking everything into account, to have beautiful search help you should create new client macro (unfortunatelly), which is a corrected (definietly) and shortend for our needs version of rhxmacro. Code below. Enjoy.
*INCLUDE ZRHXMACRO

DEFINE RHX-F4-OBJID-DATA.
TABLES PLOGI.
DATA : %F4_REPID LIKE SY-REPID.
DATA : %F4_DYNNR LIKE SY-DYNNR.
DATA : %F4_LINES TYPE I.
DATA : %F4_SUBRC LIKE SY-SUBRC. “XMK E-MSG
DATA : %F4_T77EO LIKE T77EO.    “XMK #431960
DATA : BEGIN OF %F4_MACO_TAB OCCURS 1,
PLVAR LIKE PLOG-PLVAR,
OTYPE LIKE PLOG-OTYPE,
OBJID LIKE OBJEC-REALO,
END   OF %F4_MACO_TAB.
DATA : %F4_PCHOBJID_LINES TYPE I.
DATA : %F4_PLVAR LIKE WPLOG-PLVAR.
DATA : %F4_OTYPE LIKE WPLOG-OTYPE.
DATA : %F4_OLD_OTYPE LIKE WPLOG-OTYPE.
DATA : %F4_SEL_OBJECTS    LIKE OBJEC   OCCURS 10 WITH HEADER LINE.
DATA : %F4_MARKED_OBJECTS LIKE HRSOBID OCCURS 10 WITH HEADER LINE.
END-OF-DEFINITION.

DEFINE RHX-F4-OBJID-LOW.

SET EXTENDED CHECK OFF.

%F4_REPID = SY-REPID.
%F4_DYNNR = SY-DYNNR.
DESCRIBE TABLE &3 LINES %F4_LINES.
IF &4 EQ SPACE.
PERFORM CHECK_PLVAR_F4(RHXCHK00) USING &1 %F4_SUBRC.
CHECK %F4_SUBRC = 0.
ENDIF.
IF &5 EQ SPACE.
IF &2 IS INITIAL.
CALL FUNCTION ‘ASK_OTYPE’
EXPORTING
D_OTYPE         = &2
IMPORTING
OTYPE           = &2
EXCEPTIONS
NO_OTYPE_SET    = 2
WRONG_OTYPE_SET = 4.
ENDIF.
ENDIF.
IF SY-DYNNR EQ ’1000′.
%F4_OLD_OTYPE = &2.
CLEAR:   %F4_MARKED_OBJECTS.
REFRESH: %F4_MARKED_OBJECTS.
%F4_MARKED_OBJECTS-PLVAR = &1.
%F4_MARKED_OBJECTS-OTYPE = &2.
CLEAR %F4_T77EO.
SELECT SINGLE * FROM T77EO INTO %F4_T77EO.
LOOP AT &3 WHERE SIGN = ‘I’.
CASE &3-OPTION.
WHEN ‘EQ’.
%F4_MARKED_OBJECTS-SOBID = &3-LOW.
APPEND %F4_MARKED_OBJECTS.
WHEN ‘BT’.
IF %F4_T77EO IS INITIAL.
SELECT * FROM PLOGI
WHERE OBJID >= &3-LOW  AND
OBJID <= &3-HIGH AND
OTYPE EQ &2      AND
PLVAR EQ &1.
%F4_MARKED_OBJECTS-SOBID = PLOGI-OBJID.
APPEND %F4_MARKED_OBJECTS.
ENDSELECT.
ENDIF.
ENDCASE.

ENDLOOP.
CALL FUNCTION ‘RH_OBJID_REQUEST’
EXPORTING
PLVAR             = &1
OTYPE             = &2
DYNPRO_REPID      = %F4_REPID
DYNPRO_DYNNR      = %F4_DYNNR
DYNPRO_PLVARFIELD = &4
DYNPRO_OTYPEFIELD = &5
SET_MODE          = ‘X’
IMPORTING
SEL_PLVAR         = %F4_PLVAR
SEL_OTYPE         = %F4_OTYPE
TABLES
SEL_OBJECTS       = %F4_SEL_OBJECTS
MARKED_OBJECTS    = %F4_MARKED_OBJECTS
EXCEPTIONS
CANCELLED         = 1
WRONG_CONDITION   = 2
NOTHING_FOUND     = 3
ILLEGAL_MODE      = 4
INTERNAL_ERROR    = 5
OTHERS            = 6.
IF &5 NE SPACE AND
%F4_OLD_OTYPE NE %F4_OTYPE.
REFRESH &3.
ENDIF.
IF SY-SUBRC EQ 0.
REFRESH: &3.
CLEAR:   &3.
LOOP AT %F4_SEL_OBJECTS.

&3-LOW    = %F4_SEL_OBJECTS-REALO.
&3-OPTION = ‘EQ’.
&3-SIGN = ‘I’.
APPEND &3.

ENDLOOP.
CLEAR:   %F4_SEL_OBJECTS.
REFRESH: %F4_SEL_OBJECTS.
else.                                             “Note1265523
clear: %f4_sel_objects, %f4_sel_objects[].
clear: %f4_marked_objects, %f4_marked_objects[].
clear: &3-low, &3[].
ENDIF.
ELSE.
PERFORM OBJID_REQUEST_PLVAR_OTYPE
USING SPACE &1   &2
%F4_REPID  %F4_DYNNR
SPACE      SPACE
%F4_PLVAR  %F4_OTYPE
&3-LOW.
IF &4 NE SPACE.
&1 = %F4_PLVAR.
ENDIF.
IF &5 NE SPACE.
&2 = %F4_OTYPE.
ENDIF.
EXIT.
ENDIF.
DESCRIBE TABLE &3 LINES %F4_PCHOBJID_LINES.
IF %F4_PCHOBJID_LINES GT %F4_LINES.
IF %F4_LINES EQ 0.
MESSAGE S026(PP).
ELSE.
MESSAGE S027(PP).
ENDIF.
ELSE.
ENDIF.
******CLEAR : SUBRC. <— this is the line we need to remove from original macro
READ TABLE &3 INDEX 1.
IF SY-SUBRC GT 0.
CLEAR &3.
ENDIF.
IF &4 NE SPACE.
&1 = %F4_PLVAR.
ENDIF.
IF &5 NE SPACE.
&2 = %F4_OTYPE.
ENDIF.
SET SCREEN SY-DYNNR.
LEAVE SCREEN.

SET EXTENDED CHECK ON.

END-OF-DEFINITION.

Anyway, that should be reported to SAP.