Имя: Пароль:
1C
1С v8
Сохранение показателей отчета
0 demous
 
18.04.12
11:05
УПП 8.2

Процедура ПередОткрытием ()
   мСохраненныйДок = ВладелецФормы.ДокументОбъект;
   мДатаНачалаПериодаОтчета = мСохраненныйДок.ДатаНачала;
   мДатаКонцаПериодаОтчета = мСохраненныйДок.ДатаОкончания;
КонецПроцедуры

Процедура ПриОткрытии ()
   Организация = мСохраненныйДок.Организация;
//
СписокСохранения = мСохраненныйДок.ДанныеОтчета.Получить();
КонецПроцедуры

Процедура ВосстановитьСохраненныеДанные ()
//восстанавливаем версию формы
   Если СписокСохранения.Свойство("ВерсияФормы", ВерсияФормы) Тогда
       Если ВерсияФормы о мВерсияФормы Тогда
       КонецЕсли;
   КонецЕсли;
   // восстановим сохраненные данные редактируемых ячеек
   СписокСохранения.Свойство( "ПоказателиОтчета", ПоказателиОтчета );
   Для Каждого ПоказателиСтраницы Из ПоказателиОтчета Цикл
       ИмяТекТабличноеПоле = ПоказателиСтраницы.Ключ;
       ТекТабличноеПоле = ЭлементыФормы[ИмяТекТабличноеПоле] ;
       ПоказателиТаблПоле = ПоказателиСтраницы.Значение;
       Для Каждого Показатель Из ПоказателиТаблПоле Цикл
           ИмяПоказателя = Показатель.Ключ;
           ЗначениеПоказателя = Показатель.Значение;
           // установим значение в таблице
           ТекТабличноеПоле.Области[ИмяПоказателя].Значение =ЗначениеПоказателя;
       КонецЦикла;
   КонецЦикла;
   КонецПроцедуры
вот три процедуры в форме отчета всего - лишь

выдает вот сюда ошибку

{Отчет.Д_ОтчетПоЗаявкам.Форма.ФормаОтчета.Форма(123,19)}: Ожидается ключевое слово 'Тогда' ('Then')
       Если ВерсияФормы<<?>> о мВерсияФормы Тогда (Проверка: Толстый клиент (обычное приложение))
подскажите что не так?
1 pumbaEO
 
18.04.12
11:07
Все не так ребята
Эх раз, еще раз ...

Ожидается ключевое слово 'Тогда' ('Then')  
Если ВерсияФормы<<?>> о мВерсияФормы Тогда    Если ВерсияФормы <> мВерсияФормы Тогда
2 demous
 
18.04.12
11:09
Если СписокСохранения.Свойство("ВерсияФормы", ВерсияФормы) Тогда
       Если ВерсияФормы <> мВерсияФормы Тогда
       КонецЕсли;
   КонецЕсли;
Так?
3 demous
 
18.04.12
11:10
четвертый день уже бьюсь с сохранение этих отчетов, уже ни чего не понимаю(
4 shamannk
 
18.04.12
11:11
ВерсияФормы о мВерсияФормы Оператор "о" признак уважения ?
5 Homer
 
18.04.12
11:12
Самое интересно условие после ТОГДА
6 demous
 
18.04.12
11:12
из другой статьи кусок кода)
7 pumbaEO
 
18.04.12
11:13
Если СписокСохранения.Свойство("ВерсияФормы", ВерсияФормы) Тогда
       Если ВерсияФормы <> мВерсияФормы Тогда
         мВерсияФормы  = ВерсияФормы; //но каков тут смысл я не знаю.
       КонецЕсли;
   КонецЕсли;
8 demous
 
18.04.12
11:14
(7)

{Отчет.Д_ОтчетПоЗаявкам.Форма.ФормаОтчета.Форма(123,34)}: Ожидается ключевое слово 'Тогда' ('Then')
       Если ВерсияФормы = мВерсияФормы<<?>>  (Проверка: Толстый клиент (обычное приложение))

