Вопрос о блокировке объектов

dev403k

Добрый день.
У меня такой вопрос. Как мне известно, блокировка объекта (например – партии) снимается автоматически после вызова commit. Можно ли оставить блокировку партии , даже если в программе были операторы commit?

Задача такова, что после выполнения стандарта необходимо выполнить автоматически проводку MIGO. Расширили стандарт. Иногда наша проводка не срабатывает, т.к. в этот момент кто-то начинает выполнять действия с партиями и тем самым BAPI в нашем расширении выдает сообщение о блокировке партии. Мы поставили в начале расширения блокировку, но это не всегда помогает.

Спасибо.

zsap

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

Можно ли оставить блокировку партии , даже если в программе были операторы commit?

ФМ блокировки запускайте со _SCOPE = 1, хелп поглядите

dev403k

zsap написал:

ФМ блокировки запускайте со _SCOPE = 1, хелп поглядите

Огромное спасибо. Все получилось.

nymbos

Подскажите, что делаю не так:

Code:

  DATA: l_vbeln TYPE vbeln_va VALUE '9459999999',
        ls_vbak TYPE vbak. "'0450000002'

  SELECT SINGLE * INTO ls_vbak FROM vbak WHERE vbeln = '0450000002'.
    ls_vbak-vbeln = l_vbeln.
  INSERT INTO vbak VALUES ls_vbak.
  COMMIT WORK. "Добавили строку

  CALL FUNCTION 'ENQUEUE_EZVVBAKE' 
       EXPORTING
            "MODE_VBAK      = 'E'
            mandt          = sy-mandt
            vbeln          = l_vbeln
            _scope         = '1'
       EXCEPTIONS
            foreign_lock   = 1
            system_failure = 2
            OTHERS         = 3 .

    DELETE FROM vbak WHERE vbeln = l_vbeln.

    COMMIT WORK. "Строка удалилась не смотря на _scope = '1'

Хочу, чтобы последний commit видел блокировку и не удалял запись.

lyo

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

Подскажите, что делаю не так:

Code:

  DATA: l_vbeln TYPE vbeln_va VALUE '9459999999',
        ls_vbak TYPE vbak. "'0450000002'

  SELECT SINGLE * INTO ls_vbak FROM vbak WHERE vbeln = '0450000002'.
    ls_vbak-vbeln = l_vbeln.
  INSERT INTO vbak VALUES ls_vbak.
  COMMIT WORK. "Добавили строку

  CALL FUNCTION 'ENQUEUE_EZVVBAKE' 
       EXPORTING
            "MODE_VBAK      = 'E'
            mandt          = sy-mandt
            vbeln          = l_vbeln
            _scope         = '1'
       EXCEPTIONS
            foreign_lock   = 1
            system_failure = 2
            OTHERS         = 3 .

    DELETE FROM vbak WHERE vbeln = l_vbeln.

    COMMIT WORK. "Строка удалилась не смотря на _scope = '1'

Хочу, чтобы последний commit видел блокировку и не удалял запись.

ФМ ENQUEUE_EZVVBAKE устанавливает SAP-блокировку, а не блокировку на уровне БД, никаких ограничений на уровне БД нет.

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

Вопрос о блокировке объектов

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