Убираем не нужные строчки.
08.08.2008
16:08
#1
Есть самописная база по учету работы бригадиров в строительной фирме. Необходимо в отчете - начисления по объектам - выводить фамилии бригадиров по подразделению, в которое они входят, которым производились начисления по данному подразделению Однако один бригадир может быть в разных подразделениях. Помогите пожалуйста правильно написать программный код, чтобы все прекрасно работало.
08.08.2008
17:57
#2
Покажите, сначала, что уже написано...
Иначе "Есть самописная база...", а вот телепатов нет, все в отпуске..
Иначе "Есть самописная база...", а вот телепатов нет, все в отпуске..
10.08.2008
22:47
#3
Я бы с удовольствием написала, но у меня не получается вставить текст модуля. Как бы мне это сделать?
11.08.2008
10:39
#4
в конфигураторе выделяете, правка-копировать. Здесь в форуме Правой кнопкой мыши Вставить. Ну прям как дети
12.08.2008
14:42
#6
"//*******************************************
&&&&&&&&& &&&&&&&&&&&()
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&& = 0;
&&&&&&&&& = 1;
&&&&&&&&&&&&&&
//*******************************************
&&&&&&&&& &&&&&&&&&&&&()
&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&(&&&&&&&&&&&&)
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&
&&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");
&&&&&&&;
&&&&&&&&&;
&&& = &&&&&&&&&&&&&("&&&&&&&");
&&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&");
&&&.&&&&&(0,0,0,0);
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&& = "&& &&&&&&&&&&&&& "+&&&&&;
&&&&&
&&&&& = "&& &&&& &&&&&&&&&&&&&&";
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&");
&&&.&&&&&&&&&&&&&("&&&&&");
&&&&&&&&&&& = 1;
&&&&&&&&&& = 0;
//&&&&&&&&&& &&&&&&&
&&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&&& = 0;
&&&&&&&&& = &&&&&&.&&;
&&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&."
&&&&&&&&& &&&&&&&&&&&()
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&& = 0;
&&&&&&&&& = 1;
&&&&&&&&&&&&&&
//*******************************************
&&&&&&&&& &&&&&&&&&&&&()
&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&(&&&&&&&&&&&&)
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&
&&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");
&&&&&&&;
&&&&&&&&&;
&&& = &&&&&&&&&&&&&("&&&&&&&");
&&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&");
&&&.&&&&&(0,0,0,0);
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&& = "&& &&&&&&&&&&&&& "+&&&&&;
&&&&&
&&&&& = "&& &&&& &&&&&&&&&&&&&&";
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&");
&&&.&&&&&&&&&&&&&("&&&&&");
&&&&&&&&&&& = 1;
&&&&&&&&&& = 0;
//&&&&&&&&&& &&&&&&&
&&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&&& = 0;
&&&&&&&&& = &&&&&&.&&;
&&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&."
12.08.2008
15:06
#7
"//*******************************************
&&&&&&&&& &&&&&&&&&&&()
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&& = 0;
&&&&&&&&& = 1;
&&&&&&&&&&&&&&
//*******************************************
&&&&&&&&& &&&&&&&&&&&&()
&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&(&&&&&&&&&&&&)
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&
&&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");
&&&&&&&;
&&&&&&&&&;
&&& = &&&&&&&&&&&&&("&&&&&&&");
&&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&");
&&&.&&&&&(0,0,0,0);
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&& = "&& &&&&&&&&&&&&& "+&&&&&;
&&&&&
&&&&& = "&& &&&& &&&&&&&&&&&&&&";
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&");
&&&.&&&&&&&&&&&&&("&&&&&");
&&&&&&&&&&& = 1;
&&&&&&&&&& = 0;
//&&&&&&&&&& &&&&&&&
&&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&&& = 0;
&&&&&&&&& = &&&&&&.&&;
&&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&&&&&& = "--";
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&& &&&&&&&&& = &&&&&(&&&&&);
|&&&&&&&&&&& &&&&&&&&&&&&&;
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";
&&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&;
&&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&&&&&& = "--";
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&& &&&&&&&&& = &&&&&(&&&&&);
|&&&&&&&&&&& &&&&&&&&&&&&&;
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";
&&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&&;
&&&&&&&&&& = &&&(&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&");
&&&.&&&&&&&&("&&&&&&&&&&&&& && &&&&&&&&","""");
&&&&&&&&&&&&&&
Мы не дети, просто можно было все сделать проще."
&&&&&&&&& &&&&&&&&&&&()
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());
&&&&&&&& = 0;
&&&&&&&&& = 1;
&&&&&&&&&&&&&&
//*******************************************
&&&&&&&&& &&&&&&&&&&&&()
&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&(&&&&&&&&&&&&)
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);
|&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&
&&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";
&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";
&&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");
&&&&&&&;
&&&&&&&&&;
&&& = &&&&&&&&&&&&&("&&&&&&&");
&&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&");
&&&.&&&&&(0,0,0,0);
&&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&
&&&&& = "&& &&&&&&&&&&&&& "+&&&&&;
&&&&&
&&&&& = "&& &&&& &&&&&&&&&&&&&&";
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&");
&&&.&&&&&&&&&&&&&("&&&&&");
&&&&&&&&&&& = 1;
&&&&&&&&&& = 0;
//&&&&&&&&&& &&&&&&&
&&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&&& = 0;
&&&&&&&&& = &&&&&&.&&;
&&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&.&&&&;
&&&&&&&&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&&&&&& = "--";
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&& &&&&&&&&& = &&&&&(&&&&&);
|&&&&&&&&&&& &&&&&&&&&&&&&;
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";
&&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&;
&&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&& = 1 &&&&&
&&&&&&&& = &&&&&&.&&;
&&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&&&&&& = "--";
&&&&&&&&& = &&&&&&.&&&;
&&&&&&&& = &&&&&&.&&&.&&&&&;
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);
&&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");
&&&&&&&&&&&& =
"//{{&&&&&&
|&&&&&& & &&&&&&&&&& && &&&&&&&&&&;
|&& = &&&&&&&.&&&&&&&&&&.&&&&&&;
|&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;
|&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;
|&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;
|&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;
|&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;
|&&&&&&& &&&&&&&&& = &&&&&(&&&&&);
|&&&&&&&&&&& &&&&&&&&&&&&&;
|"//}}&&&&&&
;
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";
&&&&&&&&&;
&&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";
&&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&
&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");
&&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&
&&&& &&&&&&&& = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;
&&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&.&&&&;
&&&&&&&&&;
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&& = &&&&&&&&&&& + 1;
&&&&&&&&&&;
&&&&&&&&&&;
&&&&&
&&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&
&&&&&& = &&&&&&&&&&.&&&&&&;
&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;
&&&.&&&&&&&&&&&&&("&&&&&&&&&&");
&&&&&&&&&&;
&&&&&&&&&;
&&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&
&&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;
&&&&&
&&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&&;
&&&&&&&&&;
&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&;
&&&&&&&&&&& = &&&(&&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");
&&&&&&&&&&;
&&&&&&&&&& = &&&(&&&&&&&&&&,0);
&&&.&&&&&&&&&&&&&("&&&&&&");
&&&.&&&&&&&&("&&&&&&&&&&&&& && &&&&&&&&","""");
&&&&&&&&&&&&&&
Мы не дети, просто можно было все сделать проще."
13.08.2008
13:29
#9
"Ниже приведен текст модуля данного отчета.
//*******************************************
Процедура ПриОткрытии()
НачПериода = НачМесяца(ТекущаяДата());
КонПериода = КонМесяца(ТекущаяДата());
ГрупБриг = 0;
РазвПрайс = 1;
КонецПроцедуры
//*******************************************
Процедура Сформировать()
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с НачПериода по КонПериода;
|Об = Регистр.Накопления.Объект;
|Бриг = Регистр.Накопления.Бригадир;
|Родитель = Регистр.Накопления.Бригадир.Родитель;
|Раб = Регистр.Накопления.Работа;
|Пр = Регистр.Накопления.Прайс;
|Накопление = Регистр.Накопления.Накопление;
|Объем = Регистр.Накопления.Объем;
|зПодразделение = Регистр.Накопления.Подразделение;
|зТип = Регистр.Накопления.ВклВСвод;
|Функция НакоплениеНачОст = НачОст(Накопление);
|Функция ОбъемНачОст = НачОст(Объем);
|Функция НакоплениеКонОст = КонОст(Накопление);
|Функция ОбъемКонОст = КонОст(Объем);
|"//}}ЗАПРОС
;
Если ПустоеЗначение(фПодр) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(зПодразделение = фПодр);";
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Группировка Об без групп;";
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
КонецЕсли;
КонецЕсли;
Если РазвПрайс = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Пр без групп; Группировка Раб без групп;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Раб без групп;";
КонецЕсли;
Если ПустоеЗначение(Объект) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Об = Объект);";
КонецЕсли;
Если ПустоеЗначение(Бригадир) = 0 Тогда
Если Бригадир.ЭтоГруппа() = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Родитель = Бригадир);";
Иначе
ТекстЗапроса = ТекстЗапроса + "Условие(Бриг = Бригадир);";
КонецЕсли;
КонецЕсли;
Если ПустоеЗначение(Работа) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Раб = Работа);";
КонецЕсли;
Если ПустоеЗначение(Прайс) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Пр = Прайс);";
КонецЕсли;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Сообщить("Не удалось выполнить запрос");
Возврат;
КонецЕсли;
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Накопительная");
Таб.Опции(0,0,0,0);
Если ПустоеЗначение(фПодр) = 0 Тогда
оПодр = "по подразделению "+фПодр;
Иначе
оПодр = "по всем подразделениям";
КонецЕсли;
Таб.ВывестиСекцию("Заголовок");
Таб.ВывестиСекцию("Шапка");
НомерСтроки = 1;
СуммаИтого = 0;
//заполнение таблицы
Пока Запрос.Группировка(1) = 1 Цикл
СуммаОбъект = 0;
ОбъектТаб = Запрос.Об;
Если ((Запрос.ОбъемКонОст - Запрос.ОбъемНачОст) = 0)И((Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст) = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_об");
Если УчитыватьБригадиров = 0 Тогда
Пока Запрос.Группировка(2) = 1 Цикл
Если ГрупБриг = 1 Тогда
БригадирТаб = Запрос.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = Запрос.Бриг;
КонецЕсли;
Иначе
БригадирТаб = Запрос.Бриг;
КонецЕсли;
Пока Запрос.Группировка(3) = 1 Цикл
Если РазвПрайс = 1 Тогда
ПрайсТаб = Запрос.Пр;
Пока Запрос.Группировка(4) = 1 Цикл
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЦикла;
Иначе
ПрайсТаб = "--";
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЕсли;
КонецЦикла;
КонецЦикла;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
ЗапросОткл = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС
|Период с НачПериода по КонПериода;
|Об = Регистр.Отклонения.Объект;
|Бриг = Регистр.Отклонения.Бригадир;
|Родитель = Регистр.Отклонения.Бригадир.Родитель;
|ВидОтклонения = Регистр.Отклонения.ВидОтклонения;
|Комент = Регистр.Отклонения.Комментарий;
|Сумма = Регистр.Отклонения.Сумма;
|Функция СуммаОткл = Сумма(Сумма);
|Группировка ВидОтклонения;
|"//}}ЗАПРОС
;
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
Пока ЗапросОткл.Группировка(1) = 1 Цикл
Отклонение = ЗапросОткл.ВидОтклонения;
Таб.ВывестиСекцию("Отклонения_заг");
Пока ЗапросОткл.Группировка(2) = 1 Цикл
Пока ЗапросОткл.Группировка(3) = 1 Цикл
Если ГрупБриг = 1 Тогда
БригадирТаб = ЗапросОткл.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
Иначе
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
НомерСтроки = НомерСтроки + 1;
КонецЦикла;
КонецЦикла;
Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда
СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;
Иначе
СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;
КонецЕсли;
КонецЦикла;
Иначе
Пока Запрос.Группировка(2) = 1 Цикл
Если РазвПрайс = 1 Тогда
ПрайсТаб = Запрос.Пр;
Пока Запрос.Группировка(3) = 1 Цикл
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЦикла;
Иначе
ПрайсТаб = "--";
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЕсли;
КонецЦикла;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
ЗапросОткл = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС
|Период с НачПериода по КонПериода;
|Об = Регистр.Отклонения.Объект;
|Бриг = Регистр.Отклонения.Бригадир;
|Родитель = Регистр.Отклонения.Бригадир.Родитель;
|ВидОтклонения = Регистр.Отклонения.ВидОтклонения;
|Комент = Регистр.Отклонения.Комментарий;
|Сумма = Регистр.Отклонения.Сумма;
|Подр = Регистр.Отклонения.Подразделение;
|Функция СуммаОткл = Сумма(Сумма);
|Группировка ВидОтклонения;
|Группировка Подр;
|Условие(Подр = фПодр);
|"//}}ЗАПРОС
;
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
//******************************************************
ТекстЗапроса = ТекстЗапроса + "Условие (Подр = фПодр);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
//*****************************************************
Пока ЗапросОткл.Группировка(1) = 1 Цикл
Отклонение = ЗапросОткл.ВидОтклонения;
Таб.ВывестиСекцию("Отклонения_заг");
Если УчитыватьБригадиров = 0 Тогда
Пока ЗапросОткл.Группировка(2) = 1 Цикл
Пока ЗапросОткл.Группировка(3) = 1 Цикл
//*************************************************
Если ГрупБриг = 1 Тогда
БригадирТаб = ЗапросОткл.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
Иначе
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
//*************************************************
Если ЗапросОткл.Подр = фПодр Тогда
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
НомерСтроки = НомерСтроки + 1;
КонецЕсли;
//КомТаб = ЗапросОткл.Комент;
//СуммаОткл = ЗапросОткл.СуммаОткл;
//Таб.ВывестиСекцию("Отклонения");
//НомерСтроки = НомерСтроки + 1;
КонецЦикла;
КонецЦикла;
Иначе
Пока ЗапросОткл.Группировка(2) = 1 Цикл
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
КонецЦикла;
КонецЕсли;
Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда
СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;
Иначе
СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;
КонецЕсли;
КонецЦикла;
КонецЕсли;
СуммаИтого = СуммаОбъект + СуммаИтого;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
КонецЦикла;
СуммаИтого = Окр(СуммаИтого,0);
Таб.ВывестиСекцию("Подвал");
Таб.Показать("Накопительная по объектам","""");
КонецПроцедуры
"
//*******************************************
Процедура ПриОткрытии()
НачПериода = НачМесяца(ТекущаяДата());
КонПериода = КонМесяца(ТекущаяДата());
ГрупБриг = 0;
РазвПрайс = 1;
КонецПроцедуры
//*******************************************
Процедура Сформировать()
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС(Сформировать)
|Период с НачПериода по КонПериода;
|Об = Регистр.Накопления.Объект;
|Бриг = Регистр.Накопления.Бригадир;
|Родитель = Регистр.Накопления.Бригадир.Родитель;
|Раб = Регистр.Накопления.Работа;
|Пр = Регистр.Накопления.Прайс;
|Накопление = Регистр.Накопления.Накопление;
|Объем = Регистр.Накопления.Объем;
|зПодразделение = Регистр.Накопления.Подразделение;
|зТип = Регистр.Накопления.ВклВСвод;
|Функция НакоплениеНачОст = НачОст(Накопление);
|Функция ОбъемНачОст = НачОст(Объем);
|Функция НакоплениеКонОст = КонОст(Накопление);
|Функция ОбъемКонОст = КонОст(Объем);
|"//}}ЗАПРОС
;
Если ПустоеЗначение(фПодр) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(зПодразделение = фПодр);";
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Группировка Об без групп;";
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
КонецЕсли;
КонецЕсли;
Если РазвПрайс = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Пр без групп; Группировка Раб без групп;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Раб без групп;";
КонецЕсли;
Если ПустоеЗначение(Объект) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Об = Объект);";
КонецЕсли;
Если ПустоеЗначение(Бригадир) = 0 Тогда
Если Бригадир.ЭтоГруппа() = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Родитель = Бригадир);";
Иначе
ТекстЗапроса = ТекстЗапроса + "Условие(Бриг = Бригадир);";
КонецЕсли;
КонецЕсли;
Если ПустоеЗначение(Работа) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Раб = Работа);";
КонецЕсли;
Если ПустоеЗначение(Прайс) = 0 Тогда
ТекстЗапроса = ТекстЗапроса + "Условие(Пр = Прайс);";
КонецЕсли;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
Сообщить("Не удалось выполнить запрос");
Возврат;
КонецЕсли;
Таб = СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Накопительная");
Таб.Опции(0,0,0,0);
Если ПустоеЗначение(фПодр) = 0 Тогда
оПодр = "по подразделению "+фПодр;
Иначе
оПодр = "по всем подразделениям";
КонецЕсли;
Таб.ВывестиСекцию("Заголовок");
Таб.ВывестиСекцию("Шапка");
НомерСтроки = 1;
СуммаИтого = 0;
//заполнение таблицы
Пока Запрос.Группировка(1) = 1 Цикл
СуммаОбъект = 0;
ОбъектТаб = Запрос.Об;
Если ((Запрос.ОбъемКонОст - Запрос.ОбъемНачОст) = 0)И((Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст) = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_об");
Если УчитыватьБригадиров = 0 Тогда
Пока Запрос.Группировка(2) = 1 Цикл
Если ГрупБриг = 1 Тогда
БригадирТаб = Запрос.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = Запрос.Бриг;
КонецЕсли;
Иначе
БригадирТаб = Запрос.Бриг;
КонецЕсли;
Пока Запрос.Группировка(3) = 1 Цикл
Если РазвПрайс = 1 Тогда
ПрайсТаб = Запрос.Пр;
Пока Запрос.Группировка(4) = 1 Цикл
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЦикла;
Иначе
ПрайсТаб = "--";
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЕсли;
КонецЦикла;
КонецЦикла;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
ЗапросОткл = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС
|Период с НачПериода по КонПериода;
|Об = Регистр.Отклонения.Объект;
|Бриг = Регистр.Отклонения.Бригадир;
|Родитель = Регистр.Отклонения.Бригадир.Родитель;
|ВидОтклонения = Регистр.Отклонения.ВидОтклонения;
|Комент = Регистр.Отклонения.Комментарий;
|Сумма = Регистр.Отклонения.Сумма;
|Функция СуммаОткл = Сумма(Сумма);
|Группировка ВидОтклонения;
|"//}}ЗАПРОС
;
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
Пока ЗапросОткл.Группировка(1) = 1 Цикл
Отклонение = ЗапросОткл.ВидОтклонения;
Таб.ВывестиСекцию("Отклонения_заг");
Пока ЗапросОткл.Группировка(2) = 1 Цикл
Пока ЗапросОткл.Группировка(3) = 1 Цикл
Если ГрупБриг = 1 Тогда
БригадирТаб = ЗапросОткл.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
Иначе
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
НомерСтроки = НомерСтроки + 1;
КонецЦикла;
КонецЦикла;
Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда
СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;
Иначе
СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;
КонецЕсли;
КонецЦикла;
Иначе
Пока Запрос.Группировка(2) = 1 Цикл
Если РазвПрайс = 1 Тогда
ПрайсТаб = Запрос.Пр;
Пока Запрос.Группировка(3) = 1 Цикл
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда
Продолжить;
КонецЕсли;
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЦикла;
Иначе
ПрайсТаб = "--";
РаботаТаб = Запрос.Раб;
ЕдИзмТаб = Запрос.Раб.ЕдИзм;
КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);
СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);
Таб.ВывестиСекцию("Строка_таб");
НомерСтроки = НомерСтроки + 1;
СуммаОбъект = СуммаОбъект + СуммаТаб;
КонецЕсли;
КонецЦикла;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
ЗапросОткл = СоздатьОбъект("Запрос");
ТекстЗапроса =
"//{{ЗАПРОС
|Период с НачПериода по КонПериода;
|Об = Регистр.Отклонения.Объект;
|Бриг = Регистр.Отклонения.Бригадир;
|Родитель = Регистр.Отклонения.Бригадир.Родитель;
|ВидОтклонения = Регистр.Отклонения.ВидОтклонения;
|Комент = Регистр.Отклонения.Комментарий;
|Сумма = Регистр.Отклонения.Сумма;
|Подр = Регистр.Отклонения.Подразделение;
|Функция СуммаОткл = Сумма(Сумма);
|Группировка ВидОтклонения;
|Группировка Подр;
|Условие(Подр = фПодр);
|"//}}ЗАПРОС
;
Если УчитыватьБригадиров = 0 Тогда
Если ГрупБриг = 1 Тогда
ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
Иначе
ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";
КонецЕсли;
ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
//******************************************************
ТекстЗапроса = ТекстЗапроса + "Условие (Подр = фПодр);";
Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда
Продолжить;
КонецЕсли;
//*****************************************************
Пока ЗапросОткл.Группировка(1) = 1 Цикл
Отклонение = ЗапросОткл.ВидОтклонения;
Таб.ВывестиСекцию("Отклонения_заг");
Если УчитыватьБригадиров = 0 Тогда
Пока ЗапросОткл.Группировка(2) = 1 Цикл
Пока ЗапросОткл.Группировка(3) = 1 Цикл
//*************************************************
Если ГрупБриг = 1 Тогда
БригадирТаб = ЗапросОткл.Родитель;
Если ПустоеЗначение(БригадирТаб) = 1 Тогда
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
Иначе
БригадирТаб = ЗапросОткл.Бриг;
КонецЕсли;
//*************************************************
Если ЗапросОткл.Подр = фПодр Тогда
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
НомерСтроки = НомерСтроки + 1;
КонецЕсли;
//КомТаб = ЗапросОткл.Комент;
//СуммаОткл = ЗапросОткл.СуммаОткл;
//Таб.ВывестиСекцию("Отклонения");
//НомерСтроки = НомерСтроки + 1;
КонецЦикла;
КонецЦикла;
Иначе
Пока ЗапросОткл.Группировка(2) = 1 Цикл
КомТаб = ЗапросОткл.Комент;
СуммаОткл = ЗапросОткл.СуммаОткл;
Таб.ВывестиСекцию("Отклонения");
КонецЦикла;
КонецЕсли;
Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда
СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;
Иначе
СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;
КонецЕсли;
КонецЦикла;
КонецЕсли;
СуммаИтого = СуммаОбъект + СуммаИтого;
СуммаОбъект = Окр(СуммаОбъект,0);
Таб.ВывестиСекцию("Строка_итого");
КонецЦикла;
СуммаИтого = Окр(СуммаИтого,0);
Таб.ВывестиСекцию("Подвал");
Таб.Показать("Накопительная по объектам","""");
КонецПроцедуры
"
Читают тему
(гостей: 2)