ALV 可编辑

  IF r_1 = 'X'.
    set_fieldcat:
*               'CHECK' 1  '选择' '' '' '' '' '',
                     'ZHANGH'  20   '收款帐号' '' '' '' '' '',
                     'BUDAT' 10  '收款日期' '' '' '' '' '',
                     'MARK' 5  '流水号' '' '' '' '' '',
                     'WRBTR'   10   '收款金额' '' '' '' '' '',
                     'PRCTR'  10   '奶吧编号' '' 'X' '' '' '',
                     'KTEXT'  10  '奶吧名称' '' '' '' '' '',
                     'BLDAT' 10  '营业日期' '' '' '' '' '',
                     'DMBTR' 10  '缴款金额' '' '' '' '' '',
                     'BELNR' 10  '缴款凭证' '' '' '' '' '',
                     'BELNR_R' 10  'RT收款凭证' '' '' '' '' '',
                     'BELNR_E' 10  'ECC收款凭证' '' '' '' '' '',
                     'SGTXT' 20 '银行网点' '' '' '' '' '',
                     'ZMESSAGE' 30  '消息' '' '' '' '' ''.
  ELSE.
    set_fieldcat:
*               'CHECK' 1  '选择' '' '' '' '' '',
                 'ZHANGH'  20   '收款帐号' '' '' '' '' '',
                 'BUDAT' 10  '收款日期' '' '' '' '' '',
                 'MARK' 5  '流水号' '' '' '' '' '',
                 'WRBTR'   10   '收款金额' '' '' '' '' '',
                 'PRCTR'  10   '奶吧编号' '' 'X' 'X' 'CEPC' 'PRCTR',
                 'KTEXT'  10  '奶吧名称' '' '' '' '' '',
                 'BLDAT' 10  '营业日期' '' '' 'X' 'BKPF' 'BUDAT',
                 'DMBTR' 10  '缴款金额' '' '' 'X' 'BSIS' 'DMBTR',
                 'BELNR' 10  '缴款凭证' '' '' 'X' 'BKPF' 'BELNR',
                 'BELNR_R' 10  'RT收款凭证' '' '' '' '' '',
                 'BELNR_E' 10  'ECC收款凭证' '' '' '' '' '',
                 'SGTXT' 20 '银行网点' '' '' '' '' '',
                 'ZMESSAGE' 30  '消息' '' '' '' '' ''.
  ENDIF.

DEFINE
  set_fieldcat.
  clear gs_fcat_lvc .
  gs_fcat_lvc-fieldname = &1."内表的字段
  gs_fcat_lvc-outputlen = &2."输出长度
  gs_fcat_lvc-scrtext_l = &3."在ALV里面显示的名字
  gs_fcat_lvc-just      = &4."水平对齐方式，L左对齐，R右对齐。
  gs_fcat_lvc-no_zero   = &5."去除前导零
  gs_fcat_lvc-edit      = &6.
  gs_fcat_lvc-ref_table  = &7."设置参考
  gs_fcat_lvc-ref_field  = &8.
*  gs_fcat_lvc-FIX_COLUMN = &6.
*  IF gs_fcat_lvc-FIELDNAME = 'CHECK'.
**  if &1 = 'CHECK'.
*    gs_fcat_lvc-CHECKBOX = 'X'.
*    gs_fcat_lvc-edit = 'X'.
*  ENDIF.
  append gs_fcat_lvc to gt_fcat_lvc .
  clear gs_fcat_lvc.
END-OF-DEFINITION.