FI-UIT-2019-Z_OS_SN —Документация

Транзакция Z_OS_SN
Инструкция FIAA064-ИП-2019-Отчет по серийным номерам на текущую дату
Программа Z_OS_SERNR
Ракурсы FI-AAZ_OS_SERNRОтчет по серийному номеру по ОС
Таблицы
ANLA
ANLZ
CSKT
PA0001
Условия соединения
ANLZANLN1=ANLAANLN1
ANLZKOSTL=CSKTKOSTL
ANLZPERNR=PA0001PERNR
ANLZBUKRS=ANLABUKRS
ANLZMANDT=ANLAMANDT
ANLZANLN2=ANLAANLN2
ANLZMANDT=CSKTMANDT
Поля ракурса
MANDTANLAMANDTMANDTCLNT3Мандант
BUKRSANLABUKRSBUKRSCHAR4Балансовая единица
ANLN1ANLZANLN1ANLN1CHAR12Основной номер основного средства
ANLKLANLAANLKLANLKLCHAR8Класс основных средств
PERNRANLZPERNRPERNR_DNUMC8Табельный номер
KOSTLCSKTKOSTLKOSTLCHAR10Место возникновения затрат
SERNRANLASERNRAM_SERNRCHAR18Серийный номер
INVNRANLAINVNRINVNR_ANLACHAR25Инвентарный номер
TXT50ANLATXT50TXA50_ANLTCHAR50Название основного средства
AKTIVANLAAKTIVAKTIVDDATS8Дата оприходования основного средства
ZUGDTANLAZUGDTDZUGDATDATS8СсылочнДата первой проводки
ANLN2ANLZANLN2ANLN2CHAR4Субномер основного средства
KTEXTCSKTKTEXTKTEXTCHAR20Общее название
SNAMEPA0001SNAMESMNAMCHAR30Фамилия сотрудника (ПодлежащСортировк, ФАМИЛИЯ ИМЯ )
MENGEANLAMENGEAM_MENGEQUAN13Количество
Условия выбора
ANLZBDATUEQ'99991231'AND
ANLADEAKTEQ'00000000'AND
CSKTDATBIEQ'99991231'AND
PA0001ENDDAEQ'99991231'AND
ANLAMENGEGT0
*& Report  Z_OS_01180000
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT  Z_OS_SERNR.

tables: anla, anlz.
select-options: s_bukrs for anla-bukrs.        "Указываем поля выбора на экране выбора
select-options: s_anlkl for anla-anlkl.        "Указываем поля выбора на экране выбора
select-options: s_anln1 for anla-anln1.        "Указываем поля выбора на экране выбора
select-options: s_sernr for anla-sernr.        "Указываем поля выбора на экране выбора
select-options: s_invnr for anla-invnr.        "Указываем поля выбора на экране выбора
select-options: s_kostl for anlz-kostl.        "Указываем поля выбора на экране выбора
select-options: s_PERNR for anlz-PERNR.        "Указываем поля выбора на экране выбора
"parameters: p_vbeln type vbeln.
selection-screen begin of block stdsel with frame title text-s03. "Спецификация вывода
parameters %layout type slis_vari." modif id lay.
selection-screen end of block stdsel.

* вывод и выбор формата
data:gs_runmode type aqlimode.
at selection-screen on value-request for %layout.
  gs_runmode-persreport = 'Z_OS_sernr'." EC_NOTEXT
  gs_runmode-act_report = 'Z_OS_sernr'." EC_NOTEXT
  gs_runmode-sscrreport = 'Z_OS_sernr'." EC_NOTEXT
  gs_runmode-sscr_on = 'X'.
  gs_runmode-extr_on = 'X'.
  gs_runmode-show_on = 'X'.

  call function 'RSAQRT_LAYOUT_VALUE_REQUEST'
    changing
      rtmode  = gs_runmode
      variant = %layout.
initialization.
start-of-selection.

data : it_Z_OS_sernr type table of Z_OS_sernr.
select * from Z_OS_sernr into corresponding fields of  table it_Z_OS_sernr
  where bukrs in s_bukrs and invnr in s_invnr and anlkl in s_anlkl and anln1 in s_anln1 and sernr in s_sernr and kostl in s_kostl and pernr in s_pernr." and vbeln = p_vbeln.
include z_OS_sernr_output.

*&---------------------------------------------------------------------*
*&  Include           Z_OS_SERNR_OUTPUT
*&---------------------------------------------------------------------*

* Объявляем объект типа cl_salv_table, который выведет наши данные в виде ALV


data: gc_alv_table type ref to cl_salv_table,
      gc_functions type ref to cl_salv_functions,
      gc_layout type ref to cl_salv_layout,
      keys type salv_s_layout_key,
      gc_columns type ref to cl_salv_columns_table,
      gc_sorts type ref to cl_salv_sorts,
      gc_colwork type ref to cl_salv_column_table,
      gc_aggr type ref to cl_salv_aggregations.
* Статический метод класса для создания объекта и связывания с нашей таблицей
cl_salv_table=>factory( importing r_salv_table = gc_alv_table
                        changing t_table = it_z_os_sernr ).

*Включить функции грида
gc_functions = gc_alv_table->get_functions( ).
gc_functions->set_all( 'X' ).

* Добавим ведение вариантов отражения таблицы
gc_layout = gc_alv_table->get_layout( ).
keys-report = sy-repid.
gc_layout->set_key( keys ).
gc_layout->set_default( 'X' ).
gc_layout->set_save_restriction( '3' ).

gc_layout->SET_INITIAL_LAYOUT( %layout ).
* Вывести ALV-таблицу на экран
gc_alv_table->display( ).

Добавить комментарий