Valorizzare dinamicamente range di numerazione

Per valorizzare dinamicamente una select option contenente i numeri documenti di un range di numerazione è possibile utilizzare il seguente codice;
una volta inserito in range di numerazione vengono selezionati i relativi estremi di numerazione:





SELECT-OPTIONS: s_vbeln FOR vbrk-vbeln,
s_range FOR nriv-nrrangenr.


AT SELECTION-SCREEN.
CLEAR s_vbeln.
REFRESH s_vbeln.
SELECT * FROM nriv WHERE object = 'RV_BELEG' AND
subobject = ' ' AND
nrrangenr IN s_range AND
toyear = ' '.
IF sy-subrc EQ 0.
MOVE 'I' TO s_vbeln-sign.
MOVE 'BT' TO s_vbeln-option.
MOVE nriv-fromnumber TO s_vbeln-low.
MOVE nriv-tonumber TO s_vbeln-high.
APPEND s_vbeln.
CLEAR s_vbeln.
ENDIF.
ENDSELECT.

Selezionare numero da range di numerazione

Oggi volevo descrivere una function che permette di ottenere il prossimo numero utile selezionato da un range di valori.
Nel mio caso particolare è utilizzata per ottenere il numero del documento contabile da creare.

La function prende in import la società, l'anno e il nome del range da selezionare.
Come output restituisce il numero selezionato dal range.


CALL FUNCTION 'RF_GET_DOCUMENT_NUMBER'
EXPORTING
company = documentheader-comp_code
range = w_numkr
year = documentheader-fisc_year
IMPORTING
document_number = num_doc
EXCEPTIONS
duplicate_number = 1
range_missing = 2
error_in_open_fi = 3
OTHERS = 4.