FORM fieldcat_init USING u_er_fieldcat TYPE slis_t_fieldcat_alv.
DATA: afieldcat TYPE slis_fieldcat_alv,
pos TYPE i.
CLEAR pos.
DEFINE d_get_field.
pos = pos + 1.
clear afieldcat.
afieldcat-col_pos = pos.
afieldcat-fieldname = &1.
afieldcat-seltext_l = &2.
afieldcat-quantity(3) = &3.
afieldcat-edit = &4.
afieldcat-REF_fieldname = &5.
afieldcat-REF_tabname = &6.
append afieldcat to u_er_fieldcat.
END-OF-DEFINITION.
IF p1 = 'X'.
d_get_field 'TABIX' '序号' '' '' '' ''.
d_get_field 'RSNUM' '预留号码' '' '' '' ''.
d_get_field 'RSPOS' '预留行号' '' '' '' ''.
d_get_field 'BWART' '移动类型' '' '' '' ''.
d_get_field 'MATNR' '物料号' '' '' '' ''.
d_get_field 'MAKTX' '物料描述' '' '' '' ''.
d_get_field 'RSNUM' '预留数量' '' '' '' ''.
d_get_field 'MEINS' '单位' '' '' '' ''.
d_get_field 'BDTER' '需求日期' '' '' '' ''.
d_get_field 'ENMNG' '领料数量' '' 'X' 'ENMNG' 'RESB'.
d_get_field 'SWMNG' '尚未领取数量' '' '' '' ''.
d_get_field 'WERKS' '工厂' '' '' '' ''.
d_get_field 'NAME1' '工厂名称' '' '' '' ''.
d_get_field 'LGORT' '库存地点' '' '' '' ''.
d_get_field 'LGOBE' '库存地点名称' '' '' '' ''.
d_get_field 'KOSTL' '成本中心' '' '' '' ''.
d_get_field 'KTEXT' '成本中心名称' '' '' '' ''.
d_get_field 'AUFNR' '内部订单' '' '' '' ''.
d_get_field 'LLTYP' '领料类型' '' '' '' ''.
