Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / 1С [игнор отключен] [закрыт для гостей] / 8.2 бух запомнить выбранное из формы счетов / 11 сообщений из 11, страница 1 из 1
30.04.2010, 10:30
    #36606783
Нович@к
Нович@к
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Только начал осваивать 1С.
Во внешнем отчете создал форму диалога, определил в ней поле списка (построчный перечень "ПланыСчетов.Хозрасчетный... как ВыбСписокСчетов") , далее процедурой написал:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
	 Флажок2=Истина;
		СписокСчетовОтметить();
	 ВыбСписокСчетов1.Добавить(ПланыСчетов.Хозрасчетный.РасчетыСПоставщикамиИПодрядчиками,"Счет 60 - Расчеты с поставщикам");
	ВыбСписокСчетов1.Добавить(ПланыСчетов.Хозрасчетный.РасчетыСПокупателямиИЗаказчиками,"Счет 62 - Расчеты с покупателями");
   	ВыбСписокСчетов1.ЗаполнитьПометки(Истина);
КонецПроцедуры
Всё работает, но появилась необходимость в форме добавить кнопку выбора счета.
Делаю кнопку, ей прописываю:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Процедура К2Нажатие(Элемент,выбэлем1) Экспорт
ФормаВыбора = ПланыСчетов.Хозрасчетный.ПолучитьФормуВыбора("ФормаВыбора", Элемент, );	
 ФормаВыбора.Открыть();

	Если Не ФормаВыбора.Открыта() Тогда
		 ВыбСписокСчетов1.Добавить(ПланыСчетов.Хозрасчетный.выбэлем1,"Счет 91111 - Прочие доходы и расходы");

		выбэлем1=ФормаВыбора.ОткрытьМодально();
				КонецЕсли;	
	 	КонецПроцедуры
Не могу понять, что дальше сделать - чтобы в поле списка формы диалога появилась новая строка выборки данного счета из формы выбора списка счетов???
Спасибо за советы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 10:42
    #36606815
Сисой
Сисой
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Это делается не кнопкой, а полем ввода в форме.
Можешь сначала добавить во внешний отчет реквизит типа ПланыСчетовСсылка.Хозрасчетный, а затем выбирать его в поле ввода.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 10:45
    #36606823
Господин ПЖ
Господин ПЖ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
в качестве владельца имхо лучше передать форму ПолучитьФормуВыбора("ФормаВыбора", ЭтаФорма , );

и ловить события выбора в "ФормаВыбора" в событии ОбработкаВыбора() текущей формы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 12:15
    #36607109
Нович@к
Нович@к
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Господин ПЖ,

Так куда нужно вставить "выбэлем1=ФормаВыбора.ОбработкаВыбора();", чтобы запомнить "выбэлем1" ???
Получается, если так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Процедура К2Нажатие(Элемент,выбэлем1) Экспорт
ФормаВыбора = ПланыСчетов.Хозрасчетный.ПолучитьФормуВыбора("ФормаВыбора", ЭтаФорма, );	
 ФормаВыбора.Открыть();

	Если Не ФормаВыбора.Открыта() Тогда
		выбэлем1=ФормаВыбора.ОбработкаВыбора();
	КонецЕсли;	
	 	КонецПроцедуры
, то форма выбора открывается после "КонецПроцедуры" и мне непонятно куда писать "выбэлем1"...
После идет формирование отчета:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
Процедура КнопкаСформироватьНажатие(Кнопка)
	    	 	СписокСчетов=новый("СписокЗначений");
	ПоСчетам=" по счетам ";
	Для цик= 0  по ВыбСписокСчетов.Количество()- 1  Цикл
		Если ВыбСписокСчетов[цик].Пометка Тогда
			СписокСчетов.Добавить(ВыбСписокСчетов[цик].Значение);
			ПоСчетам=ПоСчетам+ВыбСписокСчетов[цик].Значение;
			Если цик<>ВыбСписокСчетов.Количество()- 1  Тогда
				ПоСчетам=ПоСчетам+", ";
			Иначе
				ПоСчетам=ПоСчетам+".";
			КонецЕсли;
		КонецЕсли;
	КонецЦикла;
	Для цик= 0  по ВыбСписокСчетов1.Количество()- 1  Цикл
		Если ВыбСписокСчетов1[цик].Пометка Тогда
			СписокСчетов.Добавить(ВыбСписокСчетов1[цик].Значение);
			ПоСчетам=ПоСчетам+ВыбСписокСчетов1[цик].Значение;
			Если цик<>ВыбСписокСчетов1.Количество()- 1  Тогда
				ПоСчетам=ПоСчетам+", ";
			Иначе
				ПоСчетам=ПоСчетам+".";
			КонецЕсли;
		КонецЕсли;
	КонецЦикла;
	
	ОчиститьСообщения ();
	запрос=новый Запрос();
	запрос.Текст=
"ВЫБРАТЬ
	|	ХозрасчетныйОстаткиИОбороты.Счет КАК Счет,
	|	ХозрасчетныйОстаткиИОбороты.
ну и так далее.. и если вставляю в фомирование отчета (Процедура КнопкаСформироватьНажатие(Кнопка)) "выбэлем1", то он его не признает...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 12:25
    #36607150
Нович@к
Нович@к
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Господин ПЖ,

Может я объясняю не так толково, как следует...
Посмотрите, плиз
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 13:10
    #36607299
Господин ПЖ
Господин ПЖ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
вот кусок из низа

// это заменить

Процедура К2Нажатие(Элемент,выбэлем1) Экспорт

ФормаВыбора = ПланыСчетов.Хозрасчетный.ПолучитьФормуВыбора("ФормаВыбора", ЭтаФорма, );

Если Не ФормаВыбора.Открыта() Тогда

ФормаВыбора.Открыть();
//выбэлем1=ФормаВыбора.ОбработкаВыбора();
//ФормаСписка=Спр.ПолучитьФормуВыбора();
//Если не выбэлем1=Неопределено тогда

//конецесли;
КонецЕсли;

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

// это добавить

Процедура ОбработкаВыбора(ЗначениеВыбора, Источник)
// Вставить содержимое обработчика.

ВыбСписокСчетов.Добавить(ЗначениеВыбора, ПолучитьПредставлениеСчета(ЗначениеВыбора));

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

Функция ПолучитьПредставлениеСчета(лСчет)

Возврат "Счет " + лСчет.Код + " - " + лСчет.Наименование;

КонецФункции // ()
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 13:11
    #36607306
Господин ПЖ
Господин ПЖ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
все целиком не читал... ибо сразу в мусорку - код за гранью добра из зла. Делаю скидку на то что "учитесь"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 13:13
    #36607313
Господин ПЖ
Господин ПЖ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
процедуру ОбработкаВыбора добавить в соответствующее событие формы (в свойствах формы есть) иначе не полетит
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.04.2010, 13:46
    #36607424
Нович@к
Нович@к
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Господин ПЖ,

Спасибо, буду пробывать...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 12:03
    #36610631
Нович@к
Нович@к
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
Господин ПЖ,

Задал кнопке на форме ОбработкаВыбора, запускаю:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Процедура ОбработкаВыбора(ЗначениеВыбора, Источник)
 // Вставить содержимое обработчика.
 ФормаВыбора = ПланыСчетов.Хозрасчетный.ПолучитьФормуВыбора("ФормаВыбора", ЭтаФорма, ); 

Если Не ФормаВыбора.Открыта() Тогда

ФормаВыбора.Открыть();
  КонецЕсли; 


ВыбСписокСчетов.Добавить(ЗначениеВыбора, ПолучитьПредставлениеСчета(ЗначениеВыбора));

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

Функция ПолучитьПредставлениеСчета(лСчет)
 Возврат "Счет "  + + лСчет.Код " - " + лСчет.Наименование; // 

КонецФункции //
Пишет:
Код: plaintext
1.
{Форма.ФормаОтчета.Форма( 249 )}: Поле объекта не обнаружено (Код)
Возврат "Счет "  +  лСчет.Код +" - " + лСчет.Наименование; //

Может поле как-то по другому называется???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
04.05.2010, 12:05
    #36610641
Господин ПЖ
Господин ПЖ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
8.2 бух запомнить выбранное из формы счетов
"ЗначениеВыбора" скорее какое-то не такое.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / 1С [игнор отключен] [закрыт для гостей] / 8.2 бух запомнить выбранное из формы счетов / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 476ms
Закрыть
start [/forum/topic.php?fid=28&mobile=1&tid=1522401]:
 0ms
get settings:
 9ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 138ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 30ms
get tp. blocked users:
 1ms
others: 273ms
total:  476ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]