Имя: Пароль:
1C
1С v8
Документ оказание услуг
,
0 Зая
 
02.12.21
01:47
Друзья! Может даже колеги! помогите разобраться, почему не получается вывести строку Итог- ВСЕГО в документе Оказания услуг
1 Beduin
 
02.12.21
01:48
Недостаточно информации о происходящем
2 Зая
 
02.12.21
01:51
ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

Шапка = Макет.ПолучитьОбласть("Шапка");

ОбластьПереченьНоменклатурыШапка = Макет.ПолучитьОбласть("ПереченьНоменклатурыШапка");

ОбластьПереченьНоменклатуры = Макет.ПолучитьОбласть("ПереченьНоменклатуры");

ОбластьИтог = Макет.ПолучитьОбласть("Всего");

ТабДок.Очистить();



ВставлятьРазделительСтраниц = Ложь;

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

Если ВставлятьРазделительСтраниц Тогда

ТабДок.ВывестиГоризонтальныйРазделительСтраниц();



КонецЕсли;



ТабДок.Вывести(ОбластьЗаголовок);



Шапка.Параметры.Заполнить(Выборка);

ТабДок.Вывести(Шапка, Выборка.Уровень());



ТабДок.Вывести(ОбластьПереченьНоменклатурыШапка);

ВыборкаПереченьНоменклатуры = Выборка.ПереченьНоменклатуры.Выбрать();

СуммаИтог = 0;

Пока ВыборкаПереченьНоменклатуры.Следующий() Цикл

ОбластьПереченьНоменклатуры.Параметры.Заполнить(ВыборкаПереченьНоменклатуры);

ТабДок.Вывести(ОбластьПереченьНоменклатуры, ВыборкаПереченьНоменклатуры.Уровень());

СуммаИтог = СуммаИтог + ВыборкаПереченьНоменклатуры.Сумма;



КонецЦикла;



ОбластьИтог.Параметры.ВсегоПоДокументу = СуммаИтог;

ТабДок.Вывести(ОбластьИтог);

ВставлятьРазделительСтраниц = Истина;



КонецЦикла;
3 Зая
 
02.12.21
01:52
Коленька, можно я вам позвоню??
4 Casey1984
 
02.12.21
02:18
Вот это поворот!
5 2S
 
02.12.21
07:29
(3) главное предохраняйтесь
6 РБ
 
02.12.21
07:33
чувствуется приближение конкурса
7 vvspb
 
02.12.21
08:42
(6) :) да и перекличка спонсоров проведена :)
8 Зая
 
02.12.21
08:43
Блин! я вас о помощи просила.. а вы!!!
9 РБ
 
02.12.21
08:46
(8) Зая, для девушки. которая только сегодня зарегилась на Мисте, вы отвечаете довольно резко)))
лживо все, начиная с (0)
у Волшебника новые рекруты?))))
10 Beduin
 
02.12.21
08:46
(8) Он вообще строку не выводит или выводит и там сумма пустая?
11 Beduin
 
02.12.21
08:47
(5) Вангую дам студент Алеша пытается сессию сдать.
12 Зая
 
02.12.21
09:30
Beduin Строку не выдает, ЕЕ нет! Я код уже раз 40 переписала, я его перепроверила, може чтото не учла?
13 Зая
 
02.12.21
09:32
Процедура Печать(ТабДок, Ссылка) Экспорт
    //{{_КОНСТРУКТОР_ПЕЧАТИ(Печать)
    Макет = Документы.ОказаниеУслуги.ПолучитьМакет("Печать");
    Запрос = Новый Запрос;
    Запрос.Текст =
    "ВЫБРАТЬ
    |    ОказаниеУслуги.Дата,
    |    ОказаниеУслуги.Клиент,
    |    ОказаниеУслуги.Мастер,
    |    ОказаниеУслуги.Номер,
    |    ОказаниеУслуги.Склад,
    |    ОказаниеУслуги.ПереченьНоменклатуры.(
    |        НомерСтроки,
    |        Номенклатура,
    |        Количество,
    |        Цена,
    |        Сумма
    |        ВСЕГО)
    |ИЗ
    |    Документ.ОказаниеУслуги КАК ОказаниеУслуги
    |ГДЕ
    |    ОказаниеУслуги.Ссылка В (&Ссылка)";
    Запрос.Параметры.Вставить("Ссылка", Ссылка);
    Выборка = Запрос.Выполнить().Выбрать();

ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");

