Nikolaenko Evgeniy

23
Рейтинг

DrBlack



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

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

Друзья
  • Сергей Антипов
  • Алексей Белый
  • Евгений Кредько
  • Dmitry Vidmanov
  • Дмитрий Малышев
  • Евгений Комиссаров
  • Сергей
  • Андрей Волин
Подписчики 8
Группы

Рейтинг 23

Разузловка номенклатуры запросом по спецификации
+8 –

Инструменты и обработки Программист Платформа 1С v8.3 1С:Управление производственным предприятием Бухгалтерский учет Управленческий учет Абонемент ($m) Внешняя обработка (ert,epf) Запросы

Разузловка номенклатуры предназначена только для наглядного просмотра (имеет возможность нескольких вариантов вывода). Сам процесс разузловки реализован одним запросом к БД, что позволяет выигрывать в скорости дабы не раздражать пользователя. Возможно вам необходим только код запроса, я его опубликовал ниже.

2 стартмани

26.07.2016    9255    33    DrBlack    6       

8

Автоматическое создание характеристик номенклатуры в 1С
+7 –

Инструменты и обработки Для всех Платформа 1С v8.3 1С:Управление производственным предприятием Россия Windows Абонемент ($m) Внешняя обработка (ert,epf) Логистика, склад и ТМЦ

Обработка "Автоматическое создание характеристик номенклатуры в 1С" решит проблему множественного создания характеристик для схожих товарных позиций. Обработка будет полезна: 1. Интернет-магазинам 2. Магазинам одежды 3. Торговым предприятиям

1 стартмани

19.02.2014    12411    69    DrBlack    14       

7

Расчет сверхурочных к выплате по сотрудникам (8.2)
+8 –

Отчеты и формы Бухгалтер Платформа 1С v8.3 1С:Управление производственным предприятием Абонемент ($m) Внешняя обработка (ert,epf) Зарплата

Данная обработка позволяет по сотрудникам вычислять отработанные часы "По Факту", "По Плану", "Сверхурочные", "Оплаченные" и "К Оплате"

1 стартмани

21.03.2012    7110    155    DrBlack    10       

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

Комментарии

Dev › Приведение ссылки к структуре значений простых типов › #5 08.07.21 16:10
Может кому понадобится:
Код
Функция ПреобразоватьСсылкуВСтруктуру(СсылкаНаОбъект) Экспорт
   
   #Если _ Тогда
      СсылкаНаОбъект = Справочники.ШаблоныСообщений.ПустаяСсылка();
   #КонецЕсли
   
   СтруктураВозврат = Новый Структура;
   МетаданныеСсылки = СсылкаНаОбъект.Метаданные();   
   
   Для Каждого ТекРекв Из МетаданныеСсылки.СтандартныеРеквизиты Цикл
      СтруктураВозврат.Вставить(ТекРекв.Имя, СсылкаНаОбъект[ТекРекв.Имя]);
   КонецЦикла;
   
   Для Каждого ТекРекв Из МетаданныеСсылки.Реквизиты Цикл
      СтруктураВозврат.Вставить(ТекРекв.Имя, СсылкаНаОбъект[ТекРекв.Имя]);
   КонецЦикла;
   
   Для Каждого ТекТЧ Из МетаданныеСсылки.ТабличныеЧасти Цикл      
      МассивСтруктур = Новый Массив;      
      Для Каждого ТекСтр Из СсылкаНаОбъект[ТекТЧ.Имя] Цикл         
         СтруктураСтрокиТЧ = Новый Структура;         
         Для Каждого ТекРекв Из МетаданныеСсылки.ТабличныеЧасти[ТекТЧ.Имя].Реквизиты Цикл
            СтруктураСтрокиТЧ.Вставить(ТекРекв.Имя, ТекСтр[ТекРекв.Имя]);
         КонецЦикла;         
         МассивСтруктур.Добавить(СтруктураСтрокиТЧ);         
      КонецЦикла;      
      СтруктураВозврат.Вставить(ТекТЧ.Имя, МассивСтруктур);      
   КонецЦикла;
   
   Возврат СтруктураВозврат;
   
