一.干货
1.物料字段加零去零使用函数:
"给物料添加前导0"
CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
EXPORTING
input = pv_matnr
IMPORTING
output = pv_matnr
EXCEPTIONS
length_error = 1
OTHERS = 2.
IF sy-subrc <> 0.
ENDIF.
"2去掉物料前导0
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
EXPORTING
input = pv_matnr
IMPORTING
output = pv_matnr
EXCEPTIONS
length_error = 1
OTHERS = 2.
IF sy-subrc <> 0.
ENDIF.
2.非物料字段的加零去零,可以使用ALPHA,书写方便。
"添加前导0"
DATA(lv_in) = |{ lv_matnr ALPHA = IN }|.
"去除前导0
DATA(lv_out) = |{ lv_matnr ALPHA = OUT }| .
二.具体实例
为何物料的加零一般不用ALPHA呢,我们专门写个例子看看结果。
DATA:lv_matnr TYPE mara-matNR VALUE '00000010002932'.
DATA(lv_in) = |{ lv_matnr ALPHA = IN }| .
WRITE:'使用ALPHA加零:' && lv_in .
WRITE /.
"out 表示从内部未转化的 变成 外部数据的意思。"
DATA(lv_out) = |{ lv_matnr ALPHA = OUT }| .
WRITE:'使用ALPHA去零:' && lv_out .
WRITE /.
"物料的加零与去零
PERFORM frm_in_out_matnr USING lv_matnr '+' .
WRITE:'MATN1_INPUT加零:' && lv_matnr .
WRITE /.
PERFORM frm_in_out_matnr USING lv_matnr '-' .
WRITE:'MATN1_OUTPUT去零:' && lv_matnr .
WRITE /.
FORM frm_in_out_matnr USING pv_matnr pv_flag.
CASE pv_flag .
WHEN '+'.
CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'
EXPORTING
input = pv_matnr
IMPORTING
output = pv_matnr
EXCEPTIONS
length_error = 1
OTHERS = 2.
IF sy-subrc <> 0.
ENDIF.
WHEN '-'.
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
EXPORTING
input = pv_matnr
IMPORTING
output = pv_matnr
EXCEPTIONS
length_error = 1
OTHERS = 2.
IF sy-subrc <> 0.
ENDIF.
ENDCASE.
ENDFORM.
程序例子的输出结果:
由此可见,我们给物料加前导0的话,一般使用函数转换,更符合我们的需求。
另外:例子里面的 PERFORM frm_in_out_matnr USING lv_matnr ‘+’ . 也可写入你的程序哟,照抄就可以了,很方便的。
三.如何找到未转换值的转换函数
加0与去0也是值与为转换的值变化的范畴。
比如我现在要对mara表中的基本单位进行内外转换,想要PC与ST这两个值相互转换的函数,我们该如何找到呢?
1.SE11找到MARA表中的meins字段,双击数据元素。
2.双击域
3.双击例程
4.得到转换函数
好了今天的姿势就分享到这,分享使我快落,我是寒武青锋,如果你觉得还行的话记得给我点个赞吧