Архивы Основы

Типы RFC в SAP

Remote Function Call (RFC) – стандартный интерфейс связи между SAP системами. RFC функцию можно выполнить в другой системе.

Существует несколько видов RFC функций.

sRFC

sRFC – синхронные RFC. Данный вид RFC выполняется на принципах синхронной связи. Т.е. целевая система должна быть доступна в данный момент, а система из которой вызывается RFC ожидает выполнения. Применение данных RFC целесообразно когда требуется получить данные из целевой системы. Например, при работе в ERP требуется чтение данных какой-либо таблицы в HR системе.
ФМ должен иметь тип выполнения – “Дистанционный модуль”.

Читать далее «Типы RFC в SAP»

Дружба ABAP Objects. Получить доступ к приватному атрибуту

Обычно доступ к приватным и защищенным атрибутам объекта запрещен из-за пределов класса. Но порой необходимо нарушить эту концепцию по тем или иным причинам. Для этого в ABAP существует “дружба”.
Класс может предоставить дружбу другим классам и интерфейсам. Этим друзьям предоставляется доступ ко всем компонентам класса, предлагающего дружбу, независимо от их раздела видимости или добавления READ-ONLY.

Пример:

CLASS lcl_friend DEFINITION.
  PUBLIC SECTION.
    METHODS access.
ENDCLASS.

CLASS lcl_class_one DEFINITION FRIENDS lcl_friend.
  PRIVATE SECTION.
    DATA mv_variable TYPE string VALUE 'Private Attribute'.
ENDCLASS.

CLASS lcl_friend IMPLEMENTATION.
  METHOD access.
    DATA(lo_obj) = NEW lcl_class_one( ).
    cl_demo_output=>display( lo_obj->mv_variable ).
  ENDMETHOD.
ENDCLASS.

START-OF-SELECTION.

  DATA(lo_object) = NEW lcl_friend( ).
  lo_object->access( ).

CLASS lcl_friend DEFINITION.

PUBLIC SECTION.

METHODS access.

ENDCLASS.

CLASS lcl_class_one DEFINITION FRIENDS lcl_friend.

PRIVATE SECTION.

DATA mv_variable TYPE string VALUE 'Private Attribute'.

ENDCLASS.

CLASS lcl_friend IMPLEMENTATION.

METHOD access.

DATA(lo_obj) = NEW lcl_class_one( ).

cl_demo_output=>display( lo_obj->mv_variable ).

ENDMETHOD.

ENDCLASS.

START-OF-SELECTION.

DATA(lo_object) = NEW lcl_friend( ).

lo_object->access( ).

Читать далее «Дружба ABAP Objects. Получить доступ к приватному атрибуту»

Маски в ABAP и SQL

	Файловая система	Open SQL	ABAP
Любое кол-во символов	*	%	*
Один любой символ	?	_	+

Давайте рассмотрим примеры поиска
SQL используется оператор LIKE

SELECT *
       FROM doktl
       WHERE id      = 'SD'      AND
             object  LIKE 'AB%'  AND
             langu   = @sy-langu AND
             typ     = 'E'       
       INTO TABLE @DATA(text_tab)
       UP TO 100 ROWS.

SELECT *

FROM doktl

WHERE id = 'SD' AND

object LIKE 'AB%' AND

langu = @sy-langu AND

typ = 'E'

INTO TABLE @DATA(text_tab)

UP TO 100 ROWS.

Внутренние таблицы ABAP используем оператор CP и NP для:
Чтение по маске:

TYPES: BEGIN OF lty_s_tmp,
    id   type i,
    line type string,
       END OF lty_s_tmp,

    lty_t_tmp TYPE TABLE OF lty_s_tmp WITH DEFAULT KEY.

DATA(lt_data) = VALUE lty_t_tmp(
                        ( id = 1 line = 'data 100 data' )
                        ( id = 2 line = 'data 100* data' )
                        ( id = 3 line = 'data 100##' )
                               ).

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data0>) WHERE line CP '*100*' .

ENDLOOP.

TYPES: BEGIN OF lty_s_tmp,

id type i,

line type string,

END OF lty_s_tmp,

lty_t_tmp TYPE TABLE OF lty_s_tmp WITH DEFAULT KEY.

DATA(lt_data) = VALUE lty_t_tmp(

( id = 1 line = 'data 100 data' )

( id = 2 line = 'data 100* data' )

( id = 3 line = 'data 100##' )

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data0>) WHERE line CP '*100*' .

ENDLOOP.

Удаление по маске(проверить возможность установить CP NP)
и использовать RANGE

types:
begin of lty_itab,
   str type string,
    other_fields type string,
end of lty_itab.

data:
lt_itab type standard table of lty_itab,
lr_str type range of string,
ls_str like line of lr_str.

ls_str-sign = 'I'.
ls_str-option = 'CP'.
ls_str-low = 'sap*'.
append ls_str to lr_str.

delete lt_itab where str in lr_str.

types:

begin of lty_itab,

str type string,

other_fields type string,

end of lty_itab.

data:

lt_itab type standard table of lty_itab,

lr_str type range of string,

ls_str like line of lr_str.

ls_str-sign = 'I'.

ls_str-option = 'CP'.

ls_str-low = 'sap*'.

append ls_str to lr_str.

delete lt_itab where str in lr_str.

Эскейп символ.

Немного усложним задачу, что если в искомой строке уже будет специальный
символ. Например, мы хотим выбрать строку “В молоке 30% жирности”
Для этого и существуют дополнение ESCAPE. SAP рекомендует использоать символ “#”

Пример:

