Распределение новых документов по времени. Расширение для БП 3.0

15.11.17

Задачи пользователя - Адаптация типовых решений

–

В качестве примера для начинающих. Затронуты документы Поступление товаров и услуг, Требование-накладная. Остальные можно добавить по вкусу. Протестировал на платформе 8.3 (8.3.10.2650), Конфигурация Бухгалтерия предприятия, редакция 3.0 (3.0.54.15).

Скачать исходный код

	Наименование	Файл	Версия	Размер
	Расширение БП3.0 Распределение новых документов по времени: .cfe 5,08Kb 4	.cfe	1.0	5,08Kb	4	Скачать

Одному из клиентов потребовалось распределять Поступление товаров и услуг, а также Требования накладные в разное время. Поступления - на начало дня, Требования в конец дня.

Добавил общий модуль в расширении ФиксированноеВремяДокументов как Заимствованный

&После("УстановитьВремяНовогоДокумента")
Процедура Распред_УстановитьВремяНовогоДокумента(Источник,Отказ) Экспорт
    
    Если Источник.ЭтоНовый() Тогда
        
        Если Источник.ОбменДанными.Загрузка Тогда
            Возврат;
        КонецЕсли;
        
        Если НЕ ПолучитьФункциональнуюОпцию("ФиксированноеВремяВДокументах") Тогда
            Возврат;
        КонецЕсли;
        
        Если Источник.Метаданные().Имя="ПоступлениеТоваровУслуг" Тогда
            Источник.Дата  = НачалоДня(Источник.Дата)+7*60*60;
        ИначеЕсли Источник.Метаданные().Имя="ТребованиеНакладная" Тогда
            Источник.Дата  = КонецДня(Источник.Дата)-5*60*60;
        КонецЕсли;
        
    КонецЕсли;
    
КонецПроцедуры

Расширение конфигурации Бухгалтерия предприятия 3.0

–

См. также

Табличная часть в доп. реквизитах и формирование таблиц в шаблоне docx для 1С:ДО 3.0

Адаптация типовых решений Платформа 1С v8.3 1С:Документооборот Россия Платные (руб)

Расширение конфигурации для «1С:Документооборот КОРП», редакция 3.0. позволяет: 1.использовать произвольные табличные части в качестве дополнительных реквизитов к документу; 2 использовать произвольные табличные части в шаблонах в формате docx для автоматического заполнения таблиц.

29400 руб.

29.06.2023 4612 9 4

Расширение для 1С:УНФ. Автоматическое снятие резервов в Заказах покупателей

Логистика, склад и ТМЦ Адаптация типовых решений Платформа 1С v8.3 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Россия Управленческий учет Платные (руб)

Чтобы не допустить путаницы с обещаниями клиентам и для четкого контроля исполнения заказов мы используем резервирование товаров. Мы доработали УНФ, чтобы она автоматически отменяла старые резервы и не мешала эффективно продавать.

7200 руб.

02.08.2023 3038 4 0

Вывод факсимиле в табличные документы (УПД, УКД, счет-фактура и др.) для УТ 11.5, КА 2.5, ERP 2.5, УНФ 3, Розница 3

Печатные формы Адаптация типовых решений Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Расширение позволяет вывести в табличном документе факсимиле печати и подписей и/или вывести произвольную картинку из прикреплённых файлов организации.

2400 руб.

07.02.2023 5154 58 10

Отгрузка заказа клиента в 1 клик для УТ 11.5, КА 2.5, ERP 2.5

Адаптация типовых решений Создание на основании Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Расширение позволяет в 1 клик поставить весь состав заказа клиента в отгрузку и открыть заполненные формы документов отгрузки по заказу.

2400 руб.

25.08.2023 1003 3 0

Вес и объем в документах «Заказ поставщику» и «Заказ покупателя»

Адаптация типовых решений Логистика, склад и ТМЦ Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Теперь вывод весо-объемных характеристик в документы «Заказ поставщику» и «Заказ покупателя» возможен – наше расширение поможет в этом Вам!

2400 руб.

03.08.2023 1624 2 0

Создать на основании - своя кнопка (БСП). Проблема двух подменю Создать на основании

БСП (Библиотека стандартных подсистем) Адаптация типовых решений Платформа 1С v8.3 1С:ERP Управление предприятием 2 Бесплатно (free)

Понадобилось в подменю "Создать на основании" добавить свою команду, которая открывает обработку. В процессе доработок появилась проблема двух подменю "Создать на основании". В статье о том, как решились проблемы.

01.03.2024 1649 dimanich70 8

Доработка отчета "Связанные документы" (структура подчиненности) для вывода объектов из любого расширения

Адаптация типовых решений Платформа 1С v8.3 1С:Управление торговлей 11 Россия Абонемент ($m)

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

1 стартмани

27.10.2023 2091 19 avmartynov 14

Печать непроведенных документов для УТ, КА, ERP. Настройка печати по пользователям, документам и печатным формам

Пакетная печать Печатные формы Адаптация типовых решений Универсальные функции Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Абонемент ($m)

Расширение для программ 1С:Управление торговлей, 1С:Комплексная автоматизация, 1С:ERP, которое позволяет распечатывать печатные формы для непроведенных документов. Можно настроить, каким пользователям, какие конкретные формы документов разрешено печатать без проведения документа.

2 стартмани

22.08.2023 2197 24 progmaster 7

Комментарии

Подписаться на ответы

Свернуть все

1. silberRus 72 17.11.17 09:19 Сейчас в теме

А почему используется имя метаданного, вот так:

Источник.Метаданные().Имя="ПоступлениеТоваровУслуг"

Метод Метаданные() он же более медленный чем определение типа.
Можно например:

ТипЗнч(Источник) = Тип("ДокументОбъект.ПоступлениеТоваровУслуг")

2. МимохожийОднако 141 17.11.17 14:57 Сейчас в теме

(1) Спасибо. Так и сделал.

&После("УстановитьВремяНовогоДокумента")
Процедура Распред_УстановитьВремяНовогоДокумента(Источник,Отказ) Экспорт

Если Источник.ЭтоНовый() Тогда

Если Источник.ОбменДанными.Загрузка Тогда
Возврат;
КонецЕсли;

Если НЕ ПолучитьФункциональнуюОпцию("ФиксированноеВремяВДокументах") Тогда
Возврат;
КонецЕсли;

Если ТипЗнч(Источник) = Тип("ДокументОбъект.ПоступлениеТоваровУслуг") Тогда

Источник.Дата = НачалоДня(Источник.Дата)+7*60*60;
ИначеЕсли ТипЗнч(Источник) = Тип("ДокументОбъект.ТребованиеНакладная") Тогда
Источник.Дата = КонецДня(Источник.Дата)-5*60*60;
КонецЕсли;

КонецЕсли;

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