КонецФункции
Dev › В форме выбора групп чтоб был доступен только первый уровень › #7 06.05.21 16:09
(5)
Цитата
пустаяГруппа

Это лишняя серверная функция, проще уж так:
Код
ПредопределенноеЗначение("Справочник.Номенклатура.ПустаяСсылка");
Публикации › Уведомление о просроченной дебиторской задолженности (ERP 2.4, ERP 2.5, КА 2.4, УТ 11.4) › #3 17.12.20 9:44
(2) Похоже у нас появится такая аббревиатура Х)
БСП › Как отключить пользовательский префикс в БП 3.0.80.36? › #12 15.12.20 11:18
(11) Ну это само собой, я просто не понимал где это надо поправить :)
БСП › Как отключить пользовательский префикс в БП 3.0.80.36? › #10 14.12.20 16:05
(9)
Всё верно, помог глобальный поиск по "АР" в общих модулях, по этому перечислять их имена не буду.
БСП › Как отключить пользовательский префикс в БП 3.0.80.36? › #8 14.12.20 14:08
(4) Стандартный.
БСП › Как отключить пользовательский префикс в БП 3.0.80.36? › #1 11.12.20 16:42
Доброе время суток, Коллеги!

Столкнулись с одной бедой, при одностороннем обмене УНФ -> БП коверкается номер.
Т.е. из номера "ЛБНФ-013361" он становится "ЛБНФ-АР3361".
От куда он взялся вообще и как можно убрать эти "АР"?

У нас документы в потолок упёрлись )))

Прикрепленные файлы:

000.PNG
Dev › Жадина с рюкзаком, или немножко о поиске лучшей жизни › #36 04.12.20 13:42
Могли бы уж и привести пример :)
Код
Функция СортироватьВОбратнуюСторону(МассивЗначений)
   
   СписокЗначений = Новый СписокЗначений;
   СписокЗначений.ЗагрузитьЗначения(МассивЗначений);
   СписокЗначений.СортироватьПоЗначению(НаправлениеСортировки.Убыв);
   
   Возврат СписокЗначений.ВыгрузитьЗначения();
   
КонецФункции
Публикации › Мина замедленного действия в методе 1С8 «НайтиСтроки», и ... разминирование. › #112 21.10.20 16:05
(111)
Цитата
Во-первых, Скопировать можно сразу с отбором.
Согласен, но это не критично, так легло просто :)

(111)
Цитата
Во-вторых, это не решение, потому что результатом должен быть массив строк искомой таблицы значений
Без проблем, ещё четыре строчки дописать:
Код
МассивСтрок = Новый Массив;
Для Каждого ТекСтр Из ТЗ_Буф Цикл
    МассивСтрок.Добавить(ТекСтр);
КонецЦикла;
Публикации › Мина замедленного действия в методе 1С8 «НайтиСтроки», и ... разминирование. › #110 21.10.20 15:46
Очень много текста, не осилил, решена проблема или нет, но вот на всякий случай:
Код
#Если _ Тогда
   ДокСсылка     = Документы.РасходнаяНакладная.ПустаяСсылка();
   НоменклСсылка = Справочники.Номенклатура.ПустаяСсылка();
#КонецЕсли

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|   РасходнаяНакладнаяЗапасы.НомерСтроки КАК НомерСтроки,
|   РасходнаяНакладнаяЗапасы.Номенклатура КАК Номенклатура
|ИЗ
|   Документ.РасходнаяНакладная.Запасы КАК РасходнаяНакладнаяЗапасы
|ГДЕ
|   РасходнаяНакладнаяЗапасы.Ссылка = &ДокСсылка
|
|УПОРЯДОЧИТЬ ПО
|   НомерСтроки";
Запрос.УстановитьПараметр("ДокСсылка", ДокСсылка);

Результат = Запрос.Выполнить();
Если Результат.Пустой() Тогда
   Возврат;
КонецЕсли;

ТЗ = Результат.Выгрузить();

НайдСтроки = ТЗ.НайтиСтроки(Новый Структура("Номенклатура", НоменклСсылка));

ТЗ_Буф = ТЗ.Скопировать(НайдСтроки);
ТЗ_Буф.Сортировать("НомерСтроки Возр");