|
v7: ВыбратьОперацииСПроводками() работает через раз....(пропадают проводки) | ☑ | ||
---|---|---|---|---|
0
Optan
15.07.16
✎
12:06
|
Всем привет!
Подрядили разобраться с чудесами в 7.7 1С Предприятие для SQL (7.70.027) БУ 4.5 (7.70.597) доработанная База файловая, работа многопользовательская через RDP. Сворачивается с 2011 года (стандартным WRAP). Объем примерно 5Гб. С недавних пор Отчет "Акт сверки расчетов" срабатывает через раз. Начальное сальдо всегда получает правильно. А вот проводки то выходит все пустое, то заполняет все верно. Можно сформировать отчет с разницей в 20-30 сек и удивиться разнице. В отладчике все правильно, даты, фильтр по набору счетов Дт/Кт, но периодически не срабатывает и всё - хоть ты тресни) Разделитель учета не используется. Кроме пересчета итогов и переиндексации этой ночью идей нет( Но меня терзают смутные сомнения, что появление и пропажа данных с этим не связана( Может кто сталкивался? [CODE] Процедура Заполнить() Если КонДата < НачДата Тогда Предупреждение("Неверно задан период сверки расчетов.", "!"); Возврат; КонецЕсли; Если ПустоеЗначение(Контрагент) = 1 Тогда Предупреждение("Сначала, пожалуйста, выберите контрагента."); Возврат; КонецЕсли; Форма.ИспользоватьСлой("Таблица, Основной", 2); Форма.Закладки.ТекущаяСтрока(2); Если ТаблицаДвижений.КоличествоСтрок() > 0 Тогда Если Вопрос("Перед заполнением таблица движений будет очищена. |Продолжать?", "Да+Нет") = "Нет" Тогда Возврат; КонецЕсли; КонецЕсли; ТаблицаДвижений.УдалитьСтроки(); ТКонтрагент = Контрагент; ТДоговор = Договор; //ищем документы, в т.ч. операции, по расчетам с выбранным контрагентом, по проводкам СписокВыбранныхСчетов = СоздатьОбъект("СписокЗначений"); Фильтр = ""; Для СчетчикЦикла = 1 По СписокСчетов.РазмерСписка() Цикл Если СписокСчетов.Пометка(СчетчикЦикла) = 1 Тогда Сч = СписокСчетов.ПолучитьЗначение(СчетчикЦикла); СписокВыбранныхСчетов.ДобавитьЗначение(Сч); КодСчета = СокрЛП(Сч.Код); Фильтр = Фильтр + КодСчета + ",*;*," + КодСчета + ";"; КонецЕсли; КонецЦикла; Если ПустоеЗначение(Фильтр) = 0 Тогда Фильтр = Лев(Фильтр, СтрДлина(Фильтр)-1); КонецЕсли; ЕстьВалютныеОперации = 0; Опер = СоздатьОбъект("Операция"); Опер.ИспользоватьСубконто(ВидыСубконто.Контрагенты, Контрагент); Если ПустоеЗначение(Договор) = 0 Тогда Если Договор.ЭтоГруппа() = 0 Тогда Опер.ИспользоватьСубконто(ВидыСубконто.Договоры, Договор); Иначе //Опер.ИспользоватьСубконто(ВидыСубконто.Договоры,); КонецЕсли; КонецЕсли; Опер.ВыбратьОперацииСПроводками(НачДата, КонДата, Фильтр); Пока Опер.ПолучитьПроводку() = 1 Цикл [/CODE] |
|||
1
Optan
15.07.16
✎
12:29
|
Причем если открыть журнал проводок и сделать отбор по конкретному контрагенту, то периодически с экрана в журнале могут пропасть все записи, а при повторном отборе появится...
|
|||
2
Optan
15.07.16
✎
14:13
|
up
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |