Текущее время: Ср, сен 10 2025, 18:04

Часовой пояс: UTC + 3 часа


Правила форума


ВНИМАНИЕ! Прежде чем задавать вопрос, ознакомьтесь со ссылками ниже:

Вопросы по отличиям версий SAP, Add-On, EHP - сюда
Вопросы по SAP Front End (SAPlogon, SAPgui, guiXT и т.д.) - сюда
Вопросы по LSMW - сюда
Вопросы по архивации в SAP - сюда
Вопросы по SAP GRC - сюда
Вопросы по SAP Business Workplace (почте SAP) и SAP Office - сюда
Вопросы по miniSAP (SAP mini basis) - сюда
Вопросы по SAP HANA - сюда
Вопросы по лицензированию продуктов SAP - сюда



Начать новую тему Ответить на тему  [ Сообщений: 3 ] 
Автор Сообщение
 Заголовок сообщения: SolutionManager - Монитор транспортных операций
СообщениеДобавлено: Ср, май 05 2010, 16:18 
Специалист
Специалист
Аватара пользователя

Зарегистрирован:
Ср, окт 04 2006, 15:30
Сообщения: 248
Откуда: от туда..
Хотел поделиться одной утилиткой, ее создание было вызвано необходимостью осуществляет импорт запросов посредством SolutionManager, а также проводить мониторинг успешность операций импорта в систему-сателит ,с соответствием запрос-корректура.
Аналогов в стандарте не нашел. Программа создается в SolutionManager.

REPORT ZBC_TMS_MONITOR NO STANDARD PAGE HEADING.

TYPE-POOLS: SLIS.
*tables /TMWFLOW/TRORDEC.

DATA: GS_LAYOUT TYPE SLIS_LAYOUT_ALV,
IT_CAT TYPE SLIS_T_FIELDCAT_ALV,
WA_CAT TYPE SLIS_FIELDCAT_ALV,

IT_CAT_USER TYPE SLIS_T_FIELDCAT_ALV,
WA_CAT_USER TYPE SLIS_FIELDCAT_ALV,
V_REPID LIKE SY-REPID.

* Запросы на перенос таблица соответсвий
* /TMWFLOW/TRORDHT
* TRORDER_NUMBER - поле запрос
* DESCRIPTION - поле описание

data:
* Структура запроса
begin of wd,
NUMBER LIKE /TMWFLOW/TRORDEC-TRORDER_NUMBER, " Запрос
SYSNAME LIKE /TMWFLOW/TRORDEC-SYSNAME, " Система
CLIENT LIKE /TMWFLOW/TRORDEC-CLIENT, " Клиент
STATUS LIKE /TMWFLOW/TRORDEC-STATUS, " Статус
IMPORTED_DATE LIKE /TMWFLOW/TRORDEC-IMPORTED_DATE, " Дата импорта
IMPORTED_TIME LIKE /TMWFLOW/TRORDEC-IMPORTED_TIME, " Время импорта
DESCRIPT LIKE /TMWFLOW/TRORDHT-DESCRIPTION, " Корректура
end of wd.

data:
it_wd like wd OCCURS 0 WITH HEADER LINE.


INITIALIZATION.
v_repid = sy-repid.
PERFORM INIT_LAYOUT USING GS_LAYOUT.
PERFORM CREATE_FIELD_CATALOG.


SELECT /TMWFLOW/TRORDEC~TRORDER_NUMBER SYSNAME CLIENT STATUS IMPORTED_DATE IMPORTED_TIME DESCRIPTION
FROM /TMWFLOW/TRORDEC
INNER JOIN /TMWFLOW/TRORDHT
ON /TMWFLOW/TRORDEC~TRORDER_NUMBER = /TMWFLOW/TRORDHT~TRORDER_NUMBER
INTO TABLE it_wd
ORDER BY IMPORTED_DATE DESCENDING.