та же ошибка(
9 demous
 
18.04.12
11:14
начальник торопит, сказал сегодня после обеда должно быть готово, а голова уже не соображает(
10 demous
 
18.04.12
11:15
http://www.scribd.com/doc/41586698/24/Работа-с-сохраненным-отчетом
вот тут , 56 страница этот пример, гляньте пож
11 demous
 
18.04.12
11:19
помогите пожалуйста разобраться с этим, благодарен заранее всем
12 pumbaEO
 
18.04.12
11:19
Слово Тогда не пробовал вручную набрать?
13 Homer
 
18.04.12
11:20
Действительно как тут может голова соображать, если просто надо сделать КОПИРОВАТЬ ВСТАВИТЬ. А по теме это как минимум для регламентированной отчетности сделано сохранение а у тебя я так понял обычный, построитель.
14 demous
 
18.04.12
11:23
смотрите задача в чем
был создан отчет с помощью СКД, отчет относящийся к "ЗАявкамНаРасход", теперь задача стала таким образом, что этот отчет будет сохраняться два раза в неделю, с актуальными на этот период данными, что бы в дальнейшем можно было открыть список с этими отчетами, и открыть нужный отчет ( как обычный документ ) с уже сформированными данными на тот период, когда отчет был сохранен
15 demous
 
18.04.12
11:23
(12) в смысле?
16 shamannk
 
18.04.12
11:24
Ожидается ключевое слово 'Тогда' ('Then') перевожу  Ожидается ключевое слово 'Тогда' ('Then')
17 Homer
 
18.04.12
11:26
(14) Может не надо изобретать велик, а сделать документ
18 Homer
 
18.04.12
11:27
Мне вот интересно а где у тебя хранятся сохраненные данные, в отчете?
19 demous
 
18.04.12
11:35
(17) хотят велик, и хотят часа через два - три(((
20 demous
 
18.04.12
11:42
(18) пробую сделать как в статье

структура сохраняется в тип данных ХранилищеЗначенийи помещается в реквизит документа ДанныеОтчета
21 shamannk
 
18.04.12
11:51
(19) Звери...
22 demous
 
18.04.12
11:59
(21) вам смешно а мне не очень)
23 demous
 
18.04.12
12:10
{Отчет.Д_ОтчетПоЗаявкам.Форма.ФормаОтчета.Форма(115)}: Ошибка при вызове метода контекста (Записать)
мСохраненныйДок.Записать() ;
по причине:

по причине:
Значение поля "Дата" не может быть пустой датой


на форме отчета добавил дату

Процедура Сохранить ()
   мСохраненныйДок =
Документы.Д_ПланируемыеПлатежи.СоздатьДокумент();

ХранилищеДанных = Новый ХранилищеЗначения(СписокСохранения);
мСохраненныйДок.ДанныеОтчета = ХранилищеДанных;
мСохраненныйДок.Записать() ;
Модифицированность = Ложь;
КонецПроцедуры
24 pumbaEO
 
18.04.12
12:11
Ты нам все свои косяки будешь вываливать? без чтения описания ошибки?
25 demous
 
18.04.12
12:12
дату я ставлю... он так же выдает эту ошибку
26 pumbaEO
 
18.04.12
12:20
врешь...
Процедура Сохранить ()
   мСохраненныйДок =
Документы.Д_ПланируемыеПлатежи.СоздатьДокумент();

//ВОТ ТУТ ДАТА
мСохраненныйДок.Дата = ТекущаяДата();
//ВОТ ТУТ ДАТЫ УЖЕ НЕТ
ХранилищеДанных = Новый ХранилищеЗначения(СписокСохранения);
мСохраненныйДок.ДанныеОтчета = ХранилищеДанных;
мСохраненныйДок.Записать() ;
Модифицированность = Ложь;
КонецПроцедуры
27 demous
 
18.04.12
12:34
Спс, кнопка ОК прошла без ошибок, теперь будет смотреть выводит или нет в список документа)
28 demous
 
18.04.12
12:46
список отчетов показывается в списке документа, но не хочет открывать форму отчета(
29 demous
 
18.04.12
12:51
подскажите еще пожалуйста

   Отказ = Истина;

   Если Не(ЭтоНовый()) ИЛИ (мСкопированаФорма <> Неопределено) Тогда
       
       ПравоДоступаКОтчету = РегламентированнаяОтчетность.ПравоДоступаКРегламентированномуОтчету(ИсточникОтчета);
       Если ПравоДоступаКОтчету = Ложь Тогда
           Предупреждение("Недостаточно прав!");
           Возврат;
       ИначеЕсли ПравоДоступаКОтчету = Неопределено Тогда
           Предупреждение("Не удалось открыть сохраненные данные! Отчет не найден!");
           Возврат;
       КонецЕсли;
       
       ОбъектОтчет = Д_ОтчетПоЗаявкам(ИсточникОтчета);
       Если ОбъектОтчет = Неопределено Тогда
           Сообщить("Не удалось открыть сохраненные данные! Отчет не найден!", СтатусСообщения.Важное);
           Возврат;
       КонецЕсли;
       
       ВыбФормаОтчета = ОбъектОтчет.ПолучитьФорму( ,ЭтаФорма);
       
       // обход ошибки, присутствующей в 8.2.9
       Если ВыбФормаОтчета.ОбработкаОбъект <> ОбъектОтчет Тогда
           ВыбФормаОтчета.ОбработкаОбъект = ОбъектОтчет;
       КонецЕсли;
       
       ВыбФормаОтчета.РежимВыбора = Ложь;
       ВыбФормаОтчета.ЗакрыватьПриЗакрытииВладельца = Ложь;
       ВыбФормаОтчета.Открыть();
       
   ИначеЕсли ЭтоНовый() Тогда
       Справочники.РегламентированныеОтчеты.ПолучитьФормуСписка();
       Отчеты.Д_ОтчетПоЗаявкам.Открыть();
   КонецЕсли;


{Документ.Д_ПланируемыеПлатежи.Форма.ФормаДокумента1.Форма(12)}: Значение не является значением объектного типа (ЭтоНовый)
Если Не(ЭтоНовый()) ИЛИ (мСкопированаФорма <> Неопределено) Тогда
30 demous
 
18.04.12
13:20
форумчане, подскажите (((
31 demous
 
18.04.12
13:26
апну
32 demous
 
18.04.12
13:37
ну кто - нибудь выручайте(
33 demous
 
18.04.12
13:38
Это процедура ПередОткрытием в основной форме документа
34 demous
 
18.04.12
14:05
я не знаю, ну вот что ему надо?
35 demous
 
18.04.12
14:39
Как из списка дока теперь открыть эту сохраненную форму отчета?
ХранилищеДанных = Новый ХранилищеЗначения(СписокСохранения);
мСохраненныйДок.ДанныеОтчета = ХранилищеДанных;
мСохраненныйДок.Записать() ;
Модифицированность = Ложь;
36 demous
 
18.04.12
14:45
???????8
37 demous
 
18.04.12
14:48
{Документ.Д_ПланируемыеПлатежи.Форма.ФормаДокумента1.Форма(11)}: Ошибка при вызове метода контекста (ЭтоНовый)
   Если Не(ЭтоНовый()) ИЛИ (мСкопированаФорма <> Неопределено) Тогда
по причине:
Документ не выбран
он вот что выдает
38 demous
 
18.04.12
14:54
покинули все эту ветку((((
39 pumbaEO
 
18.04.12
14:58
не нам в конце месяца на карточку деньги получать.
40 demous
 
18.04.12
14:59
Не ну помогите добить эту тему уже пожалуйста, у Вас опыта и знаний гораздо больше(
41 demous
 
18.04.12
15:16
поможет кто ?
42 demous
 
18.04.12
16:32
Все-таки еще раз попрошу помощи
43 Dethmont
 
18.04.12
20:49
Не понимаю, зачем браться за задачу если ты знаешь что сделать этого не можешь...
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший