隐藏采购订单类型
文章目录
- 1 Introduction
- 2 code
1 Introduction
The passage is that how to hiden purchase type .
2 code
DATA: ls_shlp_selopt TYPE ddshselopt.
IF ( sy-tcode = 'ME21N' OR sy-tcode = 'ME22N' OR sy-tcode = 'ME23N' or sy-tcode = 'ME51N' OR sy-tcode = 'ME52N' OR sy-tcode = 'ME53N' ) AND shlp-shlpname = 'H_T161'.IF sy-subrc = 0.SELECT zmmt023~bsart FROM zmmt023WHERE zmmt023~active = 'Y'INTO TABLE @DATA(lt_zmmt023).IF sy-subrc EQ 0.LOOP AT lt_ZMMT023 INTO DATA(ls_ZMMT023).ls_shlp_selopt-shlpname = 'H_T161'.ls_shlp_selopt-shlpfield = 'BSART'.ls_shlp_selopt-sign = 'I'.ls_shlp_selopt-option = 'EQ'.ls_shlp_selopt-low = ls_ZMMT023-bsart.APPEND ls_shlp_selopt TO shlp-selopt.CLEAR ls_shlp_selopt.ENDLOOP.ENDIF.ENDIF.
ENDIF.
