Абзалов mdbm

190
Рейтинг

mdbm



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

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

Друзья
  • steban
Подписчики 3
Группы

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

Рейтинг 190

Гороскоп на каждый день
+8 –

Инструменты и обработки Системный администратор Программист Платформа 1С v7.7 Конфигурации 1cv7 Windows Абонемент ($m) Внешняя обработка (ert,epf) WEB-интеграция

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

1 стартмани

20.01.2010    15082    8    mdbm    18       

8

"Быстрый" выбор периода в журнале
+14 –

Статья Программист Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Бесплатно (free) Нет файла Универсальные функции

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

09.12.2009    12061    mdbm    11       

14

Временные константы
+2 –

Инструменты и обработки Программист Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Абонемент ($m) Конфигурация (md, cf) Математика и алгоритмы

Создаем альтернативу штатным константам 1С 7.7 Необходимо: 1. Добавить один справочник. 2. Добавить одно перечисление 3. Добавить одну функцию в глобальный модуль.

1 стартмани

09.12.2009    15112    39    mdbm    3       

2

Консоль (7.7)
+36 –

Инструменты и обработки Программист Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Россия Абонемент ($m) Внешняя обработка (ert,epf) Инструментарий разработчика

Предлагаю вашему вниманию консоль для программирования в среде 1С. Теперь для выполнения коротких разовых задач необязательно заходить в конфигуратор. 1.Запускаешь консоль 2.Пишешь свой код 3.Нажимаешь Выполнить. Требование: 1С++ (со встроеным FormEx) должна быть уже загружена 1sci.dll грузится ПриОткрытии() В архиве на всякий случай выложил все необходимое: 1cpp.dll (от 5 декабря 2008 г., 1:30:26) 1sci.dll (от 5 августа 2008 г., 13:32:42) Ссылки: 1sci.dll http://infostart.ru/projects/4443/ 1cpp.dll http://www.1cpp.ru/ Огромное спасибо steban http://infostart.ru/profile/1746/

1 стартмани

24.06.2009    26714    224    mdbm    26       

36

Универсальная обработка "Поиск и замена значений реквизитов в документах"
+75 –

Инструменты и обработки Системный администратор Программист Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Windows Абонемент ($m) Внешняя обработка (ert,epf) Чистка данных Поиск данных Корректировка данных

Предлагаю вашему вниманию новую универсальную обработку Назначение: Поиск и замена по всем документам 1С базы, значения любого реквизита.

1 стартмани

16.03.2009    34361    2729    mdbm    61       

75

Гибкое администрирование прав пользователей на редактирование реквизитов
+4 –

Инструменты и обработки Программист Платформа 1С v8.3 Конфигурации 1cv8 Россия Бесплатно (free) Архив с данными Универсальные функции Роли и права

Если вам необходимо для каждого пользователя 1С установить персональные права на редактирование определенного реквизита формы справочника (документа), то данная технология возможно станет для вас отправной точкой.

21.01.2009    15837    152    mdbm    6       

4

РЕКВ.ЕДИТОР (Универсальный редактор реквизитов справочников)
+29 –

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

Универсальный редактор реквизитов справочников +Печать с возможностью группировки +Возможность создания сложноподчиненных фильтров +Тест значений реквизитов на дублеров +Групповое заполнение реквизитов upd +Поиск и замена +Динамическое заполнение

1 стартмани

08.12.2008    30079    112    mdbm    30       

29

Универсальный конструктор запросов по документам. (Версия 1.0)
+22 –

Инструменты и обработки Программист Оперативный учет 7.7 Бухгалтерский учет 7.7 Расчет 7.7 Конфигурации 1cv7 Windows Бесплатно (free) Внешняя обработка (ert,epf) Инструментарий разработчика

Универсальный конструктор запросов по документам.

08.12.2008    16795    373    mdbm    11       

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

Комментарии

ВК › Пример генерации штрих-кода для документов, справочников и его расшифровка › #51 24.11.22 9:47
(50) Проблема в том что у меня 64-битная платформа. Решение описал тут: http://forum.infostart.ru/forum15/topic47743/message2906199/#message2906199
Обмен › Генерация и печать штрих кодов для регистрационных и дисконтных карт › #10 24.11.22 9:44
(9)
Проблема была в том что у меня 64-битная платформа.
В форме построителя компонента не подключалась.
Код
Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
   Попытка
      КомпонентаШК = Новый COMОбъект("V8.Barcod.1");
   Исключение
      КомпонентаШК = Неопределено;
      Сообщить("Не установлена компонента 1С:Печать штрихкодов.");
   КонецПопытки;
   Построитель.Текст =  ТекстПостроителя();
   
КонецПроцедуры


Попробовал заменить строку регистрации компоненты на альтернативную, взятую отсюда https://infostart.ru/1c/articles/943944/

Код
Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)
   Попытка
      КомпонентаШК = ПодключитьВнешнююКомпонентуПечатиШтрихкода();
   Исключение
      КомпонентаШК = Неопределено;
      Сообщить("Не установлена компонента 1С:Печать штрихкодов.");
   КонецПопытки;
   Построитель.Текст =  ТекстПостроителя();
   
КонецПроцедуры


И это повлекло за собой цепочку проблем, в том числе и ту, которую я опубликовал в предыдущем сообщении #9

Немного подшаманил ваш код, опять таким руководствуясь этой публикации https://infostart.ru/1c/articles/943944/
В модуле построителя:

