SAP Program/ABAP

Select-options => Sql where 로 변환

유부사모 2017. 3. 28. 14:43

DATA : I_T_RANGE TYPE RS_T_RSCEDST.

DATA : LS_RANGE  TYPE RSCEDST.

DATA : E_WHERE   TYPE STRING.


LS_RANGE-FNAM   = 'MATNR'.

LS_RANGE-SIGN   = 'I'.

LS_RANGE-OPTION = 'EQ'.

LS_RANGE-LOW    = 'LOW'.

LS_RANGE-HIGH   = ''.

APPEND LS_RANGE TO I_T_RANGE.


LS_RANGE-FNAM   = 'MATNR'.

LS_RANGE-SIGN   = 'I'.

LS_RANGE-OPTION = 'EQ'.

LS_RANGE-LOW    = 'LOW2'.

LS_RANGE-HIGH   = ''.

APPEND LS_RANGE TO I_T_RANGE.




CALL FUNCTION 'RSDS_RANGE_TO_WHERE'

  EXPORTING

    I_T_RANGE      = I_T_RANGE

  IMPORTING

    E_WHERE        = E_WHERE

  EXCEPTIONS

    INTERNAL_ERROR = 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.


WRITE : E_WHERE.