Здравствуйте!
1. У меня лимит на ВБ пока 1500 карточек, я и выложил, но в продаже 940 (по остальным нулевой остаток). Как мне вычистить и удалить не актуальные карточки (с нулевым остатком) и загрузить другие с остатком? В кабинете ВБ не сортирует по остаткам, и не могу вывести списком такие карточки.
2. Вопрос про скидку. Как установить скидку на ВБ. Через таблицу ЦЕНЫ И СКИДКИ в ЛК не получится, т.к. закупочная постоянно меняется, можно в скрипте прописать? Типа старая зачеркнутая на 23% больше, а для продажи оставить.
Результат = 0;
ЦенаЗакупки = ТекущееЗначение;
Если ЗначениеЗаполнено(ЦенаЗакупки) Тогда
Комплектация = 75;
КомиссияЗаПродажу = НоменклатураWILDBERRIES.ПроцентКомиссии/100;
Водитель = 0.05;
Прибыль = 0.13;
ОбъемВЛитрах = НоменклатураСсылка.ОбъемЧислитель*1000;
Если Не ЗначениеЗаполнено(ОбъемВЛитрах) Тогда
// Если не указан объем в карточке товара то примем объем товара 10 литров
ОбъемВЛитрах = 10;
КонецЕсли;
ДоставкаWB = 55 + 5.5 * ОбъемВЛитрах;
//ДоставкаWB = НоменклатураWILDBERRIES.СтоимостьЛогистики;
Результат = (ЦенаЗакупки + Комплектация + ДоставкаWB)/(1-КомиссияЗаПродажу-Водитель-Прибыль/0.82);
Результат = Окр(Результат);
Если (СтрНайти(НРег(НоменклатураСсылка.Родитель), "тюбинги, ватрушки")>0) и (Прав(НоменклатураСсылка.Артикул, 3)="-RT") Тогда
Если СтрНайти(ВРег(НоменклатураСсылка), "АВТОКАМЕРА")=0 Тогда
Результат = Результат + 500;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Если ЗначениеЗаполнено(Цена["МРЦ"]) Тогда
Результат = Макс(Результат, Цена["МРЦ"]);
////БрендыРРЦ = Врег(",Le Frivole,Lelo,Lora DiCarlo,Shunga,System JO,Биоритм,");
////Бренд = ВРег(","+НоменклатураСсылка.Производитель+",");
////Если СтрНайти(БрендыРРЦ, Бренд)>0 Тогда
//// Результат = Цена["МРЦ"];
////КонецЕсли;
КонецЕсли;
1. У меня лимит на ВБ пока 1500 карточек, я и выложил, но в продаже 940 (по остальным нулевой остаток). Как мне вычистить и удалить не актуальные карточки (с нулевым остатком) и загрузить другие с остатком? В кабинете ВБ не сортирует по остаткам, и не могу вывести списком такие карточки.
2. Вопрос про скидку. Как установить скидку на ВБ. Через таблицу ЦЕНЫ И СКИДКИ в ЛК не получится, т.к. закупочная постоянно меняется, можно в скрипте прописать? Типа старая зачеркнутая на 23% больше, а для продажи оставить.
Результат = 0;
ЦенаЗакупки = ТекущееЗначение;
Если ЗначениеЗаполнено(ЦенаЗакупки) Тогда
Комплектация = 75;
КомиссияЗаПродажу = НоменклатураWILDBERRIES.ПроцентКомиссии/100;
Водитель = 0.05;
Прибыль = 0.13;
ОбъемВЛитрах = НоменклатураСсылка.ОбъемЧислитель*1000;
Если Не ЗначениеЗаполнено(ОбъемВЛитрах) Тогда
// Если не указан объем в карточке товара то примем объем товара 10 литров
ОбъемВЛитрах = 10;
КонецЕсли;
ДоставкаWB = 55 + 5.5 * ОбъемВЛитрах;
//ДоставкаWB = НоменклатураWILDBERRIES.СтоимостьЛогистики;
Результат = (ЦенаЗакупки + Комплектация + ДоставкаWB)/(1-КомиссияЗаПродажу-Водитель-Прибыль/0.82);
Результат = Окр(Результат);
Если (СтрНайти(НРег(НоменклатураСсылка.Родитель), "тюбинги, ватрушки")>0) и (Прав(НоменклатураСсылка.Артикул, 3)="-RT") Тогда
Если СтрНайти(ВРег(НоменклатураСсылка), "АВТОКАМЕРА")=0 Тогда
Результат = Результат + 500;
КонецЕсли;
КонецЕсли;
КонецЕсли;
Если ЗначениеЗаполнено(Цена["МРЦ"]) Тогда
Результат = Макс(Результат, Цена["МРЦ"]);
////БрендыРРЦ = Врег(",Le Frivole,Lelo,Lora DiCarlo,Shunga,System JO,Биоритм,");
////Бренд = ВРег(","+НоменклатураСсылка.Производитель+",");
////Если СтрНайти(БрендыРРЦ, Бренд)>0 Тогда
//// Результат = Цена["МРЦ"];
////КонецЕсли;
КонецЕсли;