Kennwortregeln einfach über ABAP prüfen mit FuBa PASSWORD_FORMAL_CHECK

Es gibt immer mal wieder Stellen wo SAP-seitig Passwörter generiert werden müssen. Ein Beispiel ist in dem Beitrag Service Passwort zurücksetzen auf dem Fiori Launchpad beschrieben. Was hierbei in heterogenen Landschaften aber nicht gleich bedacht ist sind die Passwortrichtlinien, die speziell ausgeprägt sein können. Mindestlänge, Buchstaben, Zahlen, usw. Diese wird bei dem FuBa RS_GENERATE_PASSWORD nämlich nicht berücksichtigt.

Das ist ein Fall wo es hilfreich sein kann generierte Passwörter gegenzuprüfen. Dafür gibt es den FuBa PASSWORD_FORMAL_CHECK der genau das tut. Dort kann neben dem zu prüfendem Passwort auch die entsprechende Policy mitgegeben werden sonst zieht der Default.

REPORT  zr_sw_test.
types tty_bapipwd type standard table of bapipwd WITH DEFAULT KEY.
DATA lv_rc type sysubrc.
DATA lv_msgtext type string.

loop at value tty_bapipwd( ( bapipwd = 'Pwd' )
                           ( bapipwd = 'IAmAPassword!' )
                           ( bapipwd = 'IAmAPassword!1' ) ) assigning field-SYMBOL(<ls_bapipwd>).

  CALL FUNCTION 'PASSWORD_FORMAL_CHECK'
    EXPORTING
      password                   = <ls_bapipwd>
   IMPORTING
     RC                         = lv_rc
     MSGTEXT                    = lv_msgtext
   EXCEPTIONS
     INTERNAL_ERROR             = 1
     OTHERS                     = 2
            .

  WRITE:/ |Passwort: { <ls_bapipwd>-bapipwd } Returncode: { lv_rc } Nachricht: { lv_msgtext }|.

endloop.