生成流水号

首先输入事物代码：SNRO

Paste_Image.png

保存

点击是.png

保存.png

返回.png

Paste_Image.png

确定

代码调用

CALL FUNCTION 'NUMBER_RANGE_ENQUEUE'
    EXPORTING
object           = 'ZPCOST' "Ceate with SNUM
EXCEPTIONS```
``` foreign_lock     = 1 "将得到的数字锁住，别人运行改程序时得不到这个数字
  object_not_found = 2
system_failure   = 3
 OTHERS           = 4.```

 ``` CALL FUNCTION 'NUMBER_GET_NEXT'
 EXPORTING
 nr_range_nr             = '00'
object                  = 'ZPCOST'
 IMPORTING
 number                  = ls_ytf   "定义变量接收流水号
EXCEPTIONS
 interval_not_found      = 1
 number_range_not_intern = 2
object_not_found        = 3
quantity_is_0           = 4
quantity_is_not_1       = 5
internal_overflow       = 6
OTHERS                  = 7.```

 ```CALL FUNCTION 'NUMBER_RANGE_DEQUEUE'
EXPORTING                      "解锁
object = 'ZPCOST'.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.```
上面的代码只修改  OBJECT 后的东西（自己输入SNRO所创建的对象），
和 NUMBER后的（要赋值给某个属性）就可以了。
~~~~~来自同事的分享~~~~

最后编辑于：2018.04.20 10:39:13

生成流水号

推荐阅读更多精彩内容