隐藏采购订单类型

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.