报表开发练习

自定义CITYFROM（起飞城市）的SEARCH_HELP，HELP中显示序号、城市名称两列信息，其中序号是从“01”开始、系统自动产生，顺序编号、两位定长编码

 

1：开始用的search help 是在网上搜的老白博客里，

parameters cityfrom like spfli-cityfrom matchcode object zsrh.

 

发现个问题，这个只相当于将search help 赋到parameters定义的对象，无法执行序号01开始，这样的方法。

 

2：案例（正确）

at selection-screen on value-request for cityfr.
  perform sub_pop_f4value.

 

form sub_pop_f4value .
 ...

  data: wa_fields like help_value,
        t_fields like table of help_value.

   "Structure or Function Module HELP_VALUE_GET_FOR_TABLE

  ...
  clear wa_fields.
  wa_fields-tabname = 'ZSPFLI_LZX'.
  wa_fields-fieldname = 'XH'.
  append wa_fields to t_fields.

  clear wa_fields.
  wa_fields-tabname = 'ZSPFLI_LZX'.
  wa_fields-fieldname = 'CITYFROM'.
  wa_fields-selectflag = 'X'.
  append wa_fields to t_fields..

  data: xh type i value 0.
  loop at t_spfli into wa_spfli.
    xh = xh + 1.
    wa_valuetab-string = xh.
    append wa_valuetab to t_valuetab.
    wa_valuetab-string = wa_spfli-cityfrom.
    append wa_valuetab to t_valuetab.
  endloop.

  call function 'HELP_VALUES_GET_WITH_TABLE'
    exporting
      title_in_values_list = '自定义起飞城市帮助'
      titel                = 'PLEASE CHOOSE YOU WANT:'
    importing
      select_value         = p_cityfr
    tables
      fields               = t_fields
      valuetab             = t_valuetab.
  if sy-subrc ne 0.
*    MESSAGE S000 WITH 'No value selected!'.
    message text-e02 type 'S'.
  endif.
endform.                    " sub_pop_f4value