SAP R/3 форум ABAP консультантов

[lapa]

Warehouse managment.
Использую в user-exit EXIT_SAPML03T_002
на транзакцию lt04. дополнительный экран для выравнивания зон
Функция L_TO_CREATE_MULTIPLE либо L_TO_CREATE_SINGLE.
Передаю параметры:
LGNUM номер склада
BWLVS вид движения
MATNR номер материала
WERKS завод
LGORT склад
ANFME количество
ALTME ЕИ
VLTYP тип отпускающего склада
VLBER отпускающий складской участок
VLPLA отпускающие сладское место
NLTYP тип принимающего склада
NLBER отпускающий складской участок
NLPLA отпускающие сладское место
В программу и функциональник посылаю одинаковые данные(Ctrl + C - Ctrl + V)
если тестирую функциональный модуль через se37, то все отлично выполняется, если в программе то пишет ошибку "Материалу не присвоена базисная ЕИ".
Если кто то встречался с такой проблемой подскажите пожалуйста.
Заранее спасибо.

КОД


TT_LTAP_CREAT-MATNR = g_lgua-matnr.
TT_LTAP_CREAT-WERKS = g_lgua-WERKS.
select single lgort from mseg
into TT_LTAP_CREAT-LGORT
where MBLNR = I_LTAK-MBLNR
and tbnum = I_LTAK-tbnum.
**номер партии в зоне 900
TT_LTAP_CREAT-CHARG = g_lgua-CHARG.
* количество(из заявки)
TT_LTAP_CREAT-ANFME = worktab_LTBC-menga.
TT_LTAP_CREAT-ALTME = worktab_ltbc-ALTME.
TT_LTAP_CREAT-WDATU = sy-datum.
TT_LTAP_CREAT-WEMPF = I_LTAK-tbnum.
* Отпускающий склад из заявки
select single VLTYP from LTBK into TT_LTAP_CREAT-VLTYP
where tbnum = I_LTAK-tbnum.

TT_LTAP_CREAT-VLBER = '001'.
* принимающий склад из зоны которая в минусе(900)
TT_LTAP_CREAT-NLTYP = g_lgua-lgtyp.
TT_LTAP_CREAT-NLBER = '001'.
* вид движения
BWLVS = 804.
* складское место отпускающие
select single lgpla from lqua into TT_LTAP_CREAT-VLPLA
where matnr = g_lgua-matnr
and werks = g_lgua-WERKS
and lgnum = I_LTAK-lgnum
and lgtyp = TT_LTAP_CREAT-VLTYP.

** складское место принимающие
TT_LTAP_CREAT-NLPLA = g_lgua-LGPLA.
append TT_LTAP_CREAT.
** создаем заказ
call function 'L_TO_CREATE_MULTIPLE'
EXPORTING
I_LGNUM = I_LTAK-lgnum
I_BWLVS = BWLVS
I_BNAME = sy-UNAME
IMPORTING
E_TANUM = TANUM
TABLES
T_LTAK = TT_LTAK
T_LTAP_VB = TT_LTAP_VB
T_LTAP_CREAT = TT_LTAP_CREAT
EXCEPTIONS
NO_TO_CREATED = 1
и т.д.

[lapa]

Нашел выход, но почему он работает мне не понятно.
весь код из юзер экзита поместил в отдельный отчет, вызвал его, все прошло успешно. Осталось только найти как передать в отчет нужные данные. Видимо когда вызываешь из юзер экзита(на создание транспортного заказа) функцию создание заказа блокируется какиет о объекты.

[ghost]

если я вас правильно понял. вы пытаетесь создать при создании одного дока второй . если так то это неправильный подход. вы хотя бы должны функционал создания второго дока обернуть в ФМ обновления и вызвать его в UPDATE TASK. а с submit работает так как его вызов порождает новый LUW - что очень плохо для первого документа. а вообще советую ознакомиться с курсом BC как раз по этой теме.

[lapa]

Вы меня правильно поняли. Спасибо! Буду признателен если подскажите что это за курс и как его найти.

[ghost]

BC414 . на этом форуме большая библиотека. даже есть отдельная ветка по курсам.