Код
Процедура КнопкаВыполнитьНажатие(Кнопка)
   Запрос = Построитель.ПолучитьЗапрос();
   Выборка = Запрос.Выполнить().Выбрать();
   Таб = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("РегистрационнаяКарта");
   инд = 1;
   Пока Выборка.Следующий() Цикл
      ОбластьМакета = Макет.ПолучитьОбласть("Карта");
      ШК = Выборка.КодКарты;         
      //ТипКода = ПолучитьЗначениеТипаШтрихкодаДляЭУ(Выборка.ТипШтрихкода);
      ОбластьМакета.Параметры.ФИО = Выборка.ВладелецКарты;
      Если РаботаСТорговымОборудованием.ПроверитьШтрихКод(ШК, Выборка.ТипШтрихкода) Тогда
         //ОбластьМакета.Рисунки.Штрихкод.Объект.ТипКода = ТипКода;
         //ОбластьМакета.Рисунки.Штрихкод.Объект.Сообщение = ШК;          
         РисунокШтрихкодаИсточник=ОбластьМакета.Рисунки.ШтрихКод;
         
         РисунокШтрихкода = ОбластьМакета.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
         РисунокШтрихкода.Верх = РисунокШтрихкодаИсточник.Верх;
         РисунокШтрихкода.Лево = РисунокШтрихкодаИсточник.Лево;
         РисунокШтрихкода.Высота = РисунокШтрихкодаИсточник.Высота;
         РисунокШтрихкода.Ширина = РисунокШтрихкодаИсточник.Ширина;
         РисунокШтрихкода.Имя = РисунокШтрихкодаИсточник.Имя;
         РисунокШтрихкода.Линия = РисунокШтрихкодаИсточник.Линия;
         РисунокШтрихкода.РазмерКартинки = РазмерКартинки.Растянуть;
         
         ОбластьМакета.Рисунки.Удалить(РисунокШтрихкодаИсточник);
         
         ПараметрыШтрихкода = Новый Структура;
         ПараметрыШтрихкода.Вставить("Ширина", РисунокШтрихкодаИсточник.Ширина);
         ПараметрыШтрихкода.Вставить("Высота", РисунокШтрихкодаИсточник.Высота);
         ПараметрыШтрихкода.Вставить("Штрихкод", ШК);
         ПараметрыШтрихкода.Вставить("ТипКода", 1);
         ПараметрыШтрихкода.Вставить("МонохромныйШрифт", Истина);
         ПараметрыШтрихкода.Вставить("ОтображатьТекст", Истина);
         ПараметрыШтрихкода.Вставить("РазмерШрифта", 10);
         ПараметрыШтрихкода.Вставить("Масштабировать", Истина);
         ПараметрыШтрихкода.Вставить("СохранятьПропорции", Истина);
         
         РисунокШтрихкода.Картинка= ПолучитьКартинкуШтрихкода(ПараметрыШтрихкода); 
                        //https://infostart.ru/1c/articles/943944/
                  
      Иначе
         ОбластьМакета.Рисунки.Очистить();
      КонецЕсли;
      Если инд = 1 Тогда
         Таб.Вывести(ОбластьМакета);
         Инд = 2;
      Иначе
         Таб.Присоединить(ОбластьМакета);
         инд = 1;
      КонецЕсли;
   КонецЦикла;
   Таб.Защита = Ложь;
   Таб.ТолькоПросмотр = Истина;
   Таб.ОтображатьСетку = Ложь;
   Таб.ОтображатьЗаголовки = Ложь;
   Таб.Показать();
КонецПроцедуры


и обработка печати заработала теперь и на 64-битной платформе.
(см. рисунок)

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

Error003.jpg
ВК › Пример генерации штрих-кода для документов, справочников и его расшифровка › #50 24.11.22 9:12
Код
Поле объекта не обнаружено (ТипКода)

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

Error002.jpg
Обмен › Генерация и печать штрих кодов для регистрационных и дисконтных карт › #9 24.11.22 8:44
Исключительная ошибка на выделенной строке.
Код
Поле объекта не обнаружено (ТипКода)

Обратите внимание на макет.

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

Error001.jpg
Обмен › Перенос данных. Правила конвертации из УТ 10.3 в БП 3.0 › #119 18.11.22 13:39
Купил не глядя и затем обнаружил что в списке доступных к выгрузке видов документов нет Авансовых отчетов.
Уважаемый автор, вы могли бы добавить Авансовые отчеты в правила обмена ?
Dev › Групповое изменение цены в документах реализации › #9 13.07.22 15:17
Для случая если тип цен динамический, лучше так:

Код
 
Если Себестоимость = Истина Тогда
              Нов_цена = ПоСебестоимости(Док, ТекТовар);
           Иначе
              Нов_цена = Ценообразование.ПолучитьЦенуНоменклатуры(ТекТовар,,ТипЦены,Док.Дата,СтрокаТовар.ЕдиницаИзмерения);
              //Нов_цена = ПоТипу(Док, ТекТовар);
           КонецЕсли;
Dev › Настройка табличного документа для вывода на печать в 1С › #5 11.07.19 15:25
Присоединяюсь к (4)
Торговля › Прайс-лист с остатками. БП 3.0 › #9 19.01.18 10:01
У меня тоже скачался отчет по продажам!!! вместо прайс-листа
HighLoad › Универсальная обработка "Поиск и замена значений реквизитов в документах" › #61 01.11.13 12:55
При замене контрагента, договор в документе (если имеется такой реквизит) может остаться от старого контрагента, а так как у них (у договоров) названия как правило совпадают "Основной договор", то вы можете и не обратить внимания на это и движения будут садиться на другой договор. Но иногда именно так и нужно. Так что при замене контрагентов, при необходимости, можно вторым проходом заменить договоры - если это нужно.


HighLoad › Универсальная обработка "Поиск и замена значений реквизитов в документах" › #59 26.10.13 12:49
Да. Но можно эту возможность отключить если надо. Главное надо быть внимательным с договорами, если вы меняете контрагентов.