Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Убираем не нужные строчки.

Александра Витальевна
читатель
офлайн
Дата регистрации: 07.08.2008
Сообщений: 49
Пост №1
 
08.08.2008 16:08

Есть самописная база по учету работы бригадиров в строительной фирме. Необходимо в отчете - начисления по объектам - выводить фамилии бригадиров по подразделению, в которое они входят, которым производились начисления по данному подразделению Однако один бригадир может быть в разных подразделениях. Помогите пожалуйста правильно написать программный код, чтобы все прекрасно работало.

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №2
 
08.08.2008 17:57

Покажите, сначала, что уже написано...<br>Иначе "Есть самописная база...", а вот телепатов нет, все в отпуске..

Александра Витальевна
читатель
офлайн
Дата регистрации: 07.08.2008
Сообщений: 49
Пост №3
 
10.08.2008 22:47

Я бы с удовольствием написала, но у меня не получается вставить текст модуля. Как бы мне это сделать?

Vladko
читатель
офлайн
Дата регистрации: 27.08.2007
Сообщений: 2649
Пост №4
 
11.08.2008 10:39

в конфигураторе выделяете, правка-копировать. Здесь в форуме Правой кнопкой мыши Вставить. Ну прям как дети

Денис (САМАРА)
читатель
офлайн
Дата регистрации: 09.04.2008
Сообщений: 8351
Пост №5
 
12.08.2008 11:20

Текст из модуля она вставит, а как быть с макетом отчета?

Александра Витальевна
читатель
офлайн
Дата регистрации: 07.08.2008
Сообщений: 49
Пост №6
 
12.08.2008 14:42

"//*******************************************<br>&&&&&&&&& &&&&&&&&&&&()<br> &&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());<br> &&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&()); <br> &&&&&&&& = 0;<br> &&&&&&&&& = 1;<br>&&&&&&&&&&&&&& <br>//*******************************************<br>&&&&&&&&& &&&&&&&&&&&&()<br> &&&&&& = &&&&&&&&&&&&&("&&&&&&");<br> &&&&&&&&&&&& = <br> "//{{&&&&&&(&&&&&&&&&&&&)<br> |&&&&&& & &&&&&&&&&& && &&&&&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;<br> |&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;<br> |&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);<br> |&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);<br> |&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);<br> |&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);<br> |"//}}&&&&&&<br> ;<br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";<br> &&&&&&&&&;<br> <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";<br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";<br> &&&&&&&&&;<br> &&&&&&&&&; <br> &&&& &&&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;"; <br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;"; <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";       <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&<br> &&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";            <br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";       <br> &&&&&&&&&;<br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";       <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";       <br> &&&&&&&&&;<br> <br> &&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&<br> &&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");<br> &&&&&&&;<br> &&&&&&&&&;<br> <br> &&& = &&&&&&&&&&&&&("&&&&&&&");<br> &&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&"); <br> &&&.&&&&&(0,0,0,0); <br> <br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&& = "&& &&&&&&&&&&&&& "+&&&&&;<br> &&&&&<br> &&&&& = "&& &&&& &&&&&&&&&&&&&&";<br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&");<br> <br> &&&.&&&&&&&&&&&&&("&&&&&");<br> &&&&&&&&&&& = 1;<br> &&&&&&&&&& = 0;<br> //&&&&&&&&&& &&&&&&&<br> &&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&<br> &&&&&&&&&&& = 0;<br> &&&&&&&&& = &&&&&&.&&;<br> &&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&<br> &&&&&&&&&&; <br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&");<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&&&&&; <br> &&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&<br> &&&& &&&&&&&&& = 1 &&&&&<br>        &&&&&&&& = &&&&&&.&&;<br> &&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&<br> &&&&&&&&& = &&&&&&.&&&;<br> &&&&&&&& = &&&&&&.&&&.&&&&&;<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);<br> &&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&<br> &&&&&&&&&&;<br> &&&&&&&&&;<br> &&&."

