gifts2017

Проверка изменений документов в ТиС с архивной базой

Опубликовал Бронко (Струнин) в раздел Отчеты - Анализ учета

Сверяет документы БД ТиС с документами архивной копии этой же базы, на предмет изменений в документах, сделанных задним числом. Для пресечения злоупотреблений.

Обработка предназначена для ТиС (для тех, кому лень делать нечто подобное). Помогает проконтролировать различия в БД, произведенные задним числом. Сверяет документы в идентичных базах за указанный период. 
Запускается в одной из баз, и по OLE подсоединяется к архивной базе.
Работает в 4 этапа:
1. Берет документы первой базы за указаный период, перебирает их и сравнивает с документами второй базы. Если есть различия в сумме, либо документ отсутствует, либо различается флаг пометки удаления - выводит в результирующую таблицу.  
2. (в обратную сторону) Берет документы второй базы за указанный период, перебирает их и сравнивает с документами первой базы. Если есть различия в сумме, либо документ отсутствует - выводит в результирующую таблицу.  Если у документов различный флаг пометки удаления    - выводится в первом проходе.
3. Делает такой же перебор документов первой базы и сравнивает табличную часть с табличной частью документа второй базы.
4. Обратные действия пункту 3.  

 

Сделано быстро, просто, без изысков, с первой полки... Алгоритм простой, особо просьба не пинать :). При желании можно спокойно адаптировать под любую базу 1С 7.7, т.к. работает только с документами. Для этого нужно просто заменить функцию глЕстьРеквизитМнЧ и глФрм.

Если окажется полезной для кого-нибудь, буду просто счастлив :)

Скачать файлы

Наименование Файл Версия Размер
СверкаДокументовТиС 116
.1243505104 38,50Kb
25.09.09
116
.1243505104 38,50Kb Бесплатно

См. также

Подписаться Добавить вознаграждение
Комментарии
1. Епрст (Ёпрст) 28.05.09 14:46
Гы..
Не катит.. Перебьют тебе нумера обработкой, или просто так нумер изменят и привет котёнку...
Если у вас копия, то в разы быстрее/проще искать документы(и не только их) через ЗначениеВстрокуВнутр/ЗнаениеИЗСтрокиВнутр ...
2. Бронко (Струнин) 28.05.09 14:51
Так суть как раз в этом... Если изменили номера то их выведет и разбирайся ктто да зачем...
3. Бронко (Струнин) 28.05.09 14:57
Ёпрст, по поводу ЗначениеВстрокуВнутр/ЗнаениеИЗСтрокиВнутр не спорю :)
просто что пришло сразу в голову, то и сделал. И не забыл упомянуть, чтобы не пинали :).
Если кому не лень, с удовольствием взял бы поюзать нечто подобное, написанное более оптимально, хотя и эта (вроде проверил) работает.
А так, всё это для получение картины изменений в базе... Может кто в тихоря решил чего заменить, а люди расстраиваются :)
4. Епрст (Ёпрст) 28.05.09 15:12
(2) У тебя будет - что объект не найден (ну или как там) , а он есть... хотя и з другим нумером... а так - сразу можешь проверить и дату и нумер и другие реквизиты, хоть все...

5. Бронко (Струнин) 28.05.09 15:49
(4) Если он не найден, его выведет, соответственно выведет этот объект, у которого изменился номер, если в этом нет криминала, то человек оценивает это спокойно :)
и потом сверка идет сегодня и сверяется прошедший период, например 2008-й год, данные не должны были меняться, так как все сдано куда надо и т.д.
сверяется текущая база и архив за 2008-й год, при этом период сверки 2008-й год. Зачем в 2208-м году надо было что-то менять или добалять туда, например РКО.
Я наверное неправильно объясняю :(
6. Бронко (Струнин) 28.05.09 15:55
(4) Добавлю. То есть менял ли кто либо в текущей базе данные за 2008-й год.
При нормальной работе нет никакого смысла менять номер документа в ноябре 2008-го. Но если это даже и произошло, данная информация будет выведена в результирующую таблицу. Если в этом нет ни чего плохого для организации, значит всё нормально.
7. Епрст (Ёпрст) 28.05.09 15:57
(5) Я перенумеровал все объекты одного вида, например за период... твоя обработка не найдёт эти документы, а что еще хуже - найдёт по якобы "совпадающим" нумерам... Так яснее ?
При использовании же ИД документа - мы можем узнать всё сразу - что было и что стало с данным объектом и что изменили, т.к ИД дока не меняется и он уникальный...
8. Бронко (Струнин) 28.05.09 16:08
(7) Да кто ж спорит, что по ИД лучше :)))))
я писал в (3):"Ёпрст, по поводу ЗначениеВстрокуВнутр/ЗнаениеИЗСтрокиВнутр не спорю :)
просто что пришло сразу в голову, то и сделал. И не забыл упомянуть, чтобы не пинали :)."
Только, вопрос, ЗАЧЕМ нам в мае 2009-го перенумеровывать объекты одного вида за 2008-й год. Это раз.
А второе возьми архив, где эти объекты с одинаковой нумерацией, и сравни два архива.
Переделывать на ЗначениеВстрокуВнутр/ЗнаениеИЗСтрокиВнутр меня ломает :)))
но идея лучше чем в данной обработке бесспорно :). При том, что в нормальной базе и эта отработает нормально:) т.е. для тех кто хочет узнать не обкрадывают ли его, вполне подойдет.
9. Епрст (Ёпрст) 28.05.09 16:19
(8) Про перенумерацию всех да..
а так, вполне - F9 и перебили нумер у пары доков..

ЗЫ: Лучше переделать всё же..
а нумер может совпасть у абсолютно разных документов в одном периоде.

Как там? "Гни сою линию...!"
:)
10. Бронко (Струнин) 28.05.09 16:21
Ну будет время сделаю :) Спасибо, за наводку.
а так, может кто раньше сделает :)