eComm+

Модулі для BAS / 1С* - розроблено в Україні!

Инструменты пользователя

Инструменты сайта

Вы посетили: • horoshop_designer_utbas_multipleproperties
horoshop_designer_utbas_multipleproperties

Различия

Показаны различия между двумя версиями страницы.

Ссылка на это сравнение

Предыдущая версия справа и слева Предыдущая версия
Следующая версия 		Предыдущая версия
horoshop_designer_utbas_multipleproperties [2020/08/25 10:22]
webmaster [Форма элемента справочника "Номенклатура"] 		horoshop_designer_utbas_multipleproperties [2023/08/16 19:50] (текущий)
webmaster
Строка 1: Строка 1:
 +===== BAS УТ / КУП / ERP =====
 ==== План видов характеристик "ДополнительныеРеквизитыИСведения" ==== ==== План видов характеристик "ДополнительныеРеквизитыИСведения" ====
   * Добавляем в план видов характеристик "ДополнительныеРеквизитыИСведения" реквизит "МножественныйРеквизит" (Тип "Булево")   * Добавляем в план видов характеристик "ДополнительныеРеквизитыИСведения" реквизит "МножественныйРеквизит" (Тип "Булево")
Строка 16: Строка 17:
   
  //++ ingenum.com.ua / Торговые площадки  //++ ingenum.com.ua / Торговые площадки
- СчСвойств = 0; + СоответствиеСвойств = Новый Соответствие; 
  МассивМножественныхСвойств = Новый Массив;  МассивМножественныхСвойств = Новый Массив;
  //-- ingenum  //-- ingenum
Строка 53: Строка 54:
  КонецЕсли;  КонецЕсли;
   
- СчСвойств = СчСвойств + 1;  + Если СоответствиеСвойств[ОписаниеСвойства.Свойство] = Неопределено Тогда  
- ОписаниеСвойства.ИмяУникальнаяЧасть = ОписаниеСвойства.ИмяУникальнаяЧасть    +"_"+ Строка(СчСвойств);            + СоответствиеСвойств.Вставить(ОписаниеСвойства.Свойство, 1); 
 + Иначе 
 + СоответствиеСвойств.Вставить(ОписаниеСвойства.Свойство, СоответствиеСвойств.Получить(ОписаниеСвойства.Свойство)+1); 
 + КонецЕсли; 
 +  
 + ОписаниеСвойства.ИмяУникальнаяЧасть = ОписаниеСвойства.ИмяУникальнаяЧасть    +"_"+ Строка(СоответствиеСвойств.Получить(ОписаниеСвойства.Свойство));            
   
  КонецЕсли;  КонецЕсли;
Строка 166: Строка 172:
  //++ ingenum.com.ua / Торговые площадки  //++ ingenum.com.ua / Торговые площадки
  Если ОписаниеСвойства.МножественныйРеквизит Тогда  Если ОписаниеСвойства.МножественныйРеквизит Тогда
- НаименованиеМассивом = ing_ОбменСТорговымиПлощадкамиСервер.РазложитьСтрокуВМассивПодстрок(ОписаниеСвойства.ИмяРеквизитаЗначение, "_");+ НаименованиеМассивом = eCommСервер.РазложитьСтрокуВМассивПодстрок(ОписаниеСвойства.ИмяРеквизитаЗначение, "_");
  ИмяУдаляемогоМножественногоРеквизита = "ДополнительныйМножественныйРеквизитЗначение_" + НаименованиеМассивом[1] + "_" + НаименованиеМассивом[2];  ИмяУдаляемогоМножественногоРеквизита = "ДополнительныйМножественныйРеквизитЗначение_" + НаименованиеМассивом[1] + "_" + НаименованиеМассивом[2];
  Если НЕ Форма.Элементы.Найти(ИмяУдаляемогоМножественногоРеквизита) = Неопределено Тогда  Если НЕ Форма.Элементы.Найти(ИмяУдаляемогоМножественногоРеквизита) = Неопределено Тогда
