Помогите сделать печатный документ

[Golickoff]

Ходят слухи, что если дважды кликнуть на {Документ.ВыданнаяНН.МодульМенеджера(147,85)}: Ожидается символ ')', курсор перейдёт на строку с недостающей скобкой.

[vaxilion]

{Документ.ВыданнаяНН.МодульМенеджера(147)}: Ошибка при вызове метода контекста (Выбрать)
      ДатаДокумента = Выборка.Выбрать(ДатаДокумента);
по причине:
Несоответствие типов (параметр номер '1')

Добавлено: 08 июн 2016, 16:00

{Документ.ВыданнаяНН.МодульМенеджера(147)}: Ошибка при вызове метода контекста (Выбрать)
      ДатаДокумента = Выборка.Выбрать(ДатаДокумента);
по причине:
Несоответствие типов (параметр номер '1')

Если делаю вот так, ДатаДокумента = Выборка.Выбрать();  ошыбки нет, но не работает

[Golickoff]

 

Код Выделить Развернуть

ОбластьШапка.Параметры.Заполнить(Выборка);
ДатаДокумента = Выборка.Выбрать(ДатаДокумента); //это из вашего же примера. Что там за выборка и как из неё вытащить нужный параметр вам должно быть виднее
ДатаТекст=СтрЗаменить(Строка(Формат(ДатаДокумента,"MM.DD.yyyy"),".","");
Для Симв = 1 По СтрДлина(ДатаТекст) Цикл
     ТекущийСимвол = Сред(ДатаТекст, Симв, 1);
     НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;
КонецЦикла;

Добавлено: 08 июн 2016, 16:10

Выше вы писали про ВыданнаяНН.ДатаДокумента. Там где написано

Код Выделить Развернуть

Выборка.Выбрать(ДатаДокумента) Должна быть эта ВыданнаяНН.ДатаДокумента. Откуда она берётся и сохраняется ли она к этому моменту, я не знаю. Я лишь пишу, что в переменную ДатаТекст должна превратиться та самая дата, откуда бы она не взялась.

Добавлено: 08 июн 2016, 16:12

Я посмотрел код. Должно быть так:

Код Выделить Развернуть

ОбластьШапка.Параметры.Заполнить(Выборка);
ДатаДокумента = Выборка.Дата;
ДатаТекст=СтрЗаменить(Строка(Формат(ДатаДокумента,"MM.DD.yyyy")),".","");
Для Симв = 1 По СтрДлина(ДатаТекст) Цикл
     ТекущийСимвол = Сред(ДатаТекст, Симв, 1);
     НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;
КонецЦикла;

Добавлено: 08 июн 2016, 16:15

Время позднее, не могу продолжать дискуссию в течение 10 часов.

[vaxilion]

{Документ.ВыданнаяНН.МодульМенеджера(151)}: Поле объекта не обнаружено (ДатаДокумента_1)
     ОбластьШапка.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;

Добавлено: 08 июн 2016, 17:23

{Документ.ВыданнаяНН.МодульМенеджера(151)}: Поле объекта не обнаружено (ДатаДокумента_1)
     ОбластьШапка.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;

Эту проблему решыл.

Теперь {Документ.ВыданнаяНН.МодульМенеджера(151)}: Поле объекта не обнаружено (ДатаДокумента_9)
     ОбластьЗаголовок.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;

[Golickoff]

Поставьте точку останова и посмотрите в табло значение переменной ДатаТекст. Оно получается слишком длинным. В идеале должно быть значение вида '08062016', т.е. число, месяц и год без дополнительных символов. Посмотрите что представляет из себя переменная даты и в строке присвоения значения перемнной ДатаТекст приведите дату к нужному формату в форматировании. Или, если вы не понимаете о чём я, просто замените строку

Код Выделить Развернуть

НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол; на

Код Выделить Развернуть

Попытка
    НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;
Исключение
КонецПопытки;

Добавлено: 09 июн 2016, 02:15

Или поменяйте стркоу

Код Выделить Развернуть

Для Симв = 1 По СтрДлина(ДатаТекст) Цикл на

Код Выделить Развернуть

Для Симв = 1 По 8 Цикл Но последние два варианта весьма так себе. Сначала нужно разобраться как выглядит переменная ДатаТекст и убедиться, что в ней нет лишних знаков пунктуации.

[vaxilion]

Поставьте точку останова и посмотрите в табло значение переменной ДатаТекст. Оно получается слишком длинным. В идеале должно быть значение вида '08062016', т.е. число, месяц и год без дополнительных символов. Посмотрите что представляет из себя переменная даты и в строке присвоения значения перемнной ДатаТекст приведите дату к нужному формату в форматировании. Или, если вы не понимаете о чём я, просто замените строку

Код Выделить Развернуть

НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол; на

Код Выделить Развернуть

Попытка
    НужнаяОбласть.Параметры["ДатаДокумента_" + Строка(Симв)] = ТекущийСимвол;
Исключение
КонецПопытки;

Добавлено: 09 июн 2016, 02:15

Или поменяйте стркоу

Код Выделить Развернуть

Для Симв = 1 По СтрДлина(ДатаТекст) Цикл на

Код Выделить Развернуть

Для Симв = 1 По 8 Цикл Но последние два варианта весьма так себе. Сначала нужно разобраться как выглядит переменная ДатаТекст и убедиться, что в ней нет лишних знаков пунктуации.

Значение ДатаТекст = "31082015 00:00:00"

[Golickoff]

Строку

Код Выделить Развернуть

ДатаТекст=СтрЗаменить(Строка(Формат(ДатаДокумента,"MM.DD.yyyy")),".",""); меняем на

Код Выделить Развернуть

ДатаТекст=СтрЗаменить(Строка(Формат(ДатаДокумента,"ДЛФ=Д")),".",""); Всё

[vaxilion]

Все работает, спасибо большое. Буду использовать эту конструкцию в будущем!

[Golickoff]

Все работает, спасибо большое. Буду использовать эту конструкцию в будущем!

Лишь бы понимали, что за что отвечает.