Не устанавливается заголовок колонки многострочной части документа.

глФормекс = СоздатьОбъект("РасширениеФормы");
глФормекс.УстановитьФорму(Форма);
Атр = глФормекс.ПолучитьАтрибут(39); // 39 - индекс нужного мне атрибута многострочной части
Атр.Заголовок = "111"                             // !!! Ничего не происходит. Заголовок не меняется.

rassik писал(а) 30. Сентября 2007 :: 20:52:

Зачем такие сложности?
Форма.ТвойРеквизит.Заголовок("Новый заголовок")

rassik писал(а) 01. Октября 2007 :: 11:00:

Ну сделай ей идентификатор "_39"
Все равно же руками колонку добавляешь, динамически добавлять пока нельзя.

Оба... Эхо Мисты...
Насколько для тебя это критично? Сможешь подождать пару дней? Или надо "вчера"?

rassik писал(а) 01. Октября 2007 :: 19:22:

Я лично пока планирую только доработать атрибут "Заголовок", чтобы с колонками табличной части нормально работал.
Остальное потребует слишком глубокого копания. Сейчас на это, к сожалению, нет времени.

Цитата:

Добавлю небольшую "Хотелку"...

1.Исправление: "Не устанавливается заголовок колонки многострочной части документа";

2.Исправление: "Для колонок, имеющих идентификатор, формула пересчитывется для всех строк документа.
Для колонок не имеющих идентификатора, только для видимых на экране строк. "

3.Добавление "Процедура, позволяющая выбирать режим обновления колонки (ВсеСтроки/ТолькоВидимые/НеОбновлять) + Процедура, вызывающая обновление колонки вручную, желательно предусмотреть возможность указания номера строки, чтобы можно было этим рулить вручную/по кнопке/по таймеру)

4.Добавление "Програмное управление выравниванием в ячейке МНЧ"

Пункт 3 был бы ОЧЕНЬ полезен, я думаю, очень многие меня поддержат особенно, если его можно было бы использовать также и в журналах документов

Мужики, извините, но это я сейчас реализовывать не буду. Последнее время и так только Артур занимается компонентой. У меня сейчас совсем другие приоритеты

rassik писал(а) 02. Октября 2007 :: 07:12:

На заголовки можно.

Урря!

Что тут не так?

Цитата:

Она возвращает ссылку на атрибут. И все работает нормально.
Я попробовал.
Цитата:

А тут она возвращает номер атрибута.
Ты слегка запутался по-моему.

rassik писал(а) 02. Октября 2007 :: 16:01:

Вот как тестировал я.
В глобальнике твоя функция без изменений. Хотя третий параметр здесь лишний.

Функция глАтрибутПоФормуле(Форма, Формула, НАтр = "") экспорт
     глФормекс = СоздатьОбъект("РасширениеФормы");
     глФормекс.УстановитьФорму(Форма);
     Для Н = 0 по глФормекс.КоличествоАтрибутов() - 1 Цикл
	     Рек = глФормекс.ПолучитьАтрибут(Н);
	     Если Рек.Формула = Формула Тогда
		     НАтр = Н;
		     Возврат Рек;
	     КонецЕсли;
     КонецЦикла;
     глФормекс = 0;
     Возврат 0;
КонецФункции // глАтрибутМНЧПоФормуле()
 

На форме документа в табличной части колонка без идентификатора и заголовка с формулой Проба()
Открываю документ.

Процедура ПослеСозданияФормы()
Формула="Проба()";
Рек = глАтрибутПоФормуле(Форма, Формула);
Рек.Заголовок = "111";	 //    !!!!! - тут 1С падает
КонецПроцедуры
 

Все работает.

1. глАтрибутПоФормуле находится в глоб модуле
2. вызывается в процедуре ПриОткрытии формы документа для управления видивостью и заголовками колонок

вроде хэндл формы и колонок должен быть
сейчас попробую прописать вызов глАтрибутПоФормуле в ПослеСозданияФормы

rassik писал(а) 02. Октября 2007 :: 16:42:

Формы еще физически нет, а ты пытаешься изменить заголовок у атрибута.
В ПослеСозданияФормы окно уже физически существует.
АЛьФ тебе понятней объяснит.

rassik писал(а) 02. Октября 2007 :: 14:58:


Дело в том, что у меня в перед Рек.Заголовок = "111" есть еще Рек.Видимость = 1, т.е код выглядит так

Рек.Видимость = 1
Рек.Заголовок = "111"

так вот Рек.Видимость = 1 - // ВСЕ НОРМАЛЬНО!
Почему?

Ждем АЛЬФа.

Цитата:

Не падает. (только спать не посылай )

Цитата:

Да это понятно. Даже если поставишь проверку, заголовок не изменится. Просто падения не будет.
Все равно надо в доке указать, что сработает после физического создания формы.

Еще один баг.

Есть такая прцедура глоб. модуля.

Функция глКНОтобразитьКолонки(ИдФормы, Конт) экспорт
		Атр = СоздатьОбъект("АтрибутФормы");
	ИдРек 		= "ЗначениеКН";
	ТблНастр 	= глКНПолучитьНастройки(ИдФормы);
		ТблНастр.ВыбратьСтроки();
	Пока ТблНастр.ПолучитьСтроку() = 1 Цикл
			В		  = ТблНастр.ВидИтога;
		Формула  = "ЗначениеКН(" + Строка(ТблНастр.НомерСтроки) + ")";
		НАтр	    = 0;

		глАтрибутПоФормуле(Конт.Форма, Формула, НАтр); // !!!!! Здесь сбивается ТблНастр.НомерСтроки
																		 //  т.е. после первого вызова
																		 // ТблНастр.НомерСтроки  становится равным 6
																		// хоя по идее не должен измениться
		Если НАтр <> 0 Тогда
			Атр.УстановитьАтрибут(Конт.Форма, НАтр);
			Атр.Видимость	= глНЕ(ПустоеЗначение(ТблНастр.ВидИтога));
			Атр.Заголовок	= глКНЗаголовок(ТблНастр);
		КонецЕсли;
	КонецЦикла;
 

