Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Войти | Зарегистрироваться )



История благодарностей участнику Koder ::: Спасибо сказали: 3 раз
Дата поста: В теме: За сообщение: Спасибо сказали:
13.02.14, 16:41 Ошибка в новом отчете "Декларация по НДС"
Цитата(mister-x @ 13.02.14, 12:20) *
таку помилку в моїх клієнтів не виводить, але от при друці є баг (додаток 5, таблиця 1 - у дві останні колонки виводить херню), він вже зафіксований АБІ


Всем привет!
Решение этого "бага" довольно простое:
Заходим в модуль отчета (файл pdv.ert)
Находим процедуру Печать()
Находим в ней строки:
    
        ИдГруппы = "DOD5T1R";
    АтрибутыГруппы(ТекущаяСтрока,ЧислоСтрок,Список,ИдГруппы);
    Формат1  = "Ч5.0";
    Формат2  = Таблица.Область(ИдГруппы + "0001G2").Формат();
    Формат3  = Таблица.Область(ИдГруппы + "0001G2A").Формат();
    Формат31 = Таблица.Область(ИдГруппы + "0001G2B").Формат();
    Формат4  = Таблица.Область(ИдГруппы + "0001G3").Формат();
    Формат5  = Таблица.Область(ИдГруппы + "0001G4").Формат();
    НомСтр = 1;
    Для i = 1 По Список.РазмерСписка() Цикл
        ТекСтрока=Список.ПолучитьЗначение(i);
        Если СтрокаМнЧЗаполнена(ТекСтрока) = 0 Тогда
            Продолжить                                        
        КонецЕсли;
        Кол1 = Формат(i, Формат1);
        Кол2 = Формат(ТекСтрока.ПолучитьЗначение(2-1), Формат2);
        Кол3 = Формат(ТекСтрока.ПолучитьЗначение(3-1), Формат3) + ".";
        Кол4 = Формат(ТекСтрока.ПолучитьЗначение(4-1), Формат31);
        Кол5 = Формат(ТекСтрока.ПолучитьЗначение(3-1), Формат4);    
        Кол6 = Формат(ТекСтрока.ПолучитьЗначение(4-1), Формат5);
        ФормаНДС.ВывестиСекцию("Приложение5Таблица1Строка");
        НомСтр = НомСтр + 1;
    КонецЦикла;


Вот в этих двух строках нужно заменить:
Было:
        Кол5 = Формат(ТекСтрока.ПолучитьЗначение(3-1), Формат4);    
        Кол6 = Формат(ТекСтрока.ПолучитьЗначение(4-1), Формат5);

Стало:
        Кол5 = Формат(ТекСтрока.ПолучитьЗначение(5-1), Формат4);    
        Кол6 = Формат(ТекСтрока.ПолучитьЗначение(6-1), Формат5);


Ну и дальше по процедуре глянуть.
kov0404, mister-x, Vofka,

RSS Текстовая версия Сейчас: 29.03.24, 16:43
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!