Текущее время: Ср, ноя 05 2025, 16:23

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




Начать новую тему Ответить на тему  [ Сообщений: 2 ] 
Автор Сообщение
 Заголовок сообщения: Работы/услуги и деривация
СообщениеДобавлено: Ср, окт 01 2008, 14:33 
Менеджер
Менеджер

Зарегистрирован:
Вт, дек 06 2005, 17:52
Сообщения: 559
У нас в деривации участвует группа материалов, которую мы получаем из ОЗМ, настроен соответствующий шаг деривации и все вроде работает.

Появилась задача использовать в деривации группу материалов из услуг (вернее, ОЗУ - тр. АС02), всякий раз, когда эта услуга используется и вызывается деривация (например, в заявке/заказе на поставку, заказе ТОРО, если там участвуют работы/услуги).

Как из расширения SAPLFMDT дотянутся до услуги? Я, в принципе, нащупал, где в памяти хранится каталог услуг при всех вышеперечисленных действиях, но нет уверенности, что данные там будут в любом случае и хотелось бы придумать что-то более цивильное.

Есть какие-то идеи?


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Ср, окт 01 2008, 15:18 
Ассистент
Ассистент

Зарегистрирован:
Чт, авг 14 2008, 13:33
Сообщения: 44
Откуда: Москва
Для вытаскивания контировки работ/услуг из контракта для заказа делаю примерно так:

CASE I_COBL-VORGN.
.......
WHEN 'RMBE'. " создается MM-заказ
ASSIGN ('(SAPMM06E)EKPO') TO <EKPO>.
IF SY-SUBRC = 0.
MOVE-CORRESPONDING <EKPO> to w_ZFMDERIVE.
ELSE.
* заказ по сбытовой заявке
* ASSIGN ('(SAPLMEPO)EKPO') TO <EKPO>.
ASSIGN ('(SAPLMEPO)FEKPO') TO <EKPO>.
IF SY-SUBRC = 0.
w_ZFMDERIVE-KONNR = <EKPO>-KONNR.
w_ZFMDERIVE-KTPNR = <EKPO>-KTPNR.
ELSE.
* MM-заказ по контракту:
SELECT SINGLE KONNR KTPNR FROM EKPO
INTO CORRESPONDING FIELDS OF w_ZFMDERIVE
WHERE EBELN = I_COBL-AWKEY
AND EBELP = I_COBL-AWPOS(5).
IF w_ZFMDERIVE IS INITIAL.
* MM-заказ по заявке (данные из контракта):
ASSIGN ('(SAPLMLSK)COMSRV') TO <COMS>.
IF SY-SUBRC = 0.
w_ZFMDERIVE-KONNR = <COMS>-PLN_EBELN.
w_ZFMDERIVE-KTPNR = <COMS>-PLN_EBELP.
ELSE.
SELECT SINGLE BANFN BNFPO FROM EKPO
INTO CORRESPONDING FIELDS OF v_ZFMDERIVE
WHERE EBELN = I_COBL-AWKEY
AND EBELP = I_COBL-AWPOS(5).

SELECT SINGLE KONNR KTPNR FROM EBAN
INTO CORRESPONDING FIELDS OF w_ZFMDERIVE
WHERE BANFN = v_ZFMDERIVE-BANFN
AND BNFPO = v_ZFMDERIVE-BNFPO.
ENDIF.
ENDIF.
ENDIF.
ENDIF.
* для контировки работ/услуг:
SELECT ZEKKN FROM EKKN INTO w_ZFMDERIVE-EKKN
WHERE EBELN = w_ZFMDERIVE-KONNR
AND EBELP = w_ZFMDERIVE-KTPNR.
ENDSELECT.
.......
ENDCASE.


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

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


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

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


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

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