Загрузка из Excel в 1С 8.1 УТ

Новая тема
Показывать по 10 20 40 сообщений
"
тчТовары = ДокУстановкаЦенНоменклатуры["Товары"];        СтрокаТаблицаТовары = тчТовары.Добавить();        СтрокаТаблицаТовары["Номенклатура"] = НовыйЭлемент.Ссылка;        СтрокаТаблицаТовары["Валюта"]       = ВалютаДок;        СтрокаТаблицаТовары["ЕдиницаИзмерения"] = НовыйЭлемент.ЕдиницаХраненияОстатков;            СтрокаТаблицаТовары["ТипЦен"]       = ТипЦены;        СтрокаТаблицаТовары["Цена"]         = Цена;        СтрокаТаблицаТовары["ИндексСтрокиТаблицыЦен"]         = 0;        СтрокаТаблицаТовары = тчТовары.Добавить();        СтрокаТаблицаТовары["Номенклатура"] = НовыйЭлемент.Ссылка;        СтрокаТаблицаТовары["Валюта"]       = ВалютаДок;        СтрокаТаблицаТовары["ЕдиницаИзмерения"] = НовыйЭлемент.ЕдиницаХраненияОстатков;            СтрокаТаблицаТовары["ТипЦен"]       = ТипЦены2;            СтрокаТаблицаТовары["Цена"]         = Цена2;СтрокаТаблицаТовары["ИндексСтрокиТаблицыЦен"]         = 0;         
"
"Спасибо) я сильно не парился создал для каждого отдельно


//Запишем товар и цену в документ1 установки первоначальных цен		
тчТовары1 = ДокУстановкаЦен1["Товары"];
СтрокаТаблицаТовары = тчТовары1.Добавить();
СтрокаТаблицаТовары["Номенклатура"] = НовыйЭлемент.Ссылка;
СтрокаТаблицаТовары["Валюта"] = ВалютаДок;
СтрокаТаблицаТовары["ЕдиницаИзмерения"] = НовыйЭлемент.ЕдиницаХраненияОстатков;
СтрокаТаблицаТовары["ТипЦен"] = ТипЦены1;
СтрокаТаблицаТовары["Цена"] = ЦенаНачальная;


//Запишем товар и цену в документ2 установки розничных цен
тчТовары2 = ДокУстановкаЦен2["Товары"];
СтрокаТаблицаТовары = тчТовары2.Добавить();
СтрокаТаблицаТовары["Номенклатура"] = НовыйЭлемент.Ссылка;
СтрокаТаблицаТовары["Валюта"] = ВалютаДок;
СтрокаТаблицаТовары["ЕдиницаИзмерения"] = НовыйЭлемент.ЕдиницаХраненияОстатков;
СтрокаТаблицаТовары["ТипЦен"] = ТипЦены2;
СтрокаТаблицаТовары["Цена"] = ЦенаРозничная;
"
Читают тему
(гостей: 1)

Быстрый переход