Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Проблемка с запросом...
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 7.7
Роман
Здравствуйте уважаемыеsmile.gif
Надо сделать внутренний отчет по предприятию... в 1С-е я новичок.. тут столкнулся с проблемкой...
Для разных видов работников..совместителей, котор. по трудовому договору работают и т.д нужно
отобразить величину ЕСВ из док. начисления ЗП..

    Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |Период с (ВыбСубконто2.ДатаНач) по (ВыбСубконто2.ДатаКон);
    |Обрабатывать НеПомеченныеНаУдаление;
    |ОбрабатыватьДокументы Проведенные;                
    |НачислениеЗП = Документ.НачислениеЗП.ТекущийДокумент;
    |Группировка НачислениеЗП;
    |"//}}ЗАПРОС
;
    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;
        ЕСВ2=0;
        ЕСВ26=0;
        еСВ36=0;
    Пока Запрос.Группировка(1) = 1 Цикл                                                        
        запрос.НачислениеЗП.выбратьстроки();
        Пока запрос.начислениеЗП.ПолучитьСтроку()=1 Цикл
              ЕСВ2=ЕСВ2+запрос.НачислениеЗП.суммаУдержано;
           ЕСВ26=есв26+запрос.НачислениеЗП.начислено;
           ЕСв36=ЕСВ36+запрос.НачислениеЗП.ЕСВ36;
        КонецЦикла;    
      КонецЦикла


Все налоги = 0 на выходе... помогите пожалуйста, подскажите, что я делаю не так...
Fynjy
х
Flamepayne
х
Flamepayne
то есть так
Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |Период с (ВыбСубконто2.ДатаНач) по (ВыбСубконто2.ДатаКон);
    |Обрабатывать НеПомеченныеНаУдаление;
    |ОбрабатыватьДокументы Проведенные;                
    |НачислениеЗП = Документ.НачислениеЗП.ТекущийДокумент;
              |суммаУдержано = Документ.НачислениеЗП.суммаУдержано;
              |ЕСВ36 = Документ.НачислениеЗП.ЕСВ36;
    |Группировка НачислениеЗП;
    |"//}}ЗАПРОС

    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;
        ЕСВ2=0;
        ЕСВ26=0;
        еСВ36=0;
    Пока Запрос.Группировка(1) = 1 Цикл                                                        
        //запрос.НачислениеЗП.выбратьстроки(); - такого метода в запросе нет
           ЕСВ2=ЕСВ2+запрос.суммаУдержано;
           ЕСВ26=есв26+запрос.начислено;
           ЕСв36=ЕСВ36+запрос.ЕСВ36;
        КонецЦикла;    
      КонецЦикла
igmig65
Цитата(Flamepayne)
    |Обрабатывать НеПомеченныеНаУдаление;
    |ОбрабатыватьДокументы Проведенные;

Во первых, включайте логику, зачем здесь 1, если 2 уже исключает 1.
Цитата
|ЕСВ36 = Документ.НачислениеЗП.ЕСВ36;

А что за конфигурация, нет реквизита ЕСВ36 в НачислениеЗП в станадртной.
И вообще вам нужен конструктор запросов, хоть немного научитесь на примере.
Роман
Всем спасибо) на ошибках учатся... я же тоже не волшебник... только учусьsmile.gif
Конфигурация Альфа-комовская.. не типовая..
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.