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

Хранилище

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

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



> Вывод остатка по регистру бухгалтерии          
alexkhua Подменю пользователя
сообщение 24.04.14, 21:02
Сообщение #1

Завсегдатай
****
Группа: Пользователи
Сообщений: 181
Спасибо сказали: 2 раз
Рейтинг: 0

Странная вещь. В результат выводится остаток по значениям только в те периоды(дни) когда было движение или на дату конца месяца в котором было движение по регистру. Что это значит?
Процедура ЗаполнитьДЗНажатие(Элемент)
    
    
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    ХозрасчетныйОстатки.Организация КАК Организация,
        |    ХозрасчетныйОстатки.Счет КАК Счет,
        |    ХозрасчетныйОстатки.Субконто1 КАК Субконто1,
        |    ХозрасчетныйОстатки.Субконто2,
        |    ХозрасчетныйОстатки.Субконто3,
        |    ХозрасчетныйОстатки.Валюта.Представление КАК Валюта,
        |    ХозрасчетныйОстатки.ВалютнаяСуммаОстаток КАК СуммаВВалютеКонечныйОстаток,
        |    ХозрасчетныйОстатки.СуммаОстаток КАК СуммаБалансаКонечныйОстаток,
        |    КурсыВалют.Курс КАК КурсНаДатуДокумента,
        |    КурсыВалют.Кратность КАК КратностьНаДатуДокумента,
        |    ХозрасчетныйОстатки.ВалютнаяСуммаОстаток * КурсыВалют.Курс * КурсыВалют.Кратность КАК СуммаБалансаКонечныйОстатокВПересчетеПоКурсу,
        |    ХозрасчетныйОстатки.СуммаОстаток - ХозрасчетныйОстатки.ВалютнаяСуммаОстаток * КурсыВалют.Курс * КурсыВалют.Кратность КАК КурсоваяРазница
        |ИЗ
        |    РегистрБухгалтерии.Хозрасчетный.Остатки(&Дата, , , ) КАК ХозрасчетныйОстатки
        |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют
        |        ПО (КурсыВалют.Валюта = ХозрасчетныйОстатки.Валюта)
        |ГДЕ
        |    ХозрасчетныйОстатки.Счет.Валютный = &Валютный
        |    И КурсыВалют.Период = &КурсНаДату
        |ИТОГИ ПО
        |    ОБЩИЕ,
        |    Организация ИЕРАРХИЯ";
        
        
        
        
        
        
    Запрос.УстановитьПараметр("Дата",КонецДня(Дата));
    Запрос.УстановитьПараметр("КурсНаДату",НачалоДня(Дата));
    

    
    Запрос.УстановитьПараметр("Валютный",Истина);
    ЭлементыФормы.ДереВалютныхСчетов.Значение = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
    ЭлементыФормы.ДереВалютныхСчетов.СоздатьКолонки();


Вроде решил так. Может удалить тему?
Процедура ЗаполнитьДЗНажатие(Элемент)
    
    
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    ХозрасчетныйОстатки.Организация КАК Организация,
        |    ХозрасчетныйОстатки.Счет КАК Счет,
        |    ХозрасчетныйОстатки.Субконто1 КАК Субконто1,
        |    ХозрасчетныйОстатки.Субконто2,
        |    ХозрасчетныйОстатки.Субконто3,
        |    ХозрасчетныйОстатки.Валюта.Представление КАК Валюта,
        |    ХозрасчетныйОстатки.ВалютнаяСуммаОстаток КАК СуммаВВалютеКонечныйОстаток,
        |    ХозрасчетныйОстатки.СуммаОстаток КАК СуммаБалансаКонечныйОстаток,
        |    КурсыВалютСрезПоследних.Курс КАК КурсНаДатуДокумента,
        |    КурсыВалютСрезПоследних.Кратность КАК КратностьНаДатуДокумента,
        |    ХозрасчетныйОстатки.ВалютнаяСуммаОстаток * КурсыВалютСрезПоследних.Курс * КурсыВалютСрезПоследних.Кратность КАК СуммаБалансаКонечныйОстатокВПересчетеПоКурсу,
        |    ХозрасчетныйОстатки.СуммаОстаток - ХозрасчетныйОстатки.ВалютнаяСуммаОстаток * КурсыВалютСрезПоследних.Курс * КурсыВалютСрезПоследних.Кратность КАК КурсоваяРазница
        |ИЗ
        |    РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютСрезПоследних
        |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрБухгалтерии.Хозрасчетный.Остатки(&Дата, , , ) КАК ХозрасчетныйОстатки
        |        ПО КурсыВалютСрезПоследних.Валюта = ХозрасчетныйОстатки.Валюта
        |ГДЕ
        |    ХозрасчетныйОстатки.Счет.Валютный = &Валютный
        |ИТОГИ ПО
        |    ОБЩИЕ,
        |    Организация ИЕРАРХИЯ";
        
        
        
        
        
        
    Запрос.УстановитьПараметр("Дата",Дата);
    //Запрос.УстановитьПараметр("КурсНаДату",НачалоДня(Дата));
    

    
    Запрос.УстановитьПараметр("Валютный",Истина);
    ЭлементыФормы.ДереВалютныхСчетов.Значение = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
    ЭлементыФормы.ДереВалютныхСчетов.СоздатьКолонки();
    
    
КонецПроцедуры

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

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