Create unique handle for ALV grid layout

Question

Hi,
in some generic classes we display internal tables in a grid. We want to activate the save&maintain layouts feature by passing the DISVARIANT structure, Here wen have to give Report and handle. As we display some more tables using the same method, we must set a unique handle so that saved ALV layouts do not get merged /confused. As we do not have a table name at this point, my idea is to create a hash key based on the fields in the field catalog (field catalog is only distinguishable object here).
I need an algorithm to create the 4-character handle as a hash value based on the (concatenated) field names in field catalog.
Or a better idea to create unique handles in the generic ALV calls in one program.
Please: Serious answers only.
Regards,
Clemens

Answer 1

Here it is
function enqueuecomputehash.
*"*"Lokale Schnittstelle:
*"  IMPORTING
*"     VALUE(INPUT) TYPE  STRING
*"     VALUE(INPUT_LEN) TYPE  I
*"     VALUE(HASH_LEN) TYPE  I
*"  EXPORTING
*"     REFERENCE(HASH) TYPE  STRING
*"     REFERENCE(TIME_USEC) TYPE  I
*"  EXCEPTIONS
*"      INVALID_ARGUMENT
field-symbols <text>.
field-symbols <hash>.
data: tmp_input type text8192.
data: tmp_hash  type text8192.
if input_len < 1 or hash_len < 1.
   raise invalid_argument.
endif.
assign tmp_input(input_len) to <text>.
assign tmp_hash(hash_len) to <hash>.
data: t1 type i,
      t2 type i.
<text> = input.
get run time field t1.
call 'C_ENQ_WILDCARD' id 'TEXT'     field <text>
                      id 'TEXTHASH' field <hash>.
get run time field t2.
hash = <hash>.
time_usec = t2 - t1.
endfunction.