Александра Витальевна
читатель
офлайн
Дата регистрации: 07.08.2008
Сообщений: 49
Пост №7
 
12.08.2008 15:06

"//*******************************************<br>&&&&&&&&& &&&&&&&&&&&()<br> &&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&());<br> &&&&&&&&&& = &&&&&&&&&(&&&&&&&&&&&()); <br> &&&&&&&& = 0;<br> &&&&&&&&& = 1;<br>&&&&&&&&&&&&&& <br>//*******************************************<br>&&&&&&&&& &&&&&&&&&&&&()<br> &&&&&& = &&&&&&&&&&&&&("&&&&&&");<br> &&&&&&&&&&&& = <br> "//{{&&&&&&(&&&&&&&&&&&&)<br> |&&&&&& & &&&&&&&&&& && &&&&&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;<br> |&&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&;<br> |&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);<br> |&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);<br> |&&&&&&& &&&&&&&&&&&&&&&& = &&&&&&(&&&&&&&&&&);<br> |&&&&&&& &&&&&&&&&&& = &&&&&&(&&&&&);<br> |"//}}&&&&&&<br> ;<br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&&&&&&&& = &&&&&);";<br> &&&&&&&&&;<br> <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&;";<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";<br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";<br> &&&&&&&&&;<br> &&&&&&&&&; <br> &&&& &&&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& && &&& &&&&&; &&&&&&&&&&& &&& &&& &&&&&;"; <br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&& &&& &&&&&;"; <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&&);";       <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&&&) = 0 &&&&&<br> &&&& &&&&&&&&.&&&&&&&&&() = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&&&&&& = &&&&&&&&);";            <br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&&& = &&&&&&&&);";       <br> &&&&&&&&&;<br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&&& = &&&&&&);";       <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&(&& = &&&&&);";       <br> &&&&&&&&&;<br> <br> &&&& &&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&<br> &&&&&&&&("&& &&&&&&& &&&&&&&&& &&&&&&");<br> &&&&&&&;<br> &&&&&&&&&;<br> <br> &&& = &&&&&&&&&&&&&("&&&&&&&");<br> &&&.&&&&&&&&&&&&&&&("&&&&&&&&&&&&&"); <br> &&&.&&&&&(0,0,0,0); <br> <br> &&&& &&&&&&&&&&&&&&(&&&&&) = 0 &&&&&<br> &&&&& = "&& &&&&&&&&&&&&& "+&&&&&;<br> &&&&&<br> &&&&& = "&& &&&& &&&&&&&&&&&&&&";<br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&");<br> <br> &&&.&&&&&&&&&&&&&("&&&&&");<br> &&&&&&&&&&& = 1;<br> &&&&&&&&&& = 0;<br> //&&&&&&&&&& &&&&&&&<br> &&&& &&&&&&.&&&&&&&&&&&(1) = 1 &&&&<br> &&&&&&&&&&& = 0;<br> &&&&&&&&& = &&&&&&.&&;<br> &&&& ((&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&) = 0)&((&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&) = 0) &&&&&<br> &&&&&&&&&&; <br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&");<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&&&&&; <br> &&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&<br> &&&& &&&&&&&&& = 1 &&&&&<br>        &&&&&&&& = &&&&&&.&&;<br> &&&& &&&&&&.&&&&&&&&&&&(4) = 1 &&&&<br> &&&&&&&&& = &&&&&&.&&&;<br> &&&&&&&& = &&&&&&.&&&.&&&&&;<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);<br> &&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&<br> &&&&&&&&&&;<br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;<br> &&&&&&&&&&;<br> &&&&&<br> &&&&&&&& = "--";<br> &&&&&&&&& = &&&&&&.&&&;<br> &&&&&&&& = &&&&&&.&&&.&&&&&;<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;<br> &&&&&&&&&;<br> &&&&&&&&&&;<br> <br> &&&&&&&&&&;<br> &&&&&&&&&&& = &&&(&&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&&&"); <br> <br> &&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");<br> &&&&&&&&&&&& = <br> "//{{&&&&&&<br> |&&&&&& & &&&&&&&&&& && &&&&&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;<br> |&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;<br> |&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;<br> |&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&& &&&&&&&&& = &&&&&(&&&&&);<br> |&&&&&&&&&&& &&&&&&&&&&&&&;<br> |"//}}&&&&&&<br> ;<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";<br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;"; <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";<br> &&&&&&&&&;<br> &&&&&&&&&; <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";<br> &&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&<br> &&&&&&&&&&; <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&<br> &&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&& = &&&&&&&&&&.&&&&&&;<br> &&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&; <br> &&&&&&&&&&;<br> &&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;<br> &&&&&&&&&;<br> &&&&&&&&&&;<br> &&&&&<br> &&&& &&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&& &&&&&&&&& = 1 &&&&&<br>        &&&&&&&& = &&&&&&.&&;<br> &&&& &&&&&&.&&&&&&&&&&&(3) = 1 &&&&<br> &&&&&&&&& = &&&&&&.&&&;<br> &&&&&&&& = &&&&&&.&&&.&&&&&;<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);<br> &&&& (&&&&&&&& = 0)&(&&&&&&&& = 0) &&&&&<br> &&&&&&&&&&;<br> &&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;<br> &&&&&&&&&&;<br> &&&&&<br> &&&&&&&& = "--";<br> &&&&&&&&& = &&&&&&.&&&;<br> &&&&&&&& = &&&&&&.&&&.&&&&&;<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&,2);<br> &&&&&&&& = &&&(&&&&&&.&&&&&&&&&&&&&&&& - &&&&&&.&&&&&&&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&;<br> &&&&&&&&&;<br> &&&&&&&&&&;<br> <br> &&&&&&&&&&& = &&&(&&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&&&"); <br> <br> &&&&&&&&&& = &&&&&&&&&&&&&("&&&&&&");<br> &&&&&&&&&&&& = <br> "//{{&&&&&&<br> |&&&&&& & &&&&&&&&&& && &&&&&&&&&&;<br> |&& = &&&&&&&.&&&&&&&&&&.&&&&&&;<br> |&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&;<br> |&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&.&&&&&&&&;<br> |&&&&&&&&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&&&;<br> |&&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&&&&&&&;<br> |&&&&& = &&&&&&&.&&&&&&&&&&.&&&&&;<br> |&&&&&&& &&&&&&&&& = &&&&&(&&&&&);<br> |&&&&&&&&&&& &&&&&&&&&&&&&;<br> |"//}}&&&&&&<br> ;<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&&&;";<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";<br> &&&&&<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&& &&& &&&&&;";<br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";<br> &&&&&&&&&;<br> &&&&& <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&&&&&& &&&&&&;";<br> &&&&&&&&&; <br> &&&&&&&&&&&& = &&&&&&&&&&&& + "&&&&&&& (&& = &&&&&&&&&);";<br> &&&& &&&&&&&&&&.&&&&&&&&&(&&&&&&&&&&&&) = 0 &&&&&<br> &&&&&&&&&&; <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(1) = 1 &&&&<br> &&&&&&&&&& = &&&&&&&&&&.&&&&&&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&&_&&&");<br> &&&& &&&&&&&&&&&&&&&&&&& = 0 &&&&&<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(3) = 1 &&&&<br> &&&& &&&&&&&& = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&&&&&;<br> &&&& &&&&&&&&&&&&&&(&&&&&&&&&&&) = 1 &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&.&&&&;<br> &&&&&&&&&;<br> &&&&&& = &&&&&&&&&&.&&&&&&;<br> &&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&&");<br> &&&&&&&&&&& = &&&&&&&&&&& + 1;<br> &&&&&&&&&&;<br> &&&&&&&&&&;<br> &&&&&<br> &&&& &&&&&&&&&&.&&&&&&&&&&&(2) = 1 &&&&<br> &&&&&& = &&&&&&&&&&.&&&&&&;<br> &&&&&&&&& = &&&&&&&&&&.&&&&&&&&&;<br> &&&.&&&&&&&&&&&&&("&&&&&&&&&&");<br> &&&&&&&&&&; <br> &&&&&&&&&;<br> &&&& &&&&&&&&&&.&&&&&&&&&&&&& = &&&&&&&&&&&&.&&&&&&&&&&&&&&.&&&&&&&&&& &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&.&&&&&&&&&;<br> &&&&&<br> &&&&&&&&&&& = &&&&&&&&&&& - &&&&&&&&&&.&&&&&&&&&;<br> &&&&&&&&&;<br> &&&&&&&&&&;<br> &&&&&&&&&; <br> &&&&&&&&&& = &&&&&&&&&&& + &&&&&&&&&&;<br> &&&&&&&&&&& = &&&(&&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&_&&&&&");<br> &&&&&&&&&&;<br> <br> &&&&&&&&&& = &&&(&&&&&&&&&&,0);<br> &&&.&&&&&&&&&&&&&("&&&&&&");<br> <br> &&&.&&&&&&&&("&&&&&&&&&&&&& && &&&&&&&&","""");<br> <br>&&&&&&&&&&&&&&<br><br>Мы не дети, просто можно было все сделать проще."

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №8
 
