Проблема с циклом...

1С v8

27.03.13

✎

15:43

Подскажите пожалуйста где поправить цикл:
Суть в следующем:
в цикле
"Пока Выборка.Следующий() Цикл"
"СубконтоДт2.Наименование" идут в разной очередности, поэтому нужно заполнить столбец по одному подразделению, потом вывести столбец через "присоединть" и заного по другому подразделению...

Запрос1 = Новый Запрос;
Запрос1.Текст ="ВЫБРАТЬ
| ХозрасчетныйДвиженияССубконто.СубконтоДт2,
| ХозрасчетныйДвиженияССубконто.Сумма,
| ХозрасчетныйДвиженияССубконто.СчетКт КАК СчетКт,
| ХозрасчетныйДвиженияССубконто.Период,
| ХозрасчетныйДвиженияССубконто.ПодразделениеКт.Ссылка КАК ПодразделениеКтСсылка,
| ХозрасчетныйДвиженияССубконто.СуммаНУДт,
| ХозрасчетныйДвиженияССубконто.СуммаНУКт,
| ХозрасчетныйДвиженияССубконто.СуммаПРДт,
| ХозрасчетныйДвиженияССубконто.СуммаПРКт,
| ХозрасчетныйДвиженияССубконто.СуммаВРДт,
| ХозрасчетныйДвиженияССубконто.СуммаВРКт
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто(
| &НачПериода,
| &КонПериода,
| СчетДт = &Счет
| И ПодразделениеДт.Ссылка = &Подразделение,
| ,
| ) КАК ХозрасчетныйДвиженияССубконто
|
|УПОРЯДОЧИТЬ ПО
| ПодразделениеКтСсылка";

Запрос1.УстановитьПараметр("Счет", Счет);
Запрос1.УстановитьПараметр("Подразделение", Подразделение);
Запрос1.УстановитьПараметр("НачПериода", НачалоДня(НачПериода));
Запрос1.УстановитьПараметр("КонПериода", КонецДня(КонПериода));

Выборка = Запрос1.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл

ПриОткрытии();

// ПД=Подр;
Если Выборка.СчетКт.Код = "20" или Выборка.СчетКт.Код = "20.01" или Выборка.СчетКт.Код = "20.02" тогда
Подр = Выборка.ПодразделениеКтСсылка;
Если Подр <> ПД тогда
ПД=Подр;

Если Выборка.СубконтоДт2.Наименование = "Амортизация ОС и НМА" тогда

АБУ3 = АБУ3 + Выборка.Сумма;
АНУ3 = АНУ3 + Выборка.СуммаНУДт;
АПР3=АПР3+Выборка.СуммаПРДт;
АВР3=АВР3+Выборка.СуммаВРДт;
АК3=АБУ3-(АНУ3+АПР3+АВР3);
КонецЕсли;

Если Выборка.СубконтоДт2.Наименование = "материалы и комплектующие на содержание, ремонт и эксплуатацию машин и оборудования" тогда
МБУ3=МБУ3+ Выборка.Сумма;
МНУ3=МНУ3 + Выборка.СуммаНУДт;
МПР3=МПР3+Выборка.СуммаПРДт;
МВР3=МВР3+Выборка.СуммаВРДт;
МК3=МБУ3-(МНУ3+МПР3+МВР3);
КонецЕсли;

