How to read data from ABAP with filter?

Question

I know the famous pass which uses RFC_READ_TABLE to get a whole table into IdM. How can I only read a part of it, e.g. The currently locked users from table USR02 having UFLAG NE 0?

Answer 1

Let's have a look to ABAP (with basis release 702):
The function RFC_READ_TABLE offers filters using the input table OPTIONS. OPTIONS is a simple text table with line length 72 which directly is copied into the WHERE clause of the SELECT.
The result is restricted to tables having maximum record length of 512 characters. However, using the input table FIELDS you could list the FIELDNAMES which should be read from the database. This way it would be possible to read larger tables - if you only choose fields which sum up to maximum 5121 characters.
Coding example in ABAP:
data: ls_OPTIONS type          RFC_DB_OPT,
       lt_OPTIONS type table of RFC_DB_OPT,
       ls_FIELDS  type          RFC_DB_FLD,
       lt_FIELDS  type table of RFC_DB_FLD,
       ls_DATA    type          TAB512,
       lt_DATA    type table of TAB512.
ls_FIELDS-FIELDNAME = 'BNAME'.
append ls_FIELDS to lt_FIELDS.
ls_FIELDS-FIELDNAME = 'UFLAG'.
append ls_FIELDS to lt_FIELDS.
ls_FIELDS-FIELDNAME = 'BCODE'.
append ls_FIELDS to lt_FIELDS.
ls_OPTIONS-TEXT = `BNAME LIKE 'J%'`.
ls_OPTIONS-TEXT = `AND`.
ls_OPTIONS-TEXT = `UFLAG NE 0`.
append ls_OPTIONS to lt_OPTIONS.
CALL FUNCTION 'RFC_READ_TABLE'
   DESTINATION 'NONE'
   EXPORTING
     QUERY_TABLE                = 'USR02'
*   DELIMITER                  = ' '
*   NO_DATA                    = ' '
*   ROWSKIPS                   = 0
*   ROWCOUNT                   = 0
   TABLES
     OPTIONS                    = lt_OPTIONS
     FIELDS                     = lt_FIELDS
     DATA                       = lt_DATA
   EXCEPTIONS
     TABLE_NOT_AVAILABLE        = 1
     TABLE_WITHOUT_DATA         = 2
     OPTION_NOT_VALID           = 3
     FIELD_NOT_VALID            = 4
     NOT_AUTHORIZED             = 5
     DATA_BUFFER_EXCEEDED       = 6
     system_failure             = 8 "MESSAGE l_message
     communication_failure      = 9 "MESSAGE l_message
     OTHERS                     = 7
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
write: / 'RFC_READ_TABLE', 30 'SY-SUBRC =', sy-subrc.
loop at lt_DATA into ls_DATA.
   write: / ls_DATA.
endloop.
How can we create a FromSAP pass in IdM which uses function RFC_READ_TABLE with OPTIONS and FIELDS?
Let's have a look to alternatives:
Function RFC_GET_TABLE_ENTRIES has the same limitation of maximum record length of 512 but does not offer data or field selections. -> Not useful for IdM
Function GET_TABLEBLOCK_RFC is not remote enables but a local starter in ABAP for function GET_TABLEBLOCK_COMPRESSED_RFC, however, this one retrieves compressed results. -> Not useful for IdM 
Function TABLE_ENTRIES_GET_VIA_RFC has a maximum line length of 2014 and offers data selection using input table SEL_TAB (no field selection). Limitation: This function can only process table which have character-like fields only, i.e. table USR02 is out of scope. (Function RFC_READ_TABLE does not have this limitation.)
Coding example in ABAP:
data: ls_SEL_TAB  type          BDSEL_STAT,
       lt_SEL_TAB  type table of BDSEL_STAT,
       ls_NAMETAB  type          BDI_MFGRP,
       lt_NAMETAB  type table of BDI_MFGRP,
       ls_TABENTRY type          BDI_ENTRY,
       lt_TABENTRY type table of BDI_ENTRY.
ls_SEL_TAB-ZEILE = `BNAME like 'B%'`.
append ls_SEL_TAB to lt_SEL_TAB.
CALL FUNCTION 'TABLE_ENTRIES_GET_VIA_RFC'
   DESTINATION 'NONE'
   EXPORTING
*   LANGU                     = SY-LANGU
*   ONLY                      = ' '
     TABNAME                   = 'UST04'
* IMPORTING
*   RC                        =
   TABLES
     SEL_TAB                   = lt_SEL_TAB
     NAMETAB                   = lt_NAMETAB
     TABENTRY                  = lt_TABENTRY
   EXCEPTIONS
     INTERNAL_ERROR            = 1
     TABLE_HAS_NO_FIELDS       = 2
     TABLE_NOT_ACTIV           = 3
     NOT_AUTHORIZED            = 4
     system_failure            = 8 "MESSAGE l_message
     communication_failure     = 9 "MESSAGE l_message
     OTHERS                    = 5
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.
write: / 'TABLE_ENTRIES_GET_VIA_RFC', 30 'SY-SUBRC =', sy-subrc.
loop at lt_TABENTRY into ls_TABENTRY.
   write: / ls_TABENTRY.
endloop.
Despite the limitation, how can we create a FromSAP pass in IdM which uses function TABLE_ENTRIES_GET_VIA_RFC?
Kind regards
Frank