SELECT  * 
     FROM ZZZ_TEST_TAB INTO TABLE @DATA(lt_result) 
                   WHERE FIELD_1 LIKE '%30#%%' ESCAPE '#'.

SELECT *

FROM ZZZ_TEST_TAB INTO TABLE @DATA(lt_result)

WHERE FIELD_1 LIKE '%30#%%' ESCAPE '#'.

Для внутренних таблиц аналогично, но работает без дополнения:

TYPES: BEGIN OF lty_s_tmp,
    id   type i,
    line type string,
       END OF lty_s_tmp,

    lty_t_tmp TYPE TABLE OF lty_s_tmp WITH DEFAULT KEY.

DATA(lt_data) = VALUE lty_t_tmp(
                        ( id = 1 line = 'data 100 data' )
                        ( id = 2 line = 'data 100* data' )
                        ( id = 3 line = 'data 100##' )
                               ).

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data0>) WHERE line CP '*100#**' .

ENDLOOP.

"где #* означает символ *, а последняя * - любое количество символов

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data1>) WHERE line CP '*100####' .

ENDLOOP.

TYPES: BEGIN OF lty_s_tmp,

id type i,

line type string,

END OF lty_s_tmp,

lty_t_tmp TYPE TABLE OF lty_s_tmp WITH DEFAULT KEY.

DATA(lt_data) = VALUE lty_t_tmp(

( id = 1 line = 'data 100 data' )

( id = 2 line = 'data 100* data' )

( id = 3 line = 'data 100##' )

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data0>) WHERE line CP '*100#**' .

ENDLOOP.

"где #* означает символ *, а последняя * - любое количество символов

LOOP AT lt_data ASSIGNING FIELD-SYMBOL(<ls_data1>) WHERE line CP '*100####' .

ENDLOOP.

Блокировки SAP. Позитивные\Негативные. Пример блокировок

Блокировка – отметка записи в базе данных на время проведения операции(INSERT, UPDATE и т.д.). Служит для предотвращения коллизий при доступе к записи и устанавливается на время операции на уровне БД. SAP для своей системы позволяет создал свою концепцию блокировок, которая позволяет блокировать определенные данные на все время работы транзакции.

Читать далее «Блокировки SAP. Позитивные\Негативные. Пример блокировок»

Виртуальная сортировка внутренней таблицы

В abap 7.52 появилась возможность получить порядок записи внутренней таблицы не меняя исходные данные. Т.е., например, можно виртуально отсортировать таблицу в import параметре по интересующему нас ключу.
Для этого был добавлен метод VIRTUAL_SORT класса cl_abap_itab_utilities.
Рассмотрим пример:

Читать далее «Виртуальная сортировка внутренней таблицы»

TRY … RETRY, CLEANUP, RESUME

Разберем несколько операторов в блокe TRY… ENDTRY.

Retry – позволяет выполнить блок TRY еще раз. Перед перезапуском блока необходимо исправить ситуацию, из-за которой случилась ошибка. В противном случае, попадем в бесконечный цикл.

types: begin of gty_s_fio,
         pernr type text8, "в тестовой системе нет hr  типов
         fio   type text100,
         bukrs type bukrs,
       end of gty_s_fio.

data gt_fio type table of gty_s_fio.

try.
    data(gs_data) = gt_fio[ bukrs = '0001' ].
  catch cx_root.
    append value #( pernr = '90000001' fio = 'Ivanov I.I.'  bukrs = '0001'     ) to gt_fio.
    retry.
endtry.

types: begin of gty_s_fio,

pernr type text8, "в тестовой системе нет hr типов

fio type text100,

bukrs type bukrs,

end of gty_s_fio.

data gt_fio type table of gty_s_fio.

try.

data(gs_data) = gt_fio[ bukrs = '0001' ].

catch cx_root.

append value #( pernr = '90000001' fio = 'Ivanov I.I.' bukrs = '0001' ) to gt_fio.

retry.

endtry.

RESUME – возобновляемое исключение. Программа возвращается к работе после исключения.

Читать далее «TRY … RETRY, CLEANUP, RESUME»

Оператор FILTER

ABAP 7.4 вышел уже очень давно, однако, его операторы мало кто использует. Рассмотрим сегодня оператор FILTER который позволяет выбирать данные из одной внутренней таблицы в другую по ключам.
Читать далее «Оператор FILTER»

Путь анализа. Получение объектов по пути анализа.

Продолжаю рассказывать основы разработки в HCM, для разработчиков из других модулей. Недавно зашел в код программы, которую писал не HR абапер, и у меня чуть не случился приступ. Селекты, конечно, красивые…

Вводная информация.
Объект ОМ – это сущность в организационном менеджменте, которая отображает некий объект реального мира или абстракцию. Различаются они типом объектов. Например S – Штатная должность, O – Организационная единица, A -Рабочее место и так далее. Существование объекта означает наличие записи в инфо-типе 1000 в определенном временном периоде. Остальные инфо-типы хранят свойства этого объекта. Исключение Табельный номер, данные объекты являются объектами PA и ведутся немного в других ИТ.

Читать далее «Путь анализа. Получение объектов по пути анализа.»

ЛБД PNPCE

ЛБД PNPCE служит для выбора данных модуля PA и является более новой версией ЛБД PNP c функциями для работы с центральным лицом(CE). На сегодняшний день в 100% случаях используется именно она, даже если работа с CE вам не нужна.
Как и в случае с организационным менеджментом при разработке отчетов для администрирования персонала необходимо использовать ЛБД. Не буду повторятся о необходимости использования, почитайте.

Это не полное руководство, а лишь обзор ЛБД PNPCE

Читать далее «ЛБД PNPCE»