Название текущего INCLUDE

Валерка

Есть INCLUDE который подключается в разных программах. В INCLUDE определен класс и есть метод в котором необходимо знать дату изменения текущего INCLUDE.
При этом желательно чтобы при изменении названия INCLUDE (или просто его копировании) название текущего INCLUDE определялось правильно. sy-repid содержит текущую программу. А можно как-то получить название текущего INCLUDE?

hoar

Навскидку:
Создать в коде TRY CATCH cx_root.
Принудительно сгнерировать ошибку.
cx_root в CATCH вернёт (во всяком случае должен): программу, инклюд, строку.
Сам подобной целью не задавался, но когда сам ловлю свои ошибки, cx_root возвращал мне искомое.

trop

ещё вариант:
вызвать ф/м SYSTEM_CALLSTACK,
в обновл. версии ф/м см. эксп. параметр CALLSTACK (тип ABAP_CALLSTACK),
в него добавили include и line

Валерка

Судя по всему у меня система не поддерживает ни "TRY CATCH cx_root", ни обновленную версию SYSTEM_CALLSTACK.
SYSTEM_CALLSTACK я и так вызываю, но там нет никакой информации об INCLUDE, только программа.

Так что сделал просто константу с версией. При изменении буду её менять, чтобы динамические программы пересоздавались. Узнать время из INCLUDE не получилось. Как вариант, можно туда не версию, а имя INCLUDE писать.

LAT

1) Использовать CALL 'ABAP_CALLSTACK'.
2) дату изменения текущего INCLUDE можно узнать из trdir.

Валерка

Сделал вот таким вот образом.

Code:

      "-- Стык вызовов
      TYPES:
        begin of abap_call_stack_entry,
          mainprogram  type sy-repid,
          include      type sy-repid,
          line         type i,
          eventtype    type abdbg-leventtype,
          event        type abdbg-levent,
          flag_system  type CHAR1,
        end of abap_call_stack_entry.
      DATA:
        it_stack type table of abap_call_stack_entry,
        wa_stack like line of it_stack
      .
      CALL 'ABAP_CALLSTACK' ID 'DEPTH' FIELD -1
                            ID 'CALLSTACK' FIELD it_stack.

Все работает. Но тут вот коллеги озвучили мнение что вроде не рекомендуют использовать такие прямые вызовы, так как они могут не поддерживаться в новых версиях. Насколько эта команда поддерживается в разных версиях SAP?

Parazit

Валерка написал(а):

Сделал вот таким вот образом.

Code:

      "-- Стык вызовов
      TYPES:
        begin of abap_call_stack_entry,
          mainprogram  type sy-repid,
          include      type sy-repid,
          line         type i,
          eventtype    type abdbg-leventtype,
          event        type abdbg-levent,
          flag_system  type CHAR1,
        end of abap_call_stack_entry.
      DATA:
        it_stack type table of abap_call_stack_entry,
        wa_stack like line of it_stack
      .
      CALL 'ABAP_CALLSTACK' ID 'DEPTH' FIELD -1
                            ID 'CALLSTACK' FIELD it_stack.

Все работает. Но тут вот коллеги озвучили мнение что вроде не рекомендуют использовать такие прямые вызовы, так как они могут не поддерживаться в новых версиях. Насколько эта команда поддерживается в разных версиях SAP?

Работает:
SAP_BASIS 740 0006 SAPKB74006
SAP_ABA 740 0006 SAPKA74006

Валерка

В двух системах протестировал - работает. Так что оставил такой вариант. Если что, тогда уж буду исправлять.

Всем спасибо за помощь.

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

Название текущего INCLUDE

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