Имя: Пароль:
1C
1С v8
Управления торговлей.Как добавить документ в создать на основание?
0 Vyacheslav_UZ
 
29.07.15
13:45
Ут. Нужно в документ1 добавить в создать на основание документ2. В Элементе "Ввод на основание" документы отсутствую, а в пользовательском режиме они есть.
1 lera01
 
29.07.15
13:51
1. Добавь в конфигураторе
2. Критерии отбора рулят структурой подчиненности, которую ты видишь в пользовательском режиме
3. Книгу купи или в коробке поищи :)
2 Vyacheslav_UZ
 
29.07.15
13:53
Уважаемая Лера01 если бы у меня была книжка..
3 lera01
 
29.07.15
13:55
Ты еще скажи, что у тебя интернета нет. Там этих бесплатных обучающих материалов - читать-не перечитать. А если деньги есть, вообще красота.
4 Vyacheslav_UZ
 
29.07.15
14:00
Что сложно сказать. Вот в этой процедуре, в этом модуле можно создать документ на основание программно. Все без "Критерии отбора рулят структурой подчиненности"
5 Molinor
 
29.07.15
14:04
(4) Что сложного вызвать специалиста и заплатить ему денег?
6 Vyacheslav_UZ
 
29.07.15
14:06
В том что я и есть специалист))
7 Goggy
 
29.07.15
14:09
(6) Это ооооочень сомнительное утверждение...
8 Vyacheslav_UZ
 
29.07.15
14:20
Нужно в модуле документе который хотим сделать основанием создать процедуру. Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
    
    Если ТипЗнч(ДанныеЗаполнения) = Тип("Структура") Тогда
        ЗаполнитьЗначенияСвойств(ЭтотОбъект, ДанныеЗаполнения);
    ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ПересчетТоваров") Тогда
        СтруктураРезультат = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(ДанныеЗаполнения, "Статус, Склад");
        Если СтруктураРезультат.Статус <> Перечисления.СтатусыПересчетовТоваров.Выполнено Тогда
            ТекстСообщения = НСтр("ru='Документ ""%ДокументПересчет%"" находится в статусе ""%СтатусПересчета%"". Ввод документа ""%ДокументАкт%"" на основании разрешен только в статусе ""%СтатусВыполнено%"".'");
            ТекстСообщения = СтрЗаменить(ТекстСообщения, "%ДокументПересчет%", ДанныеЗаполнения);
            ТекстСообщения = СтрЗаменить(ТекстСообщения, "%ДокументАкт%", Метаданные.Документы.ПересортицаТоваров.Синоним);
            ТекстСообщения = СтрЗаменить(ТекстСообщения, "%СтатусВыполнено%", Перечисления.СтатусыПересчетовТоваров.Выполнено);
            ТекстСообщения = СтрЗаменить(ТекстСообщения, "%СтатусПересчета%", СтруктураРезультат.Статус);
            ВызватьИсключение ТекстСообщения;
        КонецЕсли;

        ЗаполнитьЗначенияСвойств(ЭтотОбъект, СтруктураРезультат, "Склад");
        Если ЗначениеЗаполнено(Склад) И НЕ СкладыСервер.ИспользоватьОрдернуюСхемуПриОтраженииИзлишковНедостач(Склад, Дата) Тогда
            ПоРезультатамИнвентаризации = Истина;
        КонецЕсли;
    КонецЕсли;
    
    ИнициализироватьДокумент(ДанныеЗаполнения);
    
КонецПроцедуры
Данные которые нужно передать подставлемям сами которые нужно. ВСЁ!
9 Бубка Гоп
 
29.07.15
14:55
(8) Подсказал кто или сам?
10 Andrey2C
 
29.07.15
15:02
(8) Разобрались чтоли? Так и не понятно.
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн