Текущее время: Ср, май 07 2025, 23:02

Часовой пояс: 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 часа


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

Сейчас этот форум просматривают: нет зарегистрированных пользователей


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

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