如何使用自定义的 number range objects

最新推荐文章于 2025-08-16 13:06:39 发布

原创最新推荐文章于 2025-08-16 13:06:39 发布 · 296 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#function #object #buffer #system

本文介绍了一种使用ABAP编程语言实现编号范围管理的方法。通过调用系统函数'NUMBER_RANGE_ENQUEUE'、'NUMBER_GET_NEXT'及'NUMBER_RANGE_DEQUEUE'来完成编号的获取与释放流程。此方法适用于需要连续编号的应用场景。

1、Create number range object using OYSN.

2、Then call the following function modules.

FORM get_next_id CHANGING p_discrep.

DATA: last_id LIKE zrecaudit-discrep,
quant LIKE inri-quantity, "dummy
code LIKE inri-returncode. "returncode

CALL FUNCTION 'NUMBER_RANGE_ENQUEUE'
       EXPORTING
            object           = 'ZRECAUDIT'
       EXCEPTIONS
            foreign_lock     = 1
            object_not_found = 2
            system_failure   = 3
            OTHERS           = 4.

IF sy-subrc = 0.

    CALL FUNCTION 'NUMBER_GET_NEXT'
         EXPORTING
              nr_range_nr             = '01'
              object                  = 'ZRECAUDIT'
         IMPORTING
              number                  = last_id
              quantity                = quant
              returncode              = code
         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           = 'ZRECAUDIT'
         EXCEPTIONS
              object_not_found = 1
              OTHERS           = 2.

ENDIF.

ENDFORM. " get_next_id

Trackback: http://tb.blog.youkuaiyun.com/TrackBack.aspx?PostId=1022731