koka123

редактировать метку

10 лет 7 мес. 9 дней

13 мая 2014 в 19:35:42(10 лет 32 недели 2 дня 16 часов 28 минут назад)

Яндекс-директ

Задания и вакансии

Заказчик

Задание

1000р

2014-05-13 16:07:29

Требуется обработка для 1с 7.7, реализующая очистки номенклатуры от старых элементов
- 4

Активность на сайте

Последние сообщения пользователя

Сообщение на форуме
13 мая 2014 в 16:52:17

Свертка базы была на конец декабря 13 года, так что позиций мало будет, а реквизит "невыгружать" есть, его тоже можно пройти циклом и пометить
Сообщение на форуме
13 мая 2014 в 16:42:13

Можно же пометить элементы на удаление и пройтись стандартной обработкой с контролем целостности
Сообщение на форуме
13 мая 2014 в 16:26:21

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

Сообщение на форуме

13 мая 2014 в 16:21:58

Что-то подобное должно получиться

Процедура Сформировать()

   Запрос = СоздатьОбъект("Запрос");

   ТекстЗапроса =
   "//{{ЗАПРОС(Сформировать)
   |Номенклатура= Справочник.Связи.Владелец;
   |ДатаСоздания = Справочник.Связи.ДатаСоздания;
   |Группировка Номенклатура;
   |Условие(ДатаСоздания<ВыбДатаСоздания);
   |Без Итогов;
   |";
   Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
      Возврат;
    КонецЕсли;
   Спр = СоздатьОбъект("Справочник.Номенклатура");
   Пока Запрос.Группировка()=1 Цикл
        Если Спр.НайтиЭлемент(Запрос.Номенклатура)=1 Тогда
            Если Спр.ПринадлежитьГруппе(выбРодитель)=1 Тогда 
              Спр.Удалить();
            КонецЕсли;
        КонецЕсли;
   КонецЦикла;
КонецПроцедуры

Сообщение на форуме
13 мая 2014 в 16:16:27

Имеется база интернет-магазина компьютерного, все позиции разбиты по группам. Все группы разделили на 3 категории по "дате устаревания":
1 - позиции без "срока давности"
2 - позиции актуальные не старше 2х лет
3 - не старше года.

в Справочнике Связи, есть реквизит ДатаСоздания, который отвечает за дату добавления позиции у поставщиков, нужно вот по минимуму из этих дат(у разных поставщиков могут отличаться даты добавления), перебрать всю номенклататуру и удалить старое, есть некоторые наработки

На главную страницу заданий 1с