Добавление пользовательских полей в транзакции создания/изменения/просмотра заказа ТОРО и в отчёты IW38/IW39.
Используется расширение IWO10018 (Заказ ТОРО: поля пользователя в заголовке заказа) (тр. SMOD). После активации в транзакции появится дополнительная вкладка "Расширение".
Добавить ZZ-поля в таблицу AUFK через структуру CI_AUFK.
В группе функций XWOC создать экран 0900 для вывода пользовательских полей.
Прописать логику в ФМы EXIT_SAPLCOIH_018 (передача данных на экран), EXIT_SAPLCOIH_019 (передача данных с экрана). Например.
Объявление глобальных переменных:
ФМ EXIT_SAPLCOIH_018:
ФМ EXIT_SAPLCOIH_019:
Экран 0900:
Для вывода полей в транзакциях IW38/IW39 добавить их в структуру RIHAUFK_LIST через APPEND. Также можно использовать расширение IWOC0004 для изменения внешнего вида ALV Grid.
Используется расширение IWO10018 (Заказ ТОРО: поля пользователя в заголовке заказа) (тр. SMOD). После активации в транзакции появится дополнительная вкладка "Расширение".
Добавить ZZ-поля в таблицу AUFK через структуру CI_AUFK.
В группе функций XWOC создать экран 0900 для вывода пользовательских полей.
Прописать логику в ФМы EXIT_SAPLCOIH_018 (передача данных на экран), EXIT_SAPLCOIH_019 (передача данных с экрана). Например.
Объявление глобальных переменных:
*&---------------------------------------------------------------------* *& Include ZXWOCTOP *&---------------------------------------------------------------------* TABLES: aufk. DATA: gv_order_disp. " X - если просмотр, пусто - изменение
ФМ EXIT_SAPLCOIH_018:
*&---------------------------------------------------------------------* *& Include ZXWOCU15 *&---------------------------------------------------------------------* MOVE-CORRESPONDING sap_caufvd_imp TO aufk. gv_order_disp = sap_display_only.
ФМ EXIT_SAPLCOIH_019:
*&---------------------------------------------------------------------* *& Include ZXWOCU16 *&---------------------------------------------------------------------* coci_aufk_exp-zzcomment = aufk-zzcomment.
Экран 0900:
*&---------------------------------------------------------------------*
*& Module STATUS_0900 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE status_0900 OUTPUT.
* SET PF-STATUS 'xxxxxxxx'.
* SET TITLEBAR 'xxx'.
IF gv_order_disp IS NOT INITIAL.
LOOP AT SCREEN.
screen-input = 0.
MODIFY SCREEN.
ENDLOOP.
ENDIF.
ENDMODULE. " STATUS_0900 OUTPUT
Для вывода полей в транзакциях IW38/IW39 добавить их в структуру RIHAUFK_LIST через APPEND. Также можно использовать расширение IWOC0004 для изменения внешнего вида ALV Grid.
Комментариев нет:
Отправить комментарий