Програмное присвоение группы пользователю

excalibur

подскажите пожалуйста

необходимо программно добавлять и удалять группы для конкретного пользователя

написал следующий код в SolutionManager

Code:

CALL FUNCTION 'SUSR_USER_GROUP_GROUPS_PUT'
        EXPORTING
          BNAME              = user
        TABLES
          USERGROUPS         = table_for_fm.

IF sy-subrc IS INITIAL.
          CALL FUNCTION 'SUSR_USER_BUFFERS_TO_DB'
            EXCEPTIONS
              no_logondata_for_new_user = 1
              no_init_password          = 2
              db_insert_usr02_failed    = 3
              db_update_usr02_failed    = 4
              db_insert_usr01_failed    = 5
              db_update_usr01_failed    = 6
              db_insert_usr05_failed    = 7
              db_update_usr05_failed    = 8
              db_insert_usr21_failed    = 9
              db_update_usr21_failed    = 10
              internal_error            = 11
              others                    = 12.
ENDIF.

вроде все отрабатывает
но в результате в таблицах изменения не происходят

чё делать?

Bully: есть такая кнопочка "Code" плз пользуйте ее.

sy-uname

excalibur написал(а):

подскажите пожалуйста

необходимо программно добавлять и удалять группы для конкретного пользователя

написал следующий код в SolutionManager

Code:

CALL FUNCTION 'SUSR_USER_GROUP_GROUPS_PUT'
        EXPORTING
          BNAME              = user
        TABLES
          USERGROUPS         = table_for_fm.

IF sy-subrc IS INITIAL.
          CALL FUNCTION 'SUSR_USER_BUFFERS_TO_DB'
            EXCEPTIONS
              no_logondata_for_new_user = 1
              no_init_password          = 2
              db_insert_usr02_failed    = 3
              db_update_usr02_failed    = 4
              db_insert_usr01_failed    = 5
              db_update_usr01_failed    = 6
              db_insert_usr05_failed    = 7
              db_update_usr05_failed    = 8
              db_insert_usr21_failed    = 9
              db_update_usr21_failed    = 10
              internal_error            = 11
              others                    = 12.
ENDIF.

вроде все отрабатывает
но в результате в таблицах изменения не происходят

чё делать?

А почему BAPI не используете?
И почему COMMIT не ставите?
И делать проверку на IF sy-subrc IS INITIAL. если у ФМ не определена секция EXCEPTIONS безсмысленно.

Правила форума

Програмное присвоение группы пользователю

Кто сейчас на конференции