ТблНастр - таблица (ТЗ) с настройками параметров колонок МНЧ
каждая строка - параметры соотв колонки МНЧ
Идем по таблице, получаем параметры и устанавливаем их для соотв. колонки

Так вот обойти всю ТблНастр не удается, т.к. сбивается ТблНастр.НомерСтроки после первого вызова глАтрибутПоФормуле.

Перепробовал разные варианты процедуры. Помогает только цикл с получением строки через ПолучитьСтрокуПоНомеру, послу вызова глАтрибутПоФормуле, всеравно сбивается НомерСтроки, но я перед вызовом Атр.Видимость и т.д еще раз вызываю ПолучитьСтрокуПоНомеру, чтобы вернуться на нужную строку.

Так пока работает, но боюсь, что это не стабильное решение.

Что это даст?

ИМХО счетчик не должен сбиваться от вызова функции.
Это вообще очень плохо, т.к. в следующий раз может сбиться еще, что-нибудь более важное.

1. Очень сильно подозреваю, что глКНОтобразитьКолонки() у тебя вызывается лишний раз (даже не по твоей вине), поставь Сообщить( ЧтоНибудь ) в её начало, посмотри, сколько вызовов.

2. Что это даст? Действительно, если глКНПолучитьНастройки(ИдФормы) возвращает ссылку на некую общую таблу, то "Перем" здесь не поможет, и при двойном вызове может произойти бяка.

Попробуй так:

Функция глКНОтобразитьКолонки(ИдФормы, Конт) экспорт
   Перем ТблНастр;
   Сообщить( "-------" );
   ТблНастр = СоздатьОбъект( "ТаблицаЗначений" );
   глКНПолучитьНастройки(ИдФормы).Выгрузить( ТблНастр );
   .....  

ЗЫ: Используй для форматирования кода кнопку [ # ]

Процедуры достаточно простые. если нужны комменты - пишите.

Коды процедур:

Функция глАтрибутПоФормуле(Форма, Формула, НАтр = "") экспорт
	глФормекс = СоздатьОбъект("РасширениеФормы");
	глФормекс.УстановитьФорму(Форма);
	Для Н = 0 по глФормекс.КоличествоАтрибутов() - 1 Цикл
		Рек = глФормекс.ПолучитьАтрибут(Н);
		Если СокрЛП(Рек.Формула) = Формула Тогда
			НАтр = Н;
			глФормекс = 0;
			Возврат Рек;
		КонецЕсли;
	КонецЦикла;
	глФормекс = 0;
	Возврат 0;
КонецФункции // глАтрибутМНЧПоФормуле()

Функция глКНОтобразитьКолонки(ИдФормы, Конт) экспорт
		ИдРек 		= "ЗначениеКН";
		ТблНастр 	= глКНПолучитьНастройки(ИдФормы);
		ТблНастр.ВыбратьСтроки();
	Пока ТблНастр.ПолучитьСтроку() = 1 Цикл
		    В 		= ТблНастр.ВидИтога;
		    Формула = "ЗначениеКН(" + Строка(ТблНастр.НомерСтроки) + ")";
		    НАтр	= 0;
		    глАтрибутПоФормуле(Конт.Форма, Формула, НАтр);	    // !!!!!! - ЗДЕСЬ СБОЙ
		    Если НАтр <> 0 Тогда
				 Атр.УстановитьАтрибут(Конт.Форма, НАтр);
				 Атр.Видимость	= глНЕ(ПустоеЗначение(ТблНастр.ВидИтога));
				 Атр.Заголовок	= глКНЗаголовок(ТблНастр);
		    КонецЕсли;
		 КонецЦикла;
КонецФункции // глКНОтобразитьКолонки()
 

Как получается сбой.

1. глКНОтобразитьКолонки вызывается из открытой формы документа по нажатию кнопки.
2. В цикле по ТблНастр
            1-й вызов ПолучитьСтроку:   НомерСтроки = 1     Все нормально и дальше все нормально
            2-й вызов ПолучитьСтроку:   НомерСтроки = 2     Пока все нормально, но далее после вызова 
                                                                                             глАтрибутПоФормуле НомерСтроки становится равным 4

Функция глАтрибутПоФормуле возвращает атрибут формы, в НАтр дополнительно возвращает номер атрибута.

Причем такая фишка

Номер строки после 2-го вызова ПолучитьСтроку становится равным количеству колонок с формулами на форме.
В примере - количеству колонок с формулами ЗначениеКН(1) ЗначениеКН(2) ЗначениеКН(3) ... и т.д.

Пробовал на справочнике "Номенклатура" - там 6(шесть) таких колонок, НомерСтроки устанавливается в 6.
На документе "Работа с прайсом" - там 4 колонки, НомерСтроки устанавливается в 4.

Такие дела.

Ок сейчас пройдусь построчно.

Разобрался.

Дело тут вот в чем.
С ТблНастр работает еще и другая функция конфигурации, возвращаяющая значение в соотв колонку.
Эта фунция перепозиционирует текущую строку ТблНастр.

Сразу не выявил, т.к. функция вызывается в формуле колонки.

Сорри, мой косяк.