|
Создание на основании | ☑ | ||
---|---|---|---|---|
0
Petrov93
19.03.14
✎
21:25
|
Написал условие создания на основании в процедуре ОбработкаЗаполнения, но форма документа который создается на основании все равно создается, как убрать это?
|
|||
1
GROOVY
19.03.14
✎
21:29
|
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) Отказ = Истина; КонецПроцедуры |
|||
2
Petrov93
19.03.14
✎
21:33
|
(1) а там как? у меня все описано в процедуре ОбработкаЗаполнения
|
|||
3
Petrov93
19.03.14
✎
21:36
|
СтандартнаяОбработка = Ложь;
ОтказСозданияНаОсновании = Истина; Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда ЗаполнитьПоРасходномуКассовомуОрдеру( ДанныеЗаполнения, ДанныеЗаполнения ); ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда ОтказСозданияНаОсновании = ЗаполнитьПоРеализацииТоваров( ДанныеЗаполнения, ДанныеЗаполнения ); ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("СправочникСсылка.ДоговорыКредитовИДепозитов") Тогда ЗаполнитьПоДоговоруКредитаДепозита( ДанныеЗаполнения, ДанныеЗаполнения ); КонецЕсли; Если ОтказСозданияНаОсновании = Истина Тогда Сообщить("Нет отказа"); ИнициализироватьДокумент(ДанныеЗаполнения); ДенежныеСредстваСервер.ЗаполнитьСтатьюДвиженияДенежныхСредств( ЭтотОбъект, ДанныеЗаполнения, Перечисления.ХозяйственныеОперации.ПоступлениеОплатыОтКлиента ); // Заполнение строки "В т.ч. НДС". Если ТипЗнч(ДанныеЗаполнения) = Тип("Структура") И ДанныеЗаполнения.Свойство("СуммаДокумента") Тогда СуммаДокумента = ДанныеЗаполнения.СуммаДокумента; КонецЕсли; Если СуммаДокумента <> 0 Тогда Если ТипЗнч(ДанныеЗаполнения) = Тип("Структура") И ДанныеЗаполнения.Свойство("Валюта") Тогда Валюта = ДанныеЗаполнения.Валюта; КонецЕсли; МассивДокументов = РасшифровкаПлатежа.Выгрузить(,"Заказ").ВыгрузитьКолонку("Заказ"); МассивДокументов.Добавить(ДокументОснование); ВТомЧислеНДС = ДенежныеСредстваСервер.ТекстСуммаНДСПлатежа( СуммаДокумента, Валюта, МассивДокументов, Ложь, // ДобавлятьТекстВТомЧисле Истина // ОплатаОтКлиента ); КонецЕсли; ОтветственныеЛицаСервер.ЗаполнитьОтветственныхЛицДокумента(ЭтотОбъект); КонецЕсли; |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |