Any Func Module to pull the value from DD07T ?

[Former Member]

Hi Experts,

In my system, we hv a Z domain and 100 values are supplied in VALUE RANGE for it.

So, I need to pull the short description(DDTEXT) of these fixed values, so, the tbl is DD07T, fine, but the issue is that, the field DOMVALUE_L(which I can supply apart from DOMNAME)..........I can pull it by a SELECT........but this filed is DOMVALUE_L not a KEY FILED so, so, SELECT takes much time.........so, let me know that Is there any Func module to pull the values from this tbl DD07T?

thanq

[Former Member]

Hi Experts,

In my system, we hv a Z domain and 100 values are supplied in VALUE RANGE for it.

So, I need to pull the short description(DDTEXT) of these fixed values, so, the tbl is DD07T, fine, but the issue is that, the field DOMVALUE_L(which I can supply apart from DOMNAME)..........I can pull it by a SELECT........but this filed is DOMVALUE_L not a KEY FILED so, so, SELECT takes much time.........so, let me know that Is there any Func module to pull the values from this tbl DD07T?

thanq

[Former Member]

Check this FM.GET_DOMAIN_VALUES

but internally it will also use the SELECT statement.

best solution is to get all the DDTEXT matching the domain and in the program filter it using DOMVALUE_L.

[former_member156446]

if you have all the Zdomains in one structure you can use the

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = gd_repid
      i_internal_tabname     = 'I_ZSCHED'
      i_structure_name       = 'Z_ALV'  "><<<<<<<<<<<< structure name
      i_client_never_display = 'X'
      i_inclname             = gd_repid
    CHANGING
      ct_fieldcat            = fieldcatalog
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.

you can read the field catalog and get the values..

[Former Member]

FM:DD_DD07V_GET

REPORT.
data:i_domain TYPE STANDARD TABLE OF DD07V WITH HEADER LINE,
      domain like DD01L-DOMNAME VALUE 'CURTP'.

CALL FUNCTION 'DD_DD07V_GET'
  EXPORTING
    domain_name          = domain
   LANGU                = SY-LANGU
   WITHTEXT             = 'X'"--<<<This Is must
  tables
    dd07v_tab            = i_domain
* EXCEPTIONS
*   ACCESS_FAILURE       = 1
*   OTHERS               = 2
          .
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT i_domain.
WRITE / i_domain-ddtext.
ENDLOOP.