topic Re: Auto Serial Number in Module pool Primary Key in Application Development and Automation Discussions

Auto Serial Number in Module pool Primary Key

Former Member — Mon, 11 Mar 2013 06:14:48 GMT

Hi , in module programming I want want to SR. no is generated automatic in z table with all recodes when we press SAVE button in module pool screen .

, I need sample code ,please help me

Re: Auto Serial Number in Module pool Primary Key

jyotirmaya_mallick — Wed, 01 May 2013 15:14:54 GMT

Hi,

You can add SR. no before inserting the internal table to DB table.

Here Sample code:

Count = 1.
Loop itab into wa.
wa-slno = count.
modify itab from wa index sy-tabix transporting slno.
clear wa.
count = count +1.
endloop.
insert DB from table itab.

regards,

Jyoti

Re: Auto Serial Number in Module pool Primary Key

Former Member — Wed, 01 May 2013 15:46:27 GMT

hello,

Please check this -

Hi,

1. Go to transaction SNRO (Simple way to remember is SapNumberRangeObject).

2. Enter the number range object name and press CREATE. (Example ZDEMO)

3. Enter the description, Long text and Number Length domain and Warning %.

Warning% à Assume that an interval is defined from 1 to 1000. If you want to issue a warning at the number 900, enter 10 (%) here.

4. Press SAVE. You would get a prompt. Press YES and assign the object to a local class.

5. Now click on Number Ranges button on the application toolbar.

6. Click on Change Intervals.

7. Click on Insert Intervalue.

8. Enter the values as shown below: Click Insert and then SAVE. The number range object is generated.

Testing the Number Range Object:

We can use the function module, NUMBER_GET_NEXT, to get the next number of any number range object.

Following is a test program to get the next available number of the object created above:

REPORT zsnro_test.

DATA:

NUMBER TYPE I.

CALL FUNCTION 'NUMBER_GET_NEXT'

EXPORTING

nr_range_nr = '01'

object = 'ZDEMO'

IMPORTING

NUMBER = NUMBER

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

IF sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

Write 😕 'Next available number is: ', Number.

best regards,

swanand

Re: Auto Serial Number in Module pool Primary Key

satyabrata_sahoo3 — Wed, 01 May 2013 15:53:39 GMT

Use Number Range object and FM ;NUMBER_GET_NEXT' to achieve this.

Refer: http://saptechnical.com/Tutorials/ABAP/SNRO/SNRO.htm

-Satya

Re: Auto Serial Number in Module pool Primary Key

arindam_m — Wed, 01 May 2013 23:36:43 GMT

This message was moderated.