Шапка = Макет.ПолучитьОбласть("Шапка");
ОбластьПереченьНоменклатурыШапка = Макет.ПолучитьОбласть("ПереченьНоменклатурыШапка");
ОбластьПереченьНоменклатуры = Макет.ПолучитьОбласть("ПереченьНоменклатуры");
ОбластьИтог = Макет.ПолучитьОбласть("Всего");
ТабДок.Очистить();

ВставлятьРазделительСтраниц = Ложь;
Пока Выборка.Следующий() Цикл
    Если ВставлятьРазделительСтраниц Тогда
    ТабДок.ВывестиГоризонтальныйРазделительСтраниц();
КонецЕсли;

ТабДок.Вывести(ОбластьЗаголовок);

Шапка.Параметры.Заполнить(Выборка);
ТабДок.Вывести(Шапка, Выборка.Уровень());

ТабДок.Вывести(ОбластьПереченьНоменклатурыШапка);
ВыборкаПереченьНоменклатуры = Выборка.ПереченьНоменклатуры.Выбрать();
СуммаИтог = 0;
Пока ВыборкаПереченьНоменклатуры.Следующий() Цикл
    ОбластьПереченьНоменклатуры.Параметры.Заполнить(ВыборкаПереченьНоменклатуры);
    ТабДок.Вывести(ОбластьПереченьНоменклатуры, ВыборкаПереченьНоменклатуры.Уровень());
    СуммаИтог = СуммаИтог + ВыборкаПереченьНоменклатуры.Сумма;
    
КонецЦикла;

ОбластьИтог.Параметры.ВсегоПоДокументу = СуммаИтог;
ТабДок.Вывести(ОбластьИтог);
ВставлятьРазделительСтраниц = Истина;



КонецЦикла;
    
КонецПроцедуры
--
- Za li na -
Отправлено из Почты Mail.ru
14 Зая
 
02.12.21
09:34
Смысл добавленного фрагмента прост. Мы обращаемся к макету документа ОказаниеУслуги по его имени – Макет.

Используя его метод ПолучитьОбласть(), получаем область Всего (ту, которую мы только что добавили к макету) и сохраняем ее в переменной ОбластьИтог.

В цикле обхода строк табличной части документа, полученных в результате выполнения запроса, мы накапливаем в переменной СуммаИтог значение суммы табличной части документа по колонке Сумма.

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

В заключение мы выводим итоговую область в табличный документ, который будет показан на экране и распечатан пользователем – ТабДок.Вывести(ОбластьИтог).

Отображение табличного документа на экране выполняется в обработчике команды Печать, в модуле этой команды на клиенте, в то время как сама процедура заполнения печатной формы данными, описанная в модуле менеджера документа, выполняется на сервере.
15 Зая
 
02.12.21
09:37
Есть подозрение что несостыковна в имени Области то она -Всего то она ОбластьИтог .... как думаете в этом дело??
16 Зая
 
02.12.21
09:40
Смотрящий помогиии
17 Гипервизор
 
02.12.21
09:40
(15) В самом макете как эта область называется?
18 Зая
 
02.12.21
09:42
Всего
19 Зая
 
02.12.21
09:46
РБ Светлана  да я уже в отчаянии, такое пустяковое задане было, а не проходит, у меня осталось мало времени, я до трез ночи голову ломала, в чем подвох... не нашла, может нужно где-то еще отразить Итоговую строчку, какие-то свойства поменять, но все пошагово выполнила
20 osa1C
 
02.12.21
09:47
(8) по правилам форума для девушек сначала фото в профиль потом ответы!!!! Не надо портить правила, народ!!!
21 Beduin
 
02.12.21
09:47
СуммаИтог = СуммаИтог + ВыборкаПереченьНоменклатуры.Всего;
22 osa1C
 
02.12.21
09:49
(19) на вскидку не сильно разбираясь не понимаю почему Итог по документу пытаешься вывести в цикле. У тебя их много))) Вроде за цикл вынести итого то надо )))
23 Гипервизор
 
02.12.21
09:50
(21) Так там вроде как вообще область не выводится судя по (12).
24 Зая
 
02.12.21
09:51
сделала, но нет изменений
25 Зая
 
02.12.21
09:52
что значат эти цифры в начале ваших сообщений 21 12?
26 vvspb
 
