How to find number missing

Question

Hi,
  How to find the missing number(not number range) .Is there any functional module is there for missing nos.
ex: i have nos. from 50 to 100 & no.79 is missed.
For this issue if any functional module is there pls let me Know.
Thanks & Regards
Venkat

Answer 1

Not sure about a function, but you could create your own function and use this logic.
REPORT  zrich_0001.
TYPES: BEGIN OF ttab,
       number TYPE i,
       END OF ttab.
DATA: itab TYPE TABLE OF ttab.
DATA: wa LIKE LINE OF itab.
DATA: tmp LIKE LINE OF itab.
DATA: diff TYPE i.
DATA: rows TYPE i.
DATA: low_number TYPE i.
DATA: high_number TYPE i.
DATA: tmp_number TYPE i.
* Build an internal table with all the numbers
wa-number = 50.  APPEND wa TO itab.
DO 50 TIMES.
  wa-number = wa-number + 1.  APPEND wa TO itab.
ENDDO.
* Create some missing numbers in the table
DELETE itab WHERE number = 63.
DELETE itab WHERE number = 64.
DELETE itab WHERE number = 65.
DELETE itab WHERE number = 79.
sort itab ASCENDING .
* find the low value.
clear wa.
READ TABLE itab INTO wa INDEX 1.
IF sy-subrc = 0.
  low_number = wa-number.
ENDIF.
* Get the high value
rows = LINES( itab ).
clear wa.
READ TABLE itab INTO wa INDEX rows.
IF sy-subrc = 0.
  high_number = wa-number.
ENDIF.
* Now find the missing numbers.
tmp_number = low_number.
DO.
  IF tmp_number = high_number.
    EXIT.
  ENDIF.
  READ TABLE itab INTO wa with key number = tmp_number.
  IF sy-subrc <> 0.
    WRITE:/ tmp_number.
  ENDIF.
  tmp_number = tmp_number + 1.
ENDDO.
Regards,
Rich Heilman