Если Выборка.СубконтоДт2.Наименование = "Общецеховые расходы" тогда
ОБУ3=ОБУ3+ Выборка.Сумма;
ОНУ3=ОНУ3 + Выборка.СуммаНУДт;
ОПР3=ОПР3+Выборка.СуммаПРДт;
ОВР3=ОВР3+Выборка.СуммаВРДт;
ОК3=ОБУ3-(ОНУ3+ОПР3+ОВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Основная и дополнительная заработная плата работников" тогда
ОДБУ3=ОДБУ3+ Выборка.Сумма;
ОДНУ3=ОДНУ3 + Выборка.СуммаНУДт;
ОДПР3=ОДПР3+Выборка.СуммаПРДт;
ОДВР3=ОДВР3+Выборка.СуммаВРДт;
ОДК3=ОДБУ3-(ОДНУ3+ОДПР3+ОДВР3);

КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "проживание в командировочных расходах" тогда
ПБУ3=ПБУ3+ Выборка.Сумма;
ПНУ3=ПНУ3 + Выборка.СуммаНУДт;
ППР3=ППР3+Выборка.СуммаПРДт;
ПВР3=ПВР3+Выборка.СуммаВРДт;
ПК3=ПБУ3-(ПНУ3+ППР3+ПВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Прочие расходы не поименованные в справочнике" тогда
ПРБУ3=ПРБУ3+ Выборка.Сумма;
ПРНУ3=ПРНУ3 + Выборка.СуммаНУДт;
ПРПР3=ПРПР3+Выборка.СуммаПРДт;
ПРВР3=ПРВР3+Выборка.СуммаВРДт;
ПРК3=ПРБУ3-(ПРНУ3+ПРПР3+ПРВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Прочие транспортные расходы не поименованные в группе" тогда
ПТБУ3=ПТБУ3+ Выборка.Сумма;
ПТНУ3=ПТНУ3 + Выборка.СуммаНУДт;
ПТПР3=ПТПР3+Выборка.СуммаПРДт;
ПТВР3=ПТВР3+Выборка.СуммаВРДт;
ПТК3=ПТБУ3-(ПТНУ3+ПТПР3+ПТВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Расход воды" тогда
РБУ3=РБУ3+ Выборка.Сумма;
РНУ3=РНУ3 + Выборка.СуммаНУДт;
РПР3=РПР3+Выборка.СуммаПРДт;
РВР3=РВР3+Выборка.СуммаВРДт;
РК3=РБУ3-(РНУ3+РПР3+РВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Расход электроэнергии" тогда
РЭБУ3=РЭБУ3+ Выборка.Сумма;
РЭНУ3=РЭНУ3 + Выборка.СуммаНУДт;
РЭПР3=РЭПР3+Выборка.СуммаПРДт;
РЭВР3=РЭВР3+Выборка.СуммаВРДт;
РЭК3=РЭБУ3-(РЭНУ3+РЭПР3+РЭВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Содержание и текущий ремонт машин, оборудования, зданий и сооружений" тогда
СБУ3=СБУ3+ Выборка.Сумма;
СНУ3=СНУ3 + Выборка.СуммаНУДт;
СПР3=СПР3+Выборка.СуммаПРДт;
СВР1=СВР3+Выборка.СуммаВРДт;
СК3=СБУ3-(СНУ3+СПР3+СВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Страховые взносы в Пенсионный фонд, ФСС, ФФМС, ТФМС " тогда
СВБУ3=СВБУ3+ Выборка.Сумма;
СВНУ3=СВНУ3+Выборка.СуммаНУДт;
СВПР3=СВПР3+Выборка.СуммаПРДт;
СВВР3=СВВР3+Выборка.СуммаВРДт;
СВК3=СВБУ3-(СВНУ3+СВПР3+СВВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "суточные в командировочных расходах" тогда
СКБУ3=СКБУ3+ Выборка.Сумма;
СКНУ3=СКНУ3 + Выборка.СуммаНУДт;
СКПР3=СКПР3+Выборка.СуммаПРДт;
СКВР3=СКВР3+Выборка.СуммаВРДт;
СКК3=СКБУ3-(СКНУ3+СКПР3+СКВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "сырье, материалы и покупные полуфабрикаты на технологические цели" тогда
СЫРБУ3=СЫРБУ3+ Выборка.Сумма;
СЫРНУ3=СЫРНУ3 + Выборка.СуммаНУДт;
СЫРПР3=СЫРПР3+Выборка.СуммаПРДт;
СЫРВР3=СЫРВР3+Выборка.СуммаВРДт;
СЫРК3=СЫРБУ3-(СЫРНУ3+СЫРПР3+СЫРВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "топливо на технологические цели" тогда
ТБУ3=ТБУ3+ Выборка.Сумма;
ТНУ3=ТНУ3 + Выборка.СуммаНУДт;
ТПР3=ТПР3+Выборка.СуммаПРДт;
ТВР3=ТВР3+Выборка.СуммаВРДт;
ТК3=ТБУ3-(ТНУ3+ТПР3+ТВР3);
КонецЕсли;
Если Выборка.СубконтоДт2.Наименование = "Услуги вспомогательных цехов" тогда
УБУ3=УБУ3+ Выборка.Сумма;
УНУ3=УНУ3 + Выборка.СуммаНУДт;
УПР3=УПР3+Выборка.СуммаПРДт;
УВР3=УВР3+Выборка.СуммаВРДт;
УК3=УБУ3-(УНУ3+УПР3+УВР3);
КонецЕсли;
ИБУ3=АБУ3+МБУ3+ОБУ3+ОДБУ3+ПБУ3+ПРБУ3+ПТБУ3+РБУ3+РЭБУ3+СБУ3+СВБУ3+СКБУ3+СЫРБУ3+ТБУ3+УБУ3;
ИНУ3=АНУ3+МНУ3+ОНУ3+ОДНУ3+ПНУ3+ПРНУ3+ПТНУ3+РНУ3+РЭНУ3+СНУ3+СВНУ3+СКНУ3+СЫРНУ3+ТНУ3+УНУ3;
ИПР3=АПР3+МПР3+ОПР3+ОДПР3+ППР3+ПРПР3+ПТПР3+РПР3+РЭПР3+СПР3+СВПР3+СКПР3+СЫРПР3+ТПР3+УПР3;
ИВР3=АВР3+МВР3+ОВР3+ОДВР3+ПВР3+ПРВР3+ПТВР3+РВР3+РЭВР3+СВР3+СВВР3+СКВР3+СЫРВР3+ТВР3+УВР3;
ИК3=АК3+МК3+ОК3+ОДК3+ПК3+ПРК3+ПТК3+РК3+РЭК3+СК3+СВК3+СКК3+СЫРК3+ТК3+УК3;
КонецЕсли;
КонецЕсли;

// КонецЦикла;

Секция.Параметры.ПД = ПД;

Секция.Параметры.АБУ3=АБУ3;
Секция.Параметры.АНУ3=АНУ3;
Секция.Параметры.АПР3=АПР3;
Секция.Параметры.АВР3=АВР3;
Секция.Параметры.АК3=АК3;
//
Секция.Параметры.МБУ3=МБУ3;
Секция.Параметры.МНУ3=МНУ3;
Секция.Параметры.МПР3=МПР3;
Секция.Параметры.МВР3=МВР3;
Секция.Параметры.МК3=МК3;
//
Секция.Параметры.ОБУ3=ОБУ3;
Секция.Параметры.ОНУ3=ОНУ3;
Секция.Параметры.ОПР3=ОПР3;
Секция.Параметры.ОВР3=ОВР3;
Секция.Параметры.ОК3=ОК3;
//
Секция.Параметры.ОДБУ3=ОДБУ3;
Секция.Параметры.ОДНУ3=ОДНУ3;
Секция.Параметры.ОДПР3=ОДПР3;
Секция.Параметры.ОДВР3=ОДВР3;
Секция.Параметры.ОДК3=ОДК3;
//
Секция.Параметры.ПБУ3=ПБУ3;
Секция.Параметры.ПНУ3=ПНУ3;
Секция.Параметры.ППР3=ППР3;
Секция.Параметры.ПВР3=ПВР3;
Секция.Параметры.ПК3=ПК3;
//
Секция.Параметры.ПРБУ3=ПРБУ3;
Секция.Параметры.ПРНУ3=ПРНУ3;
Секция.Параметры.ПРПР3=ПРПР3;
Секция.Параметры.ПРВР3=ПРВР3;
Секция.Параметры.ПРК3=ПРК3;
//
Секция.Параметры.ПТБУ3=ПТБУ3;
Секция.Параметры.ПТНУ3=ПТНУ3;
Секция.Параметры.ПТПР3=ПТПР3;
Секция.Параметры.ПТВР3=ПТВР3;
Секция.Параметры.ПТК3=ПТК3;
//
Секция.Параметры.РБУ3=РБУ3;
Секция.Параметры.РНУ3=РНУ3;
Секция.Параметры.РПР3=РПР3;
Секция.Параметры.РВР3=РВР3;
Секция.Параметры.РК3=РК3;
//
Секция.Параметры.РЭБУ3=РЭБУ3;
Секция.Параметры.РЭНУ3=РЭНУ3;
Секция.Параметры.РЭПР3=РЭПР3;
Секция.Параметры.РЭВР3=РЭВР3;
Секция.Параметры.РЭК3=РЭК3;
//
Секция.Параметры.СБУ3=СБУ3;
Секция.Параметры.СНУ3=СНУ3;
Секция.Параметры.СПР3=СПР3;
Секция.Параметры.СВР3=СВР3;
Секция.Параметры.СК3=СК3;
//
Секция.Параметры.СВБУ3=СВБУ3;
Секция.Параметры.СВНУ3=СВНУ3;
Секция.Параметры.СВПР3=СВПР3;
Секция.Параметры.СВВР3=СВВР3;
Секция.Параметры.СВК3=СВК3;
//
Секция.Параметры.СКБУ3=СКБУ3;
Секция.Параметры.СКНУ3=СКНУ3;
Секция.Параметры.СКПР3=СКПР3;
Секция.Параметры.СКВР3=СКВР3;
Секция.Параметры.СКК3=СКК3;
//
Секция.Параметры.СЫРБУ3=СЫРБУ3;
Секция.Параметры.СЫРНУ3=СЫРНУ3;
Секция.Параметры.СЫРПР3=СЫРПР3;
Секция.Параметры.СЫРВР3=СЫРВР3;
Секция.Параметры.СЫРК3=СЫРК3;
//
Секция.Параметры.ТБУ3=ТБУ3;
Секция.Параметры.ТНУ3=ТНУ3;
Секция.Параметры.ТПР3=ТПР3;
Секция.Параметры.ТВР3=ТВР3;
Секция.Параметры.ТК3=ТК3;
//
Секция.Параметры.УБУ3=УБУ3;
Секция.Параметры.УНУ3=УНУ3;
Секция.Параметры.УПР3=УПР3;
Секция.Параметры.УВР3=УВР3;
Секция.Параметры.УК3=УК3;
//
Секция.Параметры.ИБУ3=ИБУ3;
Секция.Параметры.ИНУ3=ИНУ3;
Секция.Параметры.ИПР3=ИПР3;
Секция.Параметры.ИВР3=ИВР3;
Секция.Параметры.ИК3=ИК3;

Таблица.Присоединить(Секция);

КонецЦикла;

Если можно строкой кода...
Заранее спасибо !

1 Mort

27.03.13

✎

15:44

Выронил сигарету...

2 fisher

27.03.13

✎

15:47

Зачем я сюда зашел? Как мне это развидеть?

3 salvator

27.03.13

✎

15:49

Ядрен-батон..

4 salvator

27.03.13

✎

15:50

Все не читал, но может сделать итоги и по каждому итогу присоединять область?

5 salvator

27.03.13

✎

15:51

>> Пока Выборка.Следующий() Цикл
>> ПриОткрытии();

Ипануться...

6 mikecool

27.03.13

✎

15:52

ЭТО ШЕДЕВР! автор, неси зачетку, ставлю 5!

7 Alexperumov

27.03.13

✎

16:01

СЫРБУ3=СЫРБУ3+ Выборка.Сумма; - Типа Арбузосыр)

8 rbcvg

27.03.13

✎

16:05

"Если Подр <> ПД тогда ПД=Подр;" - если Магомед не идет к горе

9 Maxus43

27.03.13

✎

16:07

красиво

10 hhhh

27.03.13

✎

16:18

одну мну другую пну что ли?

11 Xatori

27.03.13

✎

16:32

Шедевральный код по читаемости и логике. Предложу автору для начала использовать конструкцию ИначеЕсли).
Это получается каждый раз проверка проходит;
Если Выборка.СубконтоДт2.Наименование = "сырье, материалы и покупные полуфабрикаты на технологические цели" тогда и т.д. - Зачем?
Если значение найдено есть ли смысл дальше проверять?)

12 Fragster

гуру

27.03.13

✎

16:35

(11) а если я переименую субконто в базе - то автор получит еще 1 час работы

13 AndyD

27.03.13

✎

16:44

дождались. таджикские 1сники в городе!

14 samozvanec

27.03.13

✎

17:29

вот ради таких веток мы и ходим на мисту

16 hasan-rusel

28.03.13

✎

04:50

Оу-оу, сколько сарказма !! И не одного внятного ответа...
Прям все сразу родились мегапрограммерами !
Я просто месяц в программировании...

Как собрать итоги по 1 подразделению и потом только присоединять ?

17 Крутил_
Вертел_1С

28.03.13

✎

05:02

Код просто ужасен, я в шокеэ, быдлокодер детектед. Почему ты субконто ищешь по наименованию ? наркотики? для чего код. Смысл что то советовать если примитивный код не понимает

18 hasan-rusel

28.03.13

✎

05:20

(17) Потому что мне нужно только определенные субконто по наименованию, смысл переводить в код?

19 razlagator

28.03.13

✎

05:28

даешь пятницу!

20 kosts

28.03.13

✎

06:34

(0) Вот дарю готовый код. Только добавь запрос.


 
Запрос = Новый Запрос;
 
Запрос.Текст = "...
 
;
 
Запрос.УстановитьПараметр("Счет", Счет);
 
Запрос.УстановитьПараметр("СсылкаСчет20", СсылкаСчет20);
 
Запрос.УстановитьПараметр("СсылкаСчет20.01", СсылкаСчет2001);
 
Запрос.УстановитьПараметр("СсылкаСчет20.02", СсылкаСчет2002);
 
Запрос.УстановитьПараметр("СсылкаНаСубконтоАмортизацияОСиНМА", СсылкаНаСубконтоАмортизацияОСиНМА);
 
...
 
Запрос.УстановитьПараметр("СсылкаНаСубконтоУслугивспомогательныхцехов", СсылкаНаСубконтоУслугивспомогательныхцехов);
 
//Запрос.УстановитьПараметр("Подразделение", Подразделение);
 
Запрос.УстановитьПараметр("НачПериода", НачалоДня(НачПериода));
 
Запрос.УстановитьПараметр("КонПериода", КонецДня(КонПериода));
 

 
Результат = Запрос.Выполнить();
 
ВыборкаПодразделения = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
 

 
Пока ВыборкаПодразделения.Следующий() Цикл
 
    Выборка = ВыборкаПодразделения.Выбрать();
 
    Пока Выборка.Следующий() Цикл
 
        Секция.Параметры.Заполнить(Выборка);
 
        Таблица.Присоединить(Секция);
 
    КонецЦикла;
 
КонецЦикла;

Не идеально, конечно, но все уже получше.

21 kosts

28.03.13

✎

06:39

(20) если организовать еще группировку и по субконту2, то и запрос можно сильно упростить.

22 Рэйв

28.03.13

✎

06:47

(20) Зря ты так. Сейчас он еще постов 500 будет узнавать что и как добавить в запрос.

23 Михаил 1С

28.03.13

✎

06:48

(20) (21) - Блин, да ты за него всю работу сделал! В 10 раз упростил все.
(я мало читал его код и твой, уж очень у него все много, но явно видно, что ты, Костс, очень сильно все упростил)

24 Крутил_
Вертел_1С

28.03.13

✎

06:49

(20) отличное решение! Убирать запрос из года действительно его упрощает.

25 Крутил_
Вертел_1С

28.03.13

✎

06:49

(24) кода

26 kosts

28.03.13

✎

06:59

(24) А то. Не зря же в запросах всякие соединения, условия, группировки и итоги придумали.

27 hhhh

28.03.13

✎

07:15

(16) вообще-то такие вещи пишутся на СКД. В правом верхнем углу ссылка на бесплатные видеоуроки, там есть уроки по СКД. Скачай и изучи.

28 chelentano

28.03.13

✎

07:19

Пока Выборка.Следующий() Цикл
ПриОткрытии();

феерично

29 hasan-rusel

28.03.13

✎

07:33

(20) Спасибо за помощь !!!!

Мне еще переменную объявить ??

{Форма.Форма.Форма(973,44)}: Переменная не определена (СсылкаСчет20)
Запрос1.УстановитьПараметр("СсылкаСчет20", <<?>>СсылкаСчет20); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(974,47)}: Переменная не определена (СсылкаСчет2001)
Запрос1.УстановитьПараметр("СсылкаСчет20.01", <<?>>СсылкаСчет2001); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(975,47)}: Переменная не определена (СсылкаСчет2002)
Запрос1.УстановитьПараметр("СсылкаСчет20.02", <<?>>СсылкаСчет2002); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(976,65)}: Переменная не определена (СсылкаНаСубконтоАмортизацияОСиНМА)
Запрос1.УстановитьПараметр("СсылкаНаСубконтоАмортизацияОСиНМА", <<?>>СсылкаНаСубконтоАмортизацияОСиНМА); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(977,74)}: Переменная не определена (СсылкаНаСубконтоУслугивспомогательныхцехов)
Запрос1.УстановитьПараметр("СсылкаНаСубконтоУслугивспомогательныхцехов", <<?>>СсылкаНаСубконтоУслугивспомогательныхцехов); (Проверка: Толстый клиент (обычное приложение))

30 kroll

28.03.13

✎

07:47

Респект таким парням...

31 hhhh

28.03.13

✎

07:50

(29) здесь тупой копипаст не проканает. Голову всё-таки включить придется, и мозги слегка продуть.

32 Alexperumov

28.03.13

✎

09:07

(29) Как хасан 1с учил..
У тя Запрос1 в (20) Запрос

33 hasan-rusel

28.03.13

✎

09:16

(32) Не в этом дело )

{Форма.Форма.Форма(973,43)}: Переменная не определена (СсылкаСчет20)
Запрос.УстановитьПараметр("СсылкаСчет20", <<?>>СсылкаСчет20); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(974,46)}: Переменная не определена (СсылкаСчет2001)
Запрос.УстановитьПараметр("СсылкаСчет20.01", <<?>>СсылкаСчет2001); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(975,46)}: Переменная не определена (СсылкаСчет2002)
Запрос.УстановитьПараметр("СсылкаСчет20.02", <<?>>СсылкаСчет2002); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(976,64)}: Переменная не определена (СсылкаНаСубконтоАмортизацияОСиНМА)
Запрос.УстановитьПараметр("СсылкаНаСубконтоАмортизацияОСиНМА", <<?>>СсылкаНаСубконтоАмортизацияОСиНМА); (Проверка: Толстый клиент (обычное приложение))
{Форма.Форма.Форма(977,73)}: Переменная не определена (СсылкаНаСубконтоУслугивспомогательныхцехов)
Запрос.УстановитьПараметр("СсылкаНаСубконтоУслугивспомогательныхцехов", <<?>>СсылкаНаСубконтоУслугивспомогательныхцехов); (Проверка: Толстый клиент (обычное приложение))

