• 博客园logo
  • 会员
  • 众包
  • 新闻
  • 博问
  • 闪存
  • 赞助商
  • HarmonyOS
  • Chat2DB
    • 搜索
      所有博客
    • 搜索
      当前博客
  • 写随笔 我的博客 短消息 简洁模式
    用户头像
    我的博客 我的园子 账号设置 会员中心 简洁模式 ... 退出登录
    注册 登录

狼升空

  • 博客园
  • 联系
  • 订阅
  • 管理

公告

View Post

ALV屏幕修改后变成小数的解决问题

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' '领料类型' '' '' '' ''.

posted on 2013-02-28 12:49  狼升空  阅读(608)  评论(0)    收藏  举报

刷新页面返回顶部
 
博客园  ©  2004-2025
浙公网安备 33010602011771号 浙ICP备2021040463号-3