Форум 1С : Все вопросы »

Обработки

Обработки

v8: Поле Календаря

14.11.2012 16:56

Прочитано: 7961

Добрый вечер, покажите пример работы с "Поле Календаря". Например после нажатии на дату загружается информация в Табличное поле со Справочника

Yandex

Возможно, вас также заинтересует

Реклама на портале

14.11.2012 19:00

Ответ № 1

(0) Ermak, добавляешь календарик на форму, а далее прописываешь в событии ПриАктивизацииДаты любой код формирования чего надо

15.11.2012 16:51

Ответ № 2

Вот я сделал загрузку в Табличное поле со Справочника

Код 1C v 8.х

 Процедура ПолеКалендаря1ПриАктивизацииДаты(Элемент)

	Текст1 = Новый ТекстовыйДокумент;

	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ

	               |	Аттестуемые.Наименование КАК Колонка1,

	               |	Аттестуемые.Имя КАК Колонка2,

	               |	Аттестуемые.Отчество КАК Колонка3,

	               |	Аттестуемые.Организация КАК Колонка4,

	               |	Аттестуемые.ГазУч КАК Колонка5,

	               |	Аттестуемые.Должность КАК Колонка6

	               |ИЗ

	               |	Справочник.Аттестуемые КАК Аттестуемые";

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

	

КонецПроцедуры

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

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

{Обработка.Обработка1.Форма.Форма.Форма(22)}: Преобразование значения к типу Число не может быть выполнено
ОбластьПереченьС.Параметры.ФИО = К.Фамилия + К.Имя + К.Отчество;

Код 1C v 8.х

 ТабДок = Новый ТабличныйДокумент;

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

	К = ЭлементыФормы.ТабличноеПоле1.Колонки;

	

	// Заголовок.

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

	Область.Параметры.Заполнить(ЭтотОбъект);

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

	

	// Шапка.

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

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

	ТабДок.Вывести(Шапка);

	

	// ПереченьНоменклатуры.

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

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

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

	ОбластьПереченьС.Параметры.ФИО = К.Фамилия + К.Имя + К.Отчество;

	Для Каждого ТекСтрокаПереченьС Из ТабличноеПоле1 Цикл

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

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

	КонецЦикла;

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

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

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

	

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

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

	

	//ТабДок.ОтображатьСетку = Ложь;

	ТабДок.Защита = Истина;

	ТабДок.ТолькоПросмотр = Ложь;

	ТабДок.ОтображатьЗаголовки = Ложь;

	ТабДок.Показать();

Изменено 16.11.12 12:24:14

19.11.2012 09:04

Ответ № 3

*03

19.11.2012 11:55

Ответ № 4

(3) Ermak, а чему у тебя равно К.Фамилия?
напиши

Код 1C v 8.х

 ОбластьПереченьС.Параметры.ФИО = Строка(К.Фамилия) +" "+ Строка(К.Имя) + " "+ Строка(К.Отчество);

19.11.2012 13:27

Ответ № 5

(2) Ermak, Подскажите по первому вопросу

19.11.2012 14:53

Ответ № 6

(5) Ermak, в запросе сделай условие на отбор по дате и установи параметр

19.11.2012 16:19

Ответ № 7

(4) E_Migachev, не значение получается *03 а как сделать значение? Я со справочника выгружаю с табличное поле а потом уже печатаю в макет вот в макет и должно выводится Фамилия, Имя, Отчество в одну ячейку

19.11.2012 16:22

Ответ № 8

(6) E_Migachev, Покажите пример

19.11.2012 16:51

Ответ № 9

(8) Ermak,

Код 1C v 8.х

 

	Для Каждого ТекСтрокаПереченьС Из ТабличноеПоле1 Цикл

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

ОбластьПереченьС.Параметры.ФИО = ТекСтрокаПереченьС.Фамилия + ТекСтрокаПереченьС.Имя + ТекСтрокаПереченьС.Отчество;

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

	КонецЦикла;

20.11.2012 08:59

Ответ № 10

(9) E_Migachev, Спасибо получилось!