02.12.21
09:54
(25) номера сообщений
27 Зая
 
02.12.21
09:54
задание сделать документ ОказанияУслуг
при измении кол-ва и цены сумма меняется, там все хорошо,
а вот Всего не выдает,
28 osa1C
 
02.12.21
09:55
(25) номер сообщения и чтобы на нужное сообщение ответить нужно ввести номер в скобках..... или просто кликнуть мышью в  цифирку ))) и она сама войдет в твое сообщение
29 Bigbro
 
02.12.21
09:55
21 год 12 см? )
30 Зая
 
02.12.21
09:55
(23) вот именно воообще область не выводится, уже не говорю о том чтобы считать
31 Beduin
 
02.12.21
09:56
(29) До 25 вроде человек формируется. Может вырастет еще.
32 osa1C
 
02.12.21
09:56
(30) почту почитай свою
33 Зая
 
02.12.21
09:57
(29) это в 23 сообщении есть сразу и 21 и 12
34 Beduin
 
02.12.21
09:57
(30) А у тебя просто текст есть в этой области или только переменная?
35 StanLee
 
02.12.21
09:57
ну значит надо с именами областей разобраться, не глазками списывать с экрана а жестко копипастить
36 osa1C
 
02.12.21
09:58
(23) а судя по (22) выводится!!! и немерянное количество раз
37 osa1C
 
02.12.21
09:58
(33) Вывод итога в ЦИКЛЕ
38 Beduin
 
02.12.21
10:00
(37) Так ей по каждому документу надо. А как еще?
39 Зая
 
02.12.21
10:02
(34) в этой области есть слово ВСЕГО -текст и ВсегоПоДокументу
40 Гипервизор
 
02.12.21
10:07
(36) Так там всего 1 проход в Выборке будет.
41 Beduin
 
02.12.21
10:14
(39)
СуммаИтог = 999999;
ОбластьИтог.Параметры.ВсегоПоДокументу = СуммаИтог;
Вот так сделай и посмотри что выведет
42 StanLee
 
02.12.21
10:24
создай другую область и туда выводи итог
43 Зая
 
02.12.21
10:41
ок (41) (42) сейчас попробую. Спасибо)
44 Зая
 
02.12.21
10:42
(20) и фото я уже свое загрузила
45 Beduin
 
02.12.21
10:43
(44) Императрийца!
46 Зая
 
02.12.21
10:44
(45) спасибки))
47 Beduin
 
02.12.21
10:44
(43) Ты лучше вообще все убери и просто попробуй вывести область итого.\

ОбластьИтог = Макет.ПолучитьОбласть("Всего");

ТабДок.Очистить();

ТабДок.Вывести(ОбластьИтог);
Вот так вообще оставь
48 Зая
 
02.12.21
10:47
(41) изменения не произошли, Вопрос: когда я вношу изменения в Модуль менеджера в 1С предприятии в документе ничего не меняется, может нужно заново составлять документ??
49 Beduin
 
02.12.21
10:48
(48) Модуль менеджера он вообще не к объектам относится, к виду.
50 Beduin
 
02.12.21
10:49
(48) Все закомменти и просто выведи Итого, как я в (47) написал.
51 vvspb
 
02.12.21
10:49
(45) конкурс можно считать открытым?
52 Гипервизор
 
02.12.21
10:50
Прямо чудеса. ) Может пора уже скрин макета выкладывать?
53 Зая
 
02.12.21
10:53
(52) а тут можно и скрин показать?
54 Зая
 
02.12.21
10:57
(47) {Документ.ОказаниеУслуги.МодульМенеджера(53,1)}: Переменная не определена (ОбластьИтог)
<<?>>ОбластьИтог.Параметры.ВсегоПоДокументу = СуммаИтог; (Проверка: Сервер)
55 2S
 
02.12.21
11:00
(54) зая, такая зая
56 Beduin
 
02.12.21
11:03
(54) Ты можешь оставить в процедуре печати только вот этот код

Макет = Документы.ОказаниеУслуги.ПолучитьМакет("Печать");
ОбластьИтог = Макет.ПолучитьОбласть("Всего");
ТабДок.Очистить();
ТабДок.Вывести(ОбластьИтог);
57 Зая
 
02.12.21
11:07
(56) сейчас
58 Зая
 
02.12.21
11:09
(56) Процедура Печати и Модуль менеджера это разные операции??
59 Beduin
 
