[robert_milan]

Hola Delmarulo;

Mira el form que estas usando es dinamico, solo pasas algunos valores y empieza a crear el catalogo de los campos, asi que te digo como podria quedar el form con una pequeña modificacion:

*&---------------------------------------------------------------------*
*& Form campos_fieldcat
*&---------------------------------------------------------------------*
FORM campos_fieldcat TABLES pt_fieldcat
USING d_fieldname d_ref_field d_tabname d_seltext_l
d_ddictxt d_key d_row_pos
d_fix_column d_outputlen d_checkbox
d_no_out d_sum
d_zero.
DATA:
fieldcat TYPE slis_fieldcat_alv.

CLEAR fieldcat.
fieldcat-fieldname = d_fieldname.
fieldcat-tabname = d_tabname.
if not d_ref_field is initial.
fieldcat-ref_fieldname = d_ref_field.
else.
fieldcat-seltext_l = d_seltext_l.
endif.fieldcat-ddictxt = d_ddictxt.
fieldcat-key = d_key.
fieldcat-row_pos = d_row_pos.
fieldcat-fix_column = d_fix_column.
IF NOT d_outputlen IS INITIAL.
fieldcat-outputlen = d_outputlen.
ENDIF.
fieldcat-checkbox = d_checkbox.
fieldcat-no_out = d_no_out.
fieldcat-do_sum = d_sum.
fieldcat-no_zero = d_zero.
APPEND fieldcat TO pt_fieldcat.
ENDFORM. " campos_fieldcat

Lo que esta en color es lo que se cambiaria para poder hacer esta funcion mas abierta y con mejor opcion, ahora en el programa tu tienes muchas o varias llamadas con perform, por lo cual a todas les debes agregar un espacio o el nombre del campo de referencia, en este caso para la cuenta pones hkont y listo veras que se soluciona.