Юрий

27
Рейтинг

Yuriy.MW



  •   Регистрация: 19.06.2008 (15 лет назад)

  •   Был(а) на сайте: 14.04.2024

Друзья
  • Дмитрий Малышев
Подписчики 5
Группы

IE 2019 Участник

Рейтинг 27

Сравнение реквизитов документов и справочников из разных ИБ
+8 –

Инструменты и обработки Системный администратор Программист Платформа 1С v8.3 Конфигурации 1cv8 Windows Абонемент ($m) Внешняя обработка (ert,epf) Инструменты администратора БД

Как сравнить документы из разных баз? Переходите с версии 7.7 на 8-ю, у вас множество связанных баз или при обмене произошел сбой? Данная обработка поможет сверить различные объекты в нескольких базах. Например, убедиться, что суммы и отметки проведения налоговых документов за прошлый период совпадают в торговой и бухгалтерской ИБ.

1 стартмани

14.12.2015    6712    38    Yuriy.MW    7       

8

Выгрузка в Excel. Группировка строк, установка цвета
+1 –

Инструменты и обработки Программист Платформа 1С v8.3 Конфигурации 1cv8 Windows Абонемент ($m) Внешняя обработка (ert,epf) Загрузка и выгрузка в Excel

Варианты решения некоторых сложностей, которые могут возникнуть при программной выгрузке табличного документа в Excel.

1 стартмани

23.10.2015    9918    25    Yuriy.MW    1       

1

Управление настройками пользователей
+19 –1

Инструменты и обработки Системный администратор Программист Платформа 1С v8.3 Конфигурации 1cv8 Windows Абонемент ($m) Внешняя обработка (ert,epf) Роли и права

Просмотр, копирование и удаление системных настроек форм.

1 стартмани

05.09.2013    8966    164    Yuriy.MW    7       

18
Смотреть все

Комментарии

Новости › Доступны все видеозаписи докладов и секций INFOSTART EVENT 2019 Inception › #537 02.10.19 16:42
Все хорошо. Обязательно планирую посетить в следующем году.
Dev › Организация выбора месяца из списка › #12 02.02.17 16:07
Чуток подкорректировал процедуры.
Месяц - строка, реквизит формы
ПериодРегистрации - Дата, реквизит объекта

Код
&НаКлиенте
Процедура ПриОткрытии(Отказ)
   
    Месяц = Формат(Объект.ПериодРегистрации, "ДФ='MMMM yyyy'");
   
КонецПроцедуры

&НаКлиенте
Процедура СформироватьСписокВыбораМесяца(Год)
    
    Элементы.Месяц.СписокВыбора.Очистить();
    Элементы.Месяц.СписокВыбора.Добавить(Дата(Год-1, 1, 1), Формат(Год-1, "ЧГ=0")); //для смены года
    Для к = 1 По 12  Цикл
        СформДата = Дата(Год, к, 1);
        Элементы.Месяц.СписокВыбора.Добавить(СформДата, Формат(СформДата, "ДФ='MMMM yyyy'"));    
    КонецЦикла;
    Элементы.Месяц.СписокВыбора.Добавить(Дата(Год+1, 1, 1), Формат(Год+1, "ЧГ=0")); //для смены года    

КонецПроцедуры

&НаКлиенте
Процедура МесяцНачалоВыбораИзСписка(Элемент, СтандартнаяОбработка)
   
   Если ЗначениеЗаполнено(Объект.ПериодРегистрации) Тогда
      текМесяц = Объект.ПериодРегистрации;
   Иначе
      текМесяц = ТекущаяДата();
   КонецЕсли;
   СформироватьСписокВыбораМесяца(Год(текМесяц));
   
   СтандартнаяОбработка = Ложь;
   ВыбранноеЗначение = ЭтаФорма.ВыбратьИзСписка(Элемент.СписокВыбора, Элемент, Элемент.СписокВыбора.НайтиПоЗначению(текМесяц));
   Пока ВыбранноеЗначение <> Неопределено И СтрДлина(ВыбранноеЗначение.Представление) = 4 Цикл
      //цикл продолжается до тех пор, пока мы не выберем месяц
      СформироватьСписокВыбораМесяца(Год(ВыбранноеЗначение.Значение));
      ВыбранноеЗначение = ЭтаФорма.ВыбратьИзСписка(Элемент.СписокВыбора, Элемент);                    
   КонецЦикла;
   
   Если ВыбранноеЗначение <> Неопределено Тогда
      Месяц = ВыбранноеЗначение.Представление;
      Объект.ПериодРегистрации = ВыбранноеЗначение.Значение;
   КонецЕсли;
   
