Master Well

104
Рейтинг

WellMaster



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

  •   Был(а) на сайте: вчера в 13:38

Друзья
  • Степан Шокотько
  • dmitri tunik
  • Игорь
  • Вячеслав Гилёв
  • hlor hlor
  • Александр Громцев
  • Кирилл Краснов
  • Дмитрий Малышев
  • Анна ***
  • Денис Шамрай
  • Валерий Борисов
  • Алексей Бобков
  • Андрей Волин
Подписчики 14

Группы

Профессиональный разработчик

Рейтинг 104

Генерация штрихкодов EAN13 и EAN8

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

Генерация штрихкодов EAN13 и EAN8 позволяет генерировать в удобном виде любое количество Штрихкодов для последующего использования, например, в качестве паролей для кассиров на кассах.

1 стартмани

29.07.2009    25252    610    WellMaster    29       

56

Комментарии

ПубликацииПроверка НДФЛ 2023-2024#13 27.04.24 13:46
Отчет обновился 5 апреля 2024 года, а ничего в нем не поменялось. Указанные выше проблемы тем более не решены.
ПубликацииПрофили управления доступом к объектам в любой конфигурации на БСП#6 04.10.23 17:31
(4) Автор так и не удосужился исправить это в статье. Зашел оставить коммент об ошибке, но прочитал ваш.
ЗарплатаДокументы Расчет начислений и Расчет удержаний, для чего они?#8 06.09.23 12:18
(4)
Цитата
(не помню точно названия)
РегистрыСведений.ОперацииРасчетаЗарплаты
DevИзменяется видимость кнопки на форме на клиенте.#9 30.06.23 10:42
Флаг Видимость у кнопок слетает между событиями ПриСозданииНаСервере и ПриОткрытии по причине того, что программно создается элемент формы с типом "ТаблицаФормы":

ЭлементТЧ = ЭтаФорма.Элементы.Добавить("ТЧКаскадов2", Тип("ТаблицаФормы"));

Как минимум, на версии платформы 8.3.18.1483
ОбменПланы обмена 1С#40 08.07.22 16:44
(38) Ознакомился.
Хитро вы конечно решили пропустить этап регистрации объекта к обмену путем того, что сразу сериализуете его в строку JSON и кладете уже в новую очередь. По сути, ТелоСообщения с типом Строка(0) является общим знаменателем в моем вопросе хранения ссылки на ссылочный и нессылочный объект.
И тот факт, что нет бутылочного горлышка, и, как следствие, блокировок, тоже вызывает восхищение.
Остаются сомнения в том, насколько затратна операция сериализации, так сказать, на лету по сравнению с обычной регистрацией в плане обмена. Но раз вы говорите про 1 год работы в РИБ на 300 узлов - поверю на слово.
Еще раз спасибо!
ОбменПланы обмена 1С#39 08.07.22 15:18
(38) Премного благодарен, есть над чем подумать.
ОбменПланы обмена 1С#37 08.07.22 10:09
(36) В вашей статье очень хорошо описана альтернатива плану обменов. Но не акцентировано внимание, что с такими неподчиненными РС это не сработает. Очень надеялся увидеть решение этой задачи, но к сожалению, не увидел.
Хочется понять, как организовано хранение изменений таких РС в ПланеОбмена на уровне платформы.
Спасибо за комментарий и статью в целом!
ОбменПланы обмена 1С#35 07.07.22 17:54
(10) Так в итоге каким образом хранить в нашем РС ссылку на нессылочный объект (регистр сведений, не подчиненный регистратору)? Создавать служебный справочник?
HighLoadОчистка движений по регистру "Резервы товаров организации" за период#7 07.05.21 10:36
Код
&НаСервере
Процедура ОчиститьРегистрНакопленияНаСервере(ИмяРегистра)
   
   РегистрыНакопления[ИмяРегистра].УстановитьИспользованиеИтогов(Ложь);
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ Регистр.Регистратор ИЗ РегистрНакопления." + ИмяРегистра + " КАК Регистр ГДЕ Регистр.Период < &НаДату УПОРЯДОЧИТЬ ПО Регистр.Период ВОЗР";
   Запрос.УстановитьПараметр("НаДату", Объект.НаДату);
   
   РезультатЗапроса = Запрос.Выполнить();
    Выборка = РезультатЗапроса.Выбрать();
    Кол = 0;
    БылиОшибки = Ложь;
    Пока Выборка.Следующий() цикл
      //ОбработкаПрерыванийПользователя();
        Набор = РегистрыНакопления[ИмяРегистра].СоздатьНаборЗаписей();
        Набор.Отбор.Регистратор.Значение = Выборка.Регистратор;
      
      Набор.ДополнительныеСвойства.Вставить("НеПроверятьЛишнееСторно", Истина); // Для "РезервыТоваровОрганизаций"
      
        Попытка
           Набор.Записать();
        Исключение
           БылиОшибки = Истина;
         Сообщить(ОписаниеОшибки());
         Прервать;
        КонецПопытки;
        Кол = Кол + 1;
      //ЕСЛИ Кол % 100 = 0 Тогда
      //    Сообщить("Отработано "+Кол+" документов из "+Выборка.Количество());
      //КонецЕсли;
    КонецЦикла;
   Если БылиОшибки Тогда
       Сообщить("Обработка завершена. Регистр очищен не до конца!!!");
   КонецЕсли;
   РегистрыНакопления[ИмяРегистра].УстановитьИспользованиеИтогов(Истина);
   
КонецПроцедуры

ПубликацииАдаптация под работу Розницы 2.3 с УТМ 4#5 07.04.21 15:33
(4) Есть целая рабочая группа, которая работала над УТМ 4. В нее входили представители разных компаний. До недавнего времени баннер висел на сайте ЕГАИС со ссылкой на файл экселя. Сейчас нет (но скачан). Заинтересованные люди давно знают все.