CALL FUNCTION 'NUMBER_RANGE_ENQUEUE'
EXPORTING
object = 'ZIMIRNO'
EXCEPTIONS
foreign_lock = 1
object_not_found = 2
system_failure = 3
OTHERS = 4.
CALL FUNCTION 'NUMBER_GET_NEXT'
EXPORTING
nr_range_nr = '01'
object = 'ZIMIRNO'
* QUANTITY = '1'
* SUBOBJECT = ' '
* TOYEAR = '0000'
* IGNORE_BUFFER = ' '
IMPORTING
number = gt_mm002-imno
* QUANTITY =
* RETURNCODE =
EXCEPTIONS
interval_not_found = 1
number_range_not_intern = 2
object_not_found = 3
quantity_is_0 = 4
quantity_is_not_1 = 5
interval_overflow = 6
buffer_overflow = 7
OTHERS = 8.
CALL FUNCTION 'NUMBER_RANGE_DEQUEUE'
EXPORTING
object = 'ZIMIRNO'
EXCEPTIONS
object_not_found = 1
OTHERS = 2.

本文介绍了一种使用ABAP编程语言进行编号范围管理的方法。通过调用'NUMBER_RANGE_ENQUEUE'、'NUMBER_GET_NEXT'及'NUMBER_RANGE_DEQUEUE'等函数模块来实现编号的分配与释放,这些操作对于确保系统中记录的唯一性和连续性至关重要。
1114

被折叠的 条评论
为什么被折叠?



