fixin (fixin) wrote,
fixin
fixin

Как я бух-базу обрезал



Бухгалтер поставила задачу: нужно было отдать базу БП сторонним разработчикам, оставив в ней только документы по одной организации по выбранным контрагентам (3 штуки).


Пришлось повозиться, причем в основном с поиском готовых обработок.


Для удаления информации по другим организациям использовал эту обработку: http://infostart.ru/public/333528/ (Обработка для пометки на удаление всей информации, связанной с помеченными на удаление организациями. Работает с "1С.Бухгалтерия предприятия" 1.6 и 2.0.). Хотя можно было попробовать и специфическую: http://infostart.ru/public/70660/ (Очистка БД от документов всех организаций (фирм) кроме указанной).


Для удаления документам по контрагентам использовал лучший на мой взгляд общий журнал http://infostart.ru/public/69707/ (Универсальный журнал документов для 1С 8.1, 8.2 и 8.3 (3.20.1.8))




Журнал пришлось немного доработать - добавил туда множественное выделение и по кнопке пометка удаления вставил код:


 Для Каждого Строка ИЗ ЭлементыФормы.СписокДокументов.ВыделенныеСтроки Цикл
  ТекДок = Строка.Ссылка;
  Сообщить(ТекДок);
  Попытка
   ТекДок.ПолучитьОбъект().УстановитьПометкуУдаления(НЕ ТекДок.ПометкаУдаления);
  Исключение
   Сообщить("Не обработан: " + ОписаниеОшибки(), СтатусСообщения.Важное);
  КонецПопытки;
 КонецЦикла;
 

Tags:
Subscribe

promo fixin december 31, 2037 16:57 1420
Buy for 30 tokens
UPD: Друзья, в августе 2019 года блог переехал на http://fixinchik.ru. Welcome! Добро пожаловать в журнал Осипова Сергея Александровича, известного также как Fixin и Гений 1С. Рекомендую ознакомиться с Часто Задаваемыми Вопросами обо мне. Что я хочу в подарок - список. Мой проект "…
  • Post a new comment

    Error

    default userpic

    Your reply will be screened

    Your IP address will be recorded 

    When you submit the form an invisible reCAPTCHA check will be performed.
    You must follow the Privacy Policy and Google Terms of use.
  • 66 comments