EXPORT SHARED BUFFER

skd1980

Добрый день! В Коде программы есть следующая строка:

Code:

IMPORT strategy TO e_strategy FROM SHARED BUFFER tabadrx(dr) ID id

А как отловить где есть EXPORT в этот буфер? Через St05 пробовал, не получается

Korvax

Через отладчик, поставить точку прерывания на "EXPORT TO SHARED BUFFER"

skd1980

Korvax написал:

Через отладчик, поставить точку прерывания на "EXPORT TO SHARED BUFFER"

В том-то и дело, что я не знаю где находится EXPORT. Как на него поставить точку прерывания. если не известно где находится данная строка? Через st05 прогонял программу, но там нет EXPORTа

Korvax

Заходите в отладчик => F9. На вкладке ABAPкоманда "EXPORT TO SHARED BUFFER". Дальше F8, на каждом EXPORT TO SHARED BUFFER будет прерывание.

skd1980

Korvax написал:

Заходите в отладчик => F9. На вкладке ABAPкоманда "EXPORT TO SHARED BUFFER". Дальше F8, на каждом EXPORT TO SHARED BUFFER будет прерывание.

Я так делал. Не останавливается нигде

Если вводить просто EXPORT, то есть точки прерывания только на EXPORT MEMORY

Korvax

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

Не останавливается нигде

Может просто поздно ставите?

skd1980

Korvax написал:

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

Не останавливается нигде

Может просто поздно ставите?

Зашел в транзакцию - ввел номер документа - жму "/h" - запускаю траназкцию (vl02n) - сразу открылся отладчик - жму F9...

Korvax

Попробуйте еще переключиться на старый отладчик.
upd. И можно вкратце как оно работает, а то непонятно какую транзакцию запускаете и причем здесь VL02N..

skd1980

Korvax написал:

Попробуйте еще переключиться на старый отладчик.
upd. И можно вкратце как оно работает, а то непонятно какую транзакцию запускаете и причем здесь VL02N..

Транзакцию сразу запускаю Vl02N. Просто уточнил поздно, надо было в самом начале написать. Место EXPORT нашел через классический вид отладчика. Нажал кнопку "Обзор" в отладчике и просмотрел все функции и формы. Нашел ту что надо. Но теперь при запуске транзакции отладчик все равно не заходит в нужную мне форму. В связи с этим вопрос, а может ли EXPORT SHARED BUFFER сохранять данные сколь угодно долго? Т.к. такое чувство, что экспорт идет на более ранней стадии - когда создается документ.

Korvax

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

Но теперь при запуске транзакции отладчик все равно не заходит в нужную мне форму.

Даже классический?

skd1980

Korvax написал:

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

Но теперь при запуске транзакции отладчик все равно не заходит в нужную мне форму.

Даже классический?

Даже классический не помогает

. Точку выставляю в программе SAPLABADR инклуд LABADRF03 подпрограмма strategy--read_with_client.

Korvax

а первый раз как попали? попробуйте поставить точку выше, может по каким то условиям не заходит.

skd1980

Korvax написал:

а первый раз как попали? попробуйте поставить точку выше, может по каким то условиям не заходит.

Не понял Вас. Куда выше? Она и так стоит в самом начале подпрограммы. Что интересно, в этом же инклуде и в этой же транзакции, но подпрограмма strategy--import легко останавливается. Собственно из этой strategy--import и начал копать откуда в нее данные попадают %-)

Korvax

ну например в strategy--assign (LABADRF03), там идет вызов strategy--import после чего анализируется переменная failed (что заполнена) и только после этого вызывается (если заполнена failed) strategy--read (в котором вызывается strategy--read_with_client).

skd1980

Korvax написал:

ну например в strategy--assign (LABADRF03), там идет вызов strategy--import после чего анализируется переменная failed (что заполнена) и только после этого вызывается (если заполнена failed) strategy--read (в котором вызывается strategy--read_with_client).

В strategy--import срабатывает строка после

Code:

* import from shared buffer

. Соответственно где-то должен быть перед этим экспорт. Или я не понимаю что-то?

Code:

  CLEAR e_failed.

  PERFORM strategy--get_tabadrx_name USING i_key id.

  CATCH SYSTEM-EXCEPTIONS import_mismatch_errors = 99.
*   import from shared buffer
    IMPORT strategy TO e_strategy
           FROM SHARED BUFFER tabadrx(dr) ID id.
    IF sy-subrc <> 0.
      e_failed = 'X'.
    ENDIF.
  ENDCATCH.

  IF sy-subrc <> 0.
    e_failed = 'X'.
  ENDIF.
  IF e_failed IS INITIAL.

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

EXPORT SHARED BUFFER

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