sort it_wd DESCENDING BY IMPORTED_DATE IMPORTED_TIME DESCENDING.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = V_REPID
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
" PS_LAYOUT-WINDOW_TITLEBAR = PS_TITLE
IS_LAYOUT = GS_LAYOUT
IT_FIELDCAT = IT_CAT[]
TABLES
T_OUTTAB = IT_WD.


FORM INIT_LAYOUT USING PS_LAYOUT TYPE SLIS_LAYOUT_ALV.
PS_LAYOUT-ZEBRA = 'X'.
PS_LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
ENDFORM.


FORM CREATE_FIELD_CATALOG .
IF IT_CAT[] IS INITIAL.
CLEAR WA_CAT.

WA_CAT-COL_POS = 1.
WA_CAT-FIELDNAME = 'NUMBER'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'C'.
WA_CAT-INTLEN = 8.
WA_CAT-OUTPUTLEN = 8.
WA_CAT-SELTEXT_L = 'Запрос'.
APPEND WA_CAT TO IT_CAT.

WA_CAT-COL_POS = 2.
WA_CAT-FIELDNAME = 'SYSNAME'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'P'.
WA_CAT-INTLEN = 3.
WA_CAT-OUTPUTLEN = 3.
WA_CAT-SELTEXT_L = 'Система'.
APPEND WA_CAT TO IT_CAT.

WA_CAT-COL_POS = 3.
WA_CAT-FIELDNAME = 'CLIENT'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'C'.
WA_CAT-INTLEN = 3.
WA_CAT-OUTPUTLEN = 3.
WA_CAT-SELTEXT_L = 'Клиент'.
APPEND WA_CAT TO IT_CAT.

WA_CAT-COL_POS = 4.
WA_CAT-FIELDNAME = 'STATUS'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'P'.
WA_CAT-INTLEN = 4.
WA_CAT-OUTPUTLEN = 4.
WA_CAT-SELTEXT_L = 'Статус'.
APPEND WA_CAT TO IT_CAT.

WA_CAT-COL_POS = 5.
WA_CAT-FIELDNAME = 'IMPORTED_DATE'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'P'.
WA_CAT-INTLEN = 8.
WA_CAT-OUTPUTLEN = 8.
WA_CAT-SELTEXT_L = 'Дата импорта'.
APPEND WA_CAT TO IT_CAT.


WA_CAT-COL_POS = 6.
WA_CAT-FIELDNAME = 'IMPORTED_TIME'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'P'.
WA_CAT-INTLEN = 6.
WA_CAT-OUTPUTLEN = 6.
WA_CAT-SELTEXT_L = 'Время импорта'.
APPEND WA_CAT TO IT_CAT.

WA_CAT-COL_POS = 7.
WA_CAT-FIELDNAME = 'DESCRIPT'.
WA_CAT-DATATYPE = 'CHAR'.
WA_CAT-INTTYPE = 'P'.
WA_CAT-INTLEN = 60.
WA_CAT-OUTPUTLEN = 60.
WA_CAT-SELTEXT_L = 'Описание'.
APPEND WA_CAT TO IT_CAT.
ENDIF.
ENDFORM.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: SolutionManager - Монитор транспортных операций
СообщениеДобавлено: Пт, май 07 2010, 16:38 
Старший специалист
Старший специалист
Аватара пользователя

Зарегистрирован:
Ср, сен 14 2005, 20:14
Сообщения: 340
Откуда: Киев, Украина
А не для абапера вкратце рассказать как с утилитой работать? как выбрать систему сателиту для мониторинга:?


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: SolutionManager - Монитор транспортных операций
СообщениеДобавлено: Чт, май 13 2010, 06:49 
Специалист
Специалист
Аватара пользователя

Зарегистрирован:
Чт, июн 15 2006, 08:41
Сообщения: 214
Откуда: Казахстан, Алматы
Пол: Мужской
аналог наверно все таки есть - Change request management все в том же Solution Manager


Принять этот ответ
Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 3 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: Ahrefs [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB