Добрый вечер форумчане, не подскажете как в обработке по созданию и заполнению табличной части оптимизировать скорость? Как получить объект один раз а не в цикле каждый раз?

Запрос4 = Новый Запрос;
                   Запрос4.УстановитьПараметр("Таблица", Таблица);
                   Запрос4.УстановитьПараметр("Номер", Номер.Номер);
                   Запрос4.Текст =
                    "ВЫБРАТЬ
                    | *
                    |ПОМЕСТИТЬ ВТ
                    |ИЗ
                    |    &Таблица КАК Таблица
                    |
                    |ГДЕ
                    |     Таблица.Кол = &Номер
                    |;
                    |ВЫБРАТЬ
                    |    *
                    |ИЗ
                    |    ВТ КАК ВТ";
Этот запрос тоже объединить с первым

ТЧ.Номенклатура = Справочники.Номенклатура.НайтиПоНаименованию(Результат2.Товар, ИСТИНА); - вот это тот же запрос в цикле

(79) ну вот это

 Для Каждого Строка ИЗ Док.Товары Цикл  
       Если Строка.Номенклатура = Справочники.Номенклатура.НайтиПоНаименованию(Строка(Элемент.Товар), Истина)

зачем 55 раз ищешь одну и ту же номенклатуру? От этого она лучше найдется что ли?

вот так можно

НайдТовар = Справочники.Номенклатура.НайтиПоНаименованию(Строка(Элемент.Товар), Истина);
Для Каждого Строка ИЗ Док.Товары Цикл  
       Если Строка.Номенклатура = НайдТовар Тогда

Таблица.Колонки.Добавить(Массив.Получить(СчКол).Получить(0), ОписаниеТиповЧ);
               Исключение
                   Таблица.Колонки.Добавить("Кол"+Формат(СчКол,"ЧГ=0"), ОписаниеТиповЧ);   // !!!!!!! ИЗМЕНИТЬ

               КонецПопытки;
           Иначе
               Таблица.Колонки.Добавить("Кол"+Формат(СчКол,"ЧГ=0"), ОписаниеТиповЧ);
           КонецЕсли;
       КонецЦикла; - ты тут определил тип данных, зачем же в цикле  ТЧ.КоличествоУпаковок = Число(Результат2.Кол1);
                   ТЧ.Цена = Число(Результат2.Цена);

(83) Тип определил как строка ...просто название переменной не поменял) .....это называется помоему быдлокод, я исправлю

Получается что запрос3 (ЗапросТри) вовсе не нужен?

как ни крутите....а запросы объединить не получается... =(

(86)еще как получится

можешь показать как ? может я просто не понимаю ...не дает соединять :(

Работает не трожь ...

(89) не вариант

задача решена не без помощи начальника:) если надо решение скину

Мне кажется  // !!!!!!! ИЗМЕНИТЬ добавить во все строчки.

(92) Уже всё кординально изменил (начальник помог направил в нужное русло) всем спасибо =) есть новый вопрос, как в типовой УТ 11.0.9.12 программно добавить контрагента, с юридическим адресом и телефоном? никак не могу найти места где хранится эта информация... это справочник ВидыКонтактнойИнформации? если да то как же там привязывается строка именно к этому контрагенту? вообще непонятки((

Никто не знает?

(94)С УТ не имел дело, но в других конфах обычно есть регистр сведений "КонтактнаяИнформация". Адрес или телефон - это реквизит "ВидКонтактнойИнформации"

Вот в том то и дело что реквизитов адрес и телефон нет и такого регистра тоже =)

А хотя...сек ща проверю еще разок

"ВидКонтактнойИнформации" справочник есть ... в нем реквезиты с перечислениями ...ну там всё понятно...а регистра нету... =)

есть АдресныйКлассификатор... походу там всё храниться, осталось найти куда сунуть телефон

Нет ...и то не то и этого нет =(

Вроде пошло ...ща покручу поверчу потом если сделаю выложу решение

Да нифига ... как же всё запутано помогите кто нибудь((

читать всю ветку лениво

ааах ок .... сам разберусь)

резюмировал бы что не так, может быть и подсказал бы

(105) Надо программно заполнять Юридический адрес у контрагента.... Но если подскажешь как... (УТ 11.0.9.12 ) буду благодарен)

ой ...фактическии

ой , фактический адрес...но это сути дела не меняет

ну а в чем собственно проблема? контактная информация это ТЧ контрагента

НЕЕЕТ =) в ней нет этого реквизита

в том то и дело =)

стоп...

тип, Вид, представление, значениеПолей, страна регион город Адрес электронной почты , доменное имя, номер телефона и номер телефона без кодов

всё... =)

АААААААА

кажись понял

ну вот - что творит волшебный пендель :)))

автор пива клинского перепил ?

НоваяСтрока = ФормаНового.НаборКонтактнойИнформации.Добавить();
НоваяСтрока.Объект = ФормаНового.ЭтотОбъект;
НоваяСтрока.Вид = Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента;
НоваяСтрока.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
НоваяСтрока.Представление = "Юридический адрес, дом, улица ";
НоваяСтрока.Комментарий = "Комментарий Юридический";


чужое но кажись оно

спасибо =) пробую

Кста пиво клинское просто ужааасно =)

разжижает мозг оно

=) так я его и не пью ...не намекай....я учусь ты знаешь)

авда муть ...сам открой и посмотри =)

Для Каждого Элемент ИЗ ТЗ Цикл
       НовыйКонтрагент = Справочники.Контрагенты.СоздатьЭлемент();
       НовыйКонтрагент.Наименование = Элемент.КонтактноеЛицо;
       НовыйКонтрагент.НаименованиеПолное = НовыйКонтрагент.Наименование;
       НовыйКонтрагент.Партнер = Справочники.Партнеры.НеизвестныйПартнер;
       НовыйКонтрагент.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ЮрЛицо;
       НовыйКонтрагент.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ЮридическоеЛицо;
       
       НовыйКонтрагент.НомерТелефона = Элемент.Телефон;  
       
       НовыйКонтрагент.Вид = Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента;
       НовыйКонтрагент.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
       НовыйКонтрагент.Представление = Элемент.КонтактноеЛицо;

   КонецЦикла;


а вот ничего подобного ... ошибочка =(

и при таком обращении и терез табличную часть... открывал в отладчике таб часть...она вообще пустая

Свойство    Значение    Тип
НовыйКонтрагент    наталья николаевна якушкина    СправочникОбъект.Контрагенты
ВерсияДанных    "            "    Строка
Владелец        Неопределено
ДополнительнаяИнформация    ""    Строка
ДополнительныеРеквизиты    СправочникТабличнаяЧасть.Контрагенты.ДополнительныеРеквизиты    СправочникТабличнаяЧасть.Контрагенты.ДополнительныеРеквизиты
ДополнительныеСвойства    Структура    Структура
ИНН    ""    Строка
КПП    ""    Строка
Код    ""    Строка
КодПоОКПО    ""    Строка
КонтактнаяИнформация    СправочникТабличнаяЧасть.Контрагенты.КонтактнаяИнформация    СправочникТабличнаяЧасть.Контрагенты.КонтактнаяИнформация
Наименование    "наталья николаевна якушкина"    Строка
НаименованиеПолное    "наталья николаевна якушкина"    Строка
ОбменДанными    ПараметрыОбменаДанными    ПараметрыОбменаДанными
Партнер    Неизвестный партнер    СправочникСсылка.Партнеры
ПометкаУдаления    Ложь    Булево
Предопределенный    Ложь    Булево
Родитель        СправочникСсылка.Контрагенты
Ссылка        СправочникСсылка.Контрагенты
УдалитьФизЛицо        СправочникСсылка.ФизическиеЛица
ЭтоГруппа    Ложь    Булево
ЭтотОбъект    наталья николаевна якушкина    СправочникОбъект.Контрагенты
ЮрФизЛицо    Юр. лицо    ПеречислениеСсылка.ЮрФизЛицо
ЮридическоеФизическоеЛицо        ПеречислениеСсылка.ЮридическоеФизическоеЛицо


вот во время отладки....

в (125) ты пытаешь создать объект справочник контрагенты
в (119) добавляешь на форму данные

ты чего хочешь ?

Контактная информация пустая

да тот код (119) вообще чужой ... я так не делал я пытался так же обратиться...а ничего подобного ...такая табличная часть не имеет таких реквезитов в конфигураторе ...а когда открываю форму в конфигураторе там даже эта табличная часть не отобраджается(

Я вообще понять не могу где хранится этот долбаный Фактический адрес

Задачу на 70% решил а тут ...жо....ра

Спасайте старейшины 1С =)

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

дырочка ? о_О

КонтактнаяИнформация -- это независимый непериодический регистр сведений

Так нет его  в списке регистров сведений =(

там это где ?

ну в конфигураторе

в древе РС

а что за конфигурация у тебя ?

УТ 11.0.9.12

Последняя

в УТ хранится в ТЧ КонтактнаяИнформация справочника Контрагенты

Да может я опять перекипел ...(( процессор слабый не разогнанный.... (я про бошку) =) я просто не видел этой самой ТЧ так как её там просто нет... она есть в конфигураторе а на форме нет...

зачем так сделано?

это тебе знатоки ут 11 расскажут

(146) RLS

Но вообще конечно бредово сделано.

кстати, H A D G E H O G s как в ТЧ КонтактнаяИнформация  добавить несколько элементов ? =)

Автору дать медаль за упорство и коммисовать.

=) Автору просто нравится эта работа

(150) Что за странные вопросы?
ТЧ.Добавить(); в цикле.

Или загрузить из ТЗ.

А смысл добавлять несколько? если их всё равно не будет видно О_о

Все не читал. Автор, че не получается?

(153) только на форме ТП нет

(153) аську включи, да!

Да вроде всё получается уже =) Суть в том что в форме НЕТ табличной части вообще... а сделано как таб часть ...

(159) Она создастся в ПриСозданииНаСервере()

а смысл? почему не простые реквизиты?

Юридический и Фактический адреса они же единичны... как одна фирма может быть в двух местах О_о

(162) Че не так?

Есть ЮрАдрес, а есть Факт адрес, например, у нас был пожар и мы полгода сидели по другому факт. адресу.

кажется понял ....ща скину код который получился...посмотрите

(164) не идентичны, а ЕДИНИЧНЫ

зачем такой геморой не понимаю ...кто это делал


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

На кой хер тут ВИД и ТИП ....

Для Каждого Элемент ИЗ ТЗ Цикл
       НовыйКонтрагент = Справочники.Контрагенты.СоздатьЭлемент();
       НовыйКонтрагент.Наименование = Элемент.КонтактноеЛицо;
       НовыйКонтрагент.НаименованиеПолное = НовыйКонтрагент.Наименование;
       НовыйКонтрагент.Партнер = Справочники.Партнеры.НеизвестныйПартнер;
       НовыйКонтрагент.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ЮрЛицо;
       НовыйКонтрагент.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ЮридическоеЛицо;
       
       ДобКонтИнфо = НовыйКонтрагент.КонтактнаяИнформация.Добавить();
       ДобКонтИнфо.Тип = Перечисления.ТипыКонтактнойИнформации.Адрес;
       ДобКонтИнфо.Вид = Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента;
       ДобКонтИнфо.Представление = Элемент.АдресДоставки;
       ДобКонтИнфо.НомерТелефона = Элемент.Телефон;
       НовыйКонтрагент.Записать();
   КонецЦикла;


Вышло так...ладно вид понял зачем...нахера ТИП ... =(

Адрес, Электрока, Веб, Другое, Телефон, Сайт. - Это варианты перечисления.... кто нибудь объяснит Зачем?!

(168) ну, на самом деле типа Вид = телефон, тип = телефон, тип = мобильныйтелефон и т.п... это поскольку 1с не поддерживает в РС множество записей с одинаковыми измерениями. А вообще - с учетом того, что тех же мобильников может быть несколько - логичнее было бы все-таки подчиненный справочник.

(170) тяжелое наследие клюшек, когда не было предопределенных элементов

Если тут всего по 1 реквезиту по идее надо заполнить ... и в 1 строке я указываю и адрес и телефон... и электронку...

Просто пропущу ка я это ... закомментю пусть начальник решит

Кто знает как преобразовать строчку так что бы каждая первая буква слова в ней была заглавной

????

есть встроенная функция для этого

Встроенные функции языка (Script functions)
ТРег (Title)
Синтаксис:
ТРег(<Строка>)
Параметры:
<Строка> (обязательный)
Тип: Строка.
Преобразуемая строка.
Возвращаемое значение:
Тип: Строка.
Описание:
Преобразует строку к титульному регистру. Это означает, у каждого слова первый символ преобразуется к титульному регистру или, если титульный регистр для символа не определен, то к верхнему регистру. Все остальные символы преобразуются к нижнему регистру.
Доступность:
Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение, мобильное приложение(клиент), мобильное приложение(сервер).
Пример:
Фамилия = ТРег(Стр);

спасибо)