topic Re: database tables for select option and parameter + database table in Application Development and Automation Discussions

database tables for select option and parameter + database table

dipankar_debroy4 — Sun, 05 Jul 2009 11:29:39 GMT

Hi,

Can any one please tell me where the select option and parameters declared in a program are stored in any data base table?

If in any database is there as such then please let me know which table is that?

Regards...Dipankar

Re: database tables for select option and parameter + database table

Sm1tje — Sun, 05 Jul 2009 11:36:28 GMT

Select options and parameters are ABAP keywords and as such they are not stored in any table. They are part of the programming language.

Re: database tables for select option and parameter + database table

dipankar_debroy4 — Sun, 05 Jul 2009 11:49:22 GMT

My intension is to find nos of parameters and select options declared in a program. So is there any way we can make out how to find nos of parameters and select option declared in the program with out getting in to the code ?

Re: database tables for select option and parameter + database table

Former Member — Mon, 06 Jul 2009 01:31:22 GMT

refer to below code .

CALL FUNCTION 'RS_SELSCREEN_INFO'
    EXPORTING
      report              = lv_report
    TABLES
      field_info          = lt_field_info
    EXCEPTIONS
      no_selections       = 1
      report_not_existent = 2
      subroutine_pool     = 3
      OTHERS              = 4.

  IF sy-subrc NE 0.
    MESSAGE s000(zst) WITH 'Developer issue with RSNAST00 report'.
    CALL METHOD gcl_msg->syset
      EXPORTING
        im_msgty = 'E'.
    EXIT.
    EXIT.
  ENDIF.

  LOOP AT lt_field_info.
    CLEAR lt_rspar.
    lt_rspar-kind = lt_field_info-kind.
    CASE lt_field_info-kind.
      WHEN 'S'.  "select-option
        FIND '-LOW' IN lt_field_info-name RESULTS ls_find_res.
        IF sy-subrc EQ 0.
          lt_rspar-selname = lt_field_info-name(ls_find_res-offset).
          lt_rspar-sign = 'I'.
          lt_rspar-option = 'EQ'.
        ELSE.
          CONTINUE.
        ENDIF.
      WHEN 'P'.  "parameter
        lt_rspar-selname = lt_field_info-name.
    ENDCASE.
    CASE lt_rspar-selname.
      WHEN 'S_KAPPL'.
        lt_rspar-low = ls_nast-kappl.
      WHEN 'S_OBJKY'.
        lt_rspar-low = ls_nast-objky.
      WHEN 'S_KSCHL'.
        lt_rspar-low = ls_nast-kschl.
      WHEN 'S_NACHA'.
        lt_rspar-low = ls_nast-nacha.
      WHEN 'P_PRINT'.
        lt_rspar-low = ls_nast-ldest.
    ENDCASE.
    IF NOT lt_rspar-low IS INITIAL.
      APPEND lt_rspar.
    ENDIF.
  ENDLOOP.

Regards

Vinay

Edited by: vinay kolla on Jul 6, 2009 3:31 AM