单位转换

'CF_UT_UNIT_CONVERSION'其实这个函数里面包括了很多大大小小不同的单位转换函数,就像我们小时候玩的43合一的游戏卡一样,如果这个转换不了单位那就是系统没配置了。

使用的时候注意:

新旧转换数量的格式一定要LIKE PLFH-MGVGW.

 

 

例程:


DATA : matcat        LIKE cstmat,
        value_old_imp LIKE plfh-mgvgw, (之前的数量字段)
        value_new_exp LIKE plfh-mgvgw. (转换后的数量存放字段)

 

CLEAR value_new_exp.
      CLEAR value_old_imp.
      value_old_imp = gc_lfimg.
      PERFORM f_add_zero USING et_print_001-matnr.
      PERFORM unit_convert USING et_print_001-matnr(物料号) ''     et_print_001-bemeh(需要转换的单位)     et_print_001-gewei(之前数量的单位)     value_old_imp CHANGING value_new_exp.

et_print_001-meng3(转换后数量存放的字段) = value_new_exp.

*&--------------------------------------------------------------------*
*&      Form f_unit_change
*&--------------------------------------------------------------------*
*       text
*---------------------------------------------------------------------*
*      -->VI_INPUT   text
*      -->VI_UNIT_IN text
*      -->VI_UNIT_OUTtext
*      -->VI_OUTPUT text
*---------------------------------------------------------------------*
FORM unit_convert    USING   matnr_imp   meins_imp     unit_new_imp   unit_old_imp value_old_imp   CHANGING   value_new_exp.

CALL FUNCTION 'CF_UT_UNIT_CONVERSION'
    EXPORTING
      matnr_imp     = matnr_imp
      meins_imp     = meins_imp
      unit_new_imp = unit_new_imp
      unit_old_imp = unit_old_imp
      value_old_imp = value_old_imp
    IMPORTING
      value_new_exp = value_new_exp
    EXCEPTIONS
      overflow      = 1
      OTHERS        = 2.

ENDFORM.                    "unit_convert

--------------------------------------------------------------------------------------

call function 'CF_UT_UNIT_CONVERSION'
exporting
matnr_imp = p_matnr "物料碼 (可選)
meins_imp = p_meins "物料基本單位(可選)
unit_new_imp = to_unit "目標單位
unit_old_imp = From_unit "原單位
value_old_imp = p_qty "轉換數量
importing
value_new_exp = out_pty. "目標單位數量
.
if sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.  

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值