Сниппеты | ABAP/4

Просмотр публикаций в рубрике: Сниппеты

Сен 9, 2020 |

Древовидное представления данных на примерах

Ниже представлены различные варианты реализации древовидного представления данных.
Демонстрация использования CL_SALV_TREE

ALV Tree

Май 6, 2020 |

2 комментария

Чтение текстов

Для чтения текстов из ABAP используется функциональный модуль READ_TEXT. Ниже представлен пример чтения текста заголовка FI документа.

DATA ls_bkpf TYPE bkpf.
DATA lv_name TYPE thead-tdname.
DATA lt_lines TYPE TABLE OF tline.
DATA lv_string TYPE string.

...

CONCATENATE ls_bkpf-bukrs ls_bkpf-belnr ls_bkpf-gjahr
  INTO lv_name RESPECTING BLANKS.

CALL FUNCTION 'READ_TEXT'
  EXPORTING
    id                      = '0001'
    language                = sy-langu
    name                    = lv_name
    object                  = 'BELEG'
  TABLES
    lines                   = lt_lines
  EXCEPTIONS
    id                      = 1
    language                = 2
    name                    = 3
    not_found               = 4
    object                  = 5
    reference_check         = 6
    wrong_access_to_archive = 7
    OTHERS                  = 8.
IF sy-subrc EQ 0.
  CALL FUNCTION 'IDMX_DI_TLINE_INTO_STRING'
    EXPORTING
      it_tline       = lt_lines
    IMPORTING
      ev_text_string = lv_string.

  WRITE / lv_string.
ELSE.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

DATA ls_bkpf TYPE bkpf.

DATA lv_name TYPE thead-tdname.

DATA lt_lines TYPE TABLE OF tline.

DATA lv_string TYPE string.

...

CONCATENATE ls_bkpf-bukrs ls_bkpf-belnr ls_bkpf-gjahr

INTO lv_name RESPECTING BLANKS.

CALL FUNCTION 'READ_TEXT'

EXPORTING

id = '0001'

language = sy-langu

name = lv_name

object = 'BELEG'

TABLES

lines = lt_lines

EXCEPTIONS

id = 1

language = 2

name = 3

not_found = 4

object = 5

reference_check = 6

wrong_access_to_archive = 7

OTHERS = 8.

IF sy-subrc EQ 0.

CALL FUNCTION 'IDMX_DI_TLINE_INTO_STRING'

EXPORTING

it_tline = lt_lines

IMPORTING

ev_text_string = lv_string.

WRITE / lv_string.

ELSE.

MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno

WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

ENDIF.

Мар 19, 2020 |

2 комментария

Срытие и отображение фреймов на селекционном экране

Возникают задачи, когда по определенному событию требуется скрыть или отобразить определенные блоки параметров на селекционном экране. Например, при нажатии на Check-Box или Radio-Button требуется отобразить фреймы с дополнительной информацией. Ниже описан способ как можно проводить манипуляции с целыми блоками без привязки к именам параметров. Читать дальше…

ABAP SSEL Экран выбора

Мар 17, 2020 |

Нет комментариев

RFC модули и параллельная обработка

RFC (Remote Function Call) — протокол обмена данными между системами (подробно о SAP RFC написано в курсе BC415). RFC применяются для интеграции SAP и не SAP систем, обработки данных в новой сессии, параллельной обработки данных и т.п.

Классификация RFC

Синхронный RFC или sRFC. Определяется с помощью дополнения DESTINATION. При вызове sRFC рабочий процесс приостанавливает свою работу пока вызываемый sRFC модуль не завершит свою работу. Вызов sRFC выполняется в отдельном DB LUW. При вызове sRFC в основном процессе происходит неявный COMMIT.
Асинхронные RFC – определяются с помощью дополнения STARTING NEW TASK. К ним относятся асинхронные (aRFC) и параллельные (pRFC) RFC вызовы. При асинхронном вызове, вызываемый модуль запускается в новом процессе и работает параллельно с основным рабочим процессом. Результат выполнения ФМ можно получить в функции обратной связи. Вызовы aRFC и pRFC выполняются в отдельных DB LUW.
Фоновые RFC – определяются с помощью дополнения IN BACKGROUND. К ним относятся транзакционные (tRFC), очередные (qRFC) и фоновые (bgRFC) RFC вызовы. ФМ работают независимо от основного процесса и начинают выполнение после команды COMMIT WORK. На все фоновые RFC создается один DB LUW. Результат фонового RFC нельзя передать в основной процесс.