34 НафНаф

28.03.13

✎

09:18

(33) переменных нет, да ипараметры запроса такие не проканают, ты неудачник, лучше овец пасти

35 hasan-rusel

28.03.13

✎

09:25

(34) Еще 1 мегапрограммер, рождённый с сертификатом 1с спец...

36 НафНаф

28.03.13

✎

09:26

(35) сертификатов кстати почти нет, 1С вообще не причем, просто у тебя http://lurkmore.to/ГСМ

37 hhhh

28.03.13

✎

09:27

(35) ну определи эти переменные, чего ты, уже и орфографические ошибки у нас будешь спрашивать?

38 anddro

28.03.13

✎

09:27

Однозначно: нужна версия "1С для начинающих" в которой в принципе отсутствует функция копи-паст для текста модулей. Только это порой поможет людям иногда включать мозг.
ТС - извини, но или ты тролль, или тебе еще предстоит многому учится.

39 hasan-rusel

28.03.13

✎

10:00

Поправил запрос, сделал Группировку.
Только при выполнении
Пока ВыборкаПодразделения.Следующий() Цикл
Выборка = ВыборкаПодразделения.Выбрать();
Пока Выборка.Следующий() Цикл
Секция.Параметры.Заполнить(Выборка);
Таблица.Присоединить(Секция);
КонецЦикла;
КонецЦикла;

В "ВыборкаПодразделения" - значения есть, а в
"Выборка" - Выборка.Период Неопределено
(Период Ошибка чтения значения)

40 kosts

28.03.13

✎

10:08

(39) Чаще наоборот.
Запрос то переделал?

41 salvator

28.03.13

✎

10:12

(39) Запрос выложи

42 hasan-rusel

28.03.13