КонецПроцедуры
Dev › Сравнение реквизитов документов и справочников из разных ИБ › #5 24.12.15 12:44
(2) husky, конечно моя обработка не супер оптимизирована, но в данном случае зависание происходит не по моей вине, а из-за ошибки в платформе. Мне удалось воспроизвести зависание на конфигурации "УТП для Украины", редакция 1.2, платформа виснет при попытке чтения метаданных через ком-объект, причем в моем случае виснет на конкретном справочнике "КлассификаторКОАТУУ" (на других справочниках все ОК). Вот такой код вызывает зависание и не выпадает в исключение:
Код
КолМДРеквизитов = КомОбъект.Метаданные.Справочники.КлассификаторКОАТУУ.СтандартныеРеквизиты;
Для каждого МДРеквизита Из КолМДРеквизитов Цикл
   //
КонецЦикла;

Если кто-то подскажет в чем может быть причина, буду благодарен.
Dev › Сравнение реквизитов документов и справочников из разных ИБ › #3 15.12.15 14:18
(2) husky, постараюсь проверить на вашей конфигурации. Имя объекта можно прописать и вручную, как оно задано в конфигурации.
Dev › Сравнение реквизитов документов и справочников из разных ИБ › #0 14.12.15 2:18
Как сравнить документы из разных баз? Переходите с версии 7.7 на 8-ю, у вас множество связанных баз или при обмене произошел сбой? Данная обработка поможет сверить различные объекты в нескольких базах. Например, убедиться, что суммы и отметки проведения налоговых документов за прошлый период совпадают в торговой и бухгалтерской ИБ.
Dev › Выгрузка в Excel. Группировка строк, установка цвета › #0 19.10.15 1:44
Варианты решения некоторых сложностей, которые могут возникнуть при программной выгрузке табличного документа в Excel.
Utils › Менеджер настроек пользователей. Версия 2.0+ › #20 18.01.14 16:28
(14) EpiSH, В форме "Форма" в процедуре "ДобавимКолонкиВДеревоПоКоличествуПользователей"
строку
Код
ПолеВводаХ.ТипЗначения=ТипХ;
нужно закомментировать.
вместо нее вставить
Код
КолонкаХ.Данные = ИмяХ;

Аналогично в процедурах ДобавимКолонкиВДеревоДополнительныхНастроек(),
ДобавимКолонкиВДеревоГруппПользователей()
В начале процедуры "ДеревоНастроекПользовательПриИзменении" добавить строки
Код
ТекДанные = ЭлементыФормы.ДеревоНастроек.ТекущиеДанные;
   ТекДанные[ЭлементыФормы.ДеревоНастроек.ТекущаяКолонка.Имя] = ТекДанные.Настройка.ТипЗначения.ПривестиЗначение(ТекДанные[ЭлементыФормы.ДеревоНастроек.ТекущаяКолонка.Имя]);

Автор, возможно это не последний вариант обработки?
Dev › Вертикальный текст на формах в 1С › #8 10.01.14 20:23
Сори, не обратил внимание, что пост по 7ке, но в 8ке тоже не нашел такого свойства.
Dev › Вертикальный текст на формах в 1С › #7 10.01.14 20:21
В качестве изврата можно предложить разместить на форме поле таб.дока без рамки и с цветом ячеек равным цвету формы(Доступность,ВертикальнаяПолосаПрокрутки, ГоризонтальнаяПолосаПрокрутки, ОтображатьЗаголовки =Ложь; Защита, ТолькоПросмотр=Истина).
Публикации › Управление настройками пользователей › #0 04.09.13 22:22
Просмотр, копирование и удаление системных настроек форм.