БГУ 8.2 Технологический анализ по КЭК оборотов счета 210.03
Показывать по
10
20
40
сообщений
- 1
- 2
09.10.2012
08:26
#11
Чертов ТА - это не к вам. Просто клиенты отчетность сдают и, как следствие, нервы у меня тоже сдают))))Ничего не могу сказать, ошибок я не вижу.....Может, платформу обновите?
09.10.2012
14:21
#12
Версия 1.0.13.4 (от 20.09)
Исправлена ошибка:
В технологическом анализе проверка по КЭК оборотов счета 210.03 неправильно сравнивает обороты счета, если деньги не прошли весь путь с лицевого счета в кассу или наоборот, а имел место возврат средств.
Пример. Провели заявку на наличные. Была сформирована проводка Д-т 210.03, К-т 201.11. Деньги в кассу не оприходовали, а вернули деньги на счет. Технологический анализ считал, что счет 210.03, в данном случае не закрыт.
Исправлена ошибка:
В технологическом анализе проверка по КЭК оборотов счета 210.03 неправильно сравнивает обороты счета, если деньги не прошли весь путь с лицевого счета в кассу или наоборот, а имел место возврат средств.
Пример. Провели заявку на наличные. Была сформирована проводка Д-т 210.03, К-т 201.11. Деньги в кассу не оприходовали, а вернули деньги на счет. Технологический анализ считал, что счет 210.03, в данном случае не закрыт.
16.10.2012
14:53
#15
"1.0.14.2 тоже не помогло, вылезают суммы по возвратам сотрудников через кассу (зарплата, больничные...). Проводки такие:
ПКО : 1.201.34.510/1.302.11.730
1.НД.211
РКО: 1.210.03.560/1.201.34.610
1.НД.211
КП: 1.304.05.211/1.210.03.660
Сделала отчет внешним, исправила так:
в процедуре ЗаполнитьТабПоП15(ДеревоРезультат, ТаблицаРезультат) строки
Для каждого СтрокаКОСГУ из СтрокаКВД.Строки Цикл
ТекКОСГУ = СтрокаКОСГУ.КОСГУ;
СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);
заменила на
Для каждого СтрокаКОСГУ из СтрокаКВД.Строки Цикл
ТекКОСГУ = СтрокаКОСГУ.КОСГУ;
//////////////////////////////Начало
ПараметрыОтбора = Новый Структура;
ПараметрыОтбора.Вставить("Косгу", ТекКОСГУ);
ПараметрыОтбора.Вставить("Сумма", СтрокаКОСГУ.Сумма);
МассивСтрок = СтрокаКВД_ВХ.Строки.НайтиСтроки(ПараметрыОтбора);
Если МассивСтрок.Количество()>0 Тогда
СтрокаКОСГУ_Вх = МассивСтрок.Получить(0);
Иначе
СтрокаКОСГУ_Вх = Неопределено;
КонецЕсли;
//СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);
Ошибки ушли, новых пока не нашли. Другие варианты есть?"
ПКО : 1.201.34.510/1.302.11.730
1.НД.211
РКО: 1.210.03.560/1.201.34.610
1.НД.211
КП: 1.304.05.211/1.210.03.660
Сделала отчет внешним, исправила так:
в процедуре ЗаполнитьТабПоП15(ДеревоРезультат, ТаблицаРезультат) строки
Для каждого СтрокаКОСГУ из СтрокаКВД.Строки Цикл
ТекКОСГУ = СтрокаКОСГУ.КОСГУ;
СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);
заменила на
Для каждого СтрокаКОСГУ из СтрокаКВД.Строки Цикл
ТекКОСГУ = СтрокаКОСГУ.КОСГУ;
//////////////////////////////Начало
ПараметрыОтбора = Новый Структура;
ПараметрыОтбора.Вставить("Косгу", ТекКОСГУ);
ПараметрыОтбора.Вставить("Сумма", СтрокаКОСГУ.Сумма);
МассивСтрок = СтрокаКВД_ВХ.Строки.НайтиСтроки(ПараметрыОтбора);
Если МассивСтрок.Количество()>0 Тогда
СтрокаКОСГУ_Вх = МассивСтрок.Получить(0);
Иначе
СтрокаКОСГУ_Вх = Неопределено;
КонецЕсли;
//СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);
Ошибки ушли, новых пока не нашли. Другие варианты есть?"
17.10.2012
12:47
#16
"Еще может быть сторно, например КассовогоПоступления, поэтому так
Если СтрокаКОСГУ.Сумма <> 0 Тогда //если есть, то было сторно
ПараметрыОтбора = Новый Структура;
ПараметрыОтбора.Вставить("Косгу", ТекКОСГУ);
ПараметрыОтбора.Вставить("Сумма", СтрокаКОСГУ.Сумма);
МассивСтрок = СтрокаКВД_ВХ.Строки.НайтиСтроки(ПараметрыОтбора);
Если МассивСтрок.Количество()>0 Тогда
СтрокаКОСГУ_Вх = МассивСтрок.Получить(0);
Иначе
СтрокаКОСГУ_Вх = Неопределено
КонецЕсли;
Иначе
Продолжить;
КонецЕсли;
//СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);"
Если СтрокаКОСГУ.Сумма <> 0 Тогда //если есть, то было сторно
ПараметрыОтбора = Новый Структура;
ПараметрыОтбора.Вставить("Косгу", ТекКОСГУ);
ПараметрыОтбора.Вставить("Сумма", СтрокаКОСГУ.Сумма);
МассивСтрок = СтрокаКВД_ВХ.Строки.НайтиСтроки(ПараметрыОтбора);
Если МассивСтрок.Количество()>0 Тогда
СтрокаКОСГУ_Вх = МассивСтрок.Получить(0);
Иначе
СтрокаКОСГУ_Вх = Неопределено
КонецЕсли;
Иначе
Продолжить;
КонецЕсли;
//СтрокаКОСГУ_Вх = СтрокаКВД_Вх.Строки.Найти(ТекКОСГУ, "КОСГУ", Ложь);"
- 1
- 2
Читают тему
(гостей: 1)