Я загружаю данные в табличное поле с табличной части , реквизиты Аттестация и Билет но они почему то не отображаются

Код 1C v 8.х

 Текст1 = Новый ТекстовыйДокумент;

	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ

	               |	Аттестуемые.Наименование КАК Фамилия,

	               |	Аттестуемые.Имя КАК Имя,

	               |	Аттестуемые.Отчество КАК Отчество,

	               |	Аттестуемые.Организация КАК Организация,

	               |	Аттестуемые.ГазУч КАК ГазУч,

	               |	Аттестуемые.Должность КАК Должность,

	               |	Аттестуемые.Разряд КАК Разряд,

	               |	Аттестуемые.Результаты.(

	               |		Аттестация КАК Аттестация,

	               |		Билет КАК Билет

	               |	)

	               |ИЗ

	               |	Справочник.Аттестуемые КАК Аттестуемые";

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

20.11.2012 09:26

Ответ № 11

(6) E_Migachev, подскажите что не так

Код 1C v 8.х

 	               |	Справочник.Аттестуемые КАК Аттестуемые

	               |ГДЕ

	               |	Аттестуемые.Результаты.Дата = &ТекДата";

				  Запрос.УстановитьПараметр("ТекДата",ТекущаяДата()); 

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

20.11.2012 11:07

Ответ № 12

(11) Ermak, если запрос выполняется и в Результат ты получаешь ТЗ, то пиши так:

Код 1C v 8.х

 Результат = Запрос.Выполнить().Выгрузить();

ТабличноеПоле1=Результат;

ЭлементыФормы.ТабличноеПоле1.СоздатьКолонки();

20.11.2012 11:36

Ответ № 13

(12) E_Migachev, я загружаю в табличное поле а не в ТЗ, у меня заместо реквизитов Аттестация и Билет стала колонка со значение "Таблица значений" и колонки создаются новые, а у меня уже они созданы

Изменено 20.11.12 11:44:05

20.11.2012 15:06

Ответ № 14

(13) Ermak, ааа, тогда код оставь старый
а запрос выполняется? в результат выдает что-нибудь?

20.11.2012 15:50

Ответ № 15

да результат выдает только нет результата по реквизитам