Строка 272: Строка 278:
 <code> <code>
 &НаКлиенте &НаКлиенте
-Процедура Подключаемый_ОткрытиеМножественногоДополнительногоРеквизита(Элемент, СтандартнаяОбработка)  //+++Процедура Подключаемый_ОткрытиеМножественногоДополнительногоРеквизита(Элемент, СтандартнаяОбработка) //++ eComm+
   
  СтандартнаяОбработка = Ложь;  СтандартнаяОбработка = Ложь;
Строка 316: Строка 322:
  ОповещениеОВыборе = Новый ОписаниеОповещения("ВыполнитьПослеВыбораЗначений", ЭтаФорма, ИмяМножественногоРеквизитаБезСуффикса);  ОповещениеОВыборе = Новый ОписаниеОповещения("ВыполнитьПослеВыбораЗначений", ЭтаФорма, ИмяМножественногоРеквизитаБезСуффикса);
   
- ОткрытьФорму("Справочник.ing_ТорговыеПлощадки_СвойстваТоваров.Форма.ФормаМножественногоРеквизита", Новый Структура("СписокЗначенийСвойств", МассивЗначений), Элемент, , , , ОповещениеОВыборе, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);+ ОткрытьФорму("Справочник.eComm_СвойстваТоваров.Форма.ФормаМножественногоРеквизита", Новый Структура("Свойство, СписокЗначенийСвойств", Свойство, МассивЗначений), Элемент, , , , ОповещениеОВыборе, РежимОткрытияОкнаФормы.БлокироватьОкноВладельца);
   
 КонецПроцедуры КонецПроцедуры
  
 &НаКлиенте &НаКлиенте
-Процедура ВыполнитьПослеВыбораЗначений(ВыбранныеЗначения, ИмяМножественногоРеквизитаБезСуффикса = Неопределено) Экспорт+Процедура ВыполнитьПослеВыбораЗначений(ВыбранныеЗначения, ИмяМножественногоРеквизитаБезСуффикса = Неопределено) Экспорт  //++ eComm+
  
  Если НЕ ТипЗнч(ВыбранныеЗначения) = Тип("Массив") Тогда   Если НЕ ТипЗнч(ВыбранныеЗначения) = Тип("Массив") Тогда 
Строка 378: Строка 384:
  
 &НаСервере &НаСервере
-Процедура ДобавитьРеквизитФормыНаСервере(Свойство, ИмяРеквизитаЗначение)+Процедура ДобавитьРеквизитФормыНаСервере(Свойство, ИмяРеквизитаЗначение)                                                    //++ eComm+
  
  ОписаниеТипа = Новый ОписаниеТипов("СправочникСсылка.ЗначенияСвойствОбъектов");  ОписаниеТипа = Новый ОписаниеТипов("СправочникСсылка.ЗначенияСвойствОбъектов");
Строка 395: Строка 401:
  
 &НаСервере &НаСервере
-Процедура УдалитьРеквизитФормыНаСервере(Свойство, ИмяРеквизитаЗначение)+Процедура УдалитьРеквизитФормыНаСервере(Свойство, ИмяРеквизитаЗначение)                                                     //++ eComm+
  
  МассивУдаляемых = Новый Массив;  МассивУдаляемых = Новый Массив;
Строка 404: Строка 410:
  
 &НаСервереБезКонтекста &НаСервереБезКонтекста
-Функция ВернутьМассивНевыбранныхЗначений(Свойство, МассивВыбранныхЗначенийМножественногоРеквизита)+Функция ВернутьМассивНевыбранныхЗначений(Свойство, МассивВыбранныхЗначенийМножественногоРеквизита)                          //++ eComm+
  
  Запрос = Новый Запрос;  Запрос = Новый Запрос;
horoshop_designer_utbas_multipleproperties.1598340154.txt.gz · Последнее изменение: 2020/08/25 10:22 — webmaster

Инструменты страницы

Если не указано иное, содержимое этой вики предоставляется на условиях следующей лицензии: CC Attribution-Share Alike 4.0 International
CC Attribution-Share Alike 4.0 International Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki