73
Рейтинг

FilippovRI



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

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

Друзья
  • Евгений _
  • Валентин Бомбин
  • Владимир Иванов
  • Дионисий Милославский
  • Fernando Torres
  • Шама Бубнов
  • Сергей
  • Дмитрий Малышев
  • Виталий Ангелов
  • Дмитрий Петров
  • Вадим Казнин
  • ce ce
  • Андрей Евтюгин
  • ольга иванова
  • Флориан Каретин
  • Владимир Романов
Подписчики 19

Группы

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

Рейтинг 73

Загрузка данных из файлов Автопредприятия 10 в Бухгалтерию 3.0

Инструменты и обработки Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Абонемент ($m) Расширение (cfe) Файловый обмен (TXT, XML, DBF), FTP

Обработка предназначена для загрузки данных из файлов, полученных при выгрузке из "Автопредприятия 10". Перед тем, как произвести загрузку в 1С, необходимо сделать выгрузку в каталог, откуда 1С будет забирать и считывать файлы. В самой обработке дублируется инструкция по использованию. Обработка парсит данные из текстовых документов без использования внешних компонент.

1 стартмани

24.11.2022    1652    1    FilippovRI    2       

2

Генерация этикеток 60 х 30 на коробки

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

Обработка для генерации номеров коробок формата 60 на 30 для обычных и управляемых форм.

1 стартмани

17.01.2022    1558    1    FilippovRI    2       

4

Оборачиваемость товаров на СКД. УТ 10.3

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

Внешний отчет оборачиваемости с периодичностью в день. В отличие от типового отчета сделан полностью на СКД. Выводит стоимость и количество.

2 стартмани

10.03.2021    2381    16    FilippovRI    0       

3

Групповое утверждение и расчет кадровых документов. ЗУП 3.1.11

Инструменты и обработки Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и Управление Персоналом 3.x Бухгалтерский учет Абонемент ($m) Архив с данными Зарплата Кадровый учет

Обработка предназначена для группового утверждения и расчета документов: Отпуск, Отпуск сотрудников списком, Отпуск без сохранения, Отпуск без сохранения списком, Командировка, Командировка списком.

1 стартмани

06.03.2020    2549    18    FilippovRI    2       

3

Комментарии

DevПриложение к диплому на языке программирования 1С#1 28.05.24 22:57
А вопросов у преподавателей по типу "А в чем преимущество существующей конфигурации перед существующими?" не было)?
DevПрикрепленные файлы система взаимодействия#7 26.04.24 23:11
Код
Обсуждение = СистемаВзаимодействия.ПолучитьОбсуждение(Сообщение.Обсуждение);
   
   
   Ответ = СистемаВзаимодействия.СоздатьСообщение(Обсуждение.Идентификатор); 
      
   ВложенияТекущегоОбсуждения = Сообщение.Вложения.Получить(0);
   Ответ.Текст = "Ваше сообщение обрабатывается " + Строка(ВложенияТекущегоОбсуждения.Размер); 
   
   Поток = ВложенияТекущегоОбсуждения.ОткрытьПотокДляЧтения(); 
   Чтение = Новый ЧтениеДанных(Поток);
   ДвоичныеДанныеВложения = Чтение.Прочитать().ПолучитьДвоичныеДанные();
   
   Имяфайла = ПолучитьИмяВременногоФайла(".png");
   ДвоичныеДанныеВложения.Записать(Имяфайла); 
   НовыйПоток = ФайловыеПотоки.ОткрытьДляЧтения(Имяфайла); 
   Ответ.Вложения.Добавить(НовыйПоток,    "test.png", "image/png"); 
      
   Ответ.Записать();
   Поток.Закрыть();
   НовыйПоток.Закрыть();   
   УдалитьФайлы(Имяфайла);   
ОбменГрупповая выгрузка присоединенных файлов. Бухгалтерия предприятия 3.0#0 13.12.23 22:35
Обработка предназначена для групповой выгрузки присоединенных файлов к объектам конфигурации БП 3.0.
DevГрупповое заполнение реквизитов по ИНН с подключенным сервисом 1С:Контрагент#2 11.09.23 10:21
(1) Не проверял. Но можно попробовать вкрутить, БСП то одна
ОбменЗагрузка данных из файлов Автопредприятия 10 в Бухгалтерию 3.0#2 05.06.23 16:14
(1) какая версия?, Сформировать и прислать отчет о непредвиденной ошибке можете?
DevКрасивый и адаптивный дизайн мобильного приложения#20 23.05.23 8:44
красавчик) спасибо за статью.
БСПДобавить поле адреса в свой документ, используя БСП виды контактной информации#5 10.04.23 16:59
Создадим новую внешнюю обработку
Добавим два реквизита: Представление и Адрес
На Форме обработки разместим Адрес с видом "Надпись" и поставим флаг "Гиперссылка"


Код
&НаКлиенте
Процедура АдресНажатие(Элемент)
   
   ВидАдреса = ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.АдресПоПропискеФизическиеЛица");
   РедактироватьАдрес(Элемент, ВидАдреса);
   
КонецПроцедуры

&НаКлиенте
Процедура РедактироватьАдрес(Элемент, ВидАдреса)
   
   ОписаниеОповещения = Новый ОписаниеОповещения(
   "АдресНажатие_Завершение", 
   ЭтотОбъект, 
   Элемент);
   
   ПараметрыОткрытия = УправлениеКонтактнойИнформациейКлиент.ПараметрыФормыКонтактнойИнформации(ВидАдреса, ЭтотОбъект[Элемент.Имя]);
   ПараметрыОткрытия.Вставить("ТолькоПросмотр", Ложь);
   
   УправлениеКонтактнойИнформациейКлиент.ОткрытьФормуКонтактнойИнформации(ПараметрыОткрытия, , ОписаниеОповещения);
   
КонецПроцедуры


&НаКлиенте
Процедура АдресНажатие_Завершение(Результат, Элемент) Экспорт
   
   Если Результат = Неопределено Тогда
      Возврат;
   КонецЕсли;
   
   Адрес         = Результат.КонтактнаяИнформация;
   Представление = Результат.Представление;
   Элемент.Заголовок       = Представление;
   ЭтотОбъект[Элемент.Имя] = Результат.КонтактнаяИнформация;

     // Расскоменнтировать если нужно сохранять настройку
    //Сохранить();
   
КонецПроцедуры

Ну и в случае если нам нужно где то сохранять и загружать адрес, задействуем обработчик ПриСозданииНаСервере и расскоментировать //Сохранить()

Код
&НаСервере
Процедура Сохранить() 
   КлючОбъекта  = "ОбработкаВводаАдреса";
   КлючНастроек = "ВводАдреса";
   Настройки  = Новый Структура("Адрес,Представление", Адрес,Представление);
   ОбщегоНазначения.ХранилищеОбщихНастроекСохранить(КлючОбъекта, КлючНастроек, Настройки,,ИмяПользователя());
   
КонецПроцедуры  



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


&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
   Восстановить();
КонецПроцедуры
MobileDevПакет обновлений SimpleUI. Апрель 2023#1 05.04.23 22:19
Не релиз а релизище). Круто, спасибо!
DevПоле адреса в своем справочнике на примере 1С:Бухгалтерия 3#9 30.03.23 18:32
Пример для обработки
Два реквизита формы
Адрес и ПредставлениеАдреса с типом строка
На самой форме выведен Адрес - надпись с флагом гиперссылка

Код
&НаКлиенте
Процедура АдресНажатие(Элемент)
   
   ВидАдреса = ПредопределенноеЗначение("Справочник.ВидыКонтактнойИнформации.АдресПоПропискеФизическиеЛица");
   РедактироватьАдрес(Элемент, ВидАдреса);
   
КонецПроцедуры

&НаКлиенте
Процедура РедактироватьАдрес(Элемент, ВидАдреса)
   
   ОписаниеОповещения = Новый ОписаниеОповещения(
   "АдресНажатие_Завершение", 
   ЭтотОбъект, 
   Элемент);
   
   ПараметрыОткрытия = УправлениеКонтактнойИнформациейКлиент.ПараметрыФормыКонтактнойИнформации(ВидАдреса, ЭтотОбъект[Элемент.Имя]);
   ПараметрыОткрытия.Вставить("ТолькоПросмотр", Ложь);
   
   УправлениеКонтактнойИнформациейКлиент.ОткрытьФормуКонтактнойИнформации(ПараметрыОткрытия, , ОписаниеОповещения);
   
КонецПроцедуры


&НаКлиенте
Процедура АдресНажатие_Завершение(Результат, Элемент) Экспорт
   
   Если Результат = Неопределено Тогда
      Возврат;
   КонецЕсли;
   
   Адрес         = Результат.КонтактнаяИнформация;
   Представление = Результат.Представление;
   Элемент.Заголовок       = Представление;
   ЭтотОбъект[Элемент.Имя] = Результат.КонтактнаяИнформация;

   Сохранить();
   
КонецПроцедуры


&НаСервере
Процедура Сохранить() 
   КлючОбъекта  = "ОбработкаВводаАдреса";
   КлючНастроек = "ВводАдреса";
   Настройки  = Новый Структура("Адрес,Представление", Адрес,Представление);
   ОбщегоНазначения.ХранилищеОбщихНастроекСохранить(КлючОбъекта, КлючНастроек, Настройки,,ИмяПользователя());
   
КонецПроцедуры  



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


&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
   Восстановить();
КонецПроцедуры
ПубликацииЗаполнение поля адреса в своей обработке [БСП]#0 30.03.23 18:04
Небольшая шпаргалка по функциям БСП касательно адреса. Так скажем, еще один способ помимо https://infostart.ru/1c/articles/1060970/