01.12.2025

8.2 УП

8.2 УП

BoricH пишет: 1C8.2 при работе в терминале на 64х сервере в клиент-серверном режиме при большом колличестве пользователей...
Схема = ЭлементыФормы.ГеоСхема; СписокГородов = Новый СписокЗначений; // Запретить перерисовку схемы на время обновления. Схема.Обновление = Ложь;...
СсылкаНаУзел = ПланыОбмена.НаСклады.НайтиПоКоду("С1"); ПланыОбмена.ЗарегистрироватьИзменения(СсылкаНаУзел, Неопределено); СсылкаНаУзел = ПланыОбмена.НаСклады.НайтиПоКоду("С1"); ПланыОбмена.ЗарегистрироватьИзменения(СсылкаНаУзел, Метаданные.Справочники.Номенклатура); СсылкаНаУзел = ПланыОбмена.НаСклады.НайтиПоКоду("С1"); ДокСсылка = Документы.РеализацияТоваров.НайтиПоНомеру(НомерДок, ДатаПериода);...
ВЫБРАТЬ ХозрасчетныйВидыСубконто.Ссылка КАК Счет ИЗ ПланСчетов.Хозрасчетный.ВидыСубконто КАК ХозрасчетныйВидыСубконто ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПланСчетов.Хозрасчетный.ВидыСубконто КАК ХозрасчетныйВидыСубконто1 ПО ХозрасчетныйВидыСубконто.Ссылка = ХозрасчетныйВидыСубконто1.Ссылка...
Функция Удаляет указанные файлы. УдалитьФайлы(<Путь>, <Маска>) Параметры: <Путь> (обязательный) Тип: Строка. Путь к удаляемым файлам. <Маска> (необязательный)...
//рег=СоздатьОбъект("VBScript.RegExp"); // Для 7.7 Рег = Новый COMОбъект("VBScript.RegExp"); Рег.global=-1; Рег.ignorecase=-1; Рег.pattern="[а-я]"; Сообщить(Рег.test("есть русские bukovy")); Сообщить(Рег.test("netu russ bukov"));
Функция УдалитьПовторяющиесяЭлементыМассива(Массив) Экспорт ТекущийИндекс = 0; ВсегоЭлементов = Массив.Количество(); Пока ТекущийИндекс < ВсегоЭлементов Цикл Индекс2 = ТекущийИндекс...