Код 1C v 8.х

 	               |	Аттестуемые.Результаты.(

	               |		Аттестация КАК Аттестация,

	               |		Билет КАК Билет

а по остальным все выдает как надо.
В чем тогда дело?

21.11.2012 16:47

Ответ № 16

???

22.11.2012 00:53

Ответ № 17

(16) Ermak, каким реквизитам?

22.11.2012 08:28

Ответ № 18

Аттестация и Билет

22.11.2012 10:25

Ответ № 19

(18) Ermak, они во вложенной таблице, тебе надо было построить запрос по другому - чтобы в основе были данные из Табличной части, а остальные реквизиты через ссылку

22.11.2012 10:44

Ответ № 20

покажите как?

22.11.2012 12:12

Ответ № 21

примерно так, оформи через конструктор
| Аттестуемые.Результаты.Ссылка.Наименование КАК Фамилия,
| Аттестуемые.Результаты.Ссылка.Имя КАК Имя,
| Аттестуемые.Результаты.Ссылка.Отчество КАК Отчество,
| Аттестуемые.Результаты.Аттестация КАК Аттестация,
| Аттестуемые.Результаты.Билет КАК Билет

22.11.2012 12:39

Ответ № 22

Сделал, но теперь вообще ничего не выводит *11

Код 1C v 8.х

 Текст1 = Новый ТекстовыйДокумент;

	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ

				    |	Аттестуемые.Результаты.(

				    |		Ссылка.Наименование КАК Фамилия,

				    |		Ссылка.Имя КАК Имя,

				    |		Ссылка.Отчество КАК Отчество,

				    |		Ссылка.Организация КАК Организация,

				    |		Ссылка.ГазУч КАК ГазУч,

				    |		Ссылка.Должность КАК Должность,

				    |		Ссылка.Разряд КАК Разряд,

				    |		Аттестация КАК Аттестация,

				    |		Билет КАК Билет

				    |	)

				    |ИЗ

				    |	Справочник.Аттестуемые КАК Аттестуемые";

				    |ГДЕ

				    |   Аттестуемые.Результаты.Дата = &ТекДата";

		Запрос.УстановитьПараметр("ТекДата",ТекущаяДата()); 

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

22.11.2012 13:03

Ответ № 23

(22) Ermak, да ты же не так сделал *09
попробуй, писал на вскидку, мог где-то и ошибиться

Код 1C v 8.х

 Запрос.Текст = "ВЫБРАТЬ

				    |		АттестуемыеРезультаты.Ссылка.Наименование КАК Фамилия,

				    |		АттестуемыеРезультаты.Ссылка.Имя КАК Имя,

				    |		АттестуемыеРезультаты.Ссылка.Отчество КАК Отчество,

				    |		АттестуемыеРезультаты.Ссылка.Организация КАК Организация,

				    |		АттестуемыеРезультаты.Ссылка.ГазУч КАК ГазУч,

				    |		АттестуемыеРезультаты.Ссылка.Должность КАК Должность,

				    |		АттестуемыеРезультаты.Ссылка.Разряд КАК Разряд,

				    |		АттестуемыеРезультаты.Аттестация КАК Аттестация,

				    |		АттестуемыеРезультаты.Билет КАК Билет

			    |ИЗ

				    |	Справочник.Аттестуемые.Результаты КАК АттестуемыеРезультаты";

				    |ГДЕ

				    |   Аттестуемые.Результаты.Дата = &ТекДата";

22.11.2012 13:32

Ответ № 24

Что то не так с датой, когда в запросе дата стоит то ничего не показывает я за комментировал дату и выдал результат во всех колонках "ТаблицаЗначений" *10

Код 1C v 8.х

 	Текст1 = Новый ТекстовыйДокумент;

	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ

				   |		Аттестуемые.Результаты.Ссылка.Наименование КАК Фамилия,

				   |		Аттестуемые.Результаты.Ссылка.Имя КАК Имя,

				   |		Аттестуемые.Результаты.Ссылка.Отчество КАК Отчество,

				   |		Аттестуемые.Результаты.Ссылка.Организация КАК Организация,

				   |		Аттестуемые.Результаты.Ссылка.ГазУч КАК ГазУч,

				   |		Аттестуемые.Результаты.Ссылка.Должность КАК Должность,

				   |		Аттестуемые.Результаты.Ссылка.Разряд КАК Разряд,

				   |		Аттестуемые.Результаты.Аттестация КАК Аттестация,

				   |		Аттестуемые.Результаты.Билет КАК Билет

	               |ИЗ

	               |	Справочник.Аттестуемые КАК Аттестуемые";

		//		   |ГДЕ

		//		   |	Аттестуемые.Результаты.Дата = &Дата";

		//Запрос.УстановитьПараметр("Дата",ТекущаяДата()); 

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

Изменено 22.11.12 13:32:55

22.11.2012 13:58

Ответ № 25

(24) Ermak, а, забыл понять в условии

Код 1C v 8.х

 |ГДЕ

				    |   Аттестуемые.Результаты.Ссылка.Дата = &ТекДата";

22.11.2012 14:17

Ответ № 26

это отбор по дате идет, в справочнике Аттестуемые в табличной части Результаты есть реквизит Дата . Не работает всеравно

22.11.2012 15:26

Ответ № 27

тогда | Аттестуемые.Результаты.Дата = &ТекДата";

22.11.2012 15:36

Ответ № 28

так и есть но не работает!!!!!! тут писал
Ermak Ответ № 24 2012-11-22 13:32:25

Может конфигу скинуть?

22.11.2012 16:24

Ответ № 29

кидай, почта в личке

22.11.2012 16:53

Ответ № 30

отправил!

23.11.2012 00:07

Ответ № 31

вот запрос

Код

ВЫБРАТЬ
АттестуемыеРезультаты.Аттестация,
АттестуемыеРезультаты.Билет,
АттестуемыеРезультаты.Дата,
АттестуемыеРезультаты.Ссылка.Разряд,
АттестуемыеРезультаты.Ссылка.Должность,
АттестуемыеРезультаты.Ссылка.ГазУч,
АттестуемыеРезультаты.Ссылка.Организация,
АттестуемыеРезультаты.Ссылка.Имя,
АттестуемыеРезультаты.Ссылка.Отчество,
АттестуемыеРезультаты.Ссылка.Наименование
ИЗ
Справочник.Аттестуемые.Результаты КАК АттестуемыеРезультаты
ГДЕ
АттестуемыеРезультаты.Дата = &Дата

23.11.2012 08:32

Ответ № 32

Не работает!!!

Код 1C v 8.х

 Текст1 = Новый ТекстовыйДокумент;

	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ 

|АттестуемыеРезультаты.Аттестация, 

|АттестуемыеРезультаты.Билет, 

|АттестуемыеРезультаты.Дата, 

|АттестуемыеРезультаты.Ссылка.Разряд, 

|АттестуемыеРезультаты.Ссылка.Должность, 

|АттестуемыеРезультаты.Ссылка.ГазУч, 

|АттестуемыеРезультаты.Ссылка.Организация, 

|АттестуемыеРезультаты.Ссылка.Имя, 

|АттестуемыеРезультаты.Ссылка.Отчество, 

|АттестуемыеРезультаты.Ссылка.Наименование 

|ИЗ 

|Справочник.Аттестуемые.Результаты КАК АттестуемыеРезультаты 

|ГДЕ 

|АттестуемыеРезультаты.Дата = &Дата";

				   

				   

		Запрос.УстановитьПараметр("Дата",ТекущаяДата()); 

		Результат = Запрос.Выполнить().Выгрузить();

		ЭлементыФормы.ТабличноеПоле1.Значение=Результат;

23.11.2012 11:03

Ответ № 33

(32) Ermak, а почему ты ставишь Запрос.УстановитьПараметр("Дата",ТекущаяДата()); - Текущую дату??? там на 100% у тебя нет данных с текущей датой!

23.11.2012 11:40

Ответ № 34

А как тогда надо?

24.11.2012 21:31

Ответ № 35

пришли целиком базу

26.11.2012 09:31

Ответ № 36

послал

26.11.2012 11:39

Ответ № 37

(36) Ermak, вот так

Код 1C v 8.х

 Процедура ПолеКалендаря1ПриАктивизацииДаты(Элемент)



	Запрос = Новый Запрос;

	Запрос.Текст = "ВЫБРАТЬ 

	|АттестуемыеРезультаты.Аттестация, 

	|АттестуемыеРезультаты.Билет, 

	|АттестуемыеРезультаты.Дата, 

	|АттестуемыеРезультаты.Ссылка.Разряд, 

	|АттестуемыеРезультаты.Ссылка.Должность, 

	|АттестуемыеРезультаты.Ссылка.ГазУч, 

	|АттестуемыеРезультаты.Ссылка.Организация, 

	|АттестуемыеРезультаты.Ссылка.Имя, 

	|АттестуемыеРезультаты.Ссылка.Отчество, 

	|АттестуемыеРезультаты.Ссылка.Наименование КАК Фамилия 

	|ИЗ 

	|Справочник.Аттестуемые.Результаты КАК АттестуемыеРезультаты 

	|ГДЕ 

	|АттестуемыеРезультаты.Дата = &Дата";      		   

					   

	Запрос.УстановитьПараметр("Дата",Элемент.Значение); 

	Результат = Запрос.Выполнить().Выгрузить();

	ЭлементыФормы.ТабличноеПоле1.Значение=Результат; 

	

КонецПроцедуры

DT - Скачивать файлы может только зарегистрированный пользователь!

Изменено 26.11.12 11:40:10

26.11.2012 12:56

Ответ № 38

Спасибо большое

Подсказка: Вы можете приложить к ответу файл или изображение щелкнув по значку или в редакторе.

Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.