Всем привет!
Кривовато как то назвал тему. Ну кароче.
Выбор партии срабатыавает кодга жмем кнопку "Выбор запаса".
К примеру, у меня есть две партии по 10 шт.
В строке указываю что мне необходимо 25 шт., жму кнопку "Выбор запаса" и получаю две строки по 10 шт.
Куда девалось еще 5 шт? Система никак не реагирует что сумарное к-во по строкам меньше указанного первоначально.
Как это исправить? Что была ошибка или предупреждение.

Привет,
При вводе условия для стртегии выбора запаса, обрати внимание на подпрограмму.
VOFM и все получится.
Если возникнут трудности, могу предложить код, так как недавно сам такое писал.

Похоже ты понял о чем я
Буду очень благодарен за код. Чесно говоря я так и не нашел че это за VOFM и что он делает.
А без кода, настройками не обойтись?

это транзакция, запусти - разберешься быстро. очень действенно, код там при написании формул, достаточно просто все.

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

2rosomann



Читать внимательно

Харош прикалыватся
Может я и в натуре тупой, но я нифига не могу найти никакой подпрограммы при вооде условия для поиска партии.
Подскажите, где эта хрень цепляется

Наверное имеется в виду спро-общая логистика-управление партиями- выбор партий-виды стратегии-определение видов стратегий. там есть такое поле КоличПоУмолч и кнопочка "Ведение"

В OSPX выбираем в диалоговой структуре "выбор запаса:заголовок таблицы". далее выделяем позицию и смотрим подробную информацию.

Привет, да нет конечно не тупой

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

У меня была задача такая, если количества партий не хватает для затребованного количества то сплит не осуществлять.
Рекация системы в этом случае простая, а именно требование ввести партию.
В принципе ты можешь выдавать сообщение.
Код привожу ниже:


************************************************************************
* FORM CHMVS_001
************************************************************************
* Routine to distribute the available quantities of batches.
* The distribution is an example for a TOP-DOWN distribution
* with regard to the sort sequence.
* To set up your own distribution rules, sort the following table
* according to your requirements.
*
Это структура которую ты можешь использовать в своем алгоритме.
* Structure of internal table DISQTY (significant fields):
* --------------------------------------------------------
* DATA: BEGIN OF DISQTY OCCURS 0,
* MATNR LIKE BDBATCH-MATNR, -> material number
* CHARG LIKE BDBATCH-CHARG, -> batch number
* WERKS LIKE BDBATCH-WERKS, -> plant
* LGORT LIKE BDBATCH-LGORT, -> storage location
* AVAL_QUAN LIKE V01FDK-VRFMG, -> available quantity
* QUANTITY LIKE BDBATCH-MENGE, -> target quantity
* RES_TABIX LIKE SY-TABIX. ->internal use
* DATA: END OF DISQTY.*
* Additional fields for distribution:
* -----------------------------------
* NO_OF_SPLIT -> The number of possible batch quantity splits
* QUAN_TO_DIS -> The quantity to be distributed (ordered quantity)
*
* Restrictions!
* -------------
* 1) Don't add or delete any entries from the internal table
* 2) Don't modify fields MATNR, CHARG, WERKS, LGORT, AVAL_QUAN and
* RES_TABIX.
* 3) Don't change values of NO_OF_SPLIT and QUAN_TO_DIS
* 4) The only field that can be modified is the DISQTY-QUANTITY field
************************************************************************
FORM CHMVS_001.

DATA: lv_line TYPE kondh-chasp VALUE '1'.
*{ INSERT DR1K901954 2

Здесь моя вставка:

data i like disqty-AVAL_QUAN value 0.

loop at disqty.
i = i + disqty-AVAL_QUAN.
endloop.
if i < QUAN_TO_DIS.

Вставь например свое сообщение сюда.

exit.
endif.

*} INSERT

LOOP AT disqty.
CHECK lv_line <= no_of_split.
IF QUAN_TO_DIS > 0.
IF DISQTY-AVAL_QUAN > QUAN_TO_DIS.
DISQTY-QUANTITY = QUAN_TO_DIS.
ELSEIF disqty-aval_quan > 0.
DISQTY-QUANTITY = DISQTY-AVAL_QUAN.
ENDIF.
IF disqty-quantity > 0.
quan_to_dis = quan_to_dis - disqty-quantity.
MODIFY disqty TRANSPORTING quantity.
ADD 1 TO lv_line.
ENDIF.
ENDIF.
ENDLOOP.

ENDFORM.

Спасибо за код
Абапер посмотрел, вроде то что надо.
Правда лезть в саму стандартную програму он отказался, типа за такое пальцы отрубят по локти.
Так что попытаюсь что то сделать через VOFM

Так ведь по сути тоже самое и я сделал
Только другим способом, а тебе транзакцию дали, там и поправить можно.
Удачи.

На всякий случай: то что в VOFM на любую подпрограмку требуется ключ модификации, это нормально. Хотя конечно лучше в vofm создавать свою подпрограмку, чем модифицировать стандартные

Меня за советскую власть агетировать не надо
Человеку ни кто, ничего ломать не советывал.
Так что, в остальном хозяин барин ...

Удачи!