ABAP技术总结技术干货SAP收藏文章

生成流水号

2017-07-06  本文已影响28人  Mmm_余安
Paste_Image.png Paste_Image.png

保存

点击 是.png 保存.png 返回.png Paste_Image.png Paste_Image.png Paste_Image.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后的(要赋值给某个属性)就可以了。
~~~~~来自同事的分享~~~~
上一篇下一篇

猜你喜欢

热点阅读