Выгрузка данных из Active Directory

excalibur

Добрый день.

Каким образом можно выгрузить из Active Directory поля содержащие табельный номер и электронный адрес?

Заранее благодарен за ответ.

Удав

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

Каким образом можно выгрузить из Active Directory поля содержащие табельный номер и электронный адрес?

Казалось бы - при чем здесь SAP?

Обычно информацию выгружают в файл (например в текстовый), затем данные из файла загружаются в R/3 с помощью LSMW в случае однократной загрузки или пишут программу загрузки данных для периодической загрузки.

sy-uname

Удав написал(а):

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

Каким образом можно выгрузить из Active Directory поля содержащие табельный номер и электронный адрес?

Казалось бы - при чем здесь SAP?

Обычно информацию выгружают в файл (например в текстовый), затем данные из файла загружаются в R/3 с помощью LSMW в случае однократной загрузки или пишут программу загрузки данных для периодической загрузки.

Ну почему же сразу текстовый файл? SAP вполне умеет работать с LDAP (AD, Exchange).
Примеры можно найти на SDN-е (например Update the proxyaddresses attribute via rsldapsync_user)
ADD1: Creating users in Active Directory from employee data stored in SAP HR - только обратная задача описана

excalibur

Удав написал(а):

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

Каким образом можно выгрузить из Active Directory поля содержащие табельный номер и электронный адрес?

Казалось бы - при чем здесь SAP?

Обычно информацию выгружают в файл (например в текстовый), затем данные из файла загружаются в R/3 с помощью LSMW в случае однократной загрузки или пишут программу загрузки данных для периодической загрузки.

С одной стороны Вы конечно правы, но такой вариант не подходит ....... никто не будет периодически выгружать информацию из АД. Задача следующая - раз в сутки для всех пользователей SAP по табельному номеру получать адрес электронной почты из АД и в зависимости от полученного результата прописать адрес или изменить его в учетной записи пользователя SAP.

excalibur

sy-uname написал(а):

Ну почему же сразу текстовый файл? SAP вполне умеет работать с LDAP (AD, Exchange).
Примеры можно найти на SDN-е (например Update the proxyaddresses attribute via rsldapsync_user)

Вот это больше похоже на то что мне нужно ... буду копаться в этом направлении. Спасибо.

Bully

Если у вас внедрён HR, то наверное правильнее делать выгрузку HR->AD

excalibur

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

Если у вас внедрён HR, то наверное правильнее делать выгрузку HR->AD

предприятий 7, HR внедрен только на 2-х (и через одно место

), а АД на всех....... в общем бизнес процесс оставляет желать лучшего

excalibur

пишу вот такой код

Code:

  PARAMETERS serverid LIKE ldapserver-serverid OBLIGATORY.

  CALL FUNCTION 'LDAP_SYSTEMBIND'
    EXPORTING
      serverid     = serverid
      writeread    = 'R'
    EXCEPTIONS
      no_authoriz  = 1
      config_error = 2
      nomore_conns = 3
      ldap_failure = 4
      not_alive    = 5
      other_error  = 6
      OTHERS       = 7.

    DATA: wa_attr TYPE ldapas,
        it_attr TYPE ldapastab,
        ldapetab TYPE ldapetab,
        ldaprc TYPE ldapdefs-ldrc,
        filter TYPE ldap_filt.

  wa_attr-typ = 'C'.
  wa_attr-name = 'SAMACCOUNTNAME'.

  APPEND wa_attr TO it_attr.

  CALL FUNCTION 'LDAP_READ'
   EXPORTING
*   BASE                = ''
*   base_string         = 
   scope               = 2
*   filter              = filter
*   FILTER_STRING       =
*   TIMEOUT             =
   attributes          = it_attr
   IMPORTING
     ldaprc              = ldaprc
     entries             = ldapetab
   EXCEPTIONS
     no_authoriz         = 1
     conn_outdate        = 2
     ldap_failure        = 3
     not_alive           = 4
     other_error         = 5
     OTHERS              = 6.

после выполнения ldaprc = 1 а ldapetab пустая .......

я предполагал что вернется список, состоящий из имен пользователей в домене.

Подскажите где я ошибся .......

excalibur

....разобрался. Нужно было писать так

writeread = 'W'

Code:

  CALL FUNCTION 'LDAP_SYSTEMBIND'
    EXPORTING
      serverid     = serverid
      writeread    = 'W'
    EXCEPTIONS
      no_authoriz  = 1
      config_error = 2
      nomore_conns = 3
      ldap_failure = 4
      not_alive    = 5
      other_error  = 6
      OTHERS       = 7.

тогда все работает.

И еще (может кому понадобится) для моей задачи больше подходит ФМ

Code:

DATA attrs_io  TYPE ldap_atii  OCCURS  0 WITH HEADER LINE.
DATA dns_out   TYPE ldap_dnii  OCCURS  0 WITH HEADER LINE.
DATA vals_out  TYPE ldap_vali  OCCURS  0 WITH HEADER LINE.

    lt_attrs_io-TEXT = 'mail'.
    lt_attrs_io-NUM1 = 4.
    lt_attrs_io-NUM2 = 1.
    APPEND lt_attrs_io.

    CALL FUNCTION 'LDAP_SEARCH'
         EXPORTING
                     base = '*строка соединения*'
                     scope = 2
*                     mode = mode
*                    CROP = 'X'
                     filter = '(&(objectclass=*)(description=1111111))'  "поиск по табельному номеру
*                     timeout = timeout
*        IMPORTING
*                    LDAPRC  = LDAPRC
         TABLES
                     dns_out = dns_out
                     attrs_io = lt_attrs_io
                     values_out = vals_out
         EXCEPTIONS
                     no_authoriz   = 1
                     conn_outdate  = 2
                     ldap_failure  = 3
                     not_alive     = 4
                     other_error   = 5
                     OTHERS        = 6.

lex2002s

Самое простое - воспользоваться программой "Выгрузка объектов из Active Directory". Её стоимость всего 150 р., но может она гораздо больше, чем просто выгружать пользователей. Доступен даже консольный режим запуска для автоматизации процесса выгрузки, экспорт контактов и учеток пользователей в формат vCard для дальнейшей загрузки в почту google и gmail, а так же многое другое... Скачать можно тут: http://www.sysadminsoft.ru/export-from-ad

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

Выгрузка данных из Active Directory

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