Архивы Основы - Страница 2 из 4

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

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

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

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

ЛБД PNPCE

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

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

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

Mesh или немного синтаксического сахара.

Mesh - это специальный тип который представляет собой связанные внутренние таблицы(узлы). Структура в целом похожа на структуру БД.
Mesh появился в ABAP 7.40 бла-бла-бла... Основная проблема в том ,что он не прижился, возможно из-за слабой осведомленности разработчиков, возможно из-за не перспективности подхода. Однако, в некоторых случаях данная концепция ложится довольно хорошо.

Читать далее «Mesh или немного синтаксического сахара.»

Операторы SWITCH .. COND..

В abap давно уже есть функциональные операторы SWITH и COND которые являются альтернативой CASE и IF соответственно.
Операторы умеют определять возвращаемый тип из контекста. Если это не возможно, необходимо указать его в ручную.
Также возможно использование LET.
Пример с IF:

if lv_a > 0.
  data(lv_result_1) = 1.
elseif lv_a < 0.
  lv_result_1 = 2.
  else.
    lv_result_1 = 0.
endif.

if lv_a > 0.

data(lv_result_1) = 1.

elseif lv_a < 0.

lv_result_1 = 2.

else.

lv_result_1 = 0.

endif.

Заменим на COND:

data(lv_result_1_new) = cond i( when lv_a > 0  then 1
                             when lv_a < 0 then 2
                            else 0 )  .

data(lv_result_1_new) = cond i( when lv_a > 0 then 1

when lv_a < 0 then 2

else 0 ) .

Пример с CASE:

case lv_b.
  when 'A'.
    data(lv_result_2) = 'First'.
  when 'B'.
       lv_result_2 = 'Second'.
  when others.
    lv_result_2       = 'Others'.
 endcase.

case lv_b.

when 'A'.

data(lv_result_2) = 'First'.

when 'B'.

lv_result_2 = 'Second'.

when others.

lv_result_2 = 'Others'.

endcase.

Замена на SWITH:

DATA(lv_result_2_new) = switch #( lv_b
                                 when 'A' then 'First'
                                 when 'B' then 'Second'
                                 else  'Others'
                                ).

DATA(lv_result_2_new) = switch #( lv_b

when 'A' then 'First'

when 'B' then 'Second'

else 'Others'

Пример использования cond

boolc и xsdbool ABAP

В abap 7.40 появились новые логические функции boolc() и xsdbool() они определяют истинность логического выражения в аргументе boolc( логическое выражение )/ xsdbool ( логическое выражение ).
Отличаются тем, что boolc( ) имеет тип данных "С" в качестве возвращаемого параметра, а xsdbool() возвращает тип abap_bool.

Пример:

"
method example.

  ......
  if sy-subrc = 0 and lv_a = lv_b.
    rv_result = abap_true.
  endif.

endmethod.

method example.

......

if sy-subrc = 0 and lv_a = lv_b.

rv_result = abap_true.

endif.

endmethod.

Тоже самое с использованием xsdbool():

"

method example_xsdbool.

  ......
    rv_result = xsdbool( sy-subrc = 0 and lv_a = lv_b ).

endmethod.

method example_xsdbool.

......

rv_result = xsdbool( sy-subrc = 0 and lv_a = lv_b ).

endmethod.

Еще удобно можно передавать результат на вход метода.

report zhr_pau_test.

class lcl_example definition.
  public section.
  methods example importing iv_bool_par type abap_bool.
endclass.

class lcl_example implementation.
  method example.
    ".....text module
  endmethod.
endclass.

start-of-selection.

data(go_obj_example) = new lcl_example( ).
go_obj_example->example( iv_bool_par = xsdbool( sy-subrc = 0 ) ).

report zhr_pau_test.

class lcl_example definition.

public section.

methods example importing iv_bool_par type abap_bool.

endclass.

class lcl_example implementation.

method example.

".....text module

endmethod.

endclass.

start-of-selection.

data(go_obj_example) = new lcl_example( ).

go_obj_example->example( iv_bool_par = xsdbool( sy-subrc = 0 ) ).

Создать RANGE в словаре ABAP

Для создания типа таблицы диапазонов выполним следующую последовательность действий:
1. Перейти в транзакцию se11
2. Вводим название нового типа

ABAP редактор. Выделение блока кода ALT + left mouse

В в редакторе кода есть очень удобный метод выделения и последующего копирования\вставки\удаления куска кода. Зажимаем alt + левая кнопка мыши и выделяем что надо. Надо обратить внимание, что последующая вставка не добавляет новые строки, а также вставляет вырезанный код блоком.

ABAP сохранение файла в папку на сервере

Небольшой пример:

"""""""" это только кусочек кода
 private section.

    types:
      begin of gty_s_text_tab,
        line(1024) type c,
      end of gty_s_text_tab.

    types: gty_t_text_tab type table of gty_s_text_tab.
    data gt_text_tab type gty_t_text_tab.
"""""""""""""""""""""""""""""""""""""

    methods: 
      open_dataset importing iv_filename type string.


"""""реализация метода
  method open_dataset.

    try.
        open dataset iv_filename for output in text mode encoding utf-8 .
        loop at gt_text_tab assigning field-symbol(<ls_text>).
          transfer <ls_text> to iv_filename.
        endloop.
        close dataset iv_filename.
      catch cx_root.
        message 'Доступ к файлу не разрешен'(010) type 'I'.
    endtry.

  endmethod.

"""""""" это только кусочек кода

private section.

types:

begin of gty_s_text_tab,

line(1024) type c,

end of gty_s_text_tab.

types: gty_t_text_tab type table of gty_s_text_tab.

data gt_text_tab type gty_t_text_tab.

"""""""""""""""""""""""""""""""""""""

methods:

open_dataset importing iv_filename type string.

"""""реализация метода

method open_dataset.

try.

open dataset iv_filename for output in text mode encoding utf-8 .

loop at gt_text_tab assigning field-symbol(<ls_text>).

transfer <ls_text> to iv_filename.

endloop.

close dataset iv_filename.

catch cx_root.

message 'Доступ к файлу не разрешен'(010) type 'I'.

endtry.

endmethod.

cl_gui_alv_grid средство поиска

Если нам необходимо средство поиска для cl_gui_alv_grid и нас не устраивает средство поиска, которое мы можем задать при создании каталога полей, мы можем использовать событие onf4

Порядок действия при этом следующий:

Читать далее «cl_gui_alv_grid средство поиска»

ABAP Расширение стандартного класса

Начинающие ABAPеры не всегда знают как правильно расширить класс и используют для этого неявные точки расширения. Однако, можно сделать немного по другому, что на мой взгляд, более соответствует концепции принятой в SAP.

Читать далее «ABAP Расширение стандартного класса»