Number range - update

Question

Dear Experts,
I have created one number range, initially it should appear in the screen but if the user clicks no in popup then the number range it should get reduced since it is not used, kindly find the below codes,
DATA: RC         LIKE INRI-RETURNCODE,
      NUMBER(10) TYPE C,
      YEAR       LIKE INRI-TOYEAR,
      QUAN       LIKE INRI-QUANTITY.
data : Category type CRMC_ACT_CATEGOR-CATEGORY.
   QUAN              = 1.
   Category    = 'Z22'.
   CALL FUNCTION 'NUMBER_GET_NEXT'
        EXPORTING
           OBJECT           = 'ZTEST'
           NR_RANGE_NR      = '01'
           SUBOBJECT        = Category
        IMPORTING
           RETURNCODE       =  RC
           QUANTITY         = QUAN
           NUMBER           = NUMBER.
data : lv_ans type c.
   CALL FUNCTION 'POPUP_TO_CONFIRM'
     EXPORTING
      TITLEBAR                    = 'Are you sure'
       text_question               = 'Are you sure'
      DEFAULT_BUTTON              = '1'
      DISPLAY_CANCEL_BUTTON       = ' '
    IMPORTING
      ANSWER                      = lv_ans.
if lv_ans = '1'.
   Write :/ 'Next available number is: ', Number, RC.
   else.
*here we have to reduce the number range - 1.
*here can we use f.s's like,
NUMBER_RANGE_ENQUEUE
NUMBER_RANGE_INTERVAL_UPDATE
NUMBER_RANGE_DEQUEUE
NUMBER_RANGE_UPDATE_CLOSE
Kindly guide me how to proceed here
     write : /'not allowed'.
     endif.

Answer 1

Hi srinivas,
I have created one screen, where this number range should appear initially, then based on action performed if he saves then that number range should be considered and it has to be stored in ztable, if cancelled we should not consider that number range, so what i did is if cancelled i am using this logic to reset the number range,
clear : lv_nrlevel.
select single nrlevel from  NRIV into lv_nrlevel     where OBJECT = 'ZTEST' and SUBOBJECT = 'Z22'.
  lv_nrlevel = lv_nrlevel - 1.
  update nriv set nrlevel = lv_nrlevel where   OBJECT = 'ZTEST' and SUBOBJECT = 'Z22'.
Waiting for your responses,
Thanks and Regards,
thirukumaran. R