14 янв. 2018 г.

Перечисления по COM

Для получения значения Перечисления по COM подключению

стрСоединения = "Srvr="+АдресСервера+";Ref="+ИмяБД+";usr="+Логин+";pwd='"+Пароль+"'";
v8 = Новый COMОбъект("V83.COMConnector");
Подключение= v8.Connect(стрСоединения);

СтавкаНДС = Подключение.XMLСтрока(выборка.СтавкаНДС);
Если Не ПустаяСтрока(СтавкаНДС) Тогда
     Номенклатура.СтавкаНДС = Перечисления.СтавкиНДС[СтавкаНДС];
КонецЕсли;

Перебрать каждую строку MS SQL

Что бы перебрать строки из БД TransitN таблицы EXBARC MS SQL и для каждой строки обновить значения поля DELFLAG в значение 1 нужно выполнить данную конструкцию

declare some_cursor cursor
for
       select  PACKID, DELFLAG from EXBARC
open some_cursor
       declare  @counter int
       declare  @int_var int, @string_var varchar(100)
       set @counter = 0
fetch next from some_cursor INTO  @int_var, @string_var
while @@FETCH_STATUS = 0
begin
       set @counter = @counter + 1
       UPDATE [TransitN].[dbo].[EXBARC] SET [DELFLAG] = 1 WHERE [PACKID] = @int_var
       fetch next from some_cursor INTO  @int_var, @string_var
end
select @counter as final_count
       close some_cursor
deallocate some_cursor


где:
select  PACKID, DELFLAG from EXBARC – указываем поля которые нужно выбрать и таблица
  
declare  @counter int

declare  @int_var int, @string_var varchar(100) – объявляем количество переменных, количеству выше выбранных полей

18 сент. 2017 г.

The function requested is not supported rdp

При подключении к рдп сессии получаю ошибку


Решение:
Локальные групповые политики – Конфигурация компьютера – Настройки безопасности




8 авг. 2017 г.

Обнаружена незавершенная операция сохранения конфигурации

При динамическом обновлении конфигурации возникла данная ошибка.
В конфигуратор уже невозможно было зайти.
Заходим в, на примере субд MS SQL, Microsoft SQL Server Management Studio, Создать запрос:

- delete from configsave
- delete from config where FileName = 'commit'
- delete from config where FileName = 'dynamicCommit'
- delete from config where FileName = 'dbStruFinal'


Сравнить старое и новое значение реквизита

Понадобилось понять, были ли изменения в колонке табличной части. Для этого в процедуре обработчика, нужной для проверки, колонки табличной части выставляем процедуру
&НаКлиенте
Перем Изменять;
 
&НаКлиенте
Процедура ТоварыПроцентРучнойСкидкиОкончаниеВводаТекста(Элемент, Текст, ДанныеВыбора, ПараметрыПолученияДанных, СтандартнаяОбработка)
Изменять = Число(Текст) <> Элементы.Товары.ТекущиеДанные.ПроцентРучнойСкидки;
КонецПроцедуры
а далее если нужно проверить были ли изменения держим ориентир на глобальную переменную модуля формы, которая находиться на клиенте.

Изменить шрифт в одной ячейке

В печатной форме нужно по условию выделить ячейки.

Пример типового механизма из правками

ОбластьМакета = Макет.ПолучитьОбласть("ДопИнформация");
ОбластьМакета.Параметры.Заполнить(СтруктураСтроки);
ОбластьЗначениеПараметра = ОбластьМакета.Область("R1C7:R1C41");
ОбластьЗначениеПараметра.Шрифт = Новый Шрифт(, 18);
ТабДокумент.Вывести(ОбластьМакета);
  • То есть, получили именованную область из
  • ТабличногоДокумента.
  • Заполнили параметры области
  • В полученной области выбираем диапазон ячеек,
  • которым нужно изменить шрифт
  • В выбранной область по диапазону ячеек
  • изменяем шрифт 
  • Выводим отредактированную именованную область
  • в результирующий ТабличныйДокумент
 

CopyPaste Copyright © 2017 - |- Шаблон создан O Pregador - |- Отредактирован myr4ik07