Contar registros repetidos

[john smith]

Hola a todos!

Estoy empezando con ABAP y aún no tengo dominado los loops. Tengo un pequeño problema y no sé cómo solucionarlo. Tengo que contar el número de registros repetidos en una tabla estándar de SAP.

Os pego aquí lo que tengo escrito que no está funcionando muy bien pues entra siempre en el loop, no sólo en los repetidos (de LIFNR):

1º Ordeno la tabla por el campo LIFNR y luego hago el count

SORT gt_ekko BY lifnr.
LOOP AT gt_ekko INTO gs_ekko.
AT NEW lifnr.
MOVE-CORRESPONDING gs_ekko TO wa_ekko2.
MOVE 0 TO wa_ekko2-contador.
ENDAT.
ADD 1 TO wa_ekko2-contador.
AT END OF lifnr.
" Cuando ýa no hay mas valores iguales se PASAN DATOS A LA SALIDA
l_fieldnm = 'Z_MANDT'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-mandt TO <fs_val>.
l_fieldnm = 'Z_EBELN'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-ebeln TO <fs_val>.
l_fieldnm = 'Z_BUKRS'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-bukrs TO <fs_val>.
l_fieldnm = 'Z_BSART'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-bsart TO <fs_val>.
l_fieldnm = 'Z_LIFNR'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-lifnr TO <fs_val>.
l_fieldnm = 'Z_CONTA'.
ASSIGN COMPONENT l_fieldnm OF STRUCTURE <fs_lin> TO <fs_val>.
MOVE wa_ekko2-contador TO <fs_val>.
APPEND <fs_lin> TO <fs_tab>.
ENDAT.
ENDLOOP.