02.12.21
11:09
(58) У тебя код из (13) где находится?
60 Зая
 
02.12.21
11:10
в Модули менеджера
61 Зая
 
02.12.21
11:11
(59) в модули менеджера
62 Kassern
 
02.12.21
11:12
(60) "Переменная не определена (ОбластьИтог)" а это значит, что вы не определили в вашей процедуре печати переменную "ОбластьИтог". Отладкой пользоваться умеете?
63 РБ
 
02.12.21
11:12
(61) еще раз надо:

в модуле менеджера)))
64 Гипервизор
 
02.12.21
11:14
(0) Судя по задаче вы занимаетесь по книге "Практическое пособие разработчика"?
Конфигурация там маленькая, выложите её уже куда-нибудь на файлообменник. А то так бесконечно можно обсуждать. )
65 Зая
 
02.12.21
11:17
(64) да, правильно. хорошо
66 Beduin
 
02.12.21
11:19
(65) И историю,  как решили изучать 1С.
67 Зая
 
02.12.21
11:26
Я с 2001 года мечтала быть хакером, программистом, но после универа вышла замуж. а он не разрешил работать, а сейчас сам и гонит на работу, я работала на 1С но была пользователем 7 лет, но хотела большего, и вот меня берут на работу, со стажировкой, только я должна пройти курс, а я застопорилась на этой мелочи
68 РБ
 
02.12.21
11:28
(67) какая прелесть, какой слог! в 37 лет, прям. находка
69 Beduin
 
02.12.21
11:30
(67) Надо менять семейный кодекс. Написали соглашение, что хочет чтобы дома сидела. И все обеспечивай тогда до конца жизни. А то сначала герои, а потом в кусты. Человек в итоге квалификацию потерял.
70 Зая
 
02.12.21
11:31
(68) да это сарказм такой
71 Зая
 
02.12.21
11:33
(69) вот именно, за эти 14 лет столько поменялось, да и 1С проходила пользователя 7.7. тогда был, а сейчас Аж 8.3. но я 8.0. переобучалось, но это все нето, поверхностно
72 РБ
 
02.12.21
11:36
(71) будешь в конкурсе участвовать?
73 Мультук
 
гуру
02.12.21
11:36
(67)

Зачем же сразу программистом ?
Можно быть консультантом, тестировщиком -- да мало ли кем еще.
74 Beduin
 
02.12.21
11:37
(72) Что за конкурс?
75 Зая
 
02.12.21
11:40
пока это отбор, на сообразительность, если дз не пройду и на конкурс не попаду((
76 Krendel
 
02.12.21
11:41
(74) Мисс Миста 2021 ;-)
77 РБ
 
02.12.21
11:47
(75) толсто))))
78 osa1C
 
02.12.21
12:21
(76) уже что-то вывалилось?
79 РБ
 
02.12.21
12:54
Зая, куда пропала? не томи...

Итого то итого?
80 osa1C
 
02.12.21
13:51
(79) кстати Светик именно на тебя и обиделась!
81 osa1C
 
02.12.21
13:51
(79) я уже помог, вопрос решен
82 РБ
 
02.12.21
13:53
(80) Заю тоже зовут Светик?
83 osa1C
 
02.12.21
13:54
(72) (82) нет, но в конкурсе именно ты ее призвала участвовать. Ты на свои темы вопросов посмотри и трезво содрагнись так людей обижать. Не боги горшки обжигают, а ТС новичок в программировании 1С, но желание научится есть
84 Гипервизор
 
02.12.21
14:00
(81) Ну и что было не так?
85 osa1C
 
02.12.21
14:13
(84) да там началось с неверно построенного  запроса... дальше привело к таким последствиям
86 osa1C
 
02.12.21
14:21
(38) С чего такие выводы? И что значит Итог по каждому документу? Сумму документа в строке отчета обычно выводят... А тут нужен ОБщий Итог
87 РБ
 
03.12.21
09:09
(83) потому что я не верю легенде.
слишком много нестыковок.
88 Малыш Джон
 
03.12.21
09:22
На одном из мест работы кто-то добавлял новый документ в конфигурацию базы и документ этот был какой-то заявкой на что то там. Видимо при занесении наименования рука дрогнула и часть названия затерлась. И на утро в базе красовался документ "Зая".
Прост оффтоп, не знаю, почему вспомнилось.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс