Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[1С:Предприятие 7.7]

4 фсс, округление в графах таблицы №7

O-buh
читатель
офлайн
Дата регистрации: 19.01.2011
Сообщений: 14
Пост №1
 
10.10.2011 11:04

Добрый день!<br>Использую 1С Бухгалетия 7.7 (ОСНО и УСН).<br>Уже 3-ий квартал подряд при заполнении таблицы №7 в отчете 4 фсс приходится вручную поправлять цифры в графах "Начисленно страховых взносов на начало отчетного периода" и "Уплачено страховых взносов на начало отчетного периода". Копейки в этих графах попросту отбрасываются. Кажды раз кажется, что не сложно подправить, что в следующий раз наверно все исправят. Но похоже проблема или не замечена, или я что-то не понимаю. Заранее спасибо за разъяснения!

Alexandr VA
читатель
офлайн
Дата регистрации: 07.01.2007
Сообщений: 1666
Пост №2
 
11.10.2011 02:17

"Это косяк в модуле FSS4_1109.ert<br> <br>Там есть такой фрагмент<br> <br>Процедура ВосстановитьФорматВывода()<br> <br> СохрДанные = СоздатьОбъект("СписокЗначений");<br> <br> ШаблонПоиска = Лев(Строка(Дата2), 2) + Сред(Строка(Дата2), 4, 2) + "01";<br> <br> НайденФайл = ФС.НайтиПервыйФайл(КаталогФормы + "\" + ?(СтрДлина(ШаблонПоиска) < 8, ШаблонПоиска + "*.rvs", ШаблонПоиска + ".rvs"));<br> <br> Если ПустаяСтрока(НайденФайл) = 0 Тогда<br> <br> ЗначениеИзФайла(КаталогФормы + "\" + НайденФайл, СохрДанные);<br> <br> КодЕИ = СохрДанные.Получить("КодЕИ");<br> КолЗнак = СохрДанные.Получить("Точность");<br> <br> УстановитьФорматВывода(КодЕИ);<br> <br> КонецЕсли;<br> <br>КонецПроцедуры<br> <br>Так вот, восстановленные из файла значения КодЕИ и КолЗнак буду ВСЕГДА пустым в отчете ФСС4.<br> <br>В других модулях ФСС4 эту ошибку оходят тупо в лоб<br> <br>Процедура ВосстановитьФорматВывода()<br> <br> СохрДанные = СоздатьОбъект("СписокЗначений");<br> <br> ШаблонПоиска = Лев(Строка(Дата2), 2) + Сред(Строка(Дата2), 4, 2) + "01";<br> <br> НайденФайл = ФС.НайтиПервыйФайл(КаталогФормы + "\" + ?(СтрДлина(ШаблонПоиска) < 8, ШаблонПоиска + "*.rvs", ШаблонПоиска + ".rvs"));<br> <br> Если ПустаяСтрока(НайденФайл) = 0 Тогда<br> <br> ЗначениеИзФайла(КаталогФормы + "\" + НайденФайл, СохрДанные);<br> <br> //КодЕИ = СохрДанные.Получить("КодЕИ");<br> //КолЗнак = СохрДанные.Получить("Точность");<br> //<br> КолЗнак=2;<br> КодЕИ="383";<br> <br> УстановитьФорматВывода(КодЕИ);<br> <br> КонецЕсли;<br> <br>КонецПроцедуры"

O-buh
читатель
офлайн
Дата регистрации: 19.01.2011
Сообщений: 14
Пост №3
 
12.10.2011 09:19

Спасибо огромное!<br>Попробую обязательно.

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Представление регламентированной отчетности
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация