Existe um módulo padrão no SAP EWM para calcular o dígito de verificação do SSCC?

Eu escrevi um FM para isso, já que não consegui encontrar nenhum FM padrão.

DATA : comprimento TIPO i .

DATA : lv_temp TIPO n ,

lv_sum_first TIPO int4 ,

lv_sum_second TIPO int4 ,

lv_final_res TIPO int4 .

DATA : work_string ( 50 ) TIPO c .

DATA : lv_first TIPO int4 VALOR 1 ,

lv_second TIPO int4 VALOR 2 .

work_string = iv_number .

comprimento = strlen ( work_string ) .

MOVER work_string PARA A ESQUERDA ELIMINANDO ESPAÇOS espaço .

FAZER comprimento VEZES .

ESCREVER work_string+lv_first ( 1 ) EM lv_temp .

lv_sum_first = lv_sum_first + lv_temp .

ESCREVER work_string+lv_second ( 1 ) EM lv_temp .

lv_sum_second = lv_sum_second + lv_temp .

lv_first = lv_first + 2 .

lv_second = lv_second + 2 .