ABAP 界面筛选框不够长

需求说明

设置参考字段和参考表，即可解决界面筛选框不够长的问题

解决

FORM bulid_fieldcat_catalog .
  "添加字段的宏
  DEFINE add_fieldcat.
    gs_fieldcat-fieldname = &1."字段名称
    gs_fieldcat-coltext = &2. "列名称
    gs_fieldcat-no_zero = &3."输出隐藏0
    "gs_fieldcat-key = &4.
    gs_fieldcat-edit = &4. "是否可编辑
    gs_fieldcat-outputlen = &5."列的字符宽度
    gs_fieldcat-ref_table = &6."参考表
    gs_fieldcat-ref_field = &7."参考字段
    APPEND gs_fieldcat TO gt_fieldcat.
    CLEAR gs_fieldcat.
  END-OF-DEFINITION.

  "调用宏添加字段
  add_fieldcat 'WERKS' '工厂' '' '' '' '' ''.
  add_fieldcat 'BWART' '移动类型' '' '' '' '' ''.
  add_fieldcat 'MBLNR' '物料凭证' '' '' '' '' ''.
  add_fieldcat 'LGORT' '库存地点' '' '' '' '' ''.
  add_fieldcat 'GERNR' '模具序列号' '' ''  '' 'ZFLOWT_SER' 'GERNR'. "序列号需要参考表和参考字段，因为界面筛选框不够长，加上参考之后就可以筛选
  add_fieldcat 'MATNR' '模具' 'X' '' '' '' ''.

ENDFORM.

运行效果

原来的是很短的，现在改长了一些，现在显示是正常的，原来是缺了一部分的。