* Opa, agora que sabemos mexer com objeto de intervalo, vamos aprender
* a usar a função que informa o ultimo numero do nosso intervalo, essa
* função é a 'NUMBER_GET_NEXT'.
REPORT z_gera_serializacao.
DATA : v_number TYPE char10.
START-OF-SELECTION.
* Geração do serial usando o Primeiro Range do Objeto de Intervalo
PERFORM f_gera_serial
USING '01' 'Z_DOCS'.
* Geração do serial usando o Segundo Range do Objeto de Intervalo
PERFORM f_gera_serial
USING '02' 'Z_DOCS'.
* a usar a função que informa o ultimo numero do nosso intervalo, essa
* função é a 'NUMBER_GET_NEXT'.
REPORT z_gera_serializacao.
DATA : v_number TYPE char10.
START-OF-SELECTION.
* Geração do serial usando o Primeiro Range do Objeto de Intervalo
PERFORM f_gera_serial
USING '01' 'Z_DOCS'.
* Geração do serial usando o Segundo Range do Objeto de Intervalo
PERFORM f_gera_serial
USING '02' 'Z_DOCS'.