SirCharlie
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Доброго дня!
Прошу подсказать. Есть типовое решение от Рарус: Магазин одежды и обуви.
В справочнике номенклатуры у данного решения есть табличная часть: Состав товара.
Каким образом можно записать значения в эту табличную часть? Если честно ничего не приходит на ум,
Привожу пример кода
Код: Если НЕ ПустаяСтрока(Состав) Тогда
СтрокаПоиска = Состав;
К = СтрЧислоВхождений(СтрокаПоиска, ",") + 1;
Пока К > 0 Цикл
С = Найти(СтрокаПоиска, ",");
Если С > 0 Тогда
СоставТовара = Лев(СтрокаПоиска, С-1);
Иначе
СоставТовара = СтрокаПоиска;
КонецЕсли;
Д2 = СтрДлина(СоставТовара);
П = Найти(СоставТовара, "%");
Если П > 0 Тогда
Процент = Лев(СоставТовара, П-1);
МатериалП = Прав(СоставТовара, Д2-П-1);
Материал = Справочники.Материалы.НайтиПоНаименованию(МатериалП);
Если Материал.Пустая() Тогда
НовыйМатериал = Справочники.Материалы.СоздатьЭлемент();
НовыйМатериал.Наименование = МатериалП;
НовыйМатериал.Записать();
Материал = Справочники.Материалы.НайтиПоНаименованию(МатериалП);
КонецЕсли;
// МатериалС = Как узнать есть ли строчка с данным материалом в данной таблице, с помощью запроса?;
// Если МатериалС.Пустая() Тогда
// НовыйМатериалСостав = Как создать новую строчку в данной таблице?;
// НовыйМатериалСостав.Материал = Материал;
// НовыйМатериалСостав.Процент = Процент;
// КонецЕсли;
Иначе
Сообщить("Состав не задан!");
КонецЕсли;
Д1 = СтрДлина(СтрокаПоиска);
СтрокаПоиска = Прав(СтрокаПоиска, Д1-П);
К = К - 1;
КонецЦикла;
КонецЕсли; |
Небольшое уточнение код писался для обработки Загрузка данных из табличного документа в событии При Записи! Заранее признателен за любую помощь! |
Всего записей: 229 | Зарегистр. 12-05-2009 | Отправлено: 15:15 18-04-2012 | Исправлено: SirCharlie, 15:17 18-04-2012 |
|
Программы » 
Варезник » 