12.08.2008 15:58

О_О<br>А теперь еще раз и без шифрования, пожалуйста.

Александра Витальевна
читатель
офлайн
Дата регистрации: 07.08.2008
Сообщений: 49
Пост №9
 
13.08.2008 13:29

"Ниже приведен текст модуля данного отчета.<br>//*******************************************<br>Процедура ПриОткрытии()<br> НачПериода = НачМесяца(ТекущаяДата());<br> КонПериода = КонМесяца(ТекущаяДата()); <br> ГрупБриг = 0;<br> РазвПрайс = 1;<br>КонецПроцедуры <br>//*******************************************<br>Процедура Сформировать()<br> Запрос = СоздатьОбъект("Запрос");<br> ТекстЗапроса = <br> "//{{ЗАПРОС(Сформировать)<br> |Период с НачПериода по КонПериода;<br> |Об = Регистр.Накопления.Объект;<br> |Бриг = Регистр.Накопления.Бригадир;<br> |Родитель = Регистр.Накопления.Бригадир.Родитель;<br> |Раб = Регистр.Накопления.Работа;<br> |Пр = Регистр.Накопления.Прайс;<br> |Накопление = Регистр.Накопления.Накопление;<br> |Объем = Регистр.Накопления.Объем;<br> |зПодразделение = Регистр.Накопления.Подразделение;<br> |зТип = Регистр.Накопления.ВклВСвод;<br> |Функция НакоплениеНачОст = НачОст(Накопление);<br> |Функция ОбъемНачОст = НачОст(Объем);<br> |Функция НакоплениеКонОст = КонОст(Накопление);<br> |Функция ОбъемКонОст = КонОст(Объем);<br> |"//}}ЗАПРОС<br> ;<br> Если ПустоеЗначение(фПодр) = 0 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Условие(зПодразделение = фПодр);";<br> КонецЕсли;<br> <br> ТекстЗапроса = ТекстЗапроса + "Группировка Об без групп;";<br> Если УчитыватьБригадиров = 0 Тогда<br> Если ГрупБриг = 1 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";<br> Иначе<br> ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";<br> КонецЕсли;<br> КонецЕсли; <br> Если РазвПрайс = 1 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Группировка Пр без групп; Группировка Раб без групп;"; <br> Иначе<br> ТекстЗапроса = ТекстЗапроса + "Группировка Раб без групп;"; <br> КонецЕсли;<br> Если ПустоеЗначение(Объект) = 0 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Условие(Об = Объект);";       <br> КонецЕсли;<br> Если ПустоеЗначение(Бригадир) = 0 Тогда<br> Если Бригадир.ЭтоГруппа() = 1 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Условие(Родитель = Бригадир);";            <br> Иначе<br> ТекстЗапроса = ТекстЗапроса + "Условие(Бриг = Бригадир);";       <br> КонецЕсли;<br> КонецЕсли;<br> Если ПустоеЗначение(Работа) = 0 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Условие(Раб = Работа);";       <br> КонецЕсли;<br> Если ПустоеЗначение(Прайс) = 0 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Условие(Пр = Прайс);";       <br> КонецЕсли;<br> <br> Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда<br> Сообщить("Не удалось выполнить запрос");<br> Возврат;<br> КонецЕсли;<br> <br> Таб = СоздатьОбъект("Таблица");<br> Таб.ИсходнаяТаблица("Накопительная"); <br> Таб.Опции(0,0,0,0); <br> <br> Если ПустоеЗначение(фПодр) = 0 Тогда<br> оПодр = "по подразделению "+фПодр;<br> Иначе<br> оПодр = "по всем подразделениям";<br> КонецЕсли;<br> Таб.ВывестиСекцию("Заголовок");<br> <br> Таб.ВывестиСекцию("Шапка");<br> НомерСтроки = 1;<br> СуммаИтого = 0;<br> //заполнение таблицы<br> Пока Запрос.Группировка(1) = 1 Цикл<br> СуммаОбъект = 0;<br> ОбъектТаб = Запрос.Об;<br> Если ((Запрос.ОбъемКонОст - Запрос.ОбъемНачОст) = 0)И((Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст) = 0) Тогда<br> Продолжить; <br> КонецЕсли;<br> Таб.ВывестиСекцию("Строка_об");<br> Если УчитыватьБригадиров = 0 Тогда<br> Пока Запрос.Группировка(2) = 1 Цикл<br> Если ГрупБриг = 1 Тогда<br> БригадирТаб = Запрос.Родитель; <br> Если ПустоеЗначение(БригадирТаб) = 1 Тогда<br> БригадирТаб = Запрос.Бриг;<br> КонецЕсли;<br> Иначе<br> БригадирТаб = Запрос.Бриг;<br> КонецЕсли;<br> Пока Запрос.Группировка(3) = 1 Цикл<br> Если РазвПрайс = 1 Тогда<br>        ПрайсТаб = Запрос.Пр;<br> Пока Запрос.Группировка(4) = 1 Цикл<br> РаботаТаб = Запрос.Раб;<br> ЕдИзмТаб = Запрос.Раб.ЕдИзм;<br> КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);<br> СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);<br> Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда<br> Продолжить;<br> КонецЕсли;<br> Таб.ВывестиСекцию("Строка_таб");<br> НомерСтроки = НомерСтроки + 1;<br> СуммаОбъект = СуммаОбъект + СуммаТаб;<br> КонецЦикла;<br> Иначе<br> ПрайсТаб = "--";<br> РаботаТаб = Запрос.Раб;<br> ЕдИзмТаб = Запрос.Раб.ЕдИзм;<br> КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);<br> СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);<br> Таб.ВывестиСекцию("Строка_таб");<br> НомерСтроки = НомерСтроки + 1;<br> СуммаОбъект = СуммаОбъект + СуммаТаб;<br> КонецЕсли;<br> КонецЦикла;<br> <br> КонецЦикла;<br> СуммаОбъект = Окр(СуммаОбъект,0);<br> Таб.ВывестиСекцию("Строка_итого"); <br> <br> ЗапросОткл = СоздатьОбъект("Запрос");<br> ТекстЗапроса = <br> "//{{ЗАПРОС<br> |Период с НачПериода по КонПериода;<br> |Об = Регистр.Отклонения.Объект;<br> |Бриг = Регистр.Отклонения.Бригадир;<br> |Родитель = Регистр.Отклонения.Бригадир.Родитель;<br> |ВидОтклонения = Регистр.Отклонения.ВидОтклонения;<br> |Комент = Регистр.Отклонения.Комментарий;<br> |Сумма = Регистр.Отклонения.Сумма;<br> |Функция СуммаОткл = Сумма(Сумма);<br> |Группировка ВидОтклонения;<br> |"//}}ЗАПРОС<br> ;<br> Если УчитыватьБригадиров = 0 Тогда<br> Если ГрупБриг = 1 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";<br> ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";<br> Иначе<br> ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;"; <br> ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";<br> КонецЕсли;<br> КонецЕсли; <br> ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";<br> Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда<br> Продолжить; <br> КонецЕсли;<br> Пока ЗапросОткл.Группировка(1) = 1 Цикл<br> Отклонение = ЗапросОткл.ВидОтклонения;<br> Таб.ВывестиСекцию("Отклонения_заг");<br> Пока ЗапросОткл.Группировка(2) = 1 Цикл<br> Пока ЗапросОткл.Группировка(3) = 1 Цикл<br> Если ГрупБриг = 1 Тогда<br> БригадирТаб = ЗапросОткл.Родитель;<br> Если ПустоеЗначение(БригадирТаб) = 1 Тогда<br> БригадирТаб = ЗапросОткл.Бриг;<br> КонецЕсли;<br> Иначе<br> БригадирТаб = ЗапросОткл.Бриг;<br> КонецЕсли;<br> КомТаб = ЗапросОткл.Комент;<br> СуммаОткл = ЗапросОткл.СуммаОткл;<br> Таб.ВывестиСекцию("Отклонения");<br> НомерСтроки = НомерСтроки + 1;<br> КонецЦикла; <br> КонецЦикла;<br> Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда<br> СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;<br> Иначе<br> СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;<br> КонецЕсли;<br> КонецЦикла;<br> Иначе<br> Пока Запрос.Группировка(2) = 1 Цикл<br> Если РазвПрайс = 1 Тогда<br>        ПрайсТаб = Запрос.Пр;<br> Пока Запрос.Группировка(3) = 1 Цикл<br> РаботаТаб = Запрос.Раб;<br> ЕдИзмТаб = Запрос.Раб.ЕдИзм;<br> КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);<br> СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);<br> Если (КолвоТаб = 0)и(СуммаТаб = 0) Тогда<br> Продолжить;<br> КонецЕсли;<br> Таб.ВывестиСекцию("Строка_таб");<br> НомерСтроки = НомерСтроки + 1;<br> СуммаОбъект = СуммаОбъект + СуммаТаб;<br> КонецЦикла;<br> Иначе<br> ПрайсТаб = "--";<br> РаботаТаб = Запрос.Раб;<br> ЕдИзмТаб = Запрос.Раб.ЕдИзм;<br> КолвоТаб = Окр(Запрос.ОбъемКонОст - Запрос.ОбъемНачОст,2);<br> СуммаТаб = Окр(Запрос.НакоплениеКонОст - Запрос.НакоплениеНачОст,0);<br> Таб.ВывестиСекцию("Строка_таб");<br> НомерСтроки = НомерСтроки + 1;<br> СуммаОбъект = СуммаОбъект + СуммаТаб;<br> КонецЕсли;<br> КонецЦикла;<br> <br> СуммаОбъект = Окр(СуммаОбъект,0);<br> Таб.ВывестиСекцию("Строка_итого"); <br> <br> ЗапросОткл = СоздатьОбъект("Запрос");<br> ТекстЗапроса = <br> "//{{ЗАПРОС<br> |Период с НачПериода по КонПериода;<br> |Об = Регистр.Отклонения.Объект;<br> |Бриг = Регистр.Отклонения.Бригадир;<br> |Родитель = Регистр.Отклонения.Бригадир.Родитель;<br> |ВидОтклонения = Регистр.Отклонения.ВидОтклонения;<br> |Комент = Регистр.Отклонения.Комментарий;<br> |Сумма = Регистр.Отклонения.Сумма; <br> |Подр = Регистр.Отклонения.Подразделение;<br> |Функция СуммаОткл = Сумма(Сумма);<br> |Группировка ВидОтклонения; <br> |Группировка Подр;<br> |Условие(Подр = фПодр);<br> |"//}}ЗАПРОС<br> ;<br> Если УчитыватьБригадиров = 0 Тогда<br> Если ГрупБриг = 1 Тогда<br> ТекстЗапроса = ТекстЗапроса + "Группировка Родитель;";<br> ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";<br> Иначе<br> ТекстЗапроса = ТекстЗапроса + "Группировка Бриг без групп;";<br> ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";<br> КонецЕсли;<br> Иначе <br> ТекстЗапроса = ТекстЗапроса + "Группировка Комент;";<br> КонецЕсли; <br> ТекстЗапроса = ТекстЗапроса + "Условие (Об = ОбъектТаб);";<br> Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда<br> Продолжить; <br> КонецЕсли; <br> //******************************************************<br> ТекстЗапроса = ТекстЗапроса + "Условие (Подр = фПодр);";<br> Если ЗапросОткл.Выполнить(ТекстЗапроса) = 0 Тогда<br> Продолжить;<br> КонецЕсли;<br> //***************************************************** <br> <br> Пока ЗапросОткл.Группировка(1) = 1 Цикл<br> Отклонение = ЗапросОткл.ВидОтклонения;<br> Таб.ВывестиСекцию("Отклонения_заг");<br> Если УчитыватьБригадиров = 0 Тогда<br> Пока ЗапросОткл.Группировка(2) = 1 Цикл<br> Пока ЗапросОткл.Группировка(3) = 1 Цикл <br> //*************************************************<br> Если ГрупБриг = 1 Тогда<br> БригадирТаб = ЗапросОткл.Родитель;<br> Если ПустоеЗначение(БригадирТаб) = 1 Тогда<br> БригадирТаб = ЗапросОткл.Бриг;<br> КонецЕсли;<br> Иначе<br> БригадирТаб = ЗапросОткл.Бриг;<br> КонецЕсли; <br> //*************************************************<br> Если ЗапросОткл.Подр = фПодр Тогда<br> КомТаб = ЗапросОткл.Комент;<br> СуммаОткл = ЗапросОткл.СуммаОткл;<br> Таб.ВывестиСекцию("Отклонения");<br> НомерСтроки = НомерСтроки + 1; <br> КонецЕсли;<br> //КомТаб = ЗапросОткл.Комент;<br> //СуммаОткл = ЗапросОткл.СуммаОткл;<br> //Таб.ВывестиСекцию("Отклонения");<br> //НомерСтроки = НомерСтроки + 1;<br> КонецЦикла;<br> КонецЦикла;<br> Иначе<br> Пока ЗапросОткл.Группировка(2) = 1 Цикл<br> КомТаб = ЗапросОткл.Комент;<br> СуммаОткл = ЗапросОткл.СуммаОткл;<br> Таб.ВывестиСекцию("Отклонения");<br> КонецЦикла; <br> КонецЕсли;<br> Если ЗапросОткл.ВидОтклонения = Перечисление.ВидыОтклонений.Начисление Тогда<br> СуммаОбъект = СуммаОбъект + ЗапросОткл.СуммаОткл;<br> Иначе<br> СуммаОбъект = СуммаОбъект - ЗапросОткл.СуммаОткл;<br> КонецЕсли;<br> КонецЦикла;<br> КонецЕсли; <br> СуммаИтого = СуммаОбъект + СуммаИтого;<br> СуммаОбъект = Окр(СуммаОбъект,0);<br> Таб.ВывестиСекцию("Строка_итого");<br> КонецЦикла;<br> <br> СуммаИтого = Окр(СуммаИтого,0);<br> Таб.ВывестиСекцию("Подвал");<br> <br> Таб.Показать("Накопительная по объектам","""");<br> <br>КонецПроцедуры<br>"

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №10
 
13.08.2008 16:09

Так, уже лучше, а теперь переформулируйте вопрос по конкретнее...<br>Нужно, чтобы бригадир выводился 1 раз даже если он в нескольких подразделениях?<br>Или я туплю?

Показывать по 10 20 40 сообщений

Читают тему:

1 гостей
Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация