Имя: Пароль:
1C
1С v8
Табличное поле
,
0 Vasus55
 
20.12.11
11:07
проблемка такая, хочу при новом заполнении справочника чтобы данные в ТП не стирались а добавлялись к старым, делаю это вот так
форма=ПолучитьФорму("ОбщаяФорма.БазаКлиентов");
наим=Наименование;
тип=ОсновнойТипОрганизации;
город=Город;
регион=Регион;
телефон=Телефон;
факс=Факс;
майл=Email;
веб=WebСайт;
Запрос=Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
              |    Организации.Наименование КАК Организация,
              |    Организации.ОсновнойТипОрганизации КАК ТипОрганизации,
              |    Организации.Телефон,
              |    Организации.Факс,
              |    Организации.Email,
              |    Организации.WebСайт,
              |    Организации.Город,
              |    Организации.Регион
              |ИЗ
              |    Справочник.Организации КАК Организации
              |ГДЕ
              |    Организации.Наименование = &Наименование
              |    И Организации.ОсновнойТипОрганизации = &ОсновнойТипОрганизации
              |    И Организации.Город = &Город
              |    И Организации.Регион = &Регион";
Запрос.УстановитьПараметр("Город",город);
Запрос.УстановитьПараметр("Регион", регион);              
Запрос.УстановитьПараметр("Наименование", наим);
Запрос.УстановитьПараметр("ОсновнойТипОрганизации", тип);
Запрос.УстановитьПараметр("Телефон",телефон);
Запрос.УстановитьПараметр("Факс",факс);
Запрос.УстановитьПараметр("Email",майл);
Запрос.УстановитьПараметр("WebСайт",веб);
Результат =Запрос.Выполнить().Выгрузить();

Для каждого СтрокаРезультата Из Результат Цикл
 НоваяСтрока =форма.ТабличноеПоле1.ДобавитьСтроку();
 ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаРезультата);
КонецЦикла;


Ошибка при выполнении обработчика - 'ПриЗаписи'
по причине:
{Справочник.Организации.МодульОбъекта(43)}: Метод объекта не обнаружен (ДобавитьСтроку)
1 Ненавижу 1С
 
гуру
20.12.11
11:10
БЛЕАТЬ!
2 Grusswelle
 
20.12.11
11:11
*facepalm*
3 Ненавижу 1С
 
гуру
20.12.11
11:12
отличайте модель (объект) от представления (формы)
меняйте модель!
4 Alex S D
 
20.12.11
11:13
город=Город;
регион=Регион;
телефон=Телефон;
факс=Факс;
ппц....
5 Godofsin
 
20.12.11
11:14
бугагашеньки
6 Ненавижу 1С
 
гуру
20.12.11
11:15
(4) ну вдруг не присвоилось до конца?
7 Alex S D
 
20.12.11
11:16
(6) угу.. тогда надо было в цикле раз 10 прогнать)
8 petrowsky
 
20.12.11
11:29
(4) ну лень автору Шифт нажимать постоянно))
9 Vasus55
 
20.12.11
11:35
сделал так перенес все в модель формы
Процедура ПриЗакрытии()
    форма=ПолучитьФорму("ОбщаяФорма.БазаКлиентов");
наим=ЭлементыФормы.Наименование.Значение;
тип=ЭлементыФормы.ОсновнойТипОрганизации.Значение;
город=ЭлементыФормы.Город.Значение;
регион=ЭлементыФормы.Регион.Значение;
телефон=ЭлементыФормы.Телефон.Значение;
факс=ЭлементыФормы.Факс.Значение;
майл=ЭлементыФормы.Email.Значение;
веб=ЭлементыФормы.WebСайт.Значение;
Запрос=Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
              |    Организации.Наименование КАК Организация,
              |    Организации.ОсновнойТипОрганизации КАК ТипОрганизации,
              |    Организации.Телефон,
              |    Организации.Факс,
              |    Организации.Email,
              |    Организации.WebСайт,
              |    Организации.Город,
              |    Организации.Регион
              |ИЗ
              |    Справочник.Организации КАК Организации
              |ГДЕ
              |    Организации.Наименование = &Наименование
              |    И Организации.ОсновнойТипОрганизации = &ОсновнойТипОрганизации
              |    И Организации.Город = &Город
              |    И Организации.Регион = &Регион";
Запрос.УстановитьПараметр("Город",город);
Запрос.УстановитьПараметр("Регион", регион);              
Запрос.УстановитьПараметр("Наименование", наим);
Запрос.УстановитьПараметр("ОсновнойТипОрганизации", тип);
Запрос.УстановитьПараметр("Телефон",телефон);
Запрос.УстановитьПараметр("Факс",факс);
Запрос.УстановитьПараметр("Email",майл);
Запрос.УстановитьПараметр("WebСайт",веб);
Результат =Запрос.Выполнить().Выгрузить();
форма.ЭлементыФормы.ТабличноеПоле2.Значение=Результат;
форма.ЭлементыФормы.ТабличноеПоле2.СоздатьКолонки();

терь заносит, но старые данные стирает
10 Vasus55
 
20.12.11
11:41
для этого и был создан цикл
11 Alex S D
 
20.12.11
11:44
Для каждого СтрокаРезультата Из Результат Цикл
 НоваяСтрока =форма.ТабличноеПоле2.Значение.Добавить;
 ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаРезультата);
КонецЦикла;
криво ппц., но попробуй)
12 hhhh
 
20.12.11
11:45
(10)

город=ЭлементыФормы.Город.Значение;
регион=ЭлементыФормы.Регион.Значение;
телефон=ЭлементыФормы.Телефон.Значение;
факс=ЭлементыФормы.Факс.Значение;

Юморист. Валяюсь под столом. Можно ведь по-нормальному написать

город=Город;
регион=Регион;
телефон=Телефон;
факс=Факс;
13 Vasus55
 
20.12.11
11:51
Alex SD
Поле объекта значение не обнаружено
14 Alex S D
 
20.12.11
11:53
сори, вот так
Для каждого СтрокаРезультата Из Результат Цикл
 НоваяСтрока =форма.ЭлементыФормы.ТабличноеПоле2.Значение.Добавить();
 ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаРезультата);
КонецЦикла;
15 petrowsky
 
20.12.11
11:54
(0) у тебя ошибка с методом ДобавитьСтроку(), надо Добавить()

Для каждого СтрокаРезультата Из Результат Цикл
 НоваяСтрока = форма.ТабличноеПоле1.Добавить();
 ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаРезультата);
КонецЦикла;
16 petrowsky
 
20.12.11
11:56
(0) и избавься от промежуточных переменных, блин

вместо бреда
город=Город;
....
Запрос.УстановитьПараметр("Город",город);

можно просто же написать
Запрос.УстановитьПараметр("Город", Город);
17 Vasus55
 
20.12.11
11:57
терь воще ничего не происходит не ошибок, и не заполняется
18 Vasus55
 
20.12.11
11:58
petrowsky
я после намека так и сделала
19 petrowsky
 
20.12.11
12:11
(17) а отладчик что показывает? может запрос пустую ТЗ возвращает?
20 Vasus55
 
20.12.11
12:13
сделала так
Для каждого СтрокаРезультата Из Результат Цикл
 НоваяСтрока = форма.ЭлементыФормы.ТабличноеПоле1.Значение;
 НоваяСтрока.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаРезультата);
КонецЦикла;
терь добавляет строку, ну пустую
21 Defender aka LINN
 
20.12.11
12:14
"форма=ПолучитьФорму("ОбщаяФорма.БазаКлиентов");". В модуле объекта...
Автора расстрелять, кремировать, прах утопить в океане.
22 petrowsky
 
20.12.11
12:17
(20) может книжек желтых почитай, а то методом тыка у тебя не получается и людей злишь))
23 Alex S D
 
20.12.11
12:18
и тем более фотки нету..
24 Vasus55
 
20.12.11
12:19
Defender aka
а есть другие способы обращения к форме, мне то нужно из одной формы данные выгрузить в другую?
25 petrowsky
 
20.12.11
12:20
(23) ага, написано Мужской, а пишет от женского имени О_о
26 Vasus55
 
20.12.11
12:21
намека опечатался
27 Vasus55
 
20.12.11
12:35
испраляюсь

форма=ПолучитьОбщуюФорму("БазаКлиентов");
28 hhhh
 
20.12.11
12:50
(27) реально у вас клиенты в справочнике Организации хранятся? Вроде у всех нормальных людей - в справочнике Контрагенты.
29 Vasus55
 
20.12.11
13:57
hhhh
в моем случае так необходимо!
30 Vasus55
 
20.12.11
13:58
хотя я готов все мои косяки выслушать
на ошибках люди учатся, а тем более кто впервые стал изучать 1с -ку