RFC Параллельная обработка

Июл 1, 2019 |

Нет комментариев

Подсветка синтаксиса ABAP в Notepad++

В стандартном наборе поддерживаемых языков программирования в Notepad++ нет ABAP. Её можно настроить самостоятельно.
1. Скачиваем XML-файл
2. Синтаксис -> Задать свой синтаксис -> Импортировать
ABAP подсветка в Notepad++

Notepad++

Фев 11, 2019 |

2 комментария

Конфигурация SELECT-OPTIONS

Функциональный модуль SELECT_OPTIONS_RESTRICT позволяет настраивать параметры типа SELECT-OPTIONS на экране выбора, ограничивая параметры SIGN и OPTION.
Например, можно ограничить выбор счёта, допустив указание фиксированного значения либо по маске.

Ограничение SIGN = I, OPTION = EQ или CP

SSEL Перегрузка Экран выбора

Июн 28, 2016 |

Нет комментариев

Автоматический пересчет данных в разрезе выбранных полей ALV Grid

ALV Grid позволяет пользователю отображать отчет в желаемом виде. Пользователю доступны такие операции как: отображение или скрытие указанных полей, изменение порядка вывода столбцов. Зачастую, при изменении списка отображаемых полей, заказчик хочет видеть пересчет данных в разрезе отображаемых столбцов. Ниже описан способ автоматического пересчета данных в таблице, на основе каталога полей ALV Grid.
Читать дальше…

ABAP ALV RTTS

Июн 27, 2016 |

Комментарии (1)

Получение доступа к таблице с данными в ALV Grid

Иногда возникает необходимость необходимость получить доступ к таблице с данными в ALV Grid (класс CL_GUI_ALV_GRID). Ссылка на таблицу с данными лежит в атрибуте MT_OUTTAB. Спецификатор доступа Protected запрещает использование данного атрибута за пределами класса, но разрешает его использование потомкам. Чтобы получить значение данного атрибута, необходимо создать вспомогательный класс, наследованный от CL_GUI_ALV_GRID, и определить в нем статичный метод, извлекающий необходимые данные.
Читать дальше…

ABAP ALV

Май 18, 2016 |

Нет комментариев

Заполнение справочных полей таблицы по ключу

Пусть у нас имеется внутренняя таблица, размерность которой может составлять как десяток строк, так и сотни тысяч строк

  DATA:
    BEGIN OF lt_tab OCCURS 0,
      bukrs       LIKE t001-bukrs,    " БЕ
      bukrs_txt   LIKE t001-butxt,    " Наименование БЕ
      werks       LIKE t001w-werks,   " Завод
      werks_txt   LIKE t001w-name1,   " Наименование завода
      matnr       LIKE makt-matnr,    " Материал
      matnr_txt   LIKE makt-maktx,    " Наименование материала
      dmbtr       TYPE tslxx,         " Сумма
    END OF lt_tab.

DATA:

BEGIN OF lt_tab OCCURS 0,

bukrs LIKE t001-bukrs, " БЕ

bukrs_txt LIKE t001-butxt, " Наименование БЕ

werks LIKE t001w-werks, " Завод

werks_txt LIKE t001w-name1, " Наименование завода

matnr LIKE makt-matnr, " Материал

matnr_txt LIKE makt-maktx, " Наименование материала

dmbtr TYPE tslxx, " Сумма

END OF lt_tab.

Поля таблицы можно классифицировать на справочные и не справочные. К первой группе относятся: bukrs_txt, werks_txt, matnr_txt. Ко второй остальные. Для каждого справочного поля имеется соответствующий ключ, по которому можно однозначно определить значение справочного поля. Например, ключом поля bukrs_txt будет bukrs, т.к. для определения наименования БЕ необходимо знать код БЕ. Как правило, заполнение справочных полей значениям происходит в последнюю очередь.
Задача: заполнить справочные поля по соответствующим ключам, используя при этом минимальные ресурсные затраты.
Читать дальше…

ABAP FORM Базы данных Внутренние таблицы

Страницы:‹123 ›