Имя: Пароль:
1C
1С v8
Не сохраняется значение в ячейке
0 capllary
 
30.09.14
12:51
Есть запрос, который выдает число, но почему то не переноситься в ячейку.


Процедура ЗаполнитьАвто() Экспорт
    
Вот эта ячейка П000101303    
        
    
    ////////
    // *** Здесь необходимо написать алгоритм заполнения отчета.***
    //
    // Для присвоения показателям отчета вычисленного значения  необходимо
    // использовать процедуру
    //
    //     УстановитьЗначениеПоказателя(ИмяПоказателя, ЗначениеПоказателя).
    //
    ////////
    
    ПС = ПланыСчетов["Хозрасчетный"];
    Счет90_1   = ПС.Выручка;
    Счет90_2   = ПС.СебестоимостьПродаж;
    Счет90_3   = ПС.Продажи_НДС;
    Счет90_4   = ПС.Продажи_Акцизы;
    Счет90_5   = ПС.Продажи_ЭкспортныеПошлины;
    
    Счет90_01_3   = ПС.НайтиПоКоду("90.01.3");  
    Счет90_01_4   = ПС.НайтиПоКоду("90.01.4");
    Счет90_01_5   = ПС.НайтиПоКоду("90.01.5");
    Счет90_01_6   = ПС.НайтиПоКоду("90.01.6");
    Счет90_01_7   = ПС.НайтиПоКоду("90.01.7");
    Счет90_01_8   = ПС.НайтиПоКоду("90.01.8");
    Счет90_01_9   = ПС.НайтиПоКоду("90.01.9");
    Счет90_01_10  = ПС.НайтиПоКоду("90.01.10");
    
    
    
    
    
    
            
        // Бухгалтерский итоги по счетам
        мБухИтоги = Обработки.БухгалтерскиеИтоги.Создать();

        // Бухгалтерские итоги по аналитике
        мБухИтогиРС = Обработки.БухгалтерскиеИтоги.Создать();

        Итоги = "КонечныйОстатокДт, ОборотДт, ОборотКт, КорОборотДт";

        // Бухгалтерские итоги по счетам, без аналитики
        мБухИтоги.РассчитатьИтоги("Хозрасчетный", Итоги, "Сумма", "Счет", мДатаНачалаПериодаОтчета, мДатаКонцаПериодаОтчета, , , , , , , );

        // строка 010 - выручка
        П010001003_90_1 = КО(Счет90_1);
        
        П010001003_90_3 = ДО(Счет90_3);
        П010001003_90_4 = ДО(Счет90_4);
        П010001003_90_5 = ДО(Счет90_5);
        
        П010001003 = П010001003_90_1
                   - П010001003_90_3
                   - П010001003_90_4
                   - П010001003_90_5;
                  
        СтатьяОборотов = Справочники.СтатьиОборотовПоБюджетам.НайтиПоКоду("000000045");          
        Сценарий = Справочники.СценарииПланирования.НайтиПоКоду("000000001");    
    ТекстЗапроса2 =
        "ВЫБРАТЬ
        |    СУММА(БюджетнаяОперация.Сумма) КАК Сумма
        |ИЗ
        |    Документ.БюджетнаяОперация КАК БюджетнаяОперация
        |ГДЕ
        |    БюджетнаяОперация.Дата МЕЖДУ &НачПериода И &КонПериода
        |    И БюджетнаяОперация.Сценарий = &Сценарий
        |    И БюджетнаяОперация.СтатьяОборотов В ИЕРАРХИИ(&СтатьяОборотов)";
    
        Запрос = Новый Запрос;
        Запрос.УстановитьПараметр("НачПериода", мДатаНачалаПериодаОтчета);
        Запрос.УстановитьПараметр("Сценарий", Сценарий);
        Запрос.УстановитьПараметр("КонПериода", КонецДня(мДатаКонцаПериодаОтчета));
        Запрос.УстановитьПараметр("СтатьяОборотов", СтатьяОборотов);    
        Запрос.Текст = ТекстЗапроса2;
    
        РезультатЗапроса = Запрос.Выполнить().Выбрать();
        П000101303 = РезультатЗапроса.Сумма;
                          
        мФормаОтчета.Области.П000100103.Значение = П010001003 / 1000;
        мФормаОтчета.Области.П000101303.Значение = ОбщегоНазначения.ФорматСумм(П000101303);
1 capllary
 
30.09.14
12:54
Много кода выложил, вот главное:

Помогите сохранить значение П000101303 в ячейке мФормаОтчета.Области.П000101303.Значение табличного документа.

СтатьяОборотов = Справочники.СтатьиОборотовПоБюджетам.НайтиПоКоду("000000045");          
        Сценарий = Справочники.СценарииПланирования.НайтиПоКоду("000000001");    
    ТекстЗапроса2 =
        "ВЫБРАТЬ
        |    СУММА(БюджетнаяОперация.Сумма) КАК Сумма
        |ИЗ
        |    Документ.БюджетнаяОперация КАК БюджетнаяОперация
        |ГДЕ
        |    БюджетнаяОперация.Дата МЕЖДУ &НачПериода И &КонПериода
        |    И БюджетнаяОперация.Сценарий = &Сценарий
        |    И БюджетнаяОперация.СтатьяОборотов В ИЕРАРХИИ(&СтатьяОборотов)";
    
        Запрос = Новый Запрос;
        Запрос.УстановитьПараметр("НачПериода", мДатаНачалаПериодаОтчета);
        Запрос.УстановитьПараметр("Сценарий", Сценарий);
        Запрос.УстановитьПараметр("КонПериода", КонецДня(мДатаКонцаПериодаОтчета));
        Запрос.УстановитьПараметр("СтатьяОборотов", СтатьяОборотов);    
        Запрос.Текст = ТекстЗапроса2;
    
        РезультатЗапроса = Запрос.Выполнить().Выбрать();
        П000101303 = РезультатЗапроса.Сумма;
                          
        мФормаОтчета.Области.П000100103.Значение = П010001003 / 1000;
        мФормаОтчета.Области.П000101303.Значение = ОбщегоНазначения.ФорматСумм(П000101303);
2 capllary
 
30.09.14
12:55
Запрос проверил на другом отчете, все верно, т.е. выходные данные верные.
3 capllary
 
30.09.14
12:56
Конфа УПП 1.3
4 capllary
 
30.09.14
12:58
Ощущение, как будто запрос просто не обрабатывается.
5 capllary
 
30.09.14
13:01
Может у кого нибудь есть хоть идеи куда копать?
6 hhhh
 
30.09.14
13:04
РезультатЗапроса = Запрос.Выполнить().Выбрать();
        РезультатЗапроса.Следующий();
        П000101303 = РезультатЗапроса.Сумма;
7 capllary
 
30.09.14
13:10
(6) Туплю я, спасибо...
8 13_Mult
 
30.09.14
13:18
Ох уж эти показатели ))
9 capllary
 
30.09.14
13:25
(8) Ох уж это статистическая отчетность...
Основная теорема систематики: Новые системы плодят новые проблемы.