<ПравилаОбмена> <ВерсияФормата РежимСовместимости="РежимСовместимостиСБСП21">2.01 <Ид>793200ff-f659-46ee-a24a-f015a5ca20cb <Наименование>Правила обмена УТ 11.5 - БП 3.0 v.1.1.0 (Османов) <ДатаВремяСоздания>2023-08-22T11:34:08 <Источник ВерсияПлатформы="8.0" ВерсияКонфигурации="11.5.7.269" СинонимКонфигурации="Управление торговлей, редакция 11">УправлениеТорговлей <Приемник ВерсияПлатформы="8.0" ВерсияКонфигурации="3.0.30.15" СинонимКонфигурации="Бухгалтерия предприятия, редакция 3.0">БухгалтерияПредприятия 3.0 (Османов) <ПередПолучениемИзмененныхОбъектов>Параметры.Вставить("УзелДляОбменаСсылка", УзелДляОбмена.Ссылка); Параметры.Вставить("УзелИспользоватьОтборПоОрганизации", УзелДляОбмена.ИспользоватьОтборПоОрганизациям); Параметры.Вставить("УзелДатаНачалаВыгрузкиДокументов", УзелДляОбмена.ДатаНачалаВыгрузкиДокументов); Параметры.Вставить("УзелРазрешитьПроведениеДокументовПриЗагрузке", УзелДляОбмена.РазрешитьПроведениеДокументовПриЗагрузке); Параметры.Вставить("УзелПравилаСозданияДоговоровКонтрагентов", УзелДляОбмена.ПравилаСозданияДоговоровКонтрагентов); Параметры.Вставить("ВыгружатьЦеныНоменклатуры", УзелДляОбмена.ВыгружатьЦеныНоменклатуры); //Параметры.Вставить("ОбобщенныйСклад", УзелДляОбмена.ОбобщенныйСклад); Параметры.Вставить("ВидыЦенНоменклатуры", УзелДляОбмена.ВидыЦенНоменклатуры.ВыгрузитьКолонку("ВидЦенНоменклатуры")); Параметры.Вставить("ПравилаОтправкиДокументов", УзелДляОбмена.ПравилаОтправкиДокументов); Параметры.Вставить("ПравилаОтправкиСправочников", УзелДляОбмена.ПравилаОтправкиСправочников); Параметры.Вставить("СворачиватьПоСкладу", УзелДляОбмена.СворачиватьДокументыПоСкладу); Параметры.Вставить("ВыгружатьУправленческуюОрганизацию", УзелДляОбмена.ВыгружатьУправленческуюОрганизацию); СписокОрганизаций = Новый СписокЗначений; СписокОрганизаций.ЗагрузитьЗначения(УзелДляОбмена.Организации.ВыгрузитьКолонку("Организация")); Параметры.Вставить("УзелСписокОрганизаций", СписокОрганизаций); <ПослеПолученияИнформацииОбУзлахОбмена>/////////////////////////////////////////////////////////////////// // Настройки узла обмена Параметры.Вставить("СтатьяПрочихДоходовРасходов_ОприходованиеТоваров"); Параметры.Вставить("НоменклатурнаяГруппаПоУмолчанию"); Параметры.Вставить("РазрешитьПроведениеДокументовПриЗагрузке"); Параметры.Вставить("ОсновнаяСтавкаНДС"); ЗаполнитьЗначенияСвойств(Параметры, УзелОбменаЗагрузкаДанных); <ПередВыгрузкойДанных>СписокОбъектовСозданныхВТекущемСеансеОбмена = Новый Массив; Параметры.Вставить("СписокОбъектовСозданныхВТекущемСеансеОбмена", СписокОбъектовСозданныхВТекущемСеансеОбмена); ДатыИзмененияЦен = Новый ТаблицаЗначений; ДатыИзмененияЦен.Колонки.Добавить("ДатаИзменения", Новый ОписаниеТипов("Дата")); Параметры.Вставить("ДатыИзмененияЦен", ДатыИзмененияЦен); МаркерыОпераций = Новый Структура; МаркерыОпераций.Вставить("ВзносНаличнымиВБанк", "#Взнос наличными в банк "); МаркерыОпераций.Вставить("ТаможенныйПлатеж", "#Таможенный платеж "); Параметры.Вставить("МаркерыОпераций", МаркерыОпераций); ТаблицаВыгружаемыхОтветственныхЛиц = Новый ТаблицаЗначений; ТаблицаВыгружаемыхОтветственныхЛиц.Колонки.Добавить("Организация",Новый ОписаниеТипов("СправочникСсылка.Организации",,)); ТаблицаВыгружаемыхОтветственныхЛиц.Колонки.Добавить("ОтветственноеЛицо",Новый ОписаниеТипов("ПеречислениеСсылка.ОтветственныеЛицаОрганизаций",,)); ТаблицаВыгружаемыхОтветственныхЛиц.Колонки.Добавить("ПравоПодписиПоДоверенности",Новый ОписаниеТипов("Булево",,)); Параметры.Вставить("ТаблицаВыгружаемыхОтветственныхЛиц", ТаблицаВыгружаемыхОтветственныхЛиц); //+Тимохов// Параметры.Вставить("УзелПравилаСозданияДоговоровКонтрагентов", "БезРазделения"); //Параметры.Вставить("СворачиватьПоСкладу", Ложь); Параметры.Вставить("УзелИспользоватьОтборПоОрганизации", Ложь); //Параметры.Вставить("УзелСписокОрганизаций", Новый СписокЗначений); //Если Параметры.Организация <> Справочники.Организации.ПустаяСсылка() Тогда // Параметры.УзелСписокОрганизаций.Добавить(Параметры.Организация); //КонецЕсли; Параметры.Вставить("ВыгружатьУправленческуюОрганизацию", Ложь); //-Тимохов// //ПередатьОдинПараметрВПриемник("СворачиватьПоНоменклатуре", Параметры.СворачиватьПоНоменклатуре); //ПередатьОдинПараметрВПриемник("ОбобщеннаяНоменклатура", Параметры.ОбобщеннаяНоменклатура); Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", "ПСК_НеВыгружатьДокумент_Бухгалтерия"); Если Свойство <> Неопределено Тогда Параметры.Вставить("СвойствоОграниченияВыгрузки", Свойство); КонецЕсли; Свойство = ПланыВидовХарактеристик.ДополнительныеРеквизитыИСведения.НайтиПоРеквизиту("Имя", "ПСК_НеВыгружатьДокументПоступления_Бухгалтерия"); Если Свойство <> Неопределено Тогда Параметры.Вставить("СвойствоОграниченияВыгрузкиПоступлений", Свойство); КонецЕсли; ПередатьОдинПараметрВПриемник("СворачиватьПоНоменклатуре", Параметры.СворачиватьПоНоменклатуре); ПередатьОдинПараметрВПриемник("ОбобщеннаяНоменклатура", Параметры.ОбобщеннаяНоменклатура); <ПослеВыгрузкиДанных>//+Тимохов// Если Параметры.ТаблицаВыгружаемыхОтветственныхЛиц.Количество() > 0 Тогда// И Параметры.ПравилаОтправкиСправочников <> "НеСинхронизировать" Тогда Выполнить(Алгоритмы.ВыгрузитьОтветственныхЛиц); КонецЕсли; //-Тимохов// //Если Параметры.СписокОбъектовСозданныхВТекущемСеансеОбмена.Количество() <> 0 Тогда // Для каждого СозданныйДокумент Из Параметры.СписокОбъектовСозданныхВТекущемСеансеОбмена Цикл // ЗарегистрироватьОбъектСозданныйПриВыгрузке(СозданныйДокумент.Ссылка); // КонецЦикла; //КонецЕсли; <ПередЗагрузкойДанных>/////////////////////////////////////////////////////////////////// // Инициализация таблицы для отложенного заполнения документов //+Тимохов// //ЗагруженныеОбъекты = Новый ТаблицаЗначений; //ЗагруженныеОбъекты.Колонки.Добавить("ИмяПКО"); //ЗагруженныеОбъекты.Колонки.Добавить("Объект"); //ЗагруженныеОбъекты.Колонки.Добавить("Параметры"); //Параметры.Вставить("ЗагруженныеОбъекты", ЗагруженныеОбъекты); //-Тимохов// /////////////////////////////////////////////////////////////////// // Параметры для обработки загруженных банков и свойств ЗагруженныеБанки = Новый Массив(); Параметры.Вставить("ЗагруженныеБанки", ЗагруженныеБанки); ЗагруженныеСвойства = Новый ТаблицаЗначений; ЗагруженныеСвойства.Колонки.Добавить("СвойствоСсылка", Новый ОписаниеТипов("ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения")); //Параметры.Вставить("ЗагруженныеСвойства", ЗагруженныеСвойства); //Параметры.Вставить("ЗагруженныОбщиеДанные", Ложь); Параметры.Вставить("НоменклатурнаяГруппаПоУмолчанию",""); //+Тимохов//Недостающие параметры Параметры.Вставить("ПроводитьДокументы", Истина); Параметры.Вставить("РазрешитьПроведениеДокументовПриЗагрузке", Истина); Параметры.Вставить("ЗагруженныеОбъекты", Новый ТаблицаЗначений); Параметры.ЗагруженныеОбъекты.Колонки.Добавить("ИмяПКО"); Параметры.ЗагруженныеОбъекты.Колонки.Добавить("Объект"); Параметры.ЗагруженныеОбъекты.Колонки.Добавить("Параметры"); ТаблицаДокументовДляПроведения = Новый ТаблицаЗначений; ТаблицаДокументовДляПроведения.Колонки.Добавить("Документ"); ТаблицаДокументовДляПроведения.Колонки.Добавить("ДатаВремя"); Параметры.Вставить("ТаблицаДокументовДляПроведения", ТаблицаДокументовДляПроведения); //-Тимохов// <ПослеЗагрузкиДанных>///////////////////////////////////////////////////////////////////// //// Выполнение отложенного заполнения документов //ЗагруженныеОбъекты = Параметры.ЗагруженныеОбъекты; //// Необходимо обеспечить следующий порядок заполнения: //// - справочники //// - документы кроме корректировок и счетов-фактур //// - корректировки поступления и реализации, созданные на основании исправительных счетов-фактур (в хронологическом порядке) //// - счета-фактуры //ЗагруженныеОбъекты.Колонки.Добавить("Очередность"); //ЗагруженныеОбъекты.Колонки.Добавить("ДатаДляСортировкиДокументов"); //ЗагруженныеОбъекты.Колонки.Добавить("НомерИсправленияДляСортировкиКорректировок"); //Для Каждого СтрокаТаблицы Из ЗагруженныеОбъекты Цикл // // МетаданныеОбъекта = СтрокаТаблицы.Объект.МетаДанные(); // Если Метаданные.Справочники.Содержит(МетаданныеОбъекта) // Или Метаданные.ПланыВидовХарактеристик.Содержит(МетаданныеОбъекта) Тогда // СтрокаТаблицы.Очередность = 1; // ИначеЕсли Метаданные.Документы.Содержит(МетаданныеОбъекта) Тогда // // СтрокаТаблицы.ДатаДляСортировкиДокументов = СтрокаТаблицы.Объект.Дата; // // Если ТипЗнч(СтрокаТаблицы.Объект.Ссылка) = Тип("ДокументСсылка.СчетФактураПолученный") // Или ТипЗнч(СтрокаТаблицы.Объект.Ссылка) = Тип("ДокументСсылка.СчетФактураПолученный") Тогда // // СтрокаТаблицы.Очередность = 6; // // ИначеЕсли СтрокаТаблицы.ИмяПКО = "СФП_КорректировкаПоступления" // Или СтрокаТаблицы.ИмяПКО = "СФВ_КорректировкаПоступленияИК" // Или СтрокаТаблицы.ИмяПКО = "СФВ_КорректировкаРеализации" Тогда // // СтрокаТаблицы.Очередность = 5; // СтрокаТаблицы.НомерИсправленияДляСортировкиКорректировок = СтрокаТаблицы.Параметры["НомерИсправления"]; // // Иначе // СтрокаТаблицы.Очередность = 4; // КонецЕсли; // // Иначе // СтрокаТаблицы.Очередность = 3; // КонецЕсли; // //КонецЦикла; //ЗагруженныеОбъекты.Сортировать("Очередность, ДатаДляСортировкиДокументов, НомерИсправленияДляСортировкиКорректировок, ИмяПКО"); //Для Каждого СтрокаТаблицы Из ЗагруженныеОбъекты Цикл // // Если СтрокаТаблицы.Объект.ЭтоНовый() Тогда // Продолжить; // КонецЕсли; // // Объект = СтрокаТаблицы.Объект.Ссылка.ПолучитьОбъект(); // ПараметрыОбъекта = СтрокаТаблицы.Параметры; // ИмяПКО = СтрокаТаблицы.ИмяПКО; // // ОбъектМодифицирован = Истина; // // Если Метаданные.ПланыВидовХарактеристик.Содержит(Объект.МетаДанные()) Тогда // Выполнить(Алгоритмы.ОбработкаПлановВидовХарактеристикОтложенная); // КонецЕсли; // // Если Метаданные.Документы.Содержит(Объект.МетаДанные()) Тогда // Выполнить(Алгоритмы.ЗаполнениеДокументовОтложенное); // КонецЕсли; // // Если Метаданные.Справочники.Содержит(Объект.МетаДанные()) Тогда // Выполнить(Алгоритмы.ОбработкаСправочниковОтложенная); // КонецЕсли; // // Если ОбъектМодифицирован Тогда // Объект.ОбменДанными.Загрузка = Истина; // Объект.Записать(); // КонецЕсли; // //КонецЦикла; ///////////////////////////////////////////////////////////////////// //// Обработка загруженных банков и свойств //ЗагруженныеБанки = Параметры.ЗагруженныеБанки; //РаботаСБанкамиПереопределяемый.ОбновитьБанкиИзКлассификатора(ЗагруженныеБанки,0); //Выполнить(Алгоритмы.ОбновитьНаборыДополнительныхРеквизитовИСведений); Если Параметры.ТаблицаДокументовДляПроведения.Количество() > 0 Тогда //Выполнить(Алгоритмы.УдалитьДубликатыТЗ); //Удаляем задублированные ссылки документов, если они есть. Параметры.ТаблицаДокументовДляПроведения.Сортировать("ДатаВремя Возр"); Параметры.ТаблицаДокументовДляПроведения.Свернуть("Документ"); Ин = 0; ОбКол = 0; Для каждого Строка из Параметры.ТаблицаДокументовДляПроведения Цикл Попытка Объект = Строка.Документ.ПолучитьОбъект(); Исключение Продолжить; КонецПопытки; Если ОбщегоНазначенияБП.ЕстьРеквизитДокумента("Комментарий", Объект.Метаданные()) Тогда Если Прав(Объект.Комментарий, 9) = "Проведён." Тогда Продолжить; КонецЕсли; КонецЕсли; ОбКол = ОбКол + 1; Если Параметры.ПроводитьДокументы = Истина Тогда Попытка Объект.Записать(РежимЗаписиДокумента.Проведение); Ин = Ин + 1; Если ОбщегоНазначенияБП.ЕстьРеквизитДокумента("Комментарий", Объект.Метаданные()) Тогда Объект.Комментарий = Объект.Комментарий + "Проведён."; КонецЕсли; Исключение Объект.Проведен = Ложь; Сообщить("ДОКУМЕНТ НЕ ПРОВЕДЕН : "+ ОписаниеОшибки(), СтатусСообщения.ОченьВажное); Сообщить(" "+СокрЛП(Объект)); Попытка Объект.Записать(); Исключение //Видимо фигня какая то раз документ даже не записывается КонецПопытки; КонецПопытки; Иначе Попытка Объект.Проведен = Ложь; Объект.Записать(); Исключение Сообщить("Ошибка"); //Видимо фигня какая то раз документ даже не записывается КонецПопытки; КонецЕсли; КонецЦикла; Сообщить("Из "+ОбКол+" документов проведено " + СокрЛП(Ин) +" объектов"); Иначе Сообщить("Из "+ОбКол+" документов проведено 0 объектов"); КонецЕсли; <ПередВыгрузкойОбъекта>Выполнить(Алгоритмы.ВыгрузкаПоФильтрамПСК) <ПередКонвертациейОбъекта>Если ТипЗнч(ВходящиеДанные) <> Тип("Структура") Тогда ВходящиеДанные = Новый Структура; КонецЕсли; <ПослеЗагрузкиОбъекта>//+Тимохов// Выполнить(Алгоритмы.ПСКПостОбработка); Если ИмяТипаОбъекта = "Документ" Тогда НоваяСтрока = Параметры.ТаблицаДокументовДляПроведения.Добавить(); Если Объект.ЭтоНовый() Тогда НоваяСтрока.Документ = Объект.ПолучитьСсылкуНового() ; Иначе НоваяСтрока.Документ = Объект.Ссылка; КонецЕсли; НоваяСтрока.ДатаВремя = Объект.Дата; КонецЕсли; //-Тимохов// <ПередОтправкойИнформацииОбУдалении>Отказ = Истина; Если ТипЗнч(Ссылка) = Тип("ДокументСсылка.ЗаказКлиента") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СчетНаОплатуПокупателю", "ДокументСсылка.ЗаказКлиента"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "СправочникСсылка.ЗначенияСвойствОбъектов", "ДокументСсылка.ЗаказКлиента"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОтчетКомиссионераОПродажах", "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОтчетКомитентуОПродажах", "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПриобретениеТоваровУслуг", "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.РеализацияТоваровУслуг", "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ПересортицаТоваров") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.ПересортицаТоваров"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.ПересортицаТоваров"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ПорчаТоваров") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.ПорчаТоваров"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.ПорчаТоваров"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.СборкаТоваров") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КомплектацияНоменклатуры", "ДокументСсылка.СборкаТоваров"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.СборкаТоваров"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.СписаниеБезналичныхДенежныхСредств") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеСРасчетногоСчета", "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПоступлениеНаРасчетныйСчет", "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ВнутреннееПотреблениеТоваров") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ТребованиеНакладная", "ДокументСсылка.ВнутреннееПотреблениеТоваров"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.ВнутреннееПотреблениеТоваров"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПередачаМатериаловВЭксплуатацию", "ДокументСсылка.ВнутреннееПотреблениеТоваров"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ПланВидовХарактеристикСсылка.СтатьиРасходов") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "СправочникСсылка.СтатьиЗатрат", "ПланВидовХарактеристикСсылка.СтатьиРасходов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "СправочникСсылка.ПрочиеДоходыИРасходы", "ПланВидовХарактеристикСсылка.СтатьиРасходов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "СправочникСсылка.СпособыОтраженияРасходовПоАмортизации", "ПланВидовХарактеристикСсылка.СтатьиРасходов"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.ВзаимозачетЗадолженности"); Если ОбщегоНазначения.СсылкаСуществует(Ссылка) Тогда ВыгрузитьПоПравилу(Ссылка,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредиторУдал"); ВыгрузитьПоПравилу(Ссылка,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебиторУдал"); КонецЕсли; ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПриобретениеТоваровУслуг", "ДокументСсылка.ПриобретениеТоваровУслуг"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПоступлениеДопРасходов", "ДокументСсылка.ПриобретениеТоваровУслуг"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.ПриобретениеТоваровУслуг"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.ПриобретениеТоваровУслуг"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПриобретениеТоваровУслуг", "ДокументСсылка.ПриобретениеУслугПрочихАктивов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПоступлениеДопРасходов", "ДокументСсылка.ПриобретениеУслугПрочихАктивов"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.РасходныйКассовыйОрдер", "ДокументСсылка.РасходныйКассовыйОрдер"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПоступлениеНаРасчетныйСчет", "ДокументСсылка.РасходныйКассовыйОрдер"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.НачисленияКредитовИДепозитов") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПриобретениеТоваровУслуг", "ДокументСсылка.НачисленияКредитовИДепозитов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ОперацияБух", "ДокументСсылка.НачисленияКредитовИДепозитов"); ИначеЕсли ТипЗнч(Ссылка) = Тип("СправочникСсылка.ОтветственныеЛицаОрганизаций") Тогда Если ОбщегоНазначения.СсылкаСуществует(Ссылка) Тогда НоваяСтрока = Параметры.ТаблицаВыгружаемыхОтветственныхЛиц.Добавить(); НоваяСтрока.Организация = Ссылка.Владелец; НоваяСтрока.ОтветственноеЛицо = Ссылка.ОтветственноеЛицо; Если Ссылка.ПравоПодписиПоДоверенности Тогда НоваяСтрока.ПравоПодписиПоДоверенности = Истина; Иначе НоваяСтрока.ПравоПодписиПоДоверенности = Ложь; КонецЕсли; КонецЕсли; ИначеЕсли ТипЗнч(Ссылка) = Тип("СправочникСсылка.ЛицензииПоставщиковАлкогольнойПродукции") Тогда Если ОбщегоНазначения.СсылкаСуществует(Ссылка) Тогда ИсточникДанных = Ссылка; ЭтоУдаление = Истина; Выполнить(Алгоритмы.ВыгрузитьЛицензиюПоставщикаАлкогольнойПродукции); КонецЕсли; ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.СчетФактураВыданный") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СчетФактураВыданный", "ДокументСсылка.СчетФактураВыданный"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СчетФактураПолученный", "ДокументСсылка.СчетФактураВыданный"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаРеализации", "ДокументСсылка.СчетФактураВыданный"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаПриобретения", "ДокументСсылка.СчетФактураВыданный"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.СчетФактураПолученный") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.СчетФактураПолученный", "ДокументСсылка.СчетФактураПолученный"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаПриобретения", "ДокументСсылка.СчетФактураПолученный"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.РеализацияПодарочныхСертификатов") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.ПриходныйКассовыйОрдер", "ДокументСсылка.РеализацияПодарочныхСертификатов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.РеализацияПодарочныхСертификатов"); ИначеЕсли ТипЗнч(Ссылка) = Тип("ДокументСсылка.ВозвратПодарочныхСертификатов") Тогда ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.РасходныйКассовыйОрдер", "ДокументСсылка.ВозвратПодарочныхСертификатов"); ЗаписатьВФайлУдалениеОбъекта(Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.ВозвратПодарочныхСертификатов"); Иначе Отказ = Ложь; КонецЕсли; <ПриПолученииИнформацииОбУдалении>МетаданныеОбъекта = Объект.Метаданные(); Если Метаданные.Справочники.Содержит(МетаданныеОбъекта) Тогда Отказ = Истина; УстановитьПометкуУдаленияУОбъекта(Объект, Истина, "Справочник"); ИначеЕсли Метаданные.Документы.Содержит(МетаданныеОбъекта) Тогда Отказ = Истина; Если Объект.Проведен Тогда ОтменитьПроведениеОбъектаВИБ(Объект, ТипЗнч(Объект)); ИначеЕсли ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ОперацияБух") Тогда Для Каждого Движение Из Объект.Движения Цикл Движение.Прочитать(); Для Каждого Строка Из Движение Цикл Строка.Активность = Ложь; КонецЦикла; Движение.Записать() КонецЦикла; КонецЕсли; УстановитьПометкуУдаленияУОбъекта(Объект, Истина, "Документ"); ИначеЕсли Метаданные.ПланыВидовХарактеристик.Содержит(МетаданныеОбъекта) Тогда Отказ = Истина; УстановитьПометкуУдаленияУОбъекта(Объект, Истина, "ПланВидовХарактеристик"); КонецЕсли; <Параметры/> <Обработки/> <ПравилаКонвертацииОбъектов> <Группа> <Код>Перечисления <Наименование>Перечисления <Порядок>50 <Правило> <Код>ПолФизическихЛиц <Наименование>Перечисление: Пол физического лица <Порядок>50 <Источник>ПеречислениеСсылка.ПолФизическогоЛица <Приемник>ПеречислениеСсылка.ПолФизическогоЛица <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Женский --> Женский <Порядок>50 <Источник>Женский <Приемник>Женский <Значение> <Код>2 <Наименование>Мужской --> Мужской <Порядок>100 <Источник>Мужской <Приемник>Мужской <Правило> <Код>ТипыСкладов <Наименование>Перечисление: Типы складов <Порядок>100 <Источник>ПеречислениеСсылка.ТипыСкладов <Приемник>ПеречислениеСсылка.ТипыСкладов <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ОптовыйСклад --> Оптовый <Порядок>50 <Источник>ОптовыйСклад <Приемник>ОптовыйСклад <Значение> <Код>2 <Наименование>РозничныйМагазин --> Розничный <Порядок>100 <Источник>РозничныйМагазин <Приемник>РозничныйМагазин <Правило> <Код>СтавкиНДС <Наименование>Перечисление: Ставки НДС <Порядок>150 <Источник>ПеречислениеСсылка.СтавкиНДС <Приемник>ПеречислениеСсылка.СтавкиНДС <Свойства/> <Значения> <Значение> <Код>1 <Наименование>БезНДС --> БезНДС <Порядок>50 <Источник>БезНДС <Приемник>БезНДС <Значение> <Код>2 <Наименование>НДС0 --> НДС0 <Порядок>100 <Источник>НДС0 <Приемник>НДС0 <Значение> <Код>3 <Наименование>НДС10 --> НДС10 <Порядок>150 <Источник>НДС10 <Приемник>НДС10 <Значение> <Код>4 <Наименование>НДС10_110 --> НДС10_110 <Порядок>200 <Источник>НДС10_110 <Приемник>НДС10_110 <Значение> <Код>5 <Наименование>НДС18 --> НДС18 <Порядок>250 <Источник>НДС18 <Приемник>НДС18 <Значение> <Код>6 <Наименование>НДС18_118 --> НДС18_118 <Порядок>300 <Источник>НДС18_118 <Приемник>НДС18_118 <Значение> <Код>7 <Наименование>НДС20 --> НДС20 <Порядок>350 <Источник>НДС20 <Приемник>НДС20 <Значение> <Код>8 <Наименование>НДС20_120 --> НДС20_120 <Порядок>400 <Источник>НДС20_120 <Приемник>НДС20_120 <Правило> <Код>ТипыКонтактнойИнформации <Наименование>Перечисление: Типы контактной информации <Порядок>200 <Источник>ПеречислениеСсылка.ТипыКонтактнойИнформации <Приемник>ПеречислениеСсылка.ТипыКонтактнойИнформации <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Адрес --> Адрес <Порядок>50 <Источник>Адрес <Приемник>Адрес <Значение> <Код>2 <Наименование>АдресЭлектроннойПочты --> АдресЭлектроннойПочты <Порядок>100 <Источник>АдресЭлектроннойПочты <Приемник>АдресЭлектроннойПочты <Значение> <Код>3 <Наименование>ВебСтраница --> ВебСтраница <Порядок>150 <Источник>ВебСтраница <Приемник>ВебСтраница <Значение> <Код>4 <Наименование>Другое --> Другое <Порядок>200 <Источник>Другое <Приемник>Другое <Значение> <Код>5 <Наименование>Телефон --> Телефон <Порядок>250 <Источник>Телефон <Приемник>Телефон <Значение> <Код>6 <Наименование>Факс --> Телефон <Порядок>300 <Источник>Факс <Приемник>Телефон <Правило> <Код>СпособыРасчетаКомиссионногоВознаграждения <Наименование>Перечисление: Способы расчета комиссионного вознаграждения <Порядок>250 <Источник>ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения <Приемник>ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения <Свойства/> <Значения> <Значение> <Код>1 <Наименование>НеРассчитывается --> НеРассчитывается <Порядок>50 <Источник>НеРассчитывается <Приемник>НеРассчитывается <Значение> <Код>2 <Наименование>ПроцентОтРазностиСуммыПродажиИСуммыКомитента --> П <Порядок>100 <Источник>ПроцентОтРазностиСуммыПродажиИСуммыКомитента <Приемник>ПроцентОтРазностиСуммПродажиИПоступления <Значение> <Код>3 <Наименование>ПроцентОтСуммыПродажи --> ПроцентОтСуммыПродажи <Порядок>150 <Источник>ПроцентОтСуммыПродажи <Приемник>ПроцентОтСуммыПродажи <Правило> <Код>ВидыЗадолженности <Наименование>Перечисление: Типы задолженности <Порядок>300 <Источник>ПеречислениеСсылка.ТипыЗадолженности <Приемник>ПеречислениеСсылка.ВидыЗадолженности <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Дебиторская --> Дебиторская <Порядок>50 <Источник>Дебиторская <Приемник>Дебиторская <Значение> <Код>2 <Наименование>Кредиторская --> Кредиторская <Порядок>100 <Источник>Кредиторская <Приемник>Кредиторская <Правило> <Код>ТипыДоговоров_ВидыДоговоровКонтрагентов <Наименование>Перечисление: ТипыДоговоров <Порядок>350 <ПередВыгрузкой> Если Источник = Перечисления.ТипыДоговоров.ВвозИзЕАЭС Тогда Отказ = Истина; КонецЕсли; <Источник>ПеречислениеСсылка.ТипыДоговоров <Приемник>ПеречислениеСсылка.ВидыДоговоровКонтрагентов <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ПередачаНаКомиссию --> СКомиссионером <Порядок>50 <Источник>СКомиссионером <Приемник>СКомиссионером <Значение> <Код>2 <Наименование>ПриемНаКомиссию --> СКомитентом <Порядок>100 <Источник>СКомитентом <Приемник>СКомитентом <Значение> <Код>3 <Наименование>РеализацияКлиенту --> СПокупателем <Порядок>150 <Источник>СПокупателем <Приемник>СПокупателем <Значение> <Код>5 <Наименование>Импорт --> СПоставщиком <Порядок>200 <Источник>Импорт <Приемник>СПоставщиком <Значение> <Код>4 <Наименование>ПорчаТоваров --> СПоставщиком <Порядок>200 <Источник>СПоставщиком <Приемник>СПоставщиком <Значение> <Код>7 <Наименование>СКомитентомНаЗакупку --> СКомитентом <Порядок>300 <Источник>СКомитентомНаЗакупку <Приемник>СКомитентом <Правило> <Код>ЮридическоеФизическоеЛицо <Наименование>Перечисление: Юр. / физ. лицо <Порядок>400 <Источник>ПеречислениеСсылка.ЮридическоеФизическоеЛицо <Приемник>ПеречислениеСсылка.ЮридическоеФизическоеЛицо <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ФизическоеЛицо --> ФизическоеЛицо <Порядок>50 <Источник>ФизическоеЛицо <Приемник>ФизическоеЛицо <Значение> <Код>2 <Наименование>ЮридическоеЛицо --> ЮридическоеЛицо <Порядок>100 <Источник>ЮридическоеЛицо <Приемник>ЮридическоеЛицо <Правило> <Код>Перечисление_ОтветственныеЛицаОрганизаций <Наименование>Перечисление: Ответственные лица организаций <Порядок>450 <Источник>ПеречислениеСсылка.ОтветственныеЛицаОрганизаций <Приемник>ПеречислениеСсылка.ОтветственныеЛицаОрганизаций <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>50 <Источник>ГлавныйБухгалтер <Приемник>ГлавныйБухгалтер <Значение> <Код>2 <Наименование>Руководитель --> Руководитель <Порядок>150 <Источник>Руководитель <Приемник>Руководитель <Правило> <Код>ВидыЛицензийНаПродажуАлкоголя <Наименование>Перечисление: Виды лицензий алкогольной (спиртосодержащей) продукции <Порядок>500 <Источник>ПеречислениеСсылка.ВидыЛицензийАлкогольнойПродукции <Приемник>ПеречислениеСсылка.ВидыЛицензийНаПродажуАлкоголя <Свойства/> <Значения> <Значение> <Код>1 <Наименование>АлкогольнаяПродукция --> АлкогольнаяПродукция <Порядок>50 <Источник>АлкогольнаяПродукция <Приемник>АлкогольнаяПродукция <Значение> <Код>2 <Наименование>Пиво --> Пиво <Порядок>100 <Источник>Пиво <Приемник>Пиво <Значение> <Код>3 <Наименование>СпиртосодержащаяНеПищеваяПродукция --> Спиртосодер <Порядок>150 <Источник>СпиртосодержащаяНеПищеваяПродукция <Приемник>СпиртосодержащаяНеПищеваяПродукция <Значение> <Код>4 <Наименование>СпиртосодержащаяПищеваяПродукция --> Спиртосодержа <Порядок>200 <Источник>СпиртосодержащаяПищеваяПродукция <Приемник>СпиртосодержащаяПищеваяПродукция <Правило> <Код>СпособыУчетаНДС <Наименование>Перечисление: Типы налогообложения НДС <Порядок>550 <Источник>ПеречислениеСсылка.ТипыНалогообложенияНДС <Приемник>ПеречислениеСсылка.СпособыУчетаНДС <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ПродажаНаЭкспорт --> <Порядок>50 <Источник>ПродажаНаЭкспорт <Приемник>ДляОперацийПо0 <Значение> <Код>2 <Наименование>ПродажаНеОблагаетсяНДС --> <Порядок>100 <Источник>ПродажаНеОблагаетсяНДС <Приемник>УчитываетсяВCтоимости <Значение> <Код>3 <Наименование>ПродажаОблагаетсяЕНВД --> <Порядок>150 <Источник>ПродажаОблагаетсяЕНВД <Приемник>УчитываетсяВCтоимости <Значение> <Код>6 <Наименование>ПродажаПоПатенту --> УчитываетсяВCтоимости <Порядок>200 <Источник>ПродажаПоПатенту <Приемник>УчитываетсяВCтоимости <Значение> <Код>4 <Наименование>ПродажаОблагаетсяНДС --> <Порядок>250 <Источник>ПродажаОблагаетсяНДС <Приемник>ПринимаетсяКВычету <Значение> <Код>5 <Наименование>ПоФактическомуИспользованию --> ПринимаетсяКВычету <Порядок>300 <Источник>ПоФактическомуИспользованию <Приемник>ПринимаетсяКВычету <Правило> <Код>ПолФизическогоЛица <Наименование>Перечисление: Пол физического лица <Порядок>600 <Источник>ПеречислениеСсылка.ПолФизическогоЛица <Приемник>ПеречислениеСсылка.ПолФизическогоЛица <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Женский --> Женский <Порядок>50 <Источник>Женский <Приемник>Женский <Значение> <Код>2 <Наименование>Мужской --> Мужской <Порядок>100 <Источник>Мужской <Приемник>Мужской <Правило> <Код>СтавкиНДС00001 <Наименование>Перечисление: Ставки НДС <Порядок>650 <Источник>ПеречислениеСсылка.СтавкиНДС <Приемник>ПеречислениеСсылка.СтавкиНДС <Свойства/> <Значения> <Значение> <Код>1 <Наименование>БезНДС --> БезНДС <Порядок>50 <Источник>БезНДС <Приемник>БезНДС <Значение> <Код>2 <Наименование>НДС0 --> НДС0 <Порядок>100 <Источник>НДС0 <Приемник>НДС0 <Значение> <Код>3 <Наименование>НДС10 --> НДС10 <Порядок>150 <Источник>НДС10 <Приемник>НДС10 <Значение> <Код>4 <Наименование>НДС10_110 --> НДС10_110 <Порядок>200 <Источник>НДС10_110 <Приемник>НДС10_110 <Значение> <Код>5 <Наименование>НДС18 --> НДС18 <Порядок>250 <Источник>НДС18 <Приемник>НДС18 <Значение> <Код>6 <Наименование>НДС18_118 --> НДС18_118 <Порядок>300 <Источник>НДС18_118 <Приемник>НДС18_118 <Значение> <Код>7 <Наименование>НДС20 --> НДС20 <Порядок>350 <Источник>НДС20 <Приемник>НДС20 <Значение> <Код>8 <Наименование>НДС20_120 --> НДС20_120 <Порядок>400 <Источник>НДС20_120 <Приемник>НДС20_120 <Правило> <Код>ТипыКонтактнойИнформации00001 <Наименование>Перечисление: Типы контактной информации <Порядок>700 <Источник>ПеречислениеСсылка.ТипыКонтактнойИнформации <Приемник>ПеречислениеСсылка.ТипыКонтактнойИнформации <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Адрес --> Адрес <Порядок>50 <Источник>Адрес <Приемник>Адрес <Значение> <Код>2 <Наименование>АдресЭлектроннойПочты --> АдресЭлектроннойПочты <Порядок>100 <Источник>АдресЭлектроннойПочты <Приемник>АдресЭлектроннойПочты <Значение> <Код>3 <Наименование>ВебСтраница --> ВебСтраница <Порядок>150 <Источник>ВебСтраница <Приемник>ВебСтраница <Значение> <Код>4 <Наименование>Другое --> Другое <Порядок>200 <Источник>Другое <Приемник>Другое <Значение> <Код>5 <Наименование>Телефон --> Телефон <Порядок>250 <Источник>Телефон <Приемник>Телефон <Значение> <Код>6 <Наименование>Факс --> Факс <Порядок>300 <Источник>Факс <Приемник>Факс <Правило> <Код>ВидыДвиженийДенежныхСредств <Наименование>Перечисление: Виды движений денежных средств <Порядок>750 <Источник>ПеречислениеСсылка.ВидыДвиженийДенежныхСредств <Приемник>ПеречислениеСсылка.ВидыДвиженийДенежныхСредств <Свойства/> <Значения> <Значение> <Код>1 <Наименование>АрендныеПлатежиРоялтиЛицензионныеПлатежиГонорарыКо <Порядок>50 <Источник>АрендныеПлатежиРоялтиЛицензионныеПлатежиГонорарыКомиссионные <Приемник>АрендныеПлатежиРоялтиЛицензионныеПлатежиГонорарыКомиссионные <Значение> <Код>2 <Наименование>ВыкупСобственныхАкций --> ВыкупСобственныхАкций <Порядок>100 <Источник>ВыкупСобственныхАкций <Приемник>ВыкупСобственныхАкций <Значение> <Код>3 <Наименование>ВыкупСобственныхДолевыхИнструментов --> ВыкупСобст <Порядок>150 <Источник>ВыкупСобственныхДолевыхИнструментов <Приемник>ВыкупСобственныхДолевыхИнструментов <Значение> <Код>4 <Наименование>ВыплатаДивидендов --> ВыплатаДивидендов <Порядок>200 <Источник>ВыплатаДивидендов <Приемник>ВыплатаДивидендов <Значение> <Код>5 <Наименование>ВыплатаДивидендовПроцентов --> ВыплатаДивидендовПр <Порядок>250 <Источник>ВыплатаДивидендовПроцентов <Приемник>ВыплатаДивидендовПроцентов <Значение> <Код>6 <Наименование>ВыплатаДолиМеньшинства --> ВыплатаДолиМеньшинства <Порядок>300 <Источник>ВыплатаДолиМеньшинства <Приемник>ВыплатаДолиМеньшинства <Значение> <Код>7 <Наименование>ВыплатаПроцентовВСвязиСоСтроительством --> Выплата <Порядок>350 <Источник>ВыплатаПроцентовВСвязиСоСтроительством <Приемник>ВыплатаПроцентовВСвязиСоСтроительством <Значение> <Код>8 <Наименование>ВыплатаПроцентовПоДолговымОбязательствам --> Выпла <Порядок>400 <Источник>ВыплатаПроцентовПоДолговымОбязательствам <Приемник>ВыплатаПроцентовПоДолговымОбязательствам <Значение> <Код>9 <Наименование>ВыплатаПроцентовФинансовая --> ВыплатаПроцентовФин <Порядок>450 <Источник>ВыплатаПроцентовФинансовая <Приемник>ВыплатаПроцентовФинансовая <Значение> <Код>10 <Наименование>ВыпускДолговыхИнструментов --> ВыпускДолговыхИнстр <Порядок>500 <Источник>ВыпускДолговыхИнструментов <Приемник>ВыпускДолговыхИнструментов <Значение> <Код>11 <Наименование>ВыпускКомплексныхФинансовыхИнструментов --> Выпуск <Порядок>550 <Источник>ВыпускКомплексныхФинансовыхИнструментов <Приемник>ВыпускКомплексныхФинансовыхИнструментов <Значение> <Код>12 <Наименование>ВыручкаОтПродажиВнеоборотныхАктивовКромеФинансовых <Порядок>600 <Источник>ВыручкаОтПродажиВнеоборотныхАктивовКромеФинансовых <Приемник>ВыручкаОтПродажиВнеоборотныхАктивовКромеФинансовых <Значение> <Код>13 <Наименование>ВыручкаОтПродажиДоходныхВложений --> ВыручкаОтПрод <Порядок>650 <Источник>ВыручкаОтПродажиДоходныхВложений <Приемник>ВыручкаОтПродажиДоходныхВложений <Значение> <Код>14 <Наименование>ВыручкаОтПродажиНематериальныхАктивов --> ВыручкаО <Порядок>700 <Источник>ВыручкаОтПродажиНематериальныхАктивов <Приемник>ВыручкаОтПродажиНематериальныхАктивов <Значение> <Код>15 <Наименование>ВыручкаОтПродажиОбъектовОсновныхСредств --> Выручк <Порядок>750 <Источник>ВыручкаОтПродажиОбъектовОсновныхСредств <Приемник>ВыручкаОтПродажиОбъектовОсновныхСредств <Значение> <Код>16 <Наименование>ВыручкаОтПродажиЦенныхБумагИИныхФинансовыхВложений <Порядок>800 <Источник>ВыручкаОтПродажиЦенныхБумагИИныхФинансовыхВложений <Приемник>ВыручкаОтПродажиЦенныхБумагИИныхФинансовыхВложений <Значение> <Код>17 <Наименование>ЗаймыПредоставленныеДругимОрганизациям --> ЗаймыПр <Порядок>850 <Источник>ЗаймыПредоставленныеДругимОрганизациям <Приемник>ЗаймыПредоставленныеДругимОрганизациям <Значение> <Код>18 <Наименование>НалогНаПрибыль --> НалогНаПрибыль <Порядок>900 <Источник>НалогНаПрибыль <Приемник>НалогНаПрибыль <Значение> <Код>19 <Наименование>ОплатаНИОКР --> ОплатаНИОКР <Порядок>950 <Источник>ОплатаНИОКР <Приемник>ОплатаНИОКР <Значение> <Код>20 <Наименование>ОплатаОборотныхАктивов --> ОплатаОборотныхАктивов <Порядок>1000 <Источник>ОплатаОборотныхАктивов <Приемник>ОплатаОборотныхАктивов <Значение> <Код>21 <Наименование>ОплатаПоПенсионнымПланам --> ОплатаПоПенсионнымПла <Порядок>1050 <Источник>ОплатаПоПенсионнымПланам <Приемник>ОплатаПоПенсионнымПланам <Значение> <Код>22 <Наименование>ОплатаТруда --> ОплатаТруда <Порядок>1100 <Источник>ОплатаТруда <Приемник>ОплатаТруда <Значение> <Код>23 <Наименование>ПлатежиСобственникамВСвязиСВыкупомАкцийИлиПриВыход <Порядок>1150 <Источник>ПлатежиСобственникамВСвязиСВыкупомАкцийИлиПриВыходеИзСоставаУчастников <Приемник>ПлатежиСобственникамВСвязиСВыкупомАкцийИлиПриВыходеИзСоставаУчастников <Значение> <Код>24 <Наименование>ПогашениеДолговыйЦенныхБумагВозвратКредитовИЗаймов <Порядок>1200 <Источник>ПогашениеДолговыйЦенныхБумагВозвратКредитовИЗаймов <Приемник>ПогашениеДолговыйЦенныхБумагВозвратКредитовИЗаймов <Значение> <Код>25 <Наименование>ПогашениеЗаймовИКредитов --> ПогашениеЗаймовИКреди <Порядок>1250 <Источник>ПогашениеЗаймовИКредитов <Приемник>ПогашениеЗаймовИКредитов <Значение> <Код>26 <Наименование>ПогашениеОбязательствПоФинансовойАренде --> Погаше <Порядок>1300 <Источник>ПогашениеОбязательствПоФинансовойАренде <Приемник>ПогашениеОбязательствПоФинансовойАренде <Значение> <Код>27 <Наименование>ПолученныеДивиденды --> ПолученныеДивиденды <Порядок>1350 <Источник>ПолученныеДивиденды <Приемник>ПолученныеДивиденды <Значение> <Код>28 <Наименование>ПолученныеПроценты --> ПолученныеПроценты <Порядок>1400 <Источник>ПолученныеПроценты <Приемник>ПолученныеПроценты <Значение> <Код>29 <Наименование>ПоступлениеДенежныхВкладовСобственников --> Поступ <Порядок>1450 <Источник>ПоступлениеДенежныхВкладовСобственников <Приемник>ПоступлениеДенежныхВкладовСобственников <Значение> <Код>30 <Наименование>ПоступлениеОтДивидендовПроцентовПоДолговымФинансов <Порядок>1500 <Источник>ПоступлениеОтДивидендовПроцентовПоДолговымФинансовымВложениям <Приемник>ПоступлениеОтДивидендовПроцентовПоДолговымФинансовымВложениям <Значение> <Код>31 <Наименование>ПоступлениеПлатежейПоФинансовойАренде --> Поступле <Порядок>1550 <Источник>ПоступлениеПлатежейПоФинансовойАренде <Приемник>ПоступлениеПлатежейПоФинансовойАренде <Значение> <Код>32 <Наименование>ПоступленияОтЗаймовИКредитовПредоставленныхДругими <Порядок>1600 <Источник>ПоступленияОтЗаймовИКредитовПредоставленныхДругимиОрганизациями <Приемник>ПоступленияОтЗаймовИКредитовПредоставленныхДругимиОрганизациями <Значение> <Код>33 <Наименование>ПоступленияОтПерепродажиФинансовыхВложений --> Пос <Порядок>1650 <Источник>ПоступленияОтПерепродажиФинансовыхВложений <Приемник>ПоступленияОтПерепродажиФинансовыхВложений <Значение> <Код>34 <Наименование>ПоступленияОтПогашенияЗаймовПредоставленныхДругимО <Порядок>1700 <Источник>ПоступленияОтПогашенияЗаймовПредоставленныхДругимОрганизациям <Приемник>ПоступленияОтПогашенияЗаймовПредоставленныхДругимОрганизациям <Значение> <Код>35 <Наименование>ПоступленияОтПогашенияЗаймовПродажиДолговыхЦенныхБ <Порядок>1750 <Источник>ПоступленияОтПогашенияЗаймовПродажиДолговыхЦенныхБумаг <Приемник>ПоступленияОтПогашенияЗаймовПродажиДолговыхЦенныхБумаг <Значение> <Код>36 <Наименование>ПоступленияОтПродажиАкцийДругихОрганизаций --> Пос <Порядок>1800 <Источник>ПоступленияОтПродажиАкцийДругихОрганизаций <Приемник>ПоступленияОтПродажиАкцийДругихОрганизаций <Значение> <Код>37 <Наименование>ПоступленияОтЭмиссииАкций --> ПоступленияОтЭмиссии <Порядок>1850 <Источник>ПоступленияОтЭмиссииАкций <Приемник>ПоступленияОтЭмиссииАкций <Значение> <Код>38 <Наименование>ПриобретениеАкцийДругихОрганизаций --> Приобретени <Порядок>1900 <Источник>ПриобретениеАкцийДругихОрганизаций <Приемник>ПриобретениеАкцийДругихОрганизаций <Значение> <Код>39 <Наименование>ПриобретениеДолговыхЦенныхБумагПредоставлениеЗаймо <Порядок>1950 <Источник>ПриобретениеДолговыхЦенныхБумагПредоставлениеЗаймов <Приемник>ПриобретениеДолговыхЦенныхБумагПредоставлениеЗаймов <Значение> <Код>40 <Наименование>ПриобретениеДоходныхВложенийВМатериальныеЦенности <Порядок>2000 <Источник>ПриобретениеДоходныхВложенийВМатериальныеЦенности <Приемник>ПриобретениеДоходныхВложенийВМатериальныеЦенности <Значение> <Код>41 <Наименование>ПриобретениеДочернихОрганизаций --> ПриобретениеДо <Порядок>2050 <Источник>ПриобретениеДочернихОрганизаций <Приемник>ПриобретениеДочернихОрганизаций <Значение> <Код>42 <Наименование>ПриобретениеНематериальныхАктивов --> Приобретение <Порядок>2100 <Источник>ПриобретениеНематериальныхАктивов <Приемник>ПриобретениеНематериальныхАктивов <Значение> <Код>43 <Наименование>ПриобретениеОбъектовОсновныхСредств --> Приобретен <Порядок>2150 <Источник>ПриобретениеОбъектовОсновныхСредств <Приемник>ПриобретениеОбъектовОсновныхСредств <Значение> <Код>44 <Наименование>ПриобретениеПрочихАктивовИнвестиционное --> Приобр <Порядок>2200 <Источник>ПриобретениеПрочихАктивовИнвестиционное <Приемник>ПриобретениеПрочихАктивовИнвестиционное <Значение> <Код>45 <Наименование>ПриобретениеСозданиеМодернизацияРеконструкцияВнеоб <Порядок>2250 <Источник>ПриобретениеСозданиеМодернизацияРеконструкцияВнеоборотныхАктивов <Приемник>ПриобретениеСозданиеМодернизацияРеконструкцияВнеоборотныхАктивов <Значение> <Код>46 <Наименование>ПриобретениеЦенныхБумагИИныхФинансовыхВложений --> <Порядок>2300 <Источник>ПриобретениеЦенныхБумагИИныхФинансовыхВложений <Приемник>ПриобретениеЦенныхБумагИИныхФинансовыхВложений <Значение> <Код>47 <Наименование>ПрочиеПоступленияПоИнвестиционнойДеятельности --> <Порядок>2350 <Источник>ПрочиеПоступленияПоИнвестиционнойДеятельности <Приемник>ПрочиеПоступленияПоИнвестиционнойДеятельности <Значение> <Код>48 <Наименование>ПрочиеПоступленияПоТекущейДеятельности --> ПрочиеП <Порядок>2400 <Источник>ПрочиеПоступленияПоТекущейДеятельности <Приемник>ПрочиеПоступленияПоТекущейДеятельности <Значение> <Код>49 <Наименование>ПрочиеПоступленияПоФинансовойДеятельности --> Проч <Порядок>2450 <Источник>ПрочиеПоступленияПоФинансовойДеятельности <Приемник>ПрочиеПоступленияПоФинансовойДеятельности <Значение> <Код>50 <Наименование>ПрочиеРасходыПоИнвестиционнойДеятельности --> Проч <Порядок>2500 <Источник>ПрочиеРасходыПоИнвестиционнойДеятельности <Приемник>ПрочиеРасходыПоИнвестиционнойДеятельности <Значение> <Код>51 <Наименование>ПрочиеРасходыПоТекущейДеятельности --> ПрочиеРасхо <Порядок>2550 <Источник>ПрочиеРасходыПоТекущейДеятельности <Приемник>ПрочиеРасходыПоТекущейДеятельности <Значение> <Код>52 <Наименование>ПрочиеРасходыПоФинансовойДеятельности --> ПрочиеРа <Порядок>2600 <Источник>ПрочиеРасходыПоФинансовойДеятельности <Приемник>ПрочиеРасходыПоФинансовойДеятельности <Значение> <Код>53 <Наименование>РасчетыПоНалогамИСборам --> РасчетыПоНалогамИСбора <Порядок>2650 <Источник>РасчетыПоНалогамИСборам <Приемник>РасчетыПоНалогамИСборам <Значение> <Код>54 <Наименование>РеализацияПрочихАктивовИнвестиционная --> Реализац <Порядок>2700 <Источник>РеализацияПрочихАктивовИнвестиционная <Приемник>РеализацияПрочихАктивовИнвестиционная <Значение> <Код>55 <Наименование>СредстваПолученныеОтПокупателейИЗаказчиков --> Сре <Порядок>2750 <Источник>СредстваПолученныеОтПокупателейИЗаказчиков <Приемник>СредстваПолученныеОтПокупателейИЗаказчиков <Правило> <Код>ЮридическоеФизическоеЛицо00001 <Наименование>Перечисление: Юридическое / физическое лицо <Порядок>800 <Источник>ПеречислениеСсылка.ЮридическоеФизическоеЛицо <Приемник>ПеречислениеСсылка.ЮридическоеФизическоеЛицо <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ФизическоеЛицо --> ФизическоеЛицо <Порядок>50 <Источник>ФизическоеЛицо <Приемник>ФизическоеЛицо <Значение> <Код>2 <Наименование>ЮридическоеЛицо --> ЮридическоеЛицо <Порядок>100 <Источник>ЮридическоеЛицо <Приемник>ЮридическоеЛицо <Правило> <Код>ТипыСкладов00001 <Наименование>Перечисление: Типы складов <Порядок>850 <Источник>ПеречислениеСсылка.ТипыСкладов <Приемник>ПеречислениеСсылка.ТипыСкладов <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ОптовыйСклад --> ОптовыйСклад <Порядок>50 <Источник>ОптовыйСклад <Приемник>ОптовыйСклад <Значение> <Код>2 <Наименование>РозничныйМагазин --> РозничныйМагазин <Порядок>100 <Источник>РозничныйМагазин <Приемник>РозничныйМагазин <Правило> <Код>СтатусыИзвлеченияТекстаФайлов <Наименование>Перечисление: Статусы извлечения текста файлов <Порядок>900 <Источник>ПеречислениеСсылка.СтатусыИзвлеченияТекстаФайлов <Приемник>ПеречислениеСсылка.СтатусыИзвлеченияТекстаФайлов <Свойства/> <Значения> <Значение> <Код>1 <Наименование>Извлечен --> Извлечен <Порядок>50 <Источник>Извлечен <Приемник>Извлечен <Значение> <Код>2 <Наименование>ИзвлечьНеУдалось --> ИзвлечьНеУдалось <Порядок>100 <Источник>ИзвлечьНеУдалось <Приемник>ИзвлечьНеУдалось <Значение> <Код>3 <Наименование>НеИзвлечен --> НеИзвлечен <Порядок>150 <Источник>НеИзвлечен <Приемник>НеИзвлечен <Правило> <Код>ТипыХраненияФайлов <Наименование>Перечисление: Типы хранения файлов <Порядок>950 <Источник>ПеречислениеСсылка.ТипыХраненияФайлов <Приемник>ПеречислениеСсылка.ТипыХраненияФайлов <Свойства/> <Значения> <Значение> <Код>1 <Наименование>ВИнформационнойБазе --> ВИнформационнойБазе <Порядок>50 <Источник>ВИнформационнойБазе <Приемник>ВИнформационнойБазе <Значение> <Код>2 <Наименование>ВТомахНаДиске --> ВТомахНаДиске <Порядок>100 <Источник>ВТомахНаДиске <Приемник>ВТомахНаДиске <Правило> <Код>СтавкиНДС00002 <Наименование>Перечисление: Ставки НДС <Порядок>1000 <Источник>ПеречислениеСсылка.СтавкиНДС <Приемник>ПеречислениеСсылка.СтавкиНДС <Свойства/> <Значения> <Значение> <Код>1 <Наименование>БезНДС --> БезНДС <Порядок>50 <Источник>БезНДС <Приемник>БезНДС <Значение> <Код>2 <Наименование>НДС0 --> НДС0 <Порядок>100 <Источник>НДС0 <Приемник>НДС0 <Значение> <Код>3 <Наименование>НДС10 --> НДС10 <Порядок>150 <Источник>НДС10 <Приемник>НДС10 <Значение> <Код>4 <Наименование>НДС10_110 --> НДС10_110 <Порядок>200 <Источник>НДС10_110 <Приемник>НДС10_110 <Значение> <Код>5 <Наименование>НДС18 --> НДС18 <Порядок>250 <Источник>НДС18 <Приемник>НДС18 <Значение> <Код>6 <Наименование>НДС18_118 --> НДС18_118 <Порядок>300 <Источник>НДС18_118 <Приемник>НДС18_118 <Значение> <Код>7 <Наименование>НДС20 --> НДС20 <Порядок>350 <Источник>НДС20 <Приемник>НДС20 <Значение> <Код>8 <Наименование>НДС20_120 --> НДС20_120 <Порядок>400 <Источник>НДС20_120 <Приемник>НДС20_120 <Правило> <Код>СтавкиНДС_СправочникПеречисление <Наименование>Справочник: Ставки НДС <Порядок>1050 <ПослеВыгрузки> Если НЕ ЗначениеЗаполнено(Источник) Тогда УзелСсылки = "БезНДС"; ИначеЕсли Источник.ПеречислениеСтавкаНДС = Перечисления.СтавкиНДС.БезНДС Тогда УзелСсылки = "БезНДС"; ИначеЕсли Источник.Ставка = 20 Тогда Если Источник.РасчетнаяСтавка Тогда УзелСсылки = "НДС20_120"; Иначе УзелСсылки = "НДС20"; КонецЕсли; ИначеЕсли Источник.Ставка = 10 Тогда Если Источник.РасчетнаяСтавка Тогда УзелСсылки = "НДС10_110"; Иначе УзелСсылки = "НДС10"; КонецЕсли; ИначеЕсли Источник.Ставка = 0 Тогда УзелСсылки = "НДС0"; ИначеЕсли Источник.Ставка = 18 Тогда Если Источник.РасчетнаяСтавка Тогда УзелСсылки = "НДС18_118"; Иначе УзелСсылки = "НДС18"; КонецЕсли; Иначе УзелСсылки = "БезНДС"; КонецЕсли; Отказ = Истина; <НеЗапоминатьВыгруженные>true <НеСоздаватьЕслиНеНайден>true <Источник>СправочникСсылка.СтавкиНДС <Приемник>ПеречислениеСсылка.СтавкиНДС <Свойства/> <Значения/> <Группа> <Код>Справочники <Наименование>Справочники <Порядок>100 <Группа> <Код>БазовыеКлассификаторы <Наименование>БазовыеКлассификаторы <Порядок>50 <Группа> <Код>ГРУППАБАНКИ <Наименование>БАНКИ <Порядок>50 <Правило> <Код>Банки <Наименование>Справочник: Банки <Порядок>150 <ПередВыгрузкой>Если Источник.ЭтоГруппа Тогда Отказ = Истина; КонецЕсли; <ПриЗагрузке>НеЗамещатьОбъект = Истина; <ПослеЗагрузки>Если Не ОбъектНайден Тогда Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1 | КлассификаторБанков.Ссылка КАК Ссылка |ИЗ | Справочник.КлассификаторБанков КАК КлассификаторБанков |ГДЕ | КлассификаторБанков.Код = &Код |СГРУППИРОВАТЬ ПО | КлассификаторБанков.Ссылка |УПОРЯДОЧИТЬ ПО | Ссылка"; Запрос.УстановитьПараметр("Код", Объект.Код); Результат = Запрос.Выполнить(); Если Не Результат.Пустой() Тогда Объект.РучноеИзменение = Ложь; Параметры.ЗагруженныеБанки.Добавить(Объект.Ссылка); Иначе Объект.РучноеИзменение = Истина; КонецЕсли; КонецЕсли; <НеЗамещать>true <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <Источник>СправочникСсылка.КлассификаторБанков <Приемник>СправочникСсылка.Банки <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Адрес --> Адрес <Порядок>100 <Источник Имя="Адрес" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Адрес" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Город --> Город <Порядок>150 <Источник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>КоррСчет --> КоррСчет <Порядок>200 <Источник Имя="КоррСчет" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КоррСчет" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Телефоны --> Телефоны <Порядок>250 <Источник Имя="Телефоны" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Телефоны" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Наименование --> Наименование <Порядок>300 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>350 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Обязательное="true"> <Код>10 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>450 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>Создаваемые_Банки <Наименование>: <Порядок>300 <ПередВыгрузкой>Если Источник.ЭтоГруппа Тогда Отказ = Истина; КонецЕсли; <ПриЗагрузке>НеЗамещатьОбъект = Истина; <ПослеЗагрузки> Если Не ОбъектНайден Тогда Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1 | КлассификаторБанков.Ссылка КАК Ссылка |ИЗ | Справочник.КлассификаторБанков КАК КлассификаторБанков |ГДЕ | КлассификаторБанков.Код = &КодОбъекта |СГРУППИРОВАТЬ ПО | КлассификаторБанков.Ссылка |УПОРЯДОЧИТЬ ПО | Ссылка"; Запрос.УстановитьПараметр("КодОбъекта", Объект.Код); Результат = Запрос.Выполнить(); Если Не Результат.Пустой() Тогда Объект.РучноеИзменение = 0; Параметры.ЗагруженныеБанки.Добавить(Объект.Ссылка); Иначе Объект.РучноеИзменение = 2; КонецЕсли; КонецЕсли; <ПоследовательностьПолейПоиска>Если НомерВариантаПоиска = 1 Тогда СтрокаИменСвойствПоиска = "Код"; КонецЕсли; <НеСоздаватьЕслиНеНайден>true <Приемник>СправочникСсылка.Банки <Свойства> <Свойство> <Код>1 <Наименование>--> Адрес <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Адрес" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>2 <Наименование>--> Город <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> КоррСчет <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КоррСчет" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>--> Телефоны <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Телефоны" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>5 <Наименование>--> Код <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>--> Наименование <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> ПометкаУдаления <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>Валюты <Наименование>Справочник: Валюты <Порядок>100 <ПоследовательностьПолейПоиска>Если НомерВариантаПоиска = 1 Тогда СтрокаИменСвойствПоиска = "Код"; КонецЕсли; <НеЗамещать>true <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <Источник>СправочникСсылка.Валюты <Приемник>СправочникСсылка.Валюты <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Наименование --> Наименование <Порядок>100 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>150 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>ПараметрыПрописи --> ПараметрыПрописи <Порядок>200 <Источник Имя="ПараметрыПрописи" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПараметрыПрописи" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>6 <Наименование>ЗагружаетсяИзИнтернета --> ЗагружаетсяИзИнтернета <Порядок>300 <Источник Имя="ЗагружаетсяИзИнтернета" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ЗагружаетсяИзИнтернета" Вид="Реквизит" Тип="Булево"/> <Значения/> <Правило> <Код>КлассификаторСтранМира <Наименование>Справочник: Страны мира <Порядок>200 <НеЗамещать>true <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <Источник>СправочникСсылка.СтраныМира <Приемник>СправочникСсылка.СтраныМира <Свойства> <Свойство> <Код>1 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Наименование --> Наименование <Порядок>100 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>3 <Наименование>КодАльфа2 --> КодАльфа2 <Порядок>150 <Источник Имя="КодАльфа2" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодАльфа2" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>200 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения> <Значение> <Код>1 <Наименование>Россия --> Россия <Порядок>50 <Источник>Россия <Приемник>Россия <Правило> <Код>КлассификаторЕдиницИзмерения <Наименование>Справочник: Единицы измерения <Порядок>250 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.УпаковкиЕдиницыИзмерения <Приемник>СправочникСсылка.КлассификаторЕдиницИзмерения <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>2 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>100 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Наименование --> Наименование <Порядок>150 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Группа> <Код>СтруктураПредприятия <Наименование>СтруктураПредприятия <Порядок>100 <Группа> <Код>ОтветственныеЛица <Наименование>ОтветственныеЛица <Порядок>50 <Правило> <Код>ОтветственныеЛицаОрганизаций <Наименование>Справочник: Ответственные лица организаций <Порядок>200 <НеЗапоминатьВыгруженные>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <Приемник>РегистрСведенийЗапись.ОтветственныеЛицаОрганизаций <Свойства> <Свойство> <Код>1 <Наименование>--> СтруктурнаяЕдиница <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтруктурнаяЕдиница" Вид="Измерение"/> <КодПравилаКонвертации>Организации <Свойство> <Код>2 <Наименование>--> ФизическоеЛицо <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ФизическоеЛицо" Вид="Ресурс" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>3 <Наименование>--> ОтветственноеЛицо <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ОтветственноеЛицо" Вид="Измерение" Тип="ПеречислениеСсылка.ОтветственныеЛицаОрганизаций"/> <КодПравилаКонвертации>Перечисление_ОтветственныеЛицаОрганизаций <Свойство> <Код>4 <Наименование>--> Период <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Период" Вид="Свойство" Тип="Дата"/> <Значения/> <Правило> <Код>УполномоченныеЛицаОрганизаций <Наименование>Справочник: Ответственные лица организаций <Порядок>250 <НеЗапоминатьВыгруженные>true <Приемник>РегистрСведенийЗапись.УполномоченныеЛицаОрганизаций <Свойства> <Свойство> <Код>1 <Наименование>--> Организация <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Измерение" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>2 <Наименование>--> ЗаКогоПодписывает <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЗаКогоПодписывает" Вид="Измерение" Тип="ПеречислениеСсылка.ОтветственныеЛицаОрганизаций"/> <КодПравилаКонвертации>Перечисление_ОтветственныеЛицаОрганизаций <Свойство> <Код>3 <Наименование>--> УполномоченноеЛицо <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="УполномоченноеЛицо" Вид="Ресурс" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>4 <Наименование>--> НомерДатаПриказа <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерДатаПриказа" Вид="Ресурс" Тип="Строка"/> <Значения/> <Правило> <Код>Организации <Наименование>Справочник: Организации <Порядок>100 <ПриВыгрузке> Если ТипЗнч(Источник) = Тип("СправочникСсылка.Контрагенты") Тогда ВыгрузитьПоПравилу(Источник,,,, "Контрагенты"); Отказ = Истина; КонецЕсли; <ПослеЗагрузки>Если Не ЗначениеЗаполнено(Объект.ГоловнаяОрганизация) Тогда Если Объект.ЭтоНовый() Тогда Если Объект.ПолучитьСсылкуНового().Пустая() Тогда Объект.УстановитьСсылкуНового(Справочники.Организации.ПолучитьСсылку()); КонецЕсли; Объект.ГоловнаяОрганизация = Объект.ПолучитьСсылкуНового(); Иначе Объект.ГоловнаяОрганизация = Объект.Ссылка; КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.РайонныйКоэффициент) Или Объект.РайонныйКоэффициент = 0 Тогда Объект.РайонныйКоэффициент = 1; КонецЕсли; //+ПСК Тимохов// Для физ лица создаём пустой элемент справочника физ лица. Если Объект.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо Тогда Если Не ЗначениеЗаполнено(Объект.ИндивидуальныйПредприниматель) Тогда СпрФизЛицо = Справочники.ФизическиеЛица.СоздатьЭлемент(); СпрФизЛицо.Наименование = Объект.Наименование; СпрФизЛицо.Записать(); Объект.ИндивидуальныйПредприниматель = СпрФизЛицо.Ссылка; КонецЕсли; КонецЕсли; <ПоследовательностьПолейПоиска>Если НомерВариантаПоиска = 1 тогда СтрокаИменСвойствПоиска = "ИНН, КПП"; ИначеЕсли НомерВариантаПоиска = 2 тогда СтрокаИменСвойствПоиска = "ИНН"; Иначе СтрокаИменСвойствПоиска = "Наименование"; КонецЕсли; <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.Организации <Приемник>СправочникСсылка.Организации <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>5 <Наименование>ИНН --> ИНН <Порядок>100 <Источник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>8 <Наименование>КПП --> КПП <Порядок>150 <Источник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>НаименованиеСокращенное --> НаименованиеСокращенное <Порядок>200 <Источник Имя="НаименованиеСокращенное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеСокращенное" Вид="Реквизит" Тип="Строка"/> <Свойство> <НеЗамещать>true <Код>55 <Наименование>--> ИндивидуальныйПредприниматель <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ИндивидуальныйПредприниматель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПередВыгрузкой>Если Источник.ЮридическоеФизическоеЛицо = Перечисления.ЮридическоеФизическоеЛицо.ФизическоеЛицо Тогда Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | ОтветственныеЛицаОрганизаций.ФизическоеЛицо КАК ФизическоеЛицо, | МАКСИМУМ(ВЫБОР | КОГДА ОтветственныеЛицаОрганизаций.ДатаОкончания = ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) | ТОГДА ДАТАВРЕМЯ(2800, 1, 1, 0, 0, 0) | ИНАЧЕ ОтветственныеЛицаОрганизаций.ДатаОкончания | КОНЕЦ) КАК ДатаОкончания |ИЗ | Справочник.ОтветственныеЛицаОрганизаций КАК ОтветственныеЛицаОрганизаций |ГДЕ | ОтветственныеЛицаОрганизаций.Владелец = &Организация | И ОтветственныеЛицаОрганизаций.ОтветственноеЛицо = ЗНАЧЕНИЕ(Перечисление.ОтветственныеЛицаОрганизаций.Руководитель) |СГРУППИРОВАТЬ ПО | ОтветственныеЛицаОрганизаций.ФизическоеЛицо"); Запрос.УстановитьПараметр("Организация",Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда Значение = Выборка.ФизическоеЛицо; КонецЕсли; КонецЕсли; <Свойство> <Код>2 <Наименование>ЮридическоеФизическоеЛицо --> ЮридическоеФизическоеЛицо <Порядок>300 <Источник Имя="ЮридическоеФизическоеЛицо" Вид="Реквизит" Тип="ПеречислениеСсылка.ЮридическоеФизическоеЛицо"/> <Приемник Имя="ЮридическоеФизическоеЛицо" Вид="Реквизит" Тип="ПеречислениеСсылка.ЮридическоеФизическоеЛицо"/> <КодПравилаКонвертации>ЮридическоеФизическоеЛицо <Свойство Отключить="true"> <Код>6 <Наименование>КодПоОКАТО --> КодПоОКАТО <Порядок>350 <Источник Имя="КодПоОКАТО" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодПоОКАТО" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>КодПоОКПО --> КодПоОКПО <Порядок>400 <Источник Имя="КодПоОКПО" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодПоОКПО" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>450 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ОГРН --> ОГРН <Порядок>500 <Источник Имя="ОГРН" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ОГРН" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Префикс --> Префикс <Порядок>550 <Источник Имя="Префикс" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Префикс" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>СвидетельствоДатаВыдачи --> СвидетельствоДатаВыдачи <Порядок>600 <Источник Имя="СвидетельствоДатаВыдачи" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="СвидетельствоДатаВыдачи" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>27 <Наименование>СвидетельствоСерияНомер --> СвидетельствоСерияНомер <Порядок>650 <Источник Имя="СвидетельствоСерияНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="СвидетельствоСерияНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>45 <Наименование>ГоловнаяОрганизация --> ГоловнаяОрганизация <Порядок>750 <Источник Имя="ГоловнаяОрганизация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="ГоловнаяОрганизация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>46 <Наименование>ОбособленноеПодразделение --> ОбособленноеПодразделение <Порядок>800 <Источник Имя="ОбособленноеПодразделение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ОбособленноеПодразделение" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>47 <Наименование>ЦифровойИндексОбособленногоПодразделения --> ЦифровойИндексОбособленногоПодразделения <Порядок>850 <Источник Имя="ЦифровойИндексОбособленногоПодразделения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ЦифровойИндексОбособленногоПодразделения" Вид="Реквизит" Тип="Число"/> <Группа> <Код>14 <Наименование>КонтактнаяИнформация --> КонтактнаяИнформация <Порядок>900 <Источник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Приемник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Свойство> <Код>31 <Наименование>Вид --> Вид <Порядок>50 <Источник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <Приемник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <КодПравилаКонвертации>ВидыКонтактнойИнформации <Свойство> <Код>39 <Наименование>Тип --> Тип <Порядок>100 <Источник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <Приемник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <КодПравилаКонвертации>ТипыКонтактнойИнформации <Свойство> <Код>34 <Наименование>ЗначенияПолей --> ЗначенияПолей <Порядок>150 <Источник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>Представление --> Представление <Порядок>200 <Источник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>48 <Наименование>АдресЭП --> АдресЭП <Порядок>250 <Источник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>49 <Наименование>Город --> Город <Порядок>300 <Источник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>50 <Наименование>ДоменноеИмяСервера --> ДоменноеИмяСервера <Порядок>350 <Источник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>51 <Наименование>НомерТелефона --> НомерТелефона <Порядок>400 <Источник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>52 <Наименование>НомерТелефонаБезКодов --> НомерТелефонаБезКодов <Порядок>450 <Источник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>53 <Наименование>Регион --> Регион <Порядок>500 <Источник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>54 <Наименование>Страна --> Страна <Порядок>550 <Источник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Значения/> <Правило> <Код>Склады <Наименование>Справочник: Склады <Порядок>150 <ПослеЗагрузки>//+Тимохов// //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда ИмяРеквизита = "Ответственный"; ИмяРегистра = "ОтветственныеЛица"; ИмяИзмерения = "СтруктурнаяЕдиница"; ИмяРесурса = "ФизическоеЛицо"; ПустоеЗначениеРеквизита = Справочники.ФизическиеЛица.ПустаяСсылка(); Выполнить(Алгоритмы.ОбновитьПериодическийРеквизит); //КонецЕсли; //-Тимохов// <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.Склады <Приемник>СправочникСсылка.Склады <Свойства> <Свойство> <НеЗамещать>true <Код>5 <Наименование>ТипСклада --> ТипСклада <Порядок>50 <Источник Имя="ТипСклада" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыСкладов"/> <Приемник Имя="ТипСклада" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыСкладов"/> <КодПравилаКонвертации>ТипыСкладов <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>100 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true" Обязательное="true"> <Код>8 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>150 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>7 <Наименование>Родитель --> Родитель <Порядок>200 <Источник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <Свойство> <Код>10 <Наименование>РозничныйВидЦены --> ТипЦенРозничнойТорговли <Порядок>250 <Источник Имя="РозничныйВидЦены" Вид="Реквизит" Тип="СправочникСсылка.ВидыЦен"/> <Приемник Имя="ТипЦенРозничнойТорговли" Вид="Реквизит" Тип="СправочникСсылка.ТипыЦенНоменклатуры"/> <КодПравилаКонвертации>ТипыЦенНоменклатуры <ПередВыгрузкой>// Выгружаем пустой вид цен, если вид цен не проходит фильтр //Если Параметры.ВидыЦенНоменклатуры.Найти(Источник.РозничныйВидЦены) = Неопределено Тогда // Отказ = Истина; //КонецЕсли; <Свойство> <Код>9 <Наименование>ТекущийОтветственный --> Ответственный <Порядок>300 <Источник Имя="ТекущийОтветственный" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ФизическиеЛица <ИмяПараметраДляПередачи>Ответственный <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>350 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>РегистрацииВНалоговомОргане <Наименование>Справочник: Регистрации в налоговом органе <Порядок>200 <ПослеЗагрузки>Если Не ЗначениеЗаполнено(СокрЛП(Объект.НаименованиеИФНС)) тогда Объект.НаименованиеИФНС = "<Наименование не заполнено>"; КонецЕсли; <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <Источник>СправочникСсылка.РегистрацииВНалоговомОргане <Приемник>СправочникСсылка.РегистрацииВНалоговомОргане <Свойства> <Свойство> <Код>1 <Наименование>ДокументПредставителя --> ДокументПредставителя <Порядок>50 <Источник Имя="ДокументПредставителя" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДокументПредставителя" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>2 <Наименование>КодПоОКАТО --> КодПоОКАТО <Порядок>100 <Источник Имя="КодПоОКАТО" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодПоОКАТО" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>3 <Наименование>КодПоОКТМО --> КодПоОКТМО <Порядок>150 <Источник Имя="КодПоОКТМО" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодПоОКТМО" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>4 <Наименование>КПП --> КПП <Порядок>200 <Источник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>5 <Наименование>НаименованиеИФНС --> НаименованиеИФНС <Порядок>250 <Источник Имя="НаименованиеИФНС" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеИФНС" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>6 <Наименование>НаименованиеОбособленногоПодразделения --> НаименованиеОбособленногоПодразделения <Порядок>300 <Источник Имя="НаименованиеОбособленногоПодразделения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеОбособленногоПодразделения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Представитель --> Представитель <Порядок>350 <Источник Имя="Представитель" Вид="Реквизит"/> <Приемник Имя="Представитель" Вид="Реквизит"/> <Свойство> <Код>8 <Наименование>УполномоченноеЛицоПредставителя --> УполномоченноеЛицоПредставителя <Порядок>400 <Источник Имя="УполномоченноеЛицоПредставителя" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="УполномоченноеЛицоПредставителя" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>9 <Наименование>Владелец --> Владелец <Порядок>450 <Источник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство Поиск="true"> <Код>10 <Наименование>Наименование --> Наименование <Порядок>500 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Значения/> <Группа> <Код>Каталоги <Наименование>Каталоги <Порядок>150 <Группа> <Код>БанковскиеСчета <Наименование>БанковскиеСчета <Порядок>50 <Правило> <Код>БанковскиеСчетаОрганизаций <Наименование>Справочник: Банковские счета организаций <Порядок>50 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.БанковскиеСчетаОрганизаций <Приемник>СправочникСсылка.БанковскиеСчета <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Владелец --> Владелец <Порядок>50 <Источник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Владелец" Вид="Свойство"/> <КодПравилаКонвертации>Организации <Свойство Поиск="true"> <Код>4 <Наименование>НомерСчета --> НомерСчета <Порядок>100 <Источник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Банк --> Банк <Порядок>150 <Источник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПриВыгрузке>Выполнить(Алгоритмы.БанковскиеСчета_Банк); <Свойство> <Код>11 <Наименование>БанкДляРасчетов --> БанкДляРасчетов <Порядок>200 <Источник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПередВыгрузкой>Выполнить(Алгоритмы.БанковскиеСчета_БанкДляРасчетов); <Свойство> <Код>3 <Наименование>ВалютаДенежныхСредств --> ВалютаДенежныхСредств <Порядок>250 <Источник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>ТекстКорреспондента --> ТекстКорреспондента <Порядок>300 <Источник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ТекстНазначения --> ТекстНазначения <Порядок>350 <Источник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Наименование --> Наименование <Порядок>400 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> ВидСчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчета" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Расчетный"; <Свойство> <Код>12 <Наименование>ВыводитьСуммуБезКопеек --> СуммаБезКопеек <Порядок>500 <Источник Имя="ВыводитьСуммуБезКопеек" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаБезКопеек" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>14 <Наименование>ВариантВыводаМесяца --> МесяцПрописью <Порядок>550 <Источник Имя="ВариантВыводаМесяца" Вид="Реквизит" Тип="ПеречислениеСсылка.ВариантыВыводаМесяцаВДатеДокумента"/> <Приемник Имя="МесяцПрописью" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Источник.ВариантВыводаМесяца = Перечисления.ВариантыВыводаМесяцаВДатеДокумента.Прописью; <Свойство> <Код>13 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>600 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>БанковскиеСчетаКонтрагентов <Наименование>Справочник: Банковские счета организаций <Порядок>150 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.БанковскиеСчетаКонтрагентов <Приемник>СправочникСсылка.БанковскиеСчета <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Владелец --> Владелец <Порядок>50 <Источник Имя="Владелец" Вид="Свойство"/> <Приемник Имя="Владелец" Вид="Свойство"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>ВладелецИзВходящихДанных = Неопределено; Если ВходящиеДанные <> Неопределено И ВходящиеДанные.Свойство("Владелец", ВладелецИзВходящихДанных) Тогда Значение = ВладелецИзВходящихДанных; КонецЕсли; <Свойство Поиск="true"> <Код>3 <Наименование>НомерСчета --> НомерСчета <Порядок>100 <Источник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>1 <Наименование>Банк --> Банк <Порядок>150 <Источник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПередВыгрузкой>Выполнить(Алгоритмы.БанковскиеСчета_Банк); <Свойство> <Код>2 <Наименование>БанкДляРасчетов --> БанкДляРасчетов <Порядок>200 <Источник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПередВыгрузкой>Выполнить(Алгоритмы.БанковскиеСчета_БанкДляРасчетов); <Свойство> <Код>4 <Наименование>ТекстКорреспондента --> ТекстКорреспондента <Порядок>250 <Источник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>ТекстНазначения --> ТекстНазначения <Порядок>300 <Источник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Наименование --> Наименование <Порядок>350 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> ВидСчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчета" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Расчетный"; <Свойство> <Код>10 <Наименование>ВалютаДенежныхСредств --> ВалютаДенежныхСредств <Порядок>450 <Источник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>БанковскиеСчетаФизическихЛиц <Наименование>Справочник: Банковские счета организаций <Порядок>200 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.БанковскиеСчетаКонтрагентов <Приемник>СправочникСсылка.БанковскиеСчета <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Владелец --> Владелец <Порядок>50 <Источник Имя="Владелец" Вид="Свойство"/> <Приемник Имя="Владелец" Вид="Свойство"/> <ПередВыгрузкой>НовыйКонтрагент = Справочники.Контрагенты.ПустаяСсылка(); ФизЛицо = Источник.Владелец; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзФизЛица); Значение = НовыйКонтрагент; <Свойство Поиск="true"> <Код>3 <Наименование>НомерСчета --> НомерСчета <Порядок>100 <Источник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерСчета" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>1 <Наименование>Банк --> Банк <Порядок>150 <Источник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="Банк" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПередВыгрузкой>Выполнить(Алгоритмы.БанковскиеСчета_Банк); <Свойство> <Код>2 <Наименование>БанкДляРасчетов --> БанкДляРасчетов <Порядок>200 <Источник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторБанков"/> <Приемник Имя="БанкДляРасчетов" Вид="Реквизит" Тип="СправочникСсылка.Банки"/> <ПередВыгрузкой>Выполнить(Алгоритмы.БанковскиеСчета_БанкДляРасчетов); <Свойство> <Код>4 <Наименование>ТекстКорреспондента --> ТекстКорреспондента <Порядок>250 <Источник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстКорреспондента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>ТекстНазначения --> ТекстНазначения <Порядок>300 <Источник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ТекстНазначения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Наименование --> Наименование <Порядок>350 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> ВидСчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчета" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Расчетный"; <Свойство> <Код>10 <Наименование>ВалютаДенежныхСредств --> ВалютаДенежныхСредств <Порядок>450 <Источник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ФизическиеЛица <Наименование>Справочник: Физические лица <Порядок>100 <НеЗамещать>true <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <НеСоздаватьЕслиНеНайден>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ФизическиеЛица <Приемник>СправочникСсылка.ФизическиеЛица <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>3 <Наименование>ДатаРождения --> ДатаРождения <Порядок>100 <Источник Имя="ДатаРождения" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаРождения" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>23 <Наименование>Наименование --> ФИО <Порядок>150 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="ФИО" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Пол --> Пол <Порядок>200 <Источник Имя="Пол" Вид="Реквизит" Тип="ПеречислениеСсылка.ПолФизическогоЛица"/> <Приемник Имя="Пол" Вид="Реквизит" Тип="ПеречислениеСсылка.ПолФизическогоЛица"/> <КодПравилаКонвертации>ПолФизическихЛиц <Свойство> <Код>7 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>КонтактнаяИнформация --> КонтактнаяИнформация <Порядок>300 <Источник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Приемник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Если Источник.ЭтоГруппа Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>9 <Наименование>Вид --> Вид <Порядок>50 <Источник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <Приемник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <КодПравилаКонвертации>ВидыКонтактнойИнформации <Свойство> <Код>12 <Наименование>Тип --> Тип <Порядок>100 <Источник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <Приемник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <КодПравилаКонвертации>ТипыКонтактнойИнформации <Свойство> <Код>10 <Наименование>ЗначенияПолей --> ЗначенияПолей <Порядок>150 <Источник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Представление --> Представление <Порядок>200 <Источник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>АдресЭП --> АдресЭП <Порядок>250 <Источник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Город --> Город <Порядок>300 <Источник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ДоменноеИмяСервера --> ДоменноеИмяСервера <Порядок>350 <Источник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>НомерТелефона --> НомерТелефона <Порядок>400 <Источник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>НомерТелефонаБезКодов --> НомерТелефонаБезКодов <Порядок>450 <Источник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>Регион --> Регион <Порядок>500 <Источник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Страна --> Страна <Порядок>550 <Источник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true" Обязательное="true"> <Код>20 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>350 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>21 <Наименование>ИНН --> ИНН <Порядок>400 <Источник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Родитель --> Родитель <Порядок>450 <Источник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Значения/> <Правило> <Код>Контрагенты <Наименование>Справочник: Контрагенты <Порядок>150 <ПослеВыгрузки>Если ПолучитьФункциональнуюОпцию("ВестиСведенияДляДекларацийАлкоВРознице") Тогда //И Параметры.ПравилаОтправкиСправочников = "СинхронизироватьПоНеобходимости" Тогда ЭтоУдаление = Ложь; Запрос = Новый Запрос("ВЫБРАТЬ | ЛицензииПоставщиковАлкогольнойПродукции.Ссылка Как ЛицензияПоставщика |ИЗ | Справочник.ЛицензииПоставщиковАлкогольнойПродукции КАК ЛицензииПоставщиковАлкогольнойПродукции |ГДЕ | ЛицензииПоставщиковАлкогольнойПродукции.Владелец = &Владелец | И Не ЛицензииПоставщиковАлкогольнойПродукции.ПометкаУдаления"); Запрос.УстановитьПараметр("Владелец", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл ИсточникДанных = Выборка.ЛицензияПоставщика; Выполнить(Алгоритмы.ВыгрузитьЛицензиюПоставщикаАлкогольнойПродукции); КонецЦикла; КонецЕсли; <ПоследовательностьПолейПоиска>//Если НомерВариантаПоиска = 1 тогда // СтрокаИменСвойствПоиска = "ИНН, КПП"; //ИначеЕсли НомерВариантаПоиска = 2 тогда // СтрокаИменСвойствПоиска = "ИНН"; //Иначе // СтрокаИменСвойствПоиска = "Наименование"; //КонецЕсли; <Источник>СправочникСсылка.Контрагенты <Приемник>СправочникСсылка.Контрагенты <Свойства> <Свойство> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>3 <Наименование>ИНН --> ИНН <Порядок>100 <Источник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ИНН" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>5 <Наименование>КПП --> КПП <Порядок>150 <Источник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КПП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>30 <Наименование>ЮридическоеФизическоеЛицо --> ЮридическоеФизическоеЛицо <Порядок>250 <Источник Имя="ЮридическоеФизическоеЛицо" Вид="Реквизит" Тип="ПеречислениеСсылка.ЮридическоеФизическоеЛицо"/> <Приемник Имя="ЮридическоеФизическоеЛицо" Вид="Реквизит" Тип="ПеречислениеСсылка.ЮридическоеФизическоеЛицо"/> <КодПравилаКонвертации>ЮридическоеФизическоеЛицо <Свойство> <Код>4 <Наименование>КодПоОКПО --> КодПоОКПО <Порядок>300 <Источник Имя="КодПоОКПО" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодПоОКПО" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>350 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> ГоловнойКонтрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ГоловнойКонтрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = Источник.Ссылка; <Свойство> <Код>22 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>450 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>10 <Наименование>КонтактнаяИнформация --> КонтактнаяИнформация <Порядок>500 <Источник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Приемник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Свойство> <Код>12 <Наименование>Вид --> Вид <Порядок>100 <Источник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <Приемник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <КодПравилаКонвертации>ВидыКонтактнойИнформации <Свойство> <Код>15 <Наименование>ЗначенияПолей --> ЗначенияПолей <Порядок>250 <Источник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>Представление --> Представление <Порядок>400 <Источник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Тип --> Тип <Порядок>550 <Источник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <Приемник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <КодПравилаКонвертации>ТипыКонтактнойИнформации <Свойство> <Код>23 <Наименование>АдресЭП --> АдресЭП <Порядок>600 <Источник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Город --> Город <Порядок>650 <Источник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ДоменноеИмяСервера --> ДоменноеИмяСервера <Порядок>700 <Источник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>НомерТелефона --> НомерТелефона <Порядок>750 <Источник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>НомерТелефонаБезКодов --> НомерТелефонаБезКодов <Порядок>800 <Источник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>Регион --> Регион <Порядок>850 <Источник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>Страна --> Страна <Порядок>900 <Источник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Свойство Отключить="true" Обязательное="true"> <Код>31 <Наименование>--> ЭтоГруппа <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>Номенклатура <Наименование>Справочник: Номенклатура <Порядок>200 <ПослеЗагрузки>//Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Если Не Объект.ЭтоГруппа Тогда // // // Заполнение номенклатурной группы по умолчанию // Если Не ЗначениеЗаполнено(Объект.НоменклатурнаяГруппа) // И ЗначениеЗаполнено(Параметры.НоменклатурнаяГруппаПоУмолчанию) Тогда // Объект.НоменклатурнаяГруппа = Параметры.НоменклатурнаяГруппаПоУмолчанию; // КонецЕсли; // // // Получение сведений об алкогольной продукции // Если ПараметрыОбъекта["АлкогольнаяПродукция"] Тогда // // ПроизводительИмпортерДляДекларацииАлко = ПараметрыОбъекта["ПроизводительИмпортерДляДекларацииАлко"]; // // Если ПараметрыОбъекта["ИмпортнаяАлкогольнаяПродукция"] Тогда // Объект.Импортер = ПроизводительИмпортерДляДекларацииАлко; // Объект.Производитель = Неопределено; // Иначе // Объект.Импортер = Неопределено; // Объект.Производитель = ПроизводительИмпортерДляДекларацииАлко; // КонецЕсли; // // АлкоРСНабор = РегистрыСведений.СведенияОбАлкогольнойПродукции.СоздатьНаборЗаписей(); // АлкоРСНабор.Отбор.Номенклатура.Установить(Объект.Ссылка); // // АлкоРСЗапись = АлкоРСНабор.Добавить(); // // АлкоРСЗапись.Номенклатура = Объект.Ссылка; // АлкоРСЗапись.ВидЛицензии = ПараметрыОбъекта["ВидЛицензии"]; // АлкоРСЗапись.КоэффПересчетаДал = ПараметрыОбъекта["ОбъемДАЛ"]; // // ЗаписатьОбъектВИБ(АлкоРСНабор, Тип("РегистрСведенийНаборЗаписей.СведенияОбАлкогольнойПродукции")); // // КонецЕсли; // //КонецЕсли; //КонецЕсли; <ПоследовательностьПолейПоиска> //Если НомерВариантаПоиска = 1 Тогда // СтрокаИменСвойствПоиска = "Артикул, Наименование"; //ИначеЕсли НомерВариантаПоиска = 2 Тогда // СтрокаИменСвойствПоиска = "Артикул"; //ИначеЕсли НомерВариантаПоиска = 3 Тогда // СтрокаИменСвойствПоиска = "Наименование, Родитель"; //Иначе // СтрокаИменСвойствПоиска = "Наименование"; //КонецЕсли; //ПСК+ Сазанский А. > Если СвойстваПоиска["ЭтоГруппа"] Тогда СтрокаИменСвойствПоиска = "Наименование, ЭтоГруппа"; //ИначеЕсли Параметры.СворачиватьПоНоменклатуре Тогда //СтрокаИменСвойствПоиска = "Наименование"; КонецЕсли; //ПСК+ Сазанский А. < <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.Номенклатура <Приемник>СправочникСсылка.Номенклатура <Свойства> <Свойство> <Код>14 <Наименование>Артикул --> Артикул <Порядок>50 <Источник Имя="Артикул" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Артикул" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>4 <Наименование>Наименование --> Наименование <Порядок>100 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой> //ПСК+ Сазанский А. > Если Параметры.СворачиватьПоНоменклатуре И Не Источник.ЭтоГруппа Тогда Значение = Параметры.ОбобщеннаяНоменклатура.Наименование; КонецЕсли; //ПСК+ Сазанский А. < <Свойство Отключить="true"> <Код>11 <Наименование>Родитель --> Родитель <Порядок>150 <Источник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство Поиск="true"> <Код>3 <Наименование>Код --> Код <Порядок>200 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>1 <Наименование>НаименованиеПолное --> НаименованиеПолное <Порядок>250 <Источник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НаименованиеПолное" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true" Обязательное="true"> <Код>12 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>300 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>2 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>350 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>8 <Наименование>ТипНоменклатуры --> Услуга <Порядок>400 <Источник Имя="ТипНоменклатуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНоменклатуры"/> <Приемник Имя="Услуга" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой> Значение = ?((Источник.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Услуга) ИЛИ (Источник.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Работа), Истина, Ложь); <Свойство> <Код>9 <Наименование>ЕдиницаИзмерения --> ЕдиницаИзмерения <Порядок>450 <Источник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.УпаковкиЕдиницыИзмерения"/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>30 <Наименование>ВидАлкогольнойПродукции --> ВидЛицензии <Порядок>950 <Источник Имя="ВидАлкогольнойПродукции" Вид="Реквизит" Тип="СправочникСсылка.ВидыАлкогольнойПродукции"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ВидЛицензии <ПередВыгрузкой> Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник, "ВидЛицензии"); <Значения/> <Правило> <Код>Пользователи <Наименование>Справочник: Пользователи <Порядок>300 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.Пользователи <Приемник>СправочникСсылка.Пользователи <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>6 <Наименование>КонтактнаяИнформация --> КонтактнаяИнформация <Порядок>250 <Источник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <Приемник Имя="КонтактнаяИнформация" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Если Источник.ЭтоГруппа Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>7 <Наименование>АдресЭП --> АдресЭП <Порядок>50 <Источник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресЭП" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Вид --> Вид <Порядок>100 <Источник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <Приемник Имя="Вид" Вид="Реквизит" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <КодПравилаКонвертации>ВидыКонтактнойИнформации <Свойство> <Код>9 <Наименование>Город --> Город <Порядок>150 <Источник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Город" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ДоменноеИмяСервера --> ДоменноеИмяСервера <Порядок>200 <Источник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоменноеИмяСервера" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ЗначенияПолей --> ЗначенияПолей <Порядок>250 <Источник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗначенияПолей" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>НомерТелефона --> НомерТелефона <Порядок>300 <Источник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефона" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>НомерТелефонаБезКодов --> НомерТелефонаБезКодов <Порядок>350 <Источник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерТелефонаБезКодов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Представление --> Представление <Порядок>400 <Источник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Представление" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>Регион --> Регион <Порядок>450 <Источник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Регион" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>Страна --> Страна <Порядок>500 <Источник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Страна" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>Тип --> Тип <Порядок>550 <Источник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <Приемник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <КодПравилаКонвертации>ТипыКонтактнойИнформации <Значения/> <Правило> <Код>ВидыОплатОрганизаций <Наименование>Справочник: Эквайринговые терминалы <Порядок>350 <ПередВыгрузкой>Отказ = Источник.ЭтоГруппа; <ПослеЗагрузки>СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если НЕ Объект.СчетУчетаРасчетов = СчетаУчета.СчетРасчетов Тогда Объект.СчетУчетаРасчетов = СчетаУчета.СчетРасчетов; Объект.Записать(); КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>СправочникСсылка.ЭквайринговыеТерминалы <Приемник>СправочникСсылка.ВидыОплатОрганизаций <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>УдалитьБанковскийСчет --> Организация <Порядок>200 <Источник Имя="УдалитьБанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <ПриВыгрузке>Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Владелец"); <Свойство Поиск="true"> <Код>7 <Наименование>УдалитьЭквайер --> Контрагент <Порядок>250 <Источник Имя="УдалитьЭквайер" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>300 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>--> ТипОплаты <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ТипОплаты" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыОплат"/> <ПередВыгрузкой>Значение = "ПлатежнаяКарта"; <Свойство> <Код>9 <Наименование>--> ДоговорКонтрагента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПередВыгрузкой>Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Источник.УдалитьЭквайер); Значение.Вставить("Организация", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.УдалитьБанковскийСчет, "Владелец")); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ДенежныеСредстваСервер.ПолучитьПартнераПоКонтрагенту(Источник.УдалитьЭквайер)); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.ВалютаВзаиморасчетов = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.УдалитьБанковскийСчет, "ВалютаДенежныхСредств"); ВыгрузитьОбъект = Истина; <Свойство> <Код>10 <Наименование>--> СчетУчетаРасчетов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетов" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Валюта = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.УдалитьБанковскийСчет, "ВалютаДенежныхСредств"); Если Валюта <> Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = "57.21"; Иначе Значение = "57.03"; КонецЕсли; <Свойство> <Код>3 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Группа> <Код>ПрочиеСправочники <Наименование>ПрочиеСправочники <Порядок>500 <Группа> <Код>ГруппаДоговорыКонтрагентов <Наименование>ДоговорыКонтрагентов <Порядок>50 <Правило> <Код>ДоговорыКонтрагентов_ДоговорыКонтрагентов <Наименование>Справочник: Договоры с контрагентами <Порядок>50 <ПередВыгрузкой> ВходящиеДанные = Новый Структура; ВходящиеДанные.Вставить("РасчетыВУсловныхЕдиницах", НЕ Источник.ОплатаВВалюте); <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ДоговорыКонтрагентов <Приемник>СправочникСсылка.ДоговорыКонтрагентов <Свойства> <Свойство Поиск="true"> <Код>10 <Наименование>ТипДоговора --> ВидДоговора <Порядок>50 <Источник Имя="ТипДоговора" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыДоговоров"/> <Приемник Имя="ВидДоговора" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДоговоровКонтрагентов"/> <ПриВыгрузке>Если ВходящиеДанные.Свойство("ВидДоговора") Тогда Значение = ВходящиеДанные.ВидДоговора; Иначе ИмяПКО = "ТипыДоговоров_ВидыДоговоровКонтрагентов"; КонецЕсли; <Свойство Поиск="true"> <Код>1 <Наименование>ВалютаВзаиморасчетов --> ВалютаВзаиморасчетов <Порядок>100 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство Поиск="true"> <Код>8 <Наименование>Контрагент --> Владелец <Порядок>150 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Поиск="true"> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство Поиск="true"> <Код>9 <Наименование>--> РасчетыВУсловныхЕдиницах <Порядок>250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыВУсловныхЕдиницах" Вид="Реквизит" Тип="Булево"/> <Свойство Поиск="true"> <Код>6 <Наименование>Наименование --> Наименование <Порядок>300 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Дата --> Дата <Порядок>350 <Источник Имя="Дата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Дата" Вид="Реквизит" Тип="Дата"/> <Свойство Поиск="true"> <Код>4 <Наименование>Номер --> Номер <Порядок>400 <Источник Имя="Номер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Номер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Комментарий <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = НСтр("ru = 'Используется в УТ11'"); <Свойство> <Код>7 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Наименование>Справочник: Договоры кредитов и депозитов <Порядок>100 <ПередВыгрузкой> ВходящиеДанные = Новый Структура; ВходящиеДанные.Вставить("РасчетыВУсловныхЕдиницах", НЕ Источник.ОплатаВВалюте); <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ДоговорыКредитовИДепозитов <Приемник>СправочникСсылка.ДоговорыКонтрагентов <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>--> ВидДоговора <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДоговора" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДоговоровКонтрагентов"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство Поиск="true"> <Код>7 <Наименование>ВалютаВзаиморасчетов --> ВалютаВзаиморасчетов <Порядок>100 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство Поиск="true"> <Код>8 <Наименование>Контрагент --> Владелец <Порядок>150 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Поиск="true"> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>--> РасчетыВУсловныхЕдиницах <Порядок>250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыВУсловныхЕдиницах" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Наименование --> Наименование <Порядок>300 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Дата --> Дата <Порядок>350 <Источник Имя="Дата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Дата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>3 <Наименование>Номер --> Номер <Порядок>400 <Источник Имя="Номер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Номер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = НСтр("ru = 'Используется в УТ11'"); <Свойство> <Код>5 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ДоговорыКонтрагентов <Наименование>: <Порядок>150 <ПередВыгрузкой>Если Не ЗначениеЗаполнено(Источник.ВалютаВзаиморасчетов) Тогда Источник.ВалютаВзаиморасчетов = Константы.ВалютаРегламентированногоУчета.Получить(); КонецЕсли; //Если Не ЗначениеЗаполнено(Источник.РасчетыВУсловныхЕдиницах) Тогда // Значение = Ложь; //КонецЕсли; ЗапоминатьВыгруженные = Истина; КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(Источник); Если Не ЗначениеЗаполнено(Источник.Владелец) Тогда Отказ = Истина; КонецЕсли; <ПослеЗагрузки>Если Объект.ЭтоНовый() Тогда Если ПараметрыОбъекта <> Неопределено Тогда Объект.УстановитьСсылкуНового(Справочники.ДоговорыКонтрагентов.ПолучитьСсылку(Новый УникальныйИдентификатор)); НаборЗаписей = РегистрыСведений.ДополнительныеСведения.СоздатьНаборЗаписей(); НаборЗаписей.Отбор.Объект.Установить(Объект.ПолучитьСсылкуНового()); Для Каждого ПараметрОбъекта Из ПараметрыОбъекта Цикл Ключ = ПараметрОбъекта.Ключ; Если Лев(Ключ, 16) = "ЗначениеСвойства" Тогда Свойство = ПараметрыОбъекта[СтрЗаменить(Ключ, "ЗначениеСвойства", "Свойство")]; НоваяЗапись = НаборЗаписей.Добавить(); НоваяЗапись.Объект = Объект.ПолучитьСсылкуНового(); НоваяЗапись.Свойство = Свойство.Ссылка; НоваяЗапись.Значение = ПараметрОбъекта.Значение; КонецЕсли; КонецЦикла; Если НаборЗаписей.Количество() > 0 Тогда УстановитьОбменДаннымиЗагрузка(НаборЗаписей); НаборЗаписей.Записать(); УстановитьОбменДаннымиЗагрузка(НаборЗаписей, Ложь); КонецЕсли; КонецЕсли; Объект.Комментарий = НСтр("ru = 'Сформирован автоматически при обмене с конфигурацией ""Управление торговлей""'"); КонецЕсли; <ПоследовательностьПолейПоиска>//Запрос = Новый Запрос; //Для Каждого СвойствоПоиска Из СвойстваПоиска Цикл // Запрос.УстановитьПараметр(СвойствоПоиска.Ключ, СвойствоПоиска.Значение); //КонецЦикла; //Если Не СвойстваПоиска.Получить("ИспользуетсяПриОбменеДанными") = Неопределено Тогда // // Осуществляем поиск по реквизитам // Запрос.Текст = "ВЫБРАТЬ // | ДоговорыКонтрагентов.Ссылка // |ИЗ // | Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов // |ГДЕ // | ДоговорыКонтрагентов.ВидДоговора = &ВидДоговора // | И ДоговорыКонтрагентов.Организация = &Организация // | И ДоговорыКонтрагентов.Владелец = &Владелец // | И ДоговорыКонтрагентов.ВалютаВзаиморасчетов = &ВалютаВзаиморасчетов // | И ДоговорыКонтрагентов.ИспользуетсяПриОбменеДанными = &ИспользуетсяПриОбменеДанными // | И ДоговорыКонтрагентов.РасчетыВУсловныхЕдиницах = &РасчетыВУсловныхЕдиницах"; // // ВыборкаДоговоров = Запрос.Выполнить().Выбрать(); // Если ВыборкаДоговоров.Следующий() Тогда // СсылкаНаОбъект = ВыборкаДоговоров.Ссылка; // КонецЕсли; // //Иначе // // Осуществляем поиск договора не только по реквизитам, но и по свойствам // Запрос.Текст = "ВЫБРАТЬ // | ЗначенияЗагруженныхСвойств.СвойствоНаименование КАК СвойствоНаименование, // | ЗначенияЗагруженныхСвойств.СвойствоЗначение // |ПОМЕСТИТЬ ЗначенияЗагруженныхСвойств // |ИЗ // | &ЗначенияЗагруженныхСвойств КАК ЗначенияЗагруженныхСвойств // | // |ИНДЕКСИРОВАТЬ ПО // | СвойствоНаименование // |; // | // |//////////////////////////////////////////////////////////////////////////////// // |ВЫБРАТЬ // | ДоговорыКонтрагентов.Ссылка КАК Ссылка, // | ЗначенияЗагруженныхСвойств.СвойствоНаименование // |ПОМЕСТИТЬ ОтборПоРеквизитам // |ИЗ // | Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов, // | ЗначенияЗагруженныхСвойств КАК ЗначенияЗагруженныхСвойств // |ГДЕ // | ДоговорыКонтрагентов.ВидДоговора = &ВидДоговора // | И ДоговорыКонтрагентов.Организация = &Организация // | И ДоговорыКонтрагентов.Владелец = &Владелец // | И ДоговорыКонтрагентов.ВалютаВзаиморасчетов = &ВалютаВзаиморасчетов // | И ДоговорыКонтрагентов.РасчетыВУсловныхЕдиницах = &РасчетыВУсловныхЕдиницах // | // |ИНДЕКСИРОВАТЬ ПО // | Ссылка // |; // | // |//////////////////////////////////////////////////////////////////////////////// // |ВЫБРАТЬ // | ОтборПоРеквизитам.Ссылка, // | ЗначенияСвойствОбъектов.Свойство.Наименование КАК СвойствоНаименование, // | ЗначенияСвойствОбъектов.Значение КАК СвойствоЗначение // |ПОМЕСТИТЬ ЗначенияСвойствВБазе // |ИЗ // | ОтборПоРеквизитам КАК ОтборПоРеквизитам // | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДополнительныеСведения КАК ЗначенияСвойствОбъектов // | ПО ОтборПоРеквизитам.Ссылка = ЗначенияСвойствОбъектов.Объект // | И ОтборПоРеквизитам.СвойствоНаименование = ЗначенияСвойствОбъектов.Свойство.Наименование // | // |ИНДЕКСИРОВАТЬ ПО // | СвойствоНаименование // |; // | // |//////////////////////////////////////////////////////////////////////////////// // |ВЫБРАТЬ // | ЗначенияСвойствВБазе.Ссылка КАК Ссылка, // | МИНИМУМ(ВЫБОР // | КОГДА ЗначенияЗагруженныхСвойств.СвойствоЗначение = ЗначенияСвойствВБазе.СвойствоЗначение // | И НЕ ЗначенияЗагруженныхСвойств.СвойствоЗначение ЕСТЬ NULL // | И НЕ ЗначенияСвойствВБазе.СвойствоЗначение ЕСТЬ NULL // | ИЛИ ЗначенияЗагруженныхСвойств.СвойствоЗначение = НЕОПРЕДЕЛЕНО // | И (ЗначенияСвойствВБазе.СвойствоЗначение ЕСТЬ NULL // | ИЛИ ЗначенияСвойствВБазе.СвойствоЗначение = НЕОПРЕДЕЛЕНО // | ИЛИ ЗначенияСвойствВБазе.СвойствоЗначение = ЗНАЧЕНИЕ(Справочник.ЗначенияСвойствОбъектов.ПустаяСсылка)) // | ТОГДА ИСТИНА // | ИНАЧЕ ЛОЖЬ // | КОНЕЦ) КАК Результат // |ПОМЕСТИТЬ РезультатАнализаДоговоров // |ИЗ // | ЗначенияСвойствВБазе КАК ЗначенияСвойствВБазе // | ПОЛНОЕ СОЕДИНЕНИЕ ЗначенияЗагруженныхСвойств КАК ЗначенияЗагруженныхСвойств // | ПО ЗначенияСвойствВБазе.СвойствоНаименование = ЗначенияЗагруженныхСвойств.СвойствоНаименование // | // |СГРУППИРОВАТЬ ПО // | ЗначенияСвойствВБазе.Ссылка // |; // | // |//////////////////////////////////////////////////////////////////////////////// // |ВЫБРАТЬ // | РезультатАнализаДоговоров.Ссылка, // | РезультатАнализаДоговоров.Результат // |ИЗ // | РезультатАнализаДоговоров КАК РезультатАнализаДоговоров // |ГДЕ // | РезультатАнализаДоговоров.Результат"; // // ЗначенияЗагруженныхСвойств = Новый ТаблицаЗначений; // ЗначенияЗагруженныхСвойств.Колонки.Добавить("СвойствоНаименование", Новый ОписаниеТипов("Строка",, Новый КвалификаторыСтроки(50))); // ЗначенияЗагруженныхСвойств.Колонки.Добавить("СвойствоЗначение", Новый ОписаниеТипов("СправочникСсылка.ЗначенияСвойствОбъектов")); // // Для Каждого ПараметрОбъекта Из ПараметрыОбъекта Цикл // // Ключ = ПараметрОбъекта.Ключ; // Если Ключ = "ЗначениеСвойстваПартнерУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Партнер УТ11'"); // ИначеЕсли Ключ = "ЗначениеСвойстваСоглашениеСКлиентомУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Соглашение с клиентом УТ11'"); // ИначеЕсли Ключ = "ЗначениеСвойстваСоглашениеСПоставщикомУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Соглашение с поставщиком УТ11'"); // ИначеЕсли Ключ = "ЗначениеСвойстваСделкаСКлиентомУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Сделка с клиентом УТ11'"); // ИначеЕсли Ключ = "ЗначениеСвойстваЗаказКлиентаУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Заказ клиента УТ11'"); // ИначеЕсли Ключ = "ЗначениеСвойстваЗаказПоставщикуУТ11" Тогда // НазваниеСвойства = НСтр("ru = 'Заказ поставщику УТ11'"); // КонецЕсли; // // НоваяСтрока = ЗначенияЗагруженныхСвойств.Добавить(); // НоваяСтрока.СвойствоНаименование = НазваниеСвойства; // НоваяСтрока.СвойствоЗначение = ?(ЗначениеЗаполнено(ПараметрОбъекта.Значение), ПараметрОбъекта.Значение, Неопределено); // // КонецЦикла; // // Запрос.УстановитьПараметр("ЗначенияЗагруженныхСвойств", ЗначенияЗагруженныхСвойств); // // РезультатЗапроса = Запрос.Выполнить(); // Если Не РезультатЗапроса.Пустой() Тогда // ВыборкаДоговоров = РезультатЗапроса.Выбрать(); // Если ВыборкаДоговоров.Следующий() Тогда // СсылкаНаОбъект = ВыборкаДоговоров.Ссылка; // КонецЕсли; // КонецЕсли; // //КонецЕсли; //ПрекратитьПоиск = Истина; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>СправочникСсылка.ДоговорыКонтрагентов <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>--> ВидДоговора <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДоговора" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДоговоровКонтрагентов"/> <Свойство Поиск="true"> <Код>1 <Наименование>--> ВалютаВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство Поиск="true"> <Код>5 <Наименование>--> Владелец <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Поиск="true"> <Код>3 <Наименование>--> Организация <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство Поиск="true"> <Код>4 <Наименование>--> РасчетыВУсловныхЕдиницах <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыВУсловныхЕдиницах" Вид="Реквизит" Тип="Булево"/> <Свойство Поиск="true"> <Код>23 <Наименование>--> ИспользуетсяПриОбменеДанными <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ИспользуетсяПриОбменеДанными" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "БезРазделения" Тогда Значение = Истина; Иначе Отказ = Истина; КонецЕсли; <Свойство Поиск="true"> <Код>11 <Наименование>--> ЗначениеСвойстваПартнерУТ11 <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ПартнерыВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваПартнерУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "БезРазделения" Тогда Отказ = Истина; Иначе Значение = Источник.ПартнерУТ11; КонецЕсли; <Свойство Поиск="true"> <Код>12 <Наименование>--> ЗначениеСвойстваСделкаСКлиентомУТ11 <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СделкиСКлиентамиВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваСделкаСКлиентомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "ПоСделкам" Тогда Отказ = Истина; Иначе Значение = Источник.СделкаСКлиентомУТ11; КонецЕсли; <Свойство Поиск="true"> <Код>13 <Наименование>--> ЗначениеСвойстваСоглашениеСКлиентомУТ11 <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СоглашенияСКлиентамиВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваСоглашениеСКлиентомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "ПоСоглашениям" Тогда Отказ = Истина; ИначеЕсли ТипЗнч(Источник.СоглашениеСКлиентомУТ11) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение = Источник.СоглашениеСКлиентомУТ11; Иначе Значение = Неопределено; КонецЕсли; <Свойство Поиск="true"> <Код>14 <Наименование>--> ЗначениеСвойстваСоглашениеСПоставщикомУТ11 <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СоглашенияСПоставщикамиВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваСоглашениеСПоставщикомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "ПоСоглашениям" Тогда Отказ = Истина; ИначеЕсли ТипЗнч(Источник.СоглашениеСПоставщикомУТ11) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение = Источник.СоглашениеСПоставщикомУТ11; Иначе Значение = Неопределено; КонецЕсли; <Свойство Поиск="true"> <Код>16 <Наименование>--> ЗначениеСвойстваЗаказКлиентаУТ11 <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ЗаказКлиентаВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваЗаказКлиентаУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "ПоЗаказам" Тогда Отказ = Истина; ИначеЕсли ТипЗнч(Источник.ЗаказКлиентаУТ11) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение = Источник.ЗаказКлиентаУТ11; Иначе Значение = Неопределено; КонецЕсли; <Свойство Поиск="true"> <Код>15 <Наименование>--> ЗначениеСвойстваЗаказПоставщикуУТ11 <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ЗаказПоставщикуВЗначенияСвойствОбъектов <ИмяПараметраДляПередачи>ЗначениеСвойстваЗаказПоставщикуУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "ПоЗаказам" Тогда Отказ = Истина; ИначеЕсли ТипЗнч(Источник.ЗаказПоставщикуУТ11) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение = Источник.ЗаказПоставщикуУТ11; Иначе Значение = Неопределено; КонецЕсли; <Свойство> <НеЗамещать>true <Код>8 <Наименование>--> Наименование <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>ВидДоговора = Источник.ВидДоговора; Если ВидДоговора = "СПоставщиком" Тогда ВидДоговора = НСтр("ru = 'С поставщиком'"); ИначеЕсли ВидДоговора = "СПокупателем" Тогда ВидДоговора = НСтр("ru = 'С покупателем'"); ИначеЕсли ВидДоговора = "СКомитентом" Тогда ВидДоговора = НСтр("ru = 'С комитентом'"); ИначеЕсли ВидДоговора = "СКомиссионером" Тогда ВидДоговора = НСтр("ru = 'С комиссионером'"); КонецЕсли; НазваниеПоУмолчанию = ВидДоговора + НСтр("ru = ', '") + НРег(Источник.ВалютаВзаиморасчетов)+ ?(Источник.РасчетыВУсловныхЕдиницах, НСтр("ru = ' (у.е.)'"), ""); НазваниеПоПартнеру = ""; ПравилаСозданияДоговоров = Параметры.УзелПравилаСозданияДоговоровКонтрагентов; Если ПравилаСозданияДоговоров = "БезРазделения" Тогда Значение = НазваниеПоУмолчанию; Иначе Значение = ""; // Если названия партнера и контрагента отличаются, то имеет смысл включить партнера в наименование договора ПартнерСтрокой = Строка(Источник.ПартнерУТ11); Если Строка(Источник.Владелец) <> ПартнерСтрокой И ЗначениеЗаполнено(Источник.ПартнерУТ11) Тогда ДопСтрока = ", " + НРег(НазваниеПоУмолчанию); // Уменьшаем при необходимости длину наименования партнера НазваниеПоПартнеру = Лев(ПартнерСтрокой, 50 - СтрДлина(ДопСтрока)); Если НазваниеПоПартнеру <> ПартнерСтрокой Тогда НазваниеПоПартнеру = Лев(НазваниеПоПартнеру, СтрДлина(НазваниеПоПартнеру) - 3) + "..."; КонецЕсли; НазваниеПоПартнеру = НазваниеПоПартнеру + ДопСтрока; КонецЕсли; Если ПравилаСозданияДоговоров = "ПоСоглашениям" Тогда Соглашение = ?(ЗначениеЗаполнено(Источник.СоглашениеСКлиентомУТ11), Источник.СоглашениеСКлиентомУТ11, Источник.СоглашениеСПоставщикомУТ11); Если ЗначениеЗаполнено(Соглашение) Тогда ДопСтрока = ", " + НРег(НазваниеПоУмолчанию); // Уменьшаем при необходимости длину наименования соглашения СоглашениеСтрокой = Строка(Соглашение); НазваниеПоСоглашению = Лев(СоглашениеСтрокой, 50 - СтрДлина(ДопСтрока)); Если НазваниеПоСоглашению <> СоглашениеСтрокой Тогда НазваниеПоСоглашению = Лев(НазваниеПоСоглашению, СтрДлина(НазваниеПоСоглашению) - 3) + "..."; КонецЕсли; Значение = НазваниеПоСоглашению + ДопСтрока; КонецЕсли; ИначеЕсли ПравилаСозданияДоговоров = "ПоСделкам" Тогда Если ЗначениеЗаполнено(Источник.СделкаСКлиентомУТ11) Тогда ДопСтрока = ", " + НРег(НазваниеПоУмолчанию); // Уменьшаем при необходимости длину наименования сделки СделкаСтрокой = Строка(Источник.СделкаСКлиентомУТ11); НазваниеПоСделке = Лев(СделкаСтрокой, 50 - СтрДлина(ДопСтрока)); Если НазваниеПоСделке <> СделкаСтрокой Тогда НазваниеПоСделке = Лев(НазваниеПоСделке, СтрДлина(НазваниеПоСделке) - 3) + "..."; КонецЕсли; Значение = НазваниеПоСделке + ДопСтрока; КонецЕсли; ИначеЕсли ПравилаСозданияДоговоров = "ПоЗаказам" Тогда Заказ = ?(ЗначениеЗаполнено(Источник.ЗаказКлиентаУТ11), Источник.ЗаказКлиентаУТ11, Источник.ЗаказПоставщикуУТ11); Если ЗначениеЗаполнено(Заказ) Тогда РеквизитыИсточника = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Заказ.Ссылка, "Ссылка,Номер,Дата"); Значение = ОбщегоНазначенияУТ.ПолучитьПредставлениеДокумента(РеквизитыИсточника.Ссылка, РеквизитыИсточника.Номер, РеквизитыИсточника.Дата); КонецЕсли; КонецЕсли; Если Значение = "" Тогда Значение = НазваниеПоПартнеру; КонецЕсли; Если Значение = "" Тогда Значение = НазваниеПоУмолчанию; КонецЕсли; КонецЕсли; <Свойство> <Код>17 <Наименование>--> СвойствоПартнерУТ11 <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоПартнерУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов <> "БезРазделения" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Партнер УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Партнер УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>18 <Наименование>--> СвойствоСделкаСКлиентомУТ11 <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоСделкаСКлиентомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "ПоСделкам" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Сделка с клиентом УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Сделка с клиентом УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>19 <Наименование>--> СвойствоСоглашениеСКлиентомУТ11 <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоСоглашениеСКлиентомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "ПоСоглашениям" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Соглашение с клиентом УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Соглашение с клиентом УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>20 <Наименование>--> СвойствоСоглашениеСПоставщикомУТ11 <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоСоглашениеСПоставщикомУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "ПоСоглашениям" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Соглашение с поставщиком УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Соглашение с поставщиком УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>21 <Наименование>--> СвойствоЗаказКлиентаУТ11 <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоЗаказКлиентаУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "ПоЗаказам" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Заказ клиента УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Заказ клиента УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>22 <Наименование>--> СвойствоЗаказПоставщикуУТ11 <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СвойстваОбъектов <ИмяПараметраДляПередачи>СвойствоЗаказПоставщикуУТ11 <ПередВыгрузкой>Если Параметры.УзелПравилаСозданияДоговоровКонтрагентов = "ПоЗаказам" Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Заказ поставщику УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Заказ поставщику УТ11'")); Иначе Отказ = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Значения/> <Правило> <Код>ПартнерыВЗначенияСвойствОбъектов <Наименование>Справочник: Партнеры <Порядок>200 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.Партнеры <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Партнер УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Партнер УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>2 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СоглашенияСКлиентамиВЗначенияСвойствОбъектов <Наименование>Справочник: Соглашения с клиентами <Порядок>250 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.СоглашенияСКлиентами <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = ?(Источник.Типовое, "Типовое", "Индивидуальное") + "; " + Источник.Наименование + ?(ЗначениеЗаполнено(Источник.Номер), " №" + Источник.Номер, "") + ?(Источник.Типовое, "", "; " + Источник.Партнер); Значение = НСтр("ru = '" + Значение + "'"); <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Соглашение с клиентом УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Соглашение с клиентом УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>2 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СоглашенияСПоставщикамиВЗначенияСвойствОбъектов <Наименование>Справочник: Соглашения с поставщиками <Порядок>300 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.СоглашенияСПоставщиками <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Источник.Наименование + ?(ЗначениеЗаполнено(Источник.Номер), " №" + Источник.Номер, "") + "; " + Источник.Партнер; <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Соглашение с поставщиком УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Соглашение с поставщиком УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>2 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СделкиСКлиентамиВЗначенияСвойствОбъектов <Наименование>Справочник: Сделки с клиентами <Порядок>350 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.СделкиСКлиентами <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Источник.Наименование + "; " + Источник.Партнер; <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Сделка с клиентом УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Сделка с клиентом УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>2 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ЗаказКлиентаВЗначенияСвойствОбъектов <Наименование>Документ: Заказ клиента <Порядок>400 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ЗаказКлиента <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>--> Наименование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>РеквизитыИсточника = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Источник.Ссылка, "Ссылка,Номер,Дата"); Значение = ОбщегоНазначенияУТ.ПолучитьПредставлениеДокумента(РеквизитыИсточника.Ссылка, РеквизитыИсточника.Номер, РеквизитыИсточника.Дата); <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Заказ клиента УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Заказ клиента УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>1 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ЗаказПоставщикуВЗначенияСвойствОбъектов <Наименование>Документ: Заказ поставщику <Порядок>450 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ЗаказПоставщику <Приемник>СправочникСсылка.ЗначенияСвойствОбъектов <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>--> Наименование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>РеквизитыИсточника = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Источник.Ссылка, "Ссылка,Номер,Дата"); Значение = ОбщегоНазначенияУТ.ПолучитьПредставлениеДокумента(РеквизитыИсточника.Ссылка, РеквизитыИсточника.Номер, РеквизитыИсточника.Дата); <Свойство Поиск="true"> <Код>3 <Наименование>--> Владелец <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>СвойстваОбъектов <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Наименование", НСтр("ru = 'Заказ поставщику УТ11'")); Значение.Вставить("Заголовок", НСтр("ru = 'Заказ поставщику УТ11'")); ВыгрузитьОбъект = Истина; <Свойство> <Код>1 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СвойстваОбъектов <Наименование>: <Порядок>500 <ПередВыгрузкой>ЗапоминатьВыгруженные = Истина; КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(Источник); <ПриВыгрузке>//ВыгрузитьИнформациюОТипах(Приемник, "СправочникСсылка.ЗначенияСвойствОбъектов"); <ПослеЗагрузки>//Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда // //Занесем данные об объекте в таблицу отложенной обработки // НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); // НоваяСтрока.ИмяПКО = "СвойстваОбъектов"; // НоваяСтрока.Объект = Объект; // НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>--> Наименование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>4 <Наименование>--> ЭтоДополнительноеСведение <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЭтоДополнительноеСведение" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>7 <Наименование>--> Заголовок <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Заголовок" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>--> ПометкаУдаления <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Ложь; <Свойство> <Код>6 <Наименование>--> НазначениеСвойства <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НазначениеСвойства <ПередВыгрузкой>Значение = "Справочник_ДоговорыКонтрагентов"; <Значения/> <Группа> <Код>ГруппаСтатьиДоходовРасходов <Наименование>БухгалтерскаяАналитика <Порядок>100 <Правило> <Код>СтатьиРасходовВСтатьиЗатрат <Наименование>План видов характеристик: Статьи доходов <Порядок>50 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ПланВидовХарактеристикСсылка.СтатьиРасходов <Приемник>СправочникСсылка.СтатьиЗатрат <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <НеЗамещать>true <Код>6 <Наименование>--> ВидДеятельностиДляНалоговогоУчетаЗатрат <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДеятельностиДляНалоговогоУчетаЗатрат" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДеятельностиДляНалоговогоУчетаЗатрат"/> <ПередВыгрузкой>Значение = "ОсновнаяСистемаНалогообложения"; <Свойство> <НеЗамещать>true <Код>7 <Наименование>--> ВидРасходовНУ <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидРасходовНУ" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыРасходовНУ"/> <ПередВыгрузкой>Значение = "ПрочиеРасходы"; <Свойство> <Код>9 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СтатьиДоходовВПрочиеДоходыИРасходы <Наименование>План видов характеристик: Статьи доходов <Порядок>100 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ПланВидовХарактеристикСсылка.СтатьиДоходов <Приемник>СправочникСсылка.ПрочиеДоходыИРасходы <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Отключить="true"> <Код>1 <Наименование>Код --> Код <Порядок>100 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Код, 3) + "Д" + Сред(Источник.Код, 5); <Свойство> <НеЗамещать>true <Код>6 <Наименование>--> ВидДеятельностиДляНалоговогоУчетаЗатрат <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДеятельностиДляНалоговогоУчетаЗатрат" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДеятельностиДляНалоговогоУчетаЗатрат"/> <ПередВыгрузкой>Значение = "ОсновнаяСистемаНалогообложения"; <Свойство> <НеЗамещать>true <Код>7 <Наименование>--> ВидПрочихДоходовИРасходов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидПрочихДоходовИРасходов" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыПрочихДоходовИРасходов"/> <ПередВыгрузкой>Значение = "ПрочиеВнереализационныеДоходыРасходы"; <Свойство> <НеЗамещать>true <Код>8 <Наименование>--> ПринятиеКналоговомуУчету <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ПринятиеКналоговомуУчету" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = "Истина"; <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СтатьиРасходовВПрочиеДоходыИРасходы <Наименование>План видов характеристик: Статьи расходов <Порядок>150 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ПланВидовХарактеристикСсылка.СтатьиРасходов <Приемник>СправочникСсылка.ПрочиеДоходыИРасходы <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Код --> Код <Порядок>100 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Код, 3) + "Д" + Сред(Источник.Код, 5); <Свойство> <НеЗамещать>true <Код>6 <Наименование>--> ВидДеятельностиДляНалоговогоУчетаЗатрат <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДеятельностиДляНалоговогоУчетаЗатрат" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыДеятельностиДляНалоговогоУчетаЗатрат"/> <ПередВыгрузкой>Значение = "ОсновнаяСистемаНалогообложения"; <Свойство> <НеЗамещать>true <Код>7 <Наименование>--> ВидПрочихДоходовИРасходов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидПрочихДоходовИРасходов" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыПрочихДоходовИРасходов"/> <ПередВыгрузкой>Значение = "ПрочиеВнереализационныеДоходыРасходы"; <Свойство> <НеЗамещать>true <Код>8 <Наименование>--> ПринятиеКналоговомуУчету <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ПринятиеКналоговомуУчету" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = "Истина"; <Свойство> <Код>11 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>СР_СпособыОтраженияРасходовПоАмортизации <Наименование>: <Порядок>200 <ПередВыгрузкой>ЗапоминатьВыгруженные = Истина; КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(Источник); <ПослеЗагрузки>//Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда ЗначениеСубконто = ПараметрыОбъекта.Получить("ЗначениеСубконто"); Для Каждого СтрокаВидаСубконто Из Объект.Способы[0].СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(ЗначениеСубконто)) Тогда Объект.Способы[0]["Субконто" + СтрокаВидаСубконто.НомерСтроки] = ЗначениеСубконто; КонецЕсли; КонецЦикла; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ПланВидовХарактеристикСсылка.СтатьиРасходов <Приемник>СправочникСсылка.СпособыОтраженияРасходовПоАмортизации <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Источник.Наименование + НСтр("ru = ' (счет '") + Источник.КорреспондирующийСчет + ")"; <Свойство Отключить="true"> <Код>1 <Наименование>Код --> Код <Порядок>100 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> ЗначениеСубконто <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтатьиРасходовВСтатьиЗатрат <ИмяПараметраДляПередачи>ЗначениеСубконто <ПередВыгрузкой>Значение = Источник; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>3 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>4 <Наименование>--> Способы <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Способы" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СчетЗатрат"); НоваяСтрока = КоллекцияОбъектов.Добавить(); НоваяСтрока.СчетЗатрат = Источник.КорреспондирующийСчет; <Свойство> <Код>5 <Наименование>--> СчетЗатрат <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>6 <Наименование>--> Коэффициент <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Значения/> <Правило> <Код>СР_НазначенияИспользования <Наименование>План видов характеристик: Статьи расходов <Порядок>250 <ПередВыгрузкой>ЗапоминатьВыгруженные = Истина; СтруктураКлюча = Новый Структура; СтруктураКлюча.Вставить("Источник", Источник); СтруктураКлюча.Вставить("Владелец", ВходящиеДанные.Владелец); СтруктураКлюча.Вставить("СрокПолезногоИспользования", ВходящиеДанные.СрокПолезногоИспользования); КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(СтруктураКлюча); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ПланВидовХарактеристикСсылка.СтатьиРасходов <Приемник>СправочникСсылка.НазначенияИспользования <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>--> Владелец <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Владелец" Вид="Свойство" Тип="СправочникСсылка.Номенклатура"/> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>100 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>7 <Наименование>--> СрокПолезногоИспользования <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СрокПолезногоИспользования" Вид="Реквизит" Тип="Число"/> <Свойство Поиск="true"> <Код>5 <Наименование>--> СпособОтраженияРасходов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СпособОтраженияРасходов" Вид="Реквизит" Тип="СправочникСсылка.СпособыОтраженияРасходовПоАмортизации"/> <КодПравилаКонвертации>СР_СпособыОтраженияРасходовПоАмортизации <ПередВыгрузкой>Значение = Источник; ВыгрузитьОбъект = Истина; <Свойство> <Код>6 <Наименование>--> СпособПогашенияСтоимости <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияСтоимости" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияСтоимости"/> <ПередВыгрузкой>Если ВходящиеДанные.СрокПолезногоИспользования < 12 Тогда Значение = "ПогашатьСтоимостьПриПередачеВЭксплуатацию"; Иначе Значение = "Линейный"; КонецЕсли; <Свойство> <НеЗамещать>true <Код>4 <Наименование>--> Количество <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1 <Свойство> <Код>3 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Группа> <Код>ГруппаНомераГТД <Наименование>ГруппаНомераГТД <Порядок>150 <Правило> <Код>НомераГТД <Наименование>Справочник: Номера ГТД <Порядок>50 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <Источник>СправочникСсылка.НомераГТД <Приемник>СправочникСсылка.НомераГТД <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>НомераГТД_ПоПолямПоиска <Наименование>Справочник: Номера ГТД <Порядок>100 <Источник>СправочникСсылка.НомераГТД <Приемник>СправочникСсылка.НомераГТД <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Код --> Код <Порядок>50 <Источник Имя="Код" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <Значения/> <Правило> <Код>СтатьиДвиженияДенежныхСредств <Наименование>Справочник: Статьи движения денежных средств <Порядок>250 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.СтатьиДвиженияДенежныхСредств <Приемник>СправочникСсылка.СтатьиДвиженияДенежныхСредств <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true" Обязательное="true"> <Код>10 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>100 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Родитель --> Родитель <Порядок>150 <Источник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ТипыЦенНоменклатуры <Наименование>Справочник: Виды цен <Порядок>300 <ПослеЗагрузки>Если НЕ ЗначениеЗаполнено(Объект.ПорядокОкругления) Тогда Объект.ПорядокОкругления = Перечисления.ПорядкиОкругления.Окр0_01; КонецЕсли; <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ВидыЦен <Приемник>СправочникСсылка.ТипыЦенНоменклатуры <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>1 <Наименование>ВалютаЦены --> ВалютаЦены <Порядок>100 <Источник Имя="ВалютаЦены" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаЦены" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>2 <Наименование>ОкруглятьВБольшуюСторону --> ОкруглятьВБольшуюСторону <Порядок>150 <Источник Имя="ОкруглятьВБольшуюСторону" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ОкруглятьВБольшуюСторону" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>3 <Наименование>ЦенаВключаетНДС --> ЦенаВключаетНДС <Порядок>200 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>6 <Наименование>--> ПорядокОкругления <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ПорядокОкругления" Вид="Реквизит" Тип="ПеречислениеСсылка.ПорядкиОкругления"/> <ПередВыгрузкой>Если Источник.ПравилаОкругленияЦены.Количество() > 0 Тогда ТочностьОкругления = Источник.ПравилаОкругленияЦены[0].ТочностьОкругления; Иначе ТочностьОкругления = 0.01; КонецЕсли; Если ТочностьОкругления = 0.01 Тогда Значение = "Окр0_01"; ИначеЕсли ТочностьОкругления = 0.05 Тогда Значение = "Окр0_05"; ИначеЕсли ТочностьОкругления = 0.10 Тогда Значение = "Окр0_1"; ИначеЕсли ТочностьОкругления = 0.50 Тогда Значение = "Окр0_5"; ИначеЕсли ТочностьОкругления = 1 Тогда Значение = "Окр1"; ИначеЕсли ТочностьОкругления = 5 Тогда Значение = "Окр5"; ИначеЕсли ТочностьОкругления = 10 Тогда Значение = "Окр10"; ИначеЕсли ТочностьОкругления = 50 Тогда Значение = "Окр50"; ИначеЕсли ТочностьОкругления = 100 Тогда Значение = "Окр100"; КонецЕсли; <Свойство> <Код>5 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ВидыКонтактнойИнформации <Наименование>Справочник: Виды контактной информации <Порядок>350 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ВидыКонтактнойИнформации <Приемник>СправочникСсылка.ВидыКонтактнойИнформации <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <НеЗамещать>true <Код>7 <Наименование>Родитель --> Родитель <Порядок>100 <Источник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <Приемник Имя="Родитель" Вид="Свойство" Тип="СправочникСсылка.ВидыКонтактнойИнформации"/> <КодПравилаКонвертации>ВидыКонтактнойИнформации <Свойство> <НеЗамещать>true <Код>1 <Наименование>Тип --> Тип <Порядок>150 <Источник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <Приемник Имя="Тип" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыКонтактнойИнформации"/> <КодПравилаКонвертации>ТипыКонтактнойИнформации <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>МожноИзменятьСпособРедактирования --> МожноИзменятьСпособРедактирования <Порядок>350 <Источник Имя="МожноИзменятьСпособРедактирования" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="МожноИзменятьСпособРедактирования" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>11 <Наименование>РеквизитДопУпорядочивания --> РеквизитДопУпорядочивания <Порядок>400 <Источник Имя="РеквизитДопУпорядочивания" Вид="Реквизит" Тип="Число"/> <Приемник Имя="РеквизитДопУпорядочивания" Вид="Реквизит" Тип="Число"/> <Свойство Обязательное="true"> <Код>12 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>450 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Значения> <Значение> <Код>1 <Наименование>EmailОрганизации --> EmailОрганизации <Порядок>50 <Источник>EmailОрганизации <Приемник>EmailОрганизации <Значение> <Код>2 <Наименование>ДругаяИнформацияОрганизации --> ДругаяИнформацияОр <Порядок>100 <Источник>ДругаяИнформацияОрганизации <Приемник>ДругаяИнформацияОрганизации <Значение> <Код>3 <Наименование>ТелефонОрганизации --> ТелефонОрганизации <Порядок>150 <Источник>ТелефонОрганизации <Приемник>ТелефонОрганизации <Значение> <Код>4 <Наименование>ФаксОрганизации --> ФаксОрганизации <Порядок>200 <Источник>ФаксОрганизации <Приемник>ФаксОрганизации <Значение> <Код>5 <Наименование>ФактАдресКонтрагента --> ФактАдресКонтрагента <Порядок>250 <Источник>ФактАдресКонтрагента <Приемник>ФактАдресКонтрагента <Значение> <Код>6 <Наименование>ФактАдресОрганизации --> ФактАдресОрганизации <Порядок>300 <Источник>ФактАдресОрганизации <Приемник>ФактАдресОрганизации <Значение> <Код>7 <Наименование>ЮрАдресКонтрагента --> ЮрАдресКонтрагента <Порядок>350 <Источник>ЮрАдресКонтрагента <Приемник>ЮрАдресКонтрагента <Значение> <Код>8 <Наименование>ЮрАдресОрганизации --> ЮрАдресОрганизации <Порядок>400 <Источник>ЮрАдресОрганизации <Приемник>ЮрАдресОрганизации <Значение> <Код>9 <Наименование>ТелефонКонтрагента --> ТелефонКонтрагента <Порядок>450 <Источник>ТелефонКонтрагента <Приемник>ТелефонКонтрагента <Значение> <Код>12 <Наименование>ПочтовыйАдресОрганизации --> АдресОрганизацииПочто <Порядок>600 <Источник>ПочтовыйАдресОрганизации <Приемник>ПочтовыйАдресОрганизации <Значение> <Код>13 <Наименование>ТелефонКонтактногоЛица --> ТелефонКонтактногоЛица <Порядок>650 <Источник>ТелефонКонтактногоЛица <Приемник>ТелефонРабочийКонтактныеЛица <Значение> <Код>14 <Наименование>EmailПользователя --> EmailПользователя <Порядок>700 <Источник>EmailПользователя <Приемник>EmailПользователя <Значение> <Код>15 <Наименование>СправочникКонтрагенты --> СправочникКонтрагенты <Порядок>750 <Источник>СправочникКонтрагенты <Приемник>СправочникКонтрагенты <Значение> <Код>16 <Наименование>СправочникОрганизации --> СправочникОрганизации <Порядок>800 <Источник>СправочникОрганизации <Приемник>СправочникОрганизации <Значение> <Код>17 <Наименование>СправочникПользователи --> СправочникПользователи <Порядок>850 <Источник>СправочникПользователи <Приемник>СправочникПользователи <Значение> <Код>18 <Наименование>СправочникФизическиеЛица --> СправочникФизическиеЛ <Порядок>900 <Источник>СправочникФизическиеЛица <Приемник>СправочникФизическиеЛица <Значение> <Код>19 <Наименование>EmailКонтактногоЛица --> EmailКонтактныеЛица <Порядок>950 <Источник>EmailКонтактногоЛица <Приемник>EmailКонтактныеЛица <Значение> <Код>20 <Наименование>EmailКонтрагента --> EmailКонтрагенты <Порядок>1000 <Источник>EmailКонтрагента <Приемник>EmailКонтрагенты <Значение> <Код>22 <Наименование>МобильныйТелефонКонтактногоЛица --> ТелефонМобильн <Порядок>1100 <Источник>МобильныйТелефонКонтактногоЛица <Приемник>ТелефонМобильныйКонтактныеЛица <Значение> <Код>23 <Наименование>АдресСклада --> ФактическийАдресПодразделенияОрган <Порядок>1150 <Источник>АдресСклада <Приемник>ФактическийАдресПодразделенияОрганизаций <Значение> <Код>24 <Наименование>СправочникСклады --> СправочникПодразделенияОргани <Порядок>1200 <Источник>СправочникСклады <Приемник>СправочникПодразделенияОрганизаций <Значение> <Код>26 <Наименование>ДругаяИнформацияКонтрагенты --> ДругаяИнформацияКо <Порядок>1300 <Источник>ДругаяИнформацияКонтрагенты <Приемник>ДругаяИнформацияКонтрагенты <Значение> <Код>27 <Наименование>АдресЗаПределамиРФФизическиеЛица --> АдресЗаПредел <Порядок>1350 <Источник>АдресЗаПределамиРФФизическиеЛица <Приемник>АдресЗаПределамиРФФизическиеЛица <Значение> <Код>28 <Наименование>АдресДляИнформированияФизическиеЛица --> АдресДляИ <Порядок>1400 <Источник>АдресДляИнформированияФизическиеЛица <Приемник>АдресДляИнформированияФизическиеЛица <Значение> <Код>29 <Наименование>ПочтовыйАдресКонтрагента --> ПочтовыйАдресКонтраге <Порядок>1450 <Источник>ПочтовыйАдресКонтрагента <Приемник>ПочтовыйАдресКонтрагента <Значение> <Код>30 <Наименование>АдресПоПропискеФизическиеЛица --> АдресПоПропискеФ <Порядок>1500 <Источник>АдресПоПропискеФизическиеЛица <Приемник>АдресПоПропискеФизическиеЛица <Значение> <Код>31 <Наименование>ТелефонПользователя --> ТелефонПользователя <Порядок>1550 <Источник>ТелефонПользователя <Приемник>ТелефонПользователя <Значение> <Код>32 <Наименование>ТелефонРабочийФизическиеЛица --> ТелефонРабочийФиз <Порядок>1600 <Источник>ТелефонРабочийФизическиеЛица <Приемник>ТелефонРабочийФизическиеЛица <Значение> <Код>33 <Наименование>ФаксКонтрагенты --> ФаксКонтрагенты <Порядок>1650 <Источник>ФаксКонтрагенты <Приемник>ФаксКонтрагенты <Значение> <Код>34 <Наименование>АдресМестаПроживанияФизическиеЛица --> АдресМестаП <Порядок>1700 <Источник>АдресМестаПроживанияФизическиеЛица <Приемник>АдресМестаПроживанияФизическиеЛица <Значение> <Код>35 <Наименование>ТелефонДомашнийФизическиеЛица --> ТелефонДомашнийФ <Порядок>1750 <Источник>ТелефонДомашнийФизическиеЛица <Приемник>ТелефонДомашнийФизическиеЛица <Правило> <Код>ДолжностиОрганизаций <Наименование>: <Порядок>400 <ПередВыгрузкой>ЗапоминатьВыгруженные = Истина; КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(Источник); <ИспользоватьБыстрыйПоискПриЗагрузке>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>СправочникСсылка.Должности <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Наименование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Значения/> <Правило> <Код>ВидыАлкогольнойПродукции <Наименование>Справочник: Виды алкогольной и спиртосодержащей продукции <Порядок>450 <СинхронизироватьПоИдентификатору>true <ПродолжитьПоискПоПолямПоискаЕслиПоИдентификаторуНеНашли>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>СправочникСсылка.ВидыАлкогольнойПродукции <Приемник>СправочникСсылка.ВидыАлкогольнойПродукции <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Значения/> <Правило> <Код>ЛицензииПоставщиковАлкогольнойПродукции <Наименование>Справочник: Лицензии поставщиков на алкогольную и спиртосодержащую продукцию <Порядок>500 <НеЗапоминатьВыгруженные>true <Источник>СправочникСсылка.ЛицензииПоставщиковАлкогольнойПродукции <Приемник>РегистрСведенийЗапись.ЛицензииПоставщиковАлкогольнойПродукции <Свойства> <Свойство> <Код>5 <Наименование>--> Поставщик <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Поставщик" Вид="Измерение" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>1 <Наименование>--> ВидЛицензии <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВидЛицензии" Вид="Измерение" Тип="ПеречислениеСсылка.ВидыЛицензийНаПродажуАлкоголя"/> <КодПравилаКонвертации>ВидыЛицензийНаПродажуАлкоголя <Свойство> <Код>2 <Наименование>--> Период <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Период" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>3 <Наименование>--> ДатаОкончания <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаОкончания" Вид="Ресурс" Тип="Дата"/> <Свойство> <Код>4 <Наименование>--> КемВыдана <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КемВыдана" Вид="Ресурс" Тип="Строка"/> <Свойство> <Код>6 <Наименование>--> СерияНомер <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СерияНомер" Вид="Ресурс" Тип="Строка"/> <Значения/> <Правило> <Код>НаборыДополнительныхРеквизитовИСведений <Наименование>Справочник: Наборы дополнительных реквизитов и сведений <Порядок>900 <СинхронизироватьПоИдентификатору>true <Источник>СправочникСсылка.НаборыДополнительныхРеквизитовИСведений <Приемник>СправочникСсылка.НаборыДополнительныхРеквизитовИСведений <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Наименование --> Наименование <Порядок>50 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true" Обязательное="true"> <Код>2 <Наименование>ЭтоГруппа --> ЭтоГруппа <Порядок>100 <Источник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ЭтоГруппа" Вид="Свойство" Тип="Булево"/> <Значения/> <Группа> <Код>Документы <Наименование>ПКО для документов <Порядок>150 <Группа> <Код>ВводНачальныхОстатков <Наименование>ПКО для документов ввода начальных остатков <Порядок>50 <Группа> <Код>ОстаткиДенежныхСредств <Наименование>ПКО для документов ввода остатков денежных средств <Порядок>50 <Правило> <Код>ВНО_ОстаткиВКассах <Наименование>Документ: Ввод остатков <Порядок>200 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Для Каждого СтрокаТаблицы Из Объект.БухСправка Цикл ЧислоАктивныхСубконто = СтрокаТаблицы.СчетУчета.ВидыСубконто.Количество(); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СтрокаТаблицы.СчетУчета.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]) <> СтрокаТаблицы["Субконто" + Сч] Тогда СтрокаТаблицы["Субконто" + Сч] = ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не СтрокаТаблицы["Субконто" + Сч] = Неопределено Тогда СтрокаТаблицы["Субконто" + Сч] = Неопределено; КонецЕсли; КонецЦикла; КонецЦикла; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>9 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина <Свойство> <Код>10 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина <Свойство> <Код>11 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "ДенежныеСредства"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>12 <Наименование>Кассы --> БухСправка <Порядок>600 <Источник Имя="Кассы" Вид="ТабличнаяЧасть"/> <Приемник Имя="БухСправка" Вид="ТабличнаяЧасть"/> <Свойство> <Код>13 <Наименование>Касса --> Валюта <Порядок>50 <Источник Имя="Касса" Вид="Реквизит" Тип="СправочникСсылка.Кассы"/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <ПередВыгрузкой>Значение = ОбъектКоллекции.Касса.ВалютаДенежныхСредств; Если Значение = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = Справочники.Валюты.ПустаяСсылка(); КонецЕсли; <Свойство> <Код>14 <Наименование>Сумма --> ВалютнаяСумма <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если ОбъектКоллекции.Касса.ВалютаДенежныхСредств = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = 0; КонецЕсли; <Свойство> <Код>15 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.Касса.ВалютаДенежныхСредств, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>16 <Наименование>--> СчетУчета <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ?(ОбъектКоллекции.Касса.ВалютаДенежныхСредств = Константы.ВалютаРегламентированногоУчета.Получить(), "50.01", "50.21"); <Свойство> <Код>17 <Наименование>--> СуммаНУ <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.Касса.ВалютаДенежныхСредств, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Значения/> <Правило> <Код>ВНО_ОстаткиНаБанковскихСчетах <Наименование>Документ: Ввод остатков <Порядок>250 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Для Каждого СтрокаТаблицы Из Объект.БухСправка Цикл ЧислоАктивныхСубконто = СтрокаТаблицы.СчетУчета.ВидыСубконто.Количество(); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СтрокаТаблицы.СчетУчета.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]) <> СтрокаТаблицы["Субконто" + Сч] Тогда СтрокаТаблицы["Субконто" + Сч] = ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не СтрокаТаблицы["Субконто" + Сч] = Неопределено Тогда СтрокаТаблицы["Субконто" + Сч] = Неопределено; КонецЕсли; КонецЦикла; КонецЦикла; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>300 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <НеЗамещать>true <Код>15 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <НеЗамещать>true <Код>16 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <НеЗамещать>true <Код>17 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>18 <Наименование>--> РазделУчета <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "ДенежныеСредства"; <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>БанковскиеСчета --> БухСправка <Порядок>600 <Источник Имя="БанковскиеСчета" Вид="ТабличнаяЧасть"/> <Приемник Имя="БухСправка" Вид="ТабличнаяЧасть"/> <Свойство> <Код>10 <Наименование>БанковскийСчет --> Валюта <Порядок>50 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <ПередВыгрузкой>Значение = ОбъектКоллекции.БанковскийСчет.ВалютаДенежныхСредств; Если Значение = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = Справочники.Валюты.ПустаяСсылка(); КонецЕсли; <Свойство> <Код>11 <Наименование>Сумма --> ВалютнаяСумма <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если ОбъектКоллекции.БанковскийСчет.ВалютаДенежныхСредств = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = 0; КонецЕсли; <Свойство> <Код>9 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.БанковскийСчет.ВалютаДенежныхСредств, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>12 <Наименование>БанковскийСчет --> Субконто1 <Порядок>200 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="Субконто1" Вид="Реквизит"/> <Свойство> <Код>13 <Наименование>--> СуммаНУ <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.БанковскийСчет.ВалютаДенежныхСредств, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>14 <Наименование>--> СчетУчета <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ?(ОбъектКоллекции.БанковскийСчет.ВалютаДенежныхСредств = Константы.ВалютаРегламентированногоУчета.Получить(), "51", "52") <Значения/> <Группа> <Код>ОстаткиТоваров <Наименование>ПКО для документов ввода остатков товаров <Порядок>100 <Правило> <Код>ВНО_ВводНачальныхОстатковТоваров <Наименование>Документ: Ввод остатков <Порядок>50 <ПередВыгрузкой>ВалютаУправленческогоУчета = Константы.ВалютаУправленческогоУчета.Получить(); КоэффициентПересчетаВВалютуРегл = РаботаСКурсамивалютУТ.ПолучитьКоэффициентыПересчетаВалюты(ВалютаУправленческогоУчета, Неопределено, Источник.Дата).КоэффициентПересчетаВВалютуРегл; ВходящиеДанные.Вставить("КоэффициентПересчетаВВалютуРегл", КоэффициентПересчетаВВалютуРегл); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВНО_ВводНачальныхОстатковТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>12 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>13 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>14 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>7 <Наименование>Товары --> НоменклатураНаСкладе <Порядок>600 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="НоменклатураНаСкладе" Вид="ТабличнаяЧасть"/> <Свойство> <Код>17 <Наименование>--> Склад <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПередВыгрузкой>Значение = Источник.Склад; <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>9 <Наименование>Номенклатура --> Номенклатура <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит"/> <Свойство> <Код>8 <Наименование>Количество --> Количество <Порядок>150 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>СуммаРегл --> Сумма <Порядок>200 <Источник Имя="СуммаРегл" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Значение = 0 И ОбъектКоллекции.Сумма > 0 Тогда Если ОбъектКоллекции.СуммаБезНДС = 0 Тогда СуммаНДС = ОбъектКоллекции.Сумма * ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(ОбъектКоллекции.Номенклатура.СтавкаНДС); СуммаБезНДС = ОбъектКоллекции.Сумма - СуммаНДС; Иначе СуммаБезНДС = ОбъектКоллекции.СуммаБезНДС; КонецЕсли; Значение = СуммаБезНДС * ВходящиеДанные.КоэффициентПересчетаВВалютуРегл; КонецЕсли; <Свойство> <Код>20 <Наименование>СуммаРегл --> СуммаНУ <Порядок>250 <Источник Имя="СуммаРегл" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Значение = 0 И ОбъектКоллекции.Сумма > 0 Тогда Если ОбъектКоллекции.СуммаБезНДС = 0 Тогда СуммаНДС = ОбъектКоллекции.Сумма * ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(ОбъектКоллекции.Номенклатура.СтавкаНДС); СуммаБезНДС = ОбъектКоллекции.Сумма - СуммаНДС; Иначе СуммаБезНДС = ОбъектКоллекции.СуммаБезНДС; КонецЕсли; Значение = СуммаБезНДС * ВходящиеДанные.КоэффициентПересчетаВВалютуРегл; КонецЕсли; <Свойство> <Код>15 <Наименование>--> СчетУчета <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "41.01"; <Свойство> <Код>16 <Наименование>--> НомерСтрокиТЧ <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерСтрокиТЧ" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.НомерСтроки; <Свойство> <Код>22 <Наименование>--> Ключ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Ключ" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.НомерСтроки; <Свойство Отключить="true"> <Код>18 <Наименование>НомерГТД --> <Порядок>450 <Источник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>НомераГТД <Свойство Отключить="true"> <Код>23 <Наименование>Сумма --> <Порядок>500 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>СуммаБезНДС --> <Порядок>550 <Источник Имя="СуммаБезНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>21 <Наименование>--> ОтражениеВУСН <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Свойство Отключить="true"> <Код>25 <Наименование>АналитикаУчетаНоменклатуры --> <Порядок>650 <Источник Имя="АналитикаУчетаНоменклатуры" Вид="Реквизит" Тип="СправочникСсылка.КлючиАналитикиУчетаНоменклатуры"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ОстаткиГТД <Наименование>Документ: Ввод остатков <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Если Не ЗначениеЗаполнено(Объект.СпособЗаполнения) Тогда Объект.СпособЗаполнения = "Вручную"; КонецЕсли; //Если РежимЗагрузкиДанныхВИНформационнуюБазу() Тогда ДвиженияХозрасчетный = Объект.Движения.Хозрасчетный.Выгрузить(); Объект.ОбменДанными.Загрузка = Ложь; Объект.Записать(); Для Каждого Движение Из ДвиженияХозрасчетный Цикл Движение.Регистратор = Объект.Ссылка; КонецЦикла; Объект.Движения.Хозрасчетный.Загрузить(ДвиженияХозрасчетный); Объект.Движения.Хозрасчетный.Записать(); //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ОперацияБух <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>3 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "Н" + Сред(Источник.Номер, 7) <Свойство> <Код>21 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>35 <Наименование>--> Содержание <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Ввод начальных остатков ГТД"; <Свойство> <Код>37 <Наименование>Ответственный --> Ответственный <Порядок>300 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>36 <Наименование>Комментарий --> Комментарий <Порядок>350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>28 <Наименование>--> Хозрасчетный <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Хозрасчетный" Вид="НаборДвиженийРегистраБухгалтерии"/> <Свойство> <Код>29 <Наименование>--> СубконтоДт <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт" Вид="ВидыСубконтоСчета"/> <ПередВыгрузкой>ИмяПКОВидСубконто = "ВидыСубконтоХозрасчетные"; Значение = Новый ТаблицаЗначений; Значение.Колонки.Добавить("Ключ"); Значение.Колонки.Добавить("Значение"); СубконтоДт1 = Значение.Добавить(); СубконтоДт2 = Значение.Добавить(); СубконтоДт3 = Значение.Добавить(); СубконтоДт1.Ключ = "Номенклатура"; СубконтоДт2.Ключ = "НомераГТД"; СубконтоДт3.Ключ = "СтраныПроисхождения"; СубконтоДт1.Значение = ОбъектКоллекции.Номенклатура; СубконтоДт2.Значение = ОбъектКоллекции.НомерГТД; СубконтоДт3.Значение = ОбъектКоллекции.СтранаПроисхождения; <Свойство> <Код>30 <Наименование>--> Организация <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Измерение" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <ПередВыгрузкой>Значение = Источник.Организация; <Свойство> <Код>31 <Наименование>--> Содержание <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Ввод начальных остатков ГТД"; <Свойство> <Код>32 <Наименование>--> КоличествоДт <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДт" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> Активность <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Активность" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Источник.Проведен; <Свойство> <Код>34 <Наименование>--> СчетДт <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетДт" Вид="Свойство" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "ГТД"; <Свойство> <Код>38 <Наименование>--> Период <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Период" Вид="Свойство" Тип="Дата"/> <ПередВыгрузкой>Значение = Источник.Дата; <Группа> <Код>39 <Наименование>--> ЗаполнениеДвижений <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ЗаполнениеДвижений" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("Документ"); КоллекцияОбъектов.Колонки.Добавить("Примечание"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>40 <Наименование>--> Документ <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <Свойство> <Код>41 <Наименование>--> Примечание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Примечание" Вид="Реквизит" Тип="Строка"/> <Значения/> <Правило> <Код>ВНО_ОстаткиТоваровПереданныхНаКомиссию <Наименование>Документ: Ввод остатков <Порядок>150 <ПередВыгрузкой>ВалютаУправленческогоУчета = Константы.ВалютаУправленческогоУчета.Получить(); КоэффициентПересчетаВВалютуРегл = РаботаСКурсамивалютУТ.ПолучитьКоэффициентыПересчетаВалюты(ВалютаУправленческогоУчета, Неопределено, Источник.Дата).КоэффициентПересчетаВВалютуРегл; ВходящиеДанные.Вставить("КоэффициентПересчетаВВалютуРегл", КоэффициентПересчетаВВалютуРегл); КонтрагентПартнера = ПартнерыИКонтрагенты.ПолучитьКонтрагентаПартнераПоУмолчанию(Источник.Партнер); ВходящиеДанные.Вставить("Контрагент", КонтрагентПартнера); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВНО_ОстаткиТоваровПереданныхНаКомиссию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>3 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>5 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>7 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>8 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>19 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "ТоварыОтгруженные"; <Свойство> <Код>10 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>11 <Наименование>Товары --> МПЗОтгруженные <Порядок>600 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="МПЗОтгруженные" Вид="ТабличнаяЧасть"/> <Свойство> <Код>13 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>12 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>СуммаРегл --> Сумма <Порядок>150 <Источник Имя="СуммаРегл" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Значение = 0 И ОбъектКоллекции.Сумма > 0 Тогда Если ОбъектКоллекции.СуммаБезНДС = 0 Тогда СуммаНДС = ОбъектКоллекции.Сумма * ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(ОбъектКоллекции.Номенклатура.СтавкаНДС); СуммаБезНДС = ОбъектКоллекции.Сумма - СуммаНДС; Иначе СуммаБезНДС = ОбъектКоллекции.СуммаБезНДС; КонецЕсли; Значение = СуммаБезНДС * ВходящиеДанные.КоэффициентПересчетаВВалютуРегл; КонецЕсли; <Свойство> <Код>28 <Наименование>СуммаРегл --> СуммаНУ <Порядок>200 <Источник Имя="СуммаРегл" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Значение = 0 И ОбъектКоллекции.Сумма > 0 Тогда Если ОбъектКоллекции.СуммаБезНДС = 0 Тогда СуммаНДС = ОбъектКоллекции.Сумма * ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(ОбъектКоллекции.Номенклатура.СтавкаНДС); СуммаБезНДС = ОбъектКоллекции.Сумма - СуммаНДС; Иначе СуммаБезНДС = ОбъектКоллекции.СуммаБезНДС; КонецЕсли; Значение = СуммаБезНДС * ВходящиеДанные.КоэффициентПересчетаВВалютуРегл; КонецЕсли; <Свойство> <Код>16 <Наименование>--> Покупатель <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>15 <Наименование>--> ДоговорПокупателя <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорПокупателя" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Если ЗначениеЗаполнено(ВходящиеДанные.Контрагент) И НЕ ВходящиеДанные.Контрагент = Справочники.Контрагенты.ПустаяСсылка() Тогда // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.СоглашениеСКомиссионером, "Валюта")); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.СоглашениеСКомиссионером); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Иначе Значение = Справочники.ДоговорыКонтрагентов.ПустаяСсылка(); КонецЕсли; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); ВыгрузитьОбъект = Истина; <Свойство> <Код>18 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "45.01"; <Свойство> <Код>20 <Наименование>--> ВидМПЗ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидМПЗ" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыМПЗ"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>23 <Наименование>--> ДокументОтгрузки <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОтгрузки" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Если ЗначениеЗаполнено(ВходящиеДанные.Контрагент) Тогда Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("ДатаВходящегоДокумента"); Значение.Вставить("НомерВходящегоДокумента"); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("Контрагент", ВходящиеДанные.Контрагент); Значение.Вставить("ВалютаДокумента", Источник.СоглашениеСКомиссионером.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); Иначе Значение = ""; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>25 <Наименование>--> Ключ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Ключ" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.НомерСтроки; <Свойство Отключить="true"> <Код>26 <Наименование>Сумма --> <Порядок>550 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>СуммаБезНДС --> <Порядок>600 <Источник Имя="СуммаБезНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>--> ОтражениеВУСН <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Свойство Отключить="true"> <Код>29 <Наименование>АналитикаУчетаНоменклатуры --> <Порядок>700 <Источник Имя="АналитикаУчетаНоменклатуры" Вид="Реквизит" Тип="СправочникСсылка.КлючиАналитикиУчетаНоменклатуры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>21 <Наименование>Партнер --> <Порядок>650 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>СоглашениеСКомиссионером --> <Порядок>700 <Источник Имя="СоглашениеСКомиссионером" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ОстаткиТоваровПринятыхНаКомиссию <Наименование>Документ: Ввод остатков <Порядок>200 <ПередВыгрузкой>КонтрагентПартнера = ПартнерыИКонтрагенты.ПолучитьКонтрагентаПартнераПоУмолчанию(Источник.Партнер); ВходящиеДанные.Вставить("Контрагент", КонтрагентПартнера); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Для Каждого СтрокаТаблицы Из Объект.БухСправка Цикл ЧислоАктивныхСубконто = СтрокаТаблицы.СчетУчета.ВидыСубконто.Количество(); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СтрокаТаблицы.СчетУчета.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]) <> СтрокаТаблицы["Субконто" + Сч] Тогда СтрокаТаблицы["Субконто" + Сч] = ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не СтрокаТаблицы["Субконто" + Сч] = Неопределено Тогда СтрокаТаблицы["Субконто" + Сч] = Неопределено; КонецЕсли; КонецЦикла; КонецЦикла; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>300 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>8 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>9 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>10 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>11 <Наименование>--> РазделУчета <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "ПрочиеСчетаБухгалтерскогоУчета"; <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>12 <Наименование>Товары --> БухСправка <Порядок>600 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="БухСправка" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | NULL КАК Номенклатура, | ВводОстатковТовары.Номенклатура КАК Субконто2, | ВводОстатковТовары.Ссылка.Склад КАК Субконто3, | ""004.01"" КАК СчетУчета, | ВводОстатковТовары.Количество |ИЗ | Документ.ВводОстатков.Товары КАК ВводОстатковТовары |ГДЕ | ВводОстатковТовары.Ссылка = &Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ВводОстатковТовары.Номенклатура, | ВводОстатковТовары.НомерГТД, | ВводОстатковТовары.НомерГТД.СтранаПроисхождения, | ""ГТД"", | ВводОстатковТовары.Количество |ИЗ | Документ.ВводОстатков.Товары КАК ВводОстатковТовары |ГДЕ | ВводОстатковТовары.Ссылка = &Ссылка | И ВводОстатковТовары.НомерГТД <> ЗНАЧЕНИЕ(Справочник.НомераГТД.ПустаяСсылка)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); КоллекцияОбъектов.Колонки.Добавить("Субконто1"); Для Каждого СтрокаКоллекции Из КоллекцияОбъектов Цикл Если СтрокаКоллекции.СчетУчета = "004.01" И ЗначениеЗаполнено(ВходящиеДанные.Контрагент) Тогда // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.СоглашениеСКомитентом.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "СКомитентом"); ДоговорКонтрагента.Вставить("Владелец", ВходящиеДанные.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Источник.Партнер); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Источник.СоглашениеСКомиссионером); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ДокументРасчетов = Новый Структура; ДокументРасчетов.Вставить("Ссылка"); ДокументРасчетов.Вставить("Дата", Источник.Дата); ДокументРасчетов.Вставить("ДатаВходящегоДокумента"); ДокументРасчетов.Вставить("НомерВходящегоДокумента"); ДокументРасчетов.Вставить("Организация", Источник.Организация); ДокументРасчетов.Вставить("Контрагент", ВходящиеДанные.Контрагент); ДокументРасчетов.Вставить("ВалютаДокумента", Источник.Валюта); ДокументРасчетов.Вставить("ДоговорКонтрагента", ДоговорКонтрагента); СтрокаКоллекции.Субконто1 = ДокументРасчетов; Иначе СтрокаКоллекции.Субконто1 = СтрокаКоллекции.Номенклатура; КонецЕсли; КонецЦикла; <Свойство> <Код>13 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> Субконто1 <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто1" Вид="Реквизит"/> <ПередВыгрузкой>Если ОбъектКоллекции.СчетУчета = "004.01" Тогда ИмяПКО = "ДРК_ДокументРасчетовСКонтрагентом"; ВыгрузитьОбъект = Истина; Иначе ИмяПКО = "Номенклатура"; КонецЕсли; <Свойство> <Код>16 <Наименование>--> Субконто2 <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто2" Вид="Реквизит"/> <Свойство> <Код>17 <Наименование>--> Субконто3 <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто3" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("СправочникСсылка.Склады") Тогда Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); КонецЕсли; <Свойство> <Код>19 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Группа> <Код>ОстаткиВзаиморасчетов <Наименование>ПКО для документов ввода остатков взаиморасчетов <Порядок>150 <Группа> <Код>ВзаиморасчетыСКлиентами <Наименование>ПКО для документов ввода остатков взаиморасчетов с клиентами <Порядок>50 <Правило> <Код>ВНО_АвансыПолученныеОтКлиентов <Наименование>Документ: Ввод остатков <Порядок>50 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПокупателямиИЗаказчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыСПартнерами.Контрагент, | РасчетыСПартнерами.РасчетныйДокумент, | РасчетыСПартнерами.Партнер, | РасчетыСПартнерами.Ссылка.Организация, | РасчетыСПартнерами.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыСПартнерами.Сумма КАК ВалютнаяСумма, | РасчетыСПартнерами.НомерРасчетногоДокумента, | РасчетыСПартнерами.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыСПартнерами КАК РасчетыСПартнерами | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыСПартнерами.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыСПартнерами.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Ссылка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК ЗаказКлиентаУТ11, | ОбъектыРасчетов.Соглашение КАК СоглашениеСКлиентомУТ11, | НЕОПРЕДЕЛЕНО КАК СоглашениеСПоставщикомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СделкаСКлиентомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ЗаказКлиента КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ЗаявкаНаВозвратТоваровОтКлиента КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.ЗаказКлиента | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.РеализацияТоваровУслуг КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПокупателем"", | ОбъектыРасчетов.ЗаказКлиента, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Сделка, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.АктВыполненныхРабот КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПокупателем"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.РеализацияУслугПрочихАктивов КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитенту КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионераОСписании КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Ссылка, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Справочник.ДоговорыКонтрагентов КАК ОбъектыРасчетов | |ИНДЕКСИРОВАТЬ ПО | Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.Контрагент, | ТабРасчетов.Партнер, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ДанныеОбъектовРасчетов.Договор, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ЗаказКлиентаУТ11, НЕОПРЕДЕЛЕНО) КАК ЗаказКлиентаУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСПоставщикомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСПоставщикомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СделкаСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СделкаСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""62.32"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""62.02"" | ИНАЧЕ ""62.22"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаКТ, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>16 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>14 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.Договор) Тогда Значение = ОбъектКоллекции.Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ОбъектКоллекции.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", ОбъектКоллекции.СоглашениеСКлиентомУТ11); Значение.Вставить("СоглашениеСПоставщикомУТ11", ОбъектКоллекции.СоглашениеСПоставщикомУТ11); Значение.Вставить("СделкаСКлиентомУТ11", ОбъектКоллекции.СделкаСКлиентомУТ11); Значение.Вставить("ЗаказКлиентаУТ11", ОбъектКоллекции.ЗаказКлиентаУТ11); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>15 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> СуммаКт <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКт" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>13 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ОбъектКоллекции.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>650 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>50 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>ВалютаВзаиморасчетов --> <Порядок>700 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Контрагент --> <Порядок>750 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>800 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ЗадолженностьКлиентов <Наименование>Документ: Ввод остатков <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПокупателямиИЗаказчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыСПартнерами.Контрагент, | РасчетыСПартнерами.РасчетныйДокумент, | РасчетыСПартнерами.Партнер, | РасчетыСПартнерами.Ссылка.Организация, | РасчетыСПартнерами.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыСПартнерами.Сумма КАК ВалютнаяСумма, | РасчетыСПартнерами.НомерРасчетногоДокумента, | РасчетыСПартнерами.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыСПартнерами КАК РасчетыСПартнерами | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыСПартнерами.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыСПартнерами.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Ссылка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК ЗаказКлиентаУТ11, | ОбъектыРасчетов.Соглашение КАК СоглашениеСКлиентомУТ11, | НЕОПРЕДЕЛЕНО КАК СоглашениеСПоставщикомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СделкаСКлиентомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ЗаказКлиента КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ЗаявкаНаВозвратТоваровОтКлиента КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.ЗаказКлиента | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссию) | ТОГДА ОбъектыРасчетов.Сделка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.РеализацияТоваровУслуг КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПокупателем"", | ОбъектыРасчетов.ЗаказКлиента, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Сделка, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.АктВыполненныхРабот КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПокупателем"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.РеализацияУслугПрочихАктивов КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитенту КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионераОСписании КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Ссылка, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ |ИЗ | Справочник.ДоговорыКонтрагентов КАК ОбъектыРасчетов | |ИНДЕКСИРОВАТЬ ПО | Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.Контрагент, | ТабРасчетов.Партнер, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ДанныеОбъектовРасчетов.Договор, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ЗаказКлиентаУТ11, НЕОПРЕДЕЛЕНО) КАК ЗаказКлиентаУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСПоставщикомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСПоставщикомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СделкаСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СделкаСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""62.31"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""62.01"" | ИНАЧЕ ""62.21"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.Договор) Тогда Значение = ОбъектКоллекции.Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ОбъектКоллекции.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", ОбъектКоллекции.СоглашениеСКлиентомУТ11); Значение.Вставить("СоглашениеСПоставщикомУТ11", ОбъектКоллекции.СоглашениеСПоставщикомУТ11); Значение.Вставить("СделкаСКлиентомУТ11", ОбъектКоллекции.СделкаСКлиентомУТ11); Значение.Вставить("ЗаказКлиентаУТ11", ОбъектКоллекции.ЗаказКлиентаУТ11); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>12 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>9 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ОбъектКоллекции.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>650 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_АвансыПолученныеОтКлиентовИК <Наименование>Документ: Ввод остатков <Порядок>150 <ПередВыгрузкой>ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПокупателямиИЗаказчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыМеждуОрганизациями.Ссылка.Организация, | РасчетыМеждуОрганизациями.РасчетныйДокумент, | РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыМеждуОрганизациями.Сумма КАК ВалютнаяСумма, | РасчетыМеждуОрганизациями.НомерРасчетногоДокумента, | РасчетыМеждуОрганизациями.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыМеждуОрганизациями КАК РасчетыМеждуОрганизациями | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыМеждуОрганизациями.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссиюВДругуюОрганизацию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ПередачаТоваровМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ""СКомиссионером"", | ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""62.32"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""62.02"" | ИНАЧЕ ""62.22"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаКТ, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>16 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>14 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>15 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> СуммаКт <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКт" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>13 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ВходящиеДанные.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>31 <Наименование>ОрганизацияПолучатель --> <Порядок>650 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>700 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>50 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>ВалютаВзаиморасчетов --> <Порядок>700 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Контрагент --> <Порядок>750 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>800 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ЗадолженностьКлиентовИК <Наименование>Документ: Ввод остатков <Порядок>200 <ПередВыгрузкой>ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПокупателямиИЗаказчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыМеждуОрганизациями.Ссылка.Организация, | РасчетыМеждуОрганизациями.РасчетныйДокумент, | РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыМеждуОрганизациями.Сумма КАК ВалютнаяСумма, | РасчетыМеждуОрганизациями.НомерРасчетногоДокумента, | РасчетыМеждуОрганизациями.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыМеждуОрганизациями КАК РасчетыМеждуОрганизациями | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыМеждуОрганизациями.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссиюВДругуюОрганизацию) | ТОГДА ""СКомиссионером"" | ИНАЧЕ ""СПокупателем"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ПередачаТоваровМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ""СКомиссионером"", | ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""62.31"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""62.01"" | ИНАЧЕ ""62.21"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>12 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>9 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ВходящиеДанные.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>31 <Наименование>ОрганизацияПолучатель --> <Порядок>650 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>700 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ВзаиморасчетыСПоставщиками <Наименование>ПКО для документов ввода остатков взаиморасчетов с поставщиками <Порядок>100 <Правило> <Код>ВНО_АвансыВыданныеПоставщикам <Наименование>Документ: Ввод остатков <Порядок>50 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПоставщикамиИПодрядчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыСПартнерами.Контрагент, | РасчетыСПартнерами.РасчетныйДокумент, | РасчетыСПартнерами.Партнер, | РасчетыСПартнерами.Ссылка.Организация, | РасчетыСПартнерами.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыСПартнерами.Сумма КАК ВалютнаяСумма, | РасчетыСПартнерами.НомерРасчетногоДокумента, | РасчетыСПартнерами.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыСПартнерами КАК РасчетыСПартнерами | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыСПартнерами.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыСПартнерами.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ОбъектыРасчетов.Ссылка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК ЗаказПоставщикуУТ11, | НЕОПРЕДЕЛЕНО КАК СоглашениеСКлиентомУТ11, | ОбъектыРасчетов.Соглашение КАК СоглашениеСПоставщикомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | И НЕ(ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ЗакупкаПоИмпорту) | ИЛИ ОбъектыРасчетов.НалогообложениеНДС = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.ПродажаНаЭкспорт)) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ЗаказПоставщику КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ОбъектыРасчетов.ЗаказПоставщику | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | И НЕ(ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ЗакупкаПоИмпорту) | ИЛИ ОбъектыРасчетов.НалогообложениеНДС = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.ПродажаНаЭкспорт)) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПоставщиком"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ПоступлениеУслугПрочихАктивов КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""Прочее"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ТаможеннаяДекларацияИмпорт КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитенту КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитентуОСписании КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Ссылка, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО |ИЗ | Справочник.ДоговорыКонтрагентов КАК ОбъектыРасчетов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.Контрагент, | ТабРасчетов.Партнер, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ДанныеОбъектовРасчетов.Договор, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПоставщиком"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ЗаказПоставщикуУТ11, НЕОПРЕДЕЛЕНО) КАК ЗаказПоставщикуУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСПоставщикомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСПоставщикомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""60.32"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""60.02"" | ИНАЧЕ ""60.22"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.Договор) Тогда Значение = ОбъектКоллекции.Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ОбъектКоллекции.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", ОбъектКоллекции.СоглашениеСКлиентомУТ11); Значение.Вставить("СоглашениеСПоставщикомУТ11", ОбъектКоллекции.СоглашениеСПоставщикомУТ11); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", ОбъектКоллекции.ЗаказПоставщикуУТ11); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>12 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>18 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ОбъектКоллекции.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>650 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ЗадолженностьПередПоставщиками <Наименование>Документ: Ввод остатков <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>20 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>23 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПоставщикамиИПодрядчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыСПартнерами.Контрагент, | РасчетыСПартнерами.РасчетныйДокумент, | РасчетыСПартнерами.Партнер, | РасчетыСПартнерами.Ссылка.Организация, | РасчетыСПартнерами.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыСПартнерами.Сумма КАК ВалютнаяСумма, | РасчетыСПартнерами.НомерРасчетногоДокумента, | РасчетыСПартнерами.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыСПартнерами КАК РасчетыСПартнерами | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыСПартнерами.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыСПартнерами.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ОбъектыРасчетов.Ссылка | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК ЗаказПоставщикуУТ11, | НЕОПРЕДЕЛЕНО КАК СоглашениеСКлиентомУТ11, | ОбъектыРасчетов.Соглашение КАК СоглашениеСПоставщикомУТ11, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | И НЕ(ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ЗакупкаПоИмпорту) | ИЛИ ОбъектыРасчетов.НалогообложениеНДС = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.ПродажаНаЭкспорт)) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ЗаказПоставщику КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация <> ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПриемНаКомиссию) | ТОГДА ОбъектыРасчетов.ЗаказПоставщику | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | И НЕ(ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ЗакупкаПоИмпорту) | ИЛИ ОбъектыРасчетов.НалогообложениеНДС = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.ПродажаНаЭкспорт)) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СПоставщиком"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ПоступлениеУслугПрочихАктивов КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""Прочее"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ТаможеннаяДекларацияИмпорт КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитенту КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомитентом"", | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомитентуОСписании КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Договор, | ""СКомиссионером"", | НЕОПРЕДЕЛЕНО, | ОбъектыРасчетов.Соглашение, | НЕОПРЕДЕЛЕНО, | ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА ОбъектыРасчетов.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ |ИЗ | Документ.ОтчетКомиссионера КАК ОбъектыРасчетов | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ОбъектыРасчетов.Ссылка, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО, | НЕОПРЕДЕЛЕНО |ИЗ | Справочник.ДоговорыКонтрагентов КАК ОбъектыРасчетов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.Контрагент, | ТабРасчетов.Партнер, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ДанныеОбъектовРасчетов.Договор, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПоставщиком"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ЗаказПоставщикуУТ11, НЕОПРЕДЕЛЕНО) КАК ЗаказПоставщикуУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСКлиентомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСКлиентомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.СоглашениеСПоставщикомУТ11, НЕОПРЕДЕЛЕНО) КАК СоглашениеСПоставщикомУТ11, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""60.31"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""60.01"" | ИНАЧЕ ""60.21"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаКТ, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>11 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>14 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.Договор) Тогда Значение = ОбъектКоллекции.Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ОбъектКоллекции.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", ОбъектКоллекции.СоглашениеСКлиентомУТ11); Значение.Вставить("СоглашениеСПоставщикомУТ11", ОбъектКоллекции.СоглашениеСПоставщикомУТ11); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", ОбъектКоллекции.ЗаказПоставщикуУТ11); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>9 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> СуммаКт <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКт" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>15 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ОбъектКоллекции.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Группа Отключить="true"> <Код>26 <Наименование>РасчетыСПартнерами --> <Порядок>650 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_АвансыВыданныеПоставщикамИК <Наименование>Документ: Ввод остатков <Порядок>150 <ПередВыгрузкой>ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПоставщикамиИПодрядчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыМеждуОрганизациями.Ссылка.ОрганизацияПолучатель КАК Организация, | РасчетыМеждуОрганизациями.РасчетныйДокумент, | РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыМеждуОрганизациями.Сумма КАК ВалютнаяСумма, | РасчетыМеждуОрганизациями.НомерРасчетногоДокумента, | РасчетыМеждуОрганизациями.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыМеждуОрганизациями КАК РасчетыМеждуОрганизациями | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыМеждуОрганизациями.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссиюВДругуюОрганизацию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ПередачаТоваровМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ""СКомитентом"", | ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""60.32"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""60.02"" | ИНАЧЕ ""60.22"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>12 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>18 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ВходящиеДанные.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>31 <Наименование>Организация --> <Порядок>650 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>700 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВНО_ЗадолженностьПередПоставщикамиИК <Наименование>Документ: Ввод остатков <Порядок>200 <ПередВыгрузкой>ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>20 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>21 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>22 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПоставщикамиИПодрядчиками"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> РасчетыСКонтрагентами <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="РасчетыСКонтрагентами" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ | РасчетыМеждуОрганизациями.Ссылка.ОрганизацияПолучатель КАК Организация, | РасчетыМеждуОрганизациями.РасчетныйДокумент, | РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов, | КурсыВалют.Кратность КАК КратностьВзаиморасчетов, | КурсыВалют.Курс КАК КурсВзаиморасчетов, | КурсВалютыРегУчета.Кратность КАК КратностьРег, | КурсВалютыРегУчета.Курс КАК КурсРег, | РасчетыМеждуОрганизациями.Сумма КАК ВалютнаяСумма, | РасчетыМеждуОрганизациями.НомерРасчетногоДокумента, | РасчетыМеждуОрганизациями.ДатаРасчетногоДокумента |ПОМЕСТИТЬ ТабРасчетов |ИЗ | Документ.ВводОстатков.РасчетыМеждуОрганизациями КАК РасчетыМеждуОрганизациями | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | ПО РасчетыМеждуОрганизациями.ВалютаВзаиморасчетов = КурсыВалют.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсВалютыРегУчета | ПО (ИСТИНА) |ГДЕ | РасчетыМеждуОрганизациями.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка КАК Ссылка, | ВЫБОР | КОГДА ОбъектыРасчетов.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПередачаНаКомиссиюВДругуюОрганизацию) | ТОГДА ""СКомитентом"" | ИНАЧЕ ""СПоставщиком"" | КОНЕЦ КАК ВидДоговора, | ВЫБОР | КОГДА ОбъектыРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ПОМЕСТИТЬ ДанныеОбъектовРасчетов |ИЗ | Документ.ПередачаТоваровМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ОбъектыРасчетов.Ссылка, | ""СКомитентом"", | ВЫБОР | КОГДА ОбъектыРасчетов.Валюта <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями КАК ОбъектыРасчетов |ГДЕ | ОбъектыРасчетов.Ссылка В | (ВЫБРАТЬ | ТабРасчетов.РасчетныйДокумент | ИЗ | ТабРасчетов КАК ТабРасчетов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТабРасчетов.Организация, | ТабРасчетов.ВалютаВзаиморасчетов КАК Валюта, | ЕСТЬNULL(ДанныеОбъектовРасчетов.ВидДоговора, ""СПокупателем"") КАК ВидДоговора, | ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) КАК РасчетыВУсловныхЕдиницах, | ВЫБОР | КОГДА ЕСТЬNULL(ДанныеОбъектовРасчетов.РасчетыВУсловныхЕдиницах, ЛОЖЬ) | ТОГДА ""60.31"" | ИНАЧЕ ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов = &ВалютаРег | ТОГДА ""60.01"" | ИНАЧЕ ""60.21"" | КОНЕЦ | КОНЕЦ КАК СчетУчета, | ТабРасчетов.КратностьВзаиморасчетов, | ТабРасчетов.КурсВзаиморасчетов, | ТабРасчетов.ВалютнаяСумма, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаКТ, | ТабРасчетов.ВалютнаяСумма * ВЫБОР | КОГДА ТабРасчетов.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ТабРасчетов.КратностьВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсВзаиморасчетов, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КратностьРег, 0) > 0 | И ЕСТЬNULL(ТабРасчетов.КурсРег, 0) > 0 | ТОГДА ТабРасчетов.КурсВзаиморасчетов * ТабРасчетов.КратностьРег / (ТабРасчетов.КратностьВзаиморасчетов * ТабРасчетов.КурсРег) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаНУ, | ТабРасчетов.НомерРасчетногоДокумента, | ТабРасчетов.ДатаРасчетногоДокумента |ИЗ | ТабРасчетов КАК ТабРасчетов | ЛЕВОЕ СОЕДИНЕНИЕ ДанныеОбъектовРасчетов КАК ДанныеОбъектовРасчетов | ПО ТабРасчетов.РасчетныйДокумент = ДанныеОбъектовРасчетов.Ссылка"; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>17 <Наименование>--> Контрагент <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.Валюта); Значение.Вставить("ВидДоговора", ОбъектКоллекции.ВидДоговора); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ОбъектКоллекции.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; ВходящиеДанные.Вставить("ДоговорКонтрагента", Значение); <Свойство> <Код>10 <Наименование>--> Валюта <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>--> ВалютнаяСумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> КурсВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> СуммаКт <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКт" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> СуммаНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУ" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>13 <Наименование>--> Документ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <КодПравилаКонвертации>ДРК_ДокументРасчетовСКонтрагентом <ПередВыгрузкой>Значение = Новый Структура; Значение.Вставить("Ссылка"); Значение.Вставить("Дата", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("ДатаВходящегоДокумента", ОбъектКоллекции.ДатаРасчетногоДокумента); Значение.Вставить("НомерВходящегоДокумента", ОбъектКоллекции.НомерРасчетногоДокумента); Значение.Вставить("Организация", ОбъектКоллекции.Организация); Значение.Вставить("Контрагент", ВходящиеДанные.Контрагент); Значение.Вставить("ВалютаДокумента", ОбъектКоллекции.Валюта); Значение.Вставить("ДоговорКонтрагента", ВходящиеДанные.ДоговорКонтрагента); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>31 <Наименование>Организация --> <Порядок>650 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>23 <Наименование>РасчетыСПартнерами --> <Порядок>700 <Источник Имя="РасчетыСПартнерами" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Контрагент --> <Порядок>100 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Партнер --> <Порядок>150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>ДатаРасчетногоДокумента --> <Порядок>550 <Источник Имя="ДатаРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>НомерРасчетногоДокумента --> <Порядок>600 <Источник Имя="НомерРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>РасчетныйДокумент --> <Порядок>650 <Источник Имя="РасчетныйДокумент" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ВзаиморасчетыСПодотчетниками <Наименование>ПКО для документов ввода остатков взаиморасчетов с подотчетниками <Порядок>150 <Правило> <Код>ВНО_ЗадолженностьПодотчетников <Наименование>Документ: Ввод остатков <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>14 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>15 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>16 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>17 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПодотчетнымиЛицами"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>РасчетыСПодотчетниками --> РасчетыСПодотчетнымиЛицами <Порядок>600 <Источник Имя="РасчетыСПодотчетниками" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасчетыСПодотчетнымиЛицами" Вид="ТабличнаяЧасть"/> <Свойство> <Код>10 <Наименование>ПодотчетноеЛицо --> РаботникОрганизации <Порядок>50 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="РаботникОрганизации" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>9 <Наименование>Валюта --> Валюта <Порядок>100 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>Сумма --> ВалютнаяСумма <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.Валюта, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>13 <Наименование>--> СчетУчета <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ?(ОбъектКоллекции.Валюта = Константы.ВалютаРегламентированногоУчета.Получить(), "71.01", "71.21"); <Значения/> <Правило> <Код>ВНО_ЗадолженностьПередПодотчетниками <Наименование>Документ: Ввод остатков <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВводОстатков <Приемник>ДокументСсылка.ВводНачальныхОстатков <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>14 <Наименование>--> ОтражатьВБухгалтерскомУчете <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВБухгалтерскомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>15 <Наименование>--> ОтражатьВНалоговомУчете <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьВНалоговомУчете" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>16 <Наименование>--> ОтражатьПоСпециальнымРегистрам <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьПоСпециальнымРегистрам" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>17 <Наименование>--> РазделУчета <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="РазделУчета" Вид="Реквизит" Тип="ПеречислениеСсылка.РазделыУчетаДляВводаОстатков"/> <ПередВыгрузкой>Значение = "РасчетыСПодотчетнымиЛицами"; <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>РасчетыСПодотчетниками --> РасчетыСПодотчетнымиЛицами <Порядок>600 <Источник Имя="РасчетыСПодотчетниками" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасчетыСПодотчетнымиЛицами" Вид="ТабличнаяЧасть"/> <Свойство> <Код>10 <Наименование>ПодотчетноеЛицо --> РаботникОрганизации <Порядок>50 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="РаботникОрганизации" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>9 <Наименование>Валюта --> Валюта <Порядок>100 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>Сумма --> ВалютнаяСумма <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ВалютнаяСумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> СуммаКт <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКт" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.Валюта, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>13 <Наименование>--> СчетУчета <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ?(ОбъектКоллекции.Валюта = Константы.ВалютаРегламентированногоУчета.Получить(), "71.01", "71.21"); <Значения/> <Правило> <Код>ДРК_ДокументРасчетовСКонтрагентом <Наименование>: <Порядок>200 <ПередВыгрузкой>ЗапоминатьВыгруженные = Истина; КлючВыгружаемыхДанных = ЗначениеВСтрокуВнутр(Источник); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>ДокументСсылка.ДокументРасчетовСКонтрагентом <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>--> Дата <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>4 <Наименование>--> Организация <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство Поиск="true"> <Код>3 <Наименование>--> Контрагент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Поиск="true"> <Код>1 <Наименование>--> ВалютаДокумента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство Поиск="true"> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство Поиск="true"> <Код>7 <Наименование>--> ДатаВходящегоДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>--> НомерВходящегоДокумента <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Значения/> <Группа> <Код>Взаиморасчеты <Наименование>Взаиморасчеты <Порядок>100 <Правило> <Код>CЗ_КорректировкаЗадолженности <Наименование>Документ: Списание задолженности <Порядок>100 <ПередВыгрузкой>Если Источник.РасчетыМеждуОрганизациями Тогда ОрганизацияКонтрагента = Источник.Контрагент; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВыгружаемыйКонтрагент = НовыйКонтрагент; Иначе ВыгружаемыйКонтрагент = Источник.Контрагент; КонецЕсли; Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СписаниеКредиторскойЗадолженности Тогда ВходящиеДанные.Вставить("КонтрагентКредитор", ВыгружаемыйКонтрагент); ВходящиеДанные.Вставить("КонтрагентДебитор", Справочники.Контрагенты.ПустаяСсылка()); Иначе ВходящиеДанные.Вставить("КонтрагентДебитор", ВыгружаемыйКонтрагент); ВходящиеДанные.Вставить("КонтрагентКредитор", Справочники.Контрагенты.ПустаяСсылка()); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда СтатьяДоходов = ПараметрыОбъекта.Получить("СтатьяДоходов"); Если ЗначениеЗаполнено(Объект.СчетКт) И СтатьяДоходов <> Неопределено Тогда // Заполняем аналитику счета доходов Для Каждого СтрокаВидаСубконто Из Объект.СчетКт.ВидыСубконто Цикл ТипЗначенияСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипЗначенияСубконто.СодержитТип(ТипЗнч(СтатьяДоходов)) Тогда Объект["СубконтоКт" + СтрокаВидаСубконто.НомерСтроки] = СтатьяДоходов; КонецЕсли; КонецЦикла; КонецЕсли; СтатьяРасходов = ПараметрыОбъекта.Получить("СтатьяРасходов"); Если ЗначениеЗаполнено(Объект.СчетДт) И СтатьяРасходов <> Неопределено Тогда // Заполняем аналитику счета расходов Для Каждого СтрокаВидаСубконто Из Объект.СчетДт.ВидыСубконто Цикл ТипЗначенияСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипЗначенияСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда Объект["СубконтоДт" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "CЗ_СписаниеЗадолженности"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.КорректировкаЗадолженностиПоФинансовымИнструментам <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>3 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>9 <Наименование>--> ВалютаДокумента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <ПередВыгрузкой>Значение = Константы.ВалютаРегламентированногоУчета.Получить(); <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>7 <Наименование>--> КонтрагентДебитор <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентДебитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>41 <Наименование>--> КонтрагентКредитор <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентКредитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>--> КратностьДокумента <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>11 <Наименование>--> КурсДокумента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>5 <Наименование>Комментарий --> Комментарий <Порядок>550 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство Отключить="true"> <Код>22 <Наименование>--> СчетДт <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетДт" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ПредопределенноеЗначение("ПланСчетов.Хозрасчетный.ПустаяСсылка"); <Свойство> <Код>42 <Наименование>--> СуммаДтЗадолженности <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДтЗадолженности" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СписаниеКредиторскойЗадолженности Тогда Отказ = Истина; Иначе Значение = Источник.Задолженность.Итог("Сумма"); КонецЕсли; <Свойство Отключить="true"> <Код>23 <Наименование>--> СчетКт <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СчетКт" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>43 <Наименование>--> СуммаКтЗадолженности <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКтЗадолженности" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СписаниеДебиторскойЗадолженности Тогда Отказ = Истина; Иначе Значение = Источник.Задолженность.Итог("Сумма"); КонецЕсли; <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>20 <Наименование>УдалитьСтатьяДоходов --> СтатьяДоходов <Порядок>850 <Источник Имя="УдалитьСтатьяДоходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <ИмяПараметраДляПередачи>СтатьяДоходов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>21 <Наименование>УдалитьСтатьяРасходов --> СтатьяРасходов <Порядок>900 <Источник Имя="УдалитьСтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>29 <Наименование>Задолженность --> ДебиторскаяЗадолженность <Порядок>1000 <Источник Имя="Задолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СписаниеКредиторскойЗадолженности Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>31 <Наименование>УдалитьЗаказ --> ДоговорКонтрагента <Порядок>100 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Метаданные().Реквизиты.Найти("Договор") <> Неопределено Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Договор"); КонецЕсли; Если ЗначениеЗаполнено(Значение) И ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентДебитор); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.Заказ; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ЗаказКлиента // - ДокументСсылка.РеализацияТоваровУслуг // - ДокументСсылка.АктВыполненныхРабот // - ДокументСсылка.ЗаказПоставщику // - ДокументСсылка.ПриобретениеТоваровУслуг // - ДокументСсылка.ОтчетКомиссионера // - ДокументСсылка.ОтчетКомитенту // - ДокументСсылка.ОтчетКомитентуОСписании // - ДокументСсылка.ОтчетКомиссионераОСписании // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ВозвратТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Соглашение = Неопределено; Если Заказ.Метаданные().Реквизиты.Найти("Соглашение") <> Неопределено Тогда Соглашение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Соглашение"); Если ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = Соглашение; ИначеЕсли ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектКоллекции.Заказ, Соглашение, Неопределено); Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; КонецЕсли; Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомитентом", "СКомиссионером"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Соглашение); ИначеЕсли ТипЗаказа = Тип("ДокументСсылка.РеализацияТоваровУслуг") ИЛИ ТипЗаказа = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда ДанныеЗаказа = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Заказ, "Валюта,ВалютаВзаиморасчетов"); Значение.РасчетыВУсловныхЕдиницах = ДанныеЗаказа.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеЗаказа.Валюта <> ДанныеЗаказа.ВалютаВзаиморасчетов; Иначе Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если Заказ.Метаданные().Реквизиты.Найти("Сделка") <> Неопределено Тогда Значение.СделкаСКлиентомУТ11 = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Сделка"); КонецЕсли; // Разделение по заказу идет, если в качестве заказа указан заказ клиента Если ТипЗаказа = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = Заказ; КонецЕсли; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>32 <Наименование>Сумма --> Сумма <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.ВалютаВзаиморасчетов, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>33 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>34 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>250 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>35 <Наименование>Сумма --> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Группа> <Код>30 <Наименование>Задолженность --> КредиторскаяЗадолженность <Порядок>1050 <Источник Имя="Задолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СписаниеДебиторскойЗадолженности Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>36 <Наименование>Заказ --> ДоговорКонтрагента <Порядок>100 <Источник Имя="Заказ" Вид="Реквизит"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Метаданные().Реквизиты.Найти("Договор") <> Неопределено Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Договор"); КонецЕсли; Если ЗначениеЗаполнено(Значение) И ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентКредитор); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.Заказ; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ЗаказКлиента // - ДокументСсылка.РеализацияТоваровУслуг // - ДокументСсылка.АктВыполненныхРабот // - ДокументСсылка.ЗаказПоставщику // - ДокументСсылка.ПриобретениеТоваровУслуг // - ДокументСсылка.ОтчетКомиссионера // - ДокументСсылка.ОтчетКомитенту // - ДокументСсылка.ОтчетКомитентуОСписании // - ДокументСсылка.ОтчетКомиссионераОСписании // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ВозвратТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Соглашение = Неопределено; Если Заказ.Метаданные().Реквизиты.Найти("Соглашение") <> Неопределено Тогда Соглашение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Соглашение"); Если ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = Соглашение; ИначеЕсли ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектКоллекции.Заказ, Соглашение, Неопределено); Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; КонецЕсли; Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомитентом", "СКомиссионером"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Соглашение); ИначеЕсли ТипЗаказа = Тип("ДокументСсылка.РеализацияТоваровУслуг") ИЛИ ТипЗаказа = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда ДанныеЗаказа = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Заказ, "Валюта,ВалютаВзаиморасчетов"); Значение.РасчетыВУсловныхЕдиницах = ДанныеЗаказа.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеЗаказа.Валюта <> ДанныеЗаказа.ВалютаВзаиморасчетов; Иначе Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если Заказ.Метаданные().Реквизиты.Найти("Сделка") <> Неопределено Тогда Значение.СделкаСКлиентомУТ11 = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Сделка"); КонецЕсли; // Разделение по заказу идет, если в качестве заказа указан заказ клиента Если ТипЗаказа = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = Заказ; КонецЕсли; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>37 <Наименование>Сумма --> Сумма <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(ОбъектКоллекции.Сумма, ОбъектКоллекции.ВалютаВзаиморасчетов, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>38 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>39 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>250 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>40 <Наименование>Сумма --> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ВЗ_ВзаимозачетЗадолженностиНашаОрганизация <Наименование>Документ: Взаимозачет задолженности <Порядок>150 <ПередВыгрузкой>// Вычислим значения реквизитов "КонтрагентДебитор" и "КонтрагентКредитор" РасчетыМеждуОрганизациямиКредитор = Источник.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Источник.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; РасчетыМеждуОрганизациямиДебитор = Источник.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Источник.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; Если РасчетыМеждуОрганизациямиДебитор Тогда ОрганизацияКонтрагента = Источник.КонтрагентДебитор; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентДебитор", НовыйКонтрагент); Иначе ВходящиеДанные.Вставить("КонтрагентДебитор", Источник.КонтрагентДебитор); КонецЕсли; Если РасчетыМеждуОрганизациямиКредитор Тогда ОрганизацияКонтрагента = Источник.КонтрагентКредитор; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентКредитор", НовыйКонтрагент); Иначе ВходящиеДанные.Вставить("КонтрагентКредитор", Источник.КонтрагентКредитор); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВзаимозачетЗадолженности <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "В" + Сред(Источник.Номер, 7); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>2 <Наименование>КонтрагентДебитор --> КонтрагентДебитор <Порядок>350 <Источник Имя="КонтрагентДебитор" Вид="Реквизит"/> <Приемник Имя="КонтрагентДебитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>3 <Наименование>КонтрагентКредитор --> КонтрагентКредитор <Порядок>400 <Источник Имя="КонтрагентКредитор" Вид="Реквизит"/> <Приемник Имя="КонтрагентКредитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>23 <Наименование>ДебиторскаяЗадолженность --> ДебиторскаяЗадолженность <Порядок>750 <Источник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство Отключить="true"> <Код>24 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>25 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>100 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке> Если ЗначениеЗаполнено(Значение) И Значение.Метаданные().Реквизиты.Найти("Договор") <> Неопределено Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Договор"); КонецЕсли; Если ЗначениеЗаполнено(Значение) И ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентДебитор); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ЗаказКлиента // - ДокументСсылка.РеализацияТоваровУслуг // - ДокументСсылка.АктВыполненныхРабот // - ДокументСсылка.ЗаказПоставщику // - ДокументСсылка.ПриобретениеТоваровУслуг // - ДокументСсылка.ОтчетКомиссионера // - ДокументСсылка.ОтчетКомитенту // - ДокументСсылка.ОтчетКомитентуОСписании // - ДокументСсылка.ОтчетКомиссионераОСписании // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ВозвратТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Соглашение = Неопределено; Если Заказ.Метаданные().Реквизиты.Найти("Соглашение") <> Неопределено Тогда Соглашение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Соглашение"); Если ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = Соглашение; ИначеЕсли ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектКоллекции.УдалитьЗаказ, Соглашение, Неопределено); Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; КонецЕсли; Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомитентом", "СКомиссионером"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Соглашение.ОплатаВВалюте; ИначеЕсли ТипЗаказа = Тип("ДокументСсылка.РеализацияТоваровУслуг") ИЛИ ТипЗаказа = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда //ПСК Поменял ДанныеЗаказа = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Заказ, "Валюта,ВалютаВзаиморасчетов"); Значение.РасчетыВУсловныхЕдиницах = ДанныеЗаказа.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеЗаказа.Валюта <> ДанныеЗаказа.ВалютаВзаиморасчетов; Иначе Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если Заказ.Метаданные().Реквизиты.Найти("Сделка") <> Неопределено Тогда Значение.СделкаСКлиентомУТ11 = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Сделка"); КонецЕсли; // Разделение по заказу идет, если в качестве заказа указан заказ клиента Если ТипЗаказа = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = Заказ; КонецЕсли; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>27 <Наименование>СуммаВзаиморасчетов --> Сумма <Порядок>200 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>36 <Наименование>Партнер --> <Порядок>300 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>ТипРасчетов --> <Порядок>350 <Источник Имя="ТипРасчетов" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыРасчетовСПартнерами"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>43 <Наименование>--> КратностьВзаиморасчетов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>44 <Наименование>--> КурсВзаиморасчетов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Группа> <Код>29 <Наименование>КредиторскаяЗадолженность --> КредиторскаяЗадолженность <Порядок>800 <Источник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство Отключить="true"> <Код>30 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>100 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке> Если ЗначениеЗаполнено(Значение) И Значение.Метаданные().Реквизиты.Найти("Договор") <> Неопределено Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Договор"); КонецЕсли; Если ЗначениеЗаполнено(Значение) И ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентКредитор); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ЗаказКлиента // - ДокументСсылка.РеализацияТоваровУслуг // - ДокументСсылка.АктВыполненныхРабот // - ДокументСсылка.ЗаказПоставщику // - ДокументСсылка.ПриобретениеТоваровУслуг // - ДокументСсылка.ОтчетКомиссионера // - ДокументСсылка.ОтчетКомитенту // - ДокументСсылка.ОтчетКомитентуОСписании // - ДокументСсылка.ОтчетКомиссионераОСписании // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ВозвратТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Соглашение = Неопределено; Если Заказ.Метаданные().Реквизиты.Найти("Соглашение") <> Неопределено Тогда Соглашение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Соглашение"); Если ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = Соглашение; ИначеЕсли ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектКоллекции.УдалитьЗаказ, Соглашение, Неопределено); Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; КонецЕсли; Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомитентом", "СКомиссионером"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Соглашение.ОплатаВВалюте; ИначеЕсли ТипЗаказа = Тип("ДокументСсылка.РеализацияТоваровУслуг") ИЛИ ТипЗаказа = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда ДанныеЗаказа = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Заказ, "Валюта,ВалютаВзаиморасчетов"); Значение.РасчетыВУсловныхЕдиницах = ДанныеЗаказа.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеЗаказа.Валюта <> ДанныеЗаказа.ВалютаВзаиморасчетов; Иначе Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если Заказ.Метаданные().Реквизиты.Найти("Сделка") <> Неопределено Тогда Значение.СделкаСКлиентомУТ11 = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Сделка"); КонецЕсли; // Разделение по заказу идет, если в качестве заказа указан заказ клиента Если ТипЗаказа = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = Заказ; КонецЕсли; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПоставщиком", "СПокупателем"); Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>33 <Наименование>СуммаВзаиморасчетов --> Сумма <Порядок>200 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>38 <Наименование>Партнер --> <Порядок>300 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>ТипРасчетов --> <Порядок>350 <Источник Имя="ТипРасчетов" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыРасчетовСПартнерами"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>45 <Наименование>--> ДоговорКонтрагента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Свойство> <Код>46 <Наименование>--> КратностьВзаиморасчетов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>47 <Наименование>--> КурсВзаиморасчетов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>48 <Наименование>--> ВалютаДокумента <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <ПередВыгрузкой>Значение = Константы.ВалютаРегламентированногоУчета.Получить(); <Значения/> <Правило> <Код>ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор <Наименование>Документ: Взаимозачет задолженности <Порядок>200 <ПередВыгрузкой>// Вычислим значения реквизитов "КонтрагентДебитор" и "КонтрагентКредитор" ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентДебитор", НовыйКонтрагент); РасчетыМеждуОрганизациямиДебитор = Источник.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Источник.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; Если РасчетыМеждуОрганизациямиДебитор Тогда ОрганизацияКонтрагента = Источник.КонтрагентДебитор; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентКредитор", НовыйКонтрагент); Иначе ВходящиеДанные.Вставить("КонтрагентКредитор", Источник.КонтрагентДебитор); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки ПараметрыОбъекта = Неопределено; НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВзаимозачетЗадолженности <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "ВК" + Сред(Источник.Номер, 8); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>2 <Наименование>--> КонтрагентДебитор <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентДебитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>3 <Наименование>--> СубконтоДт1 <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.КонтрагентКредитор; <Свойство> <Код>38 <Наименование>--> СубконтоДт2 <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентКредитор); Значение.Вставить("Организация", Источник.КонтрагентКредитор); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.ВалютаВзаиморасчетов = Источник.ДебиторскаяЗадолженность[0].ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>27 <Наименование>КредиторскаяЗадолженность --> ДебиторскаяЗадолженность <Порядок>800 <Источник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство Отключить="true"> <Код>31 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>28 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>100 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке> // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентДебитор); Значение.Вставить("Организация", Источник.КонтрагентКредитор); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомиссионером", "СКомитентом"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПокупателем", "СПоставщиком"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПокупателем", "СПоставщиком"); КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>29 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>41 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>30 <Наименование>Сумма --> Сумма <Порядок>250 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>32 <Наименование>Партнер --> <Порядок>350 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>33 <Наименование>ТипРасчетов --> <Порядок>400 <Источник Имя="ТипРасчетов" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыРасчетовСПартнерами"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>36 <Наименование>КонтрагентДебитор --> <Порядок>850 <Источник Имя="КонтрагентДебитор" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>Организация --> <Порядок>900 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор <Наименование>Документ: Взаимозачет задолженности <Порядок>250 <ПередВыгрузкой>// Вычислим значения реквизитов "КонтрагентДебитор" и "КонтрагентКредитор" ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентКредитор", НовыйКонтрагент); РасчетыМеждуОрганизациямиКредитор = Источник.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Источник.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; Если РасчетыМеждуОрганизациямиКредитор Тогда ОрганизацияКонтрагента = Источник.КонтрагентКредитор; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("КонтрагентДебитор", НовыйКонтрагент); Иначе ВходящиеДанные.Вставить("КонтрагентДебитор", Источник.КонтрагентКредитор); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВзаимозачетЗадолженности <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "ВД" + Сред(Источник.Номер, 8); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>3 <Наименование>--> КонтрагентКредитор <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентКредитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>2 <Наименование>--> СубконтоКт1 <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.КонтрагентДебитор; <Свойство> <Код>38 <Наименование>--> СубконтоКт2 <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентДебитор); Значение.Вставить("Организация", Источник.КонтрагентДебитор); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.ВалютаВзаиморасчетов = Источник.ДебиторскаяЗадолженность[0].ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>36 <Наименование>КонтрагентКредитор --> <Порядок>750 <Источник Имя="КонтрагентКредитор" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>Организация --> <Порядок>800 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="" Вид=""/> <Группа> <Код>19 <Наименование>ДебиторскаяЗадолженность --> КредиторскаяЗадолженность <Порядок>850 <Источник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Приемник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство Отключить="true"> <Код>20 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>26 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>100 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке> // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.КонтрагентКредитор); Значение.Вставить("Организация", Источник.КонтрагентДебитор); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями ТипЗаказа = ТипЗнч(Заказ); Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СКомиссионером", "СКомитентом"); КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если НЕ ЗначениеЗаполнено(Значение.ВидДоговора) Тогда Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПокупателем", "СПоставщиком"); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Иначе Значение.ВидДоговора = ?(ОбъектКоллекции.ТипРасчетов = Перечисления.ТипыРасчетовСПартнерами.РасчетыСПоставщиком, "СПокупателем", "СПоставщиком"); КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.УдалитьВалюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.УдалитьВалюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>22 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>39 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>23 <Наименование>Сумма --> Сумма <Порядок>250 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>25 <Наименование>Партнер --> <Порядок>350 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>ТипРасчетов --> <Порядок>400 <Источник Имя="ТипРасчетов" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыРасчетовСПартнерами"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВЗ_ВзаимозачетЗадолженностиОрганизацияКредиторУдал <Наименование>Документ: Взаимозачет задолженности <Порядок>300 <ПослеЗагрузки>Если Объект.ЭтоНовый() Тогда Отказ = Истина; КонецЕсли; <Источник>ДокументСсылка.ВзаимозачетЗадолженности <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "ВК" + Сред(Источник.Номер, 8); <Свойство> <Код>3 <Наименование>--> ПометкаУдаления <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>4 <Наименование>--> Проведен <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Ложь; <Значения/> <Правило> <Код>ВЗ_ВзаимозачетЗадолженностиОрганизацияДебиторУдал <Наименование>Документ: Взаимозачет задолженности <Порядок>350 <ПослеЗагрузки>Если Объект.ЭтоНовый() Тогда Отказ = Истина; КонецЕсли; <Источник>ДокументСсылка.ВзаимозачетЗадолженности <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "ВД" + Сред(Источник.Номер, 8); <Свойство> <Код>3 <Наименование>--> ПометкаУдаления <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>4 <Наименование>--> Проведен <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Ложь; <Значения/> <Группа> <Код>Финансы <Наименование>Финансы <Порядок>150 <Группа> <Код>ДвижениеДенежныхСредств <Наименование>ДвижениеДенежныхСредств <Порядок>50 <Группа> <Код>ДвижениеБезналичныхДенежныхСредств <Наименование>ПКО для документов движения безналичных денежных средств <Порядок>100 <Группа> <Код>ПоступлениеБезналичныхДенежныхСредств <Наименование>ПКО для документа "Поступление безналичных денежных средств" <Порядок>250 <Группа> <Код>КонвертацияВалютыПоступление <Наименование>КонвертацияВалютыПоступление <Порядок>50 <Правило> <Код>ПБДС_ПоступленияОтПродажиИностраннойВалюты <Наименование>Документ: Поступление безналичных денежных средств <Порядок>50 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаКонвертации); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаКонвертации, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПоступленияОтПродажиИностраннойВалюты"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПоступленияОтПродажиИностраннойВалюты"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>42 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>43 <Наименование>--> СчетБанк <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетБанк" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "РасчетныеСчета"; <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>600 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство Отключить="true"> <Код>36 <Наименование>--> КурсНаДатуПриобретенияРеализацииВалюты <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="КурсНаДатуПриобретенияРеализацииВалюты" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>15 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>18 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>800 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>32 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>19 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>23 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>25 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>26 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "РеализацияИностраннойВалюты"; <Свойство> <Код>34 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>40 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.КурсКонвертации; <Свойство> <Код>44 <Наименование>--> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>41 <Наименование>--> СуммаВзаиморасчетов <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>ПараметрыТекущегоКурса = Новый Структура("Курс, Кратность, Валюта", 1, 1, Константы.ВалютаРегламентированногоУчета.Получить()); ПараметрыНовогоКурса = Новый Структура("Курс, Кратность, Валюта", Источник.КурсКонвертации, ВходящиеДанные.КратностьЦБ, Источник.Валюта); Значение = РаботаСКурсамиВалютКлиентСервер.ПересчитатьПоКурсу(Источник.СуммаДокумента, ПараметрыТекущегоКурса, ПараметрыНовогоКурса); <Свойство> <Код>45 <Наименование>--> КурсНаДатуПриобретенияРеализацииВалюты <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="КурсНаДатуПриобретенияРеализацииВалюты" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство Отключить="true"> <Код>27 <Наименование>Дата --> <Порядок>1000 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Проведен --> <Порядок>1050 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>38 <Наименование>ВалютаКонвертации --> <Порядок>1150 <Источник Имя="ВалютаКонвертации" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>КурсКонвертации --> <Порядок>1200 <Источник Имя="КурсКонвертации" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>1250 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>46 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1300 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ПриобретениеИностраннойВалюты <Наименование>Документ: Поступление безналичных денежных средств <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Константы.ВалютаРегламентированногоУчета.Получить()); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПриобретениеИностраннойВалюты"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПриобретениеИностраннойВалюты"; <Свойство> <Код>21 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>12 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>36 <Наименование>--> СчетБанк <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетБанк" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "ВалютныеСчета"; <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>600 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>24 <Наименование>--> КурсНаДатуПриобретенияРеализацииВалюты <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="КурсНаДатуПриобретенияРеализацииВалюты" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <НеЗамещать>true <Код>25 <Наименование>--> ОтражатьРазницуВКурсеВСоставеОперационныхРасходов <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражатьРазницуВКурсеВСоставеОперационныхРасходов" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>9 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>800 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>23 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>850 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>900 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>32 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>950 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>--> РасшифровкаПлатежа <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>17 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>14 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>15 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>16 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.КурсКонвертации; <Свойство> <Код>19 <Наименование>--> СуммаПлатежа <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>18 <Наименование>--> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>ПараметрыНовогоКурса = Новый Структура("Курс, Кратность, Валюта", 1, 1, Константы.ВалютаРегламентированногоУчета.Получить()); ПараметрыТекущегоКурса = Новый Структура("Курс, Кратность, Валюта", Источник.КурсКонвертации, ВходящиеДанные.КратностьЦБ, Источник.Валюта); Значение = РаботаСКурсамиВалютКлиентСервер.ПересчитатьПоКурсу(Источник.СуммаДокумента, ПараметрыТекущегоКурса, ПараметрыНовогоКурса); <Свойство> <Код>20 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "ПриобретениеИностраннойВалюты"; <Свойство> <Код>38 <Наименование>--> КурсНаДатуПриобретенияРеализацииВалюты <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="КурсНаДатуПриобретенияРеализацииВалюты" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство Отключить="true"> <Код>27 <Наименование>Дата --> <Порядок>1050 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Проведен --> <Порядок>1100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>34 <Наименование>КурсКонвертации --> <Порядок>1150 <Источник Имя="КурсКонвертации" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>35 <Наименование>СуммаДокумента --> <Порядок>1200 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>1250 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>39 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1300 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_КонвертацияВалютыПроч <Наименование>Документ: Поступление безналичных денежных средств <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПрочиеРасчетыСКонтрагентами"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>26 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>27 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>14 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>15 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>--> СчетБанк <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетБанк" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "ВалютныеСчета"; <Свойство> <Код>18 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>600 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>19 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>20 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>750 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>4 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>5 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "РеализацияИностраннойВалюты"; <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>950 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>1000 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>28 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1050 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Группа> <Код>ПБДС_КредитыДепозитыИЗаймы <Наименование>ПБДС_КредитыДепозитыИЗаймы <Порядок>100 <Правило> <Код>ПБДС_КредитыЗаймы_ПоступлениеТранша <Наименование>Документ: ПоступлениеБезналичныхДенежныхСредств <Порядок>50 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеКредиты"" | ИНАЧЕ ""КраткосрочныеКредитыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеКредиты"" | ИНАЧЕ ""ДолгосрочныеКредитыВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеЗаймы"" | ИНАЧЕ ""КраткосрочныеЗаймыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеЗаймы"" | ИНАЧЕ ""ДолгосрочныеЗаймыВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>19 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>20 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>22 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>650 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>23 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>24 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>800 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>3 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>1000 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>50 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ВалютаВзаиморасчетов --> <Порядок>100 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1050 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ЗаймыВыданные_ОснДолг <Наименование>Документ: ПоступлениеБезналичныхДенежныхСредств <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО ПараметрыОперации.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ЕстьПроценты | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПредоставленныеЗаймы"" | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>29 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>30 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>15 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>17 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>20 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>21 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>22 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>23 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>3 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>900 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>50 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ВалютаВзаиморасчетов --> <Порядок>100 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>14 <Наименование>СуммаВзаиморасчетов --> <Порядок>250 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ЗаймыВыданные_ПроцентыКомиссия <Наименование>Документ: ПоступлениеБезналичныхДенежныхСредств <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО ПараметрыОперации.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>29 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>30 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>15 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>17 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>20 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>21 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>22 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>23 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>3 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>900 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>50 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ВалютаВзаиморасчетов --> <Порядок>100 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>14 <Наименование>СуммаВзаиморасчетов --> <Порядок>250 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_Депозиты_Закрытие <Наименование>Документ: Поступление безналичных денежных средств <Порядок>200 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДепозитныеСчета"" | ИНАЧЕ ""ДепозитныеСчетаВал"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | СУММА(СуммаДокумента), | МАКСИМУМ(СчетУчетаРасчетовСКонтрагентом) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>30 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>31 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>13 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочееПоступление"; <Свойство> <Код>18 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>19 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>20 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>22 <Наименование>БанковскийСчетКонтрагента --> СубконтоКт1 <Порядок>600 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>ВходящиеДанные.Вставить("Организация", Источник.Организация); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента", Значение); Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента); Значение = ВходящиеДанные.БанковскийСчетОрганизации; <Свойство> <Код>23 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>24 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>750 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>4 <Наименование>--> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>28 <Наименование>Дата --> <Порядок>950 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Проведен --> <Порядок>1000 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>8 <Наименование>РасшифровкаПлатежа --> <Порядок>1050 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>9 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>32 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1100 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_РасчетыПоКредитамИЗаймам <Наименование>Документ: Поступление безналичных денежных средств <Порядок>250 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_РасчетыПоКредитамИЗаймам"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <НеЗамещать>true <Код>10 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>13 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>16 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>32 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>17 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>21 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; <Свойство> <Код>19 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>20 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>22 <Наименование>--> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>23 <Наименование>--> СуммаПлатежа <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>25 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>//Сообщить(ВходящиеДанные.Счет); //Значение = ВходящиеДанные.Счет; //Значение = ОбъектКоллекции.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет; //Сообщить(Значение); Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация, | ДанныеДокумента.БанковскийСчет.ВалютаДенежныхСредств КАК ВалютаБанковскогоСчета |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """""); Запрос.УстановитьПараметр("Ссылка", Источник); Рез = Запрос.Выполнить().Выгрузить(); Если Рез.Количество() = 1 Тогда Значение = Рез[0].КорреспондирующийСчет; КонецЕсли; <Свойство Отключить="true"> <Код>26 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>33 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ПоступлениеИзДругойОрганизации <Наименование>Документ: Поступление безналичных денежных средств <Порядок>150 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); // Вычислим значение реквизита "Организация" Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.БанковскийСчетПолучатель, "Владелец"); ВходящиеДанные.Вставить("Организация", Значение); // Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПоступлениеИзДругойОрганизации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>--> Организация <Порядок>200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ОплатаПокупателя"; <Свойство> <Код>8 <Наименование>БанковскийСчетПолучатель --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>9 <Наименование>--> Контрагент <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>БанковскийСчет --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <ПриВыгрузке>БанковскийСчет = Значение; НовыйБанковскийСчет = Неопределено; НовыйВладелецБанковскогоСчета = ВходящиеДанные.Контрагент; Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчет); Значение = НовыйБанковскийСчет; <Свойство> <Код>11 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>550 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>12 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>600 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>14 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>650 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>15 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>16 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>18 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ВходящиеДанные.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.Заказ; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(ВходящиеДанные.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Организация"), "СКомиссионером", "СКомитентом"); Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Значение.ВидДоговора = "СПокупателем"; КонецЕсли; Иначе Значение.ВидДоговора = "СПокупателем"; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>20 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>21 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>22 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>28 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>29 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>23 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Организация --> Организация <Порядок>950 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ВозвратДСИзДругойОрганизации <Наименование>Документ: Поступление безналичных денежных средств <Порядок>200 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчетПолучатель; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); // Вычислим значение реквизита "Организация" Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.БанковскийСчетПолучатель, "Владелец"); ВходящиеДанные.Вставить("Организация", Значение); // Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ВозвратДСИзДругойОрганизации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>--> Организация <Порядок>200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВозвратОтПоставщика"; <Свойство> <Код>8 <Наименование>БанковскийСчетПолучатель --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>9 <Наименование>--> Контрагент <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>БанковскийСчет --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <ПриВыгрузке>БанковскийСчет = Значение; НовыйБанковскийСчет = Неопределено; НовыйВладелецБанковскогоСчета = ВходящиеДанные.Контрагент; Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчет); Значение = НовыйБанковскийСчет; <Свойство> <Код>11 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>550 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>12 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>600 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>14 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>650 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>15 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>16 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", ВходящиеДанные.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>22 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>18 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>28 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>29 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>19 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Организация --> Организация <Порядок>950 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ПоступлениеОтКлиентаБезналичныхДС <Наименование>Документ: Поступление безналичных денежных средств <Порядок>250 <ПередВыгрузкой> ВходящиеДанные = Новый Структура; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); Если Источник.Метаданные().Реквизиты.Найти("ПСК_СуммаКомиссии") = Неопределено Тогда ВходящиеДанные.Вставить("СуммаУслуг", 0); Иначе ВходящиеДанные.Вставить("СуммаУслуг", Источник.ПСК_СуммаКомиссии); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); ////Юднов //Запрос = Новый Запрос; //Запрос.Текст = " //|ВЫБРАТЬ ПЕРВЫЕ 1 //|ДоговорыКонтрагентов.Ссылка КАК Ссылка, //| ДоговорыКонтрагентов.Владелец КАК Владелец //|ИЗ //| Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов //|ГДЕ //| ДоговорыКонтрагентов.Владелец = &amp;Владелец //| И ДоговорыКонтрагентов.Организация = &amp;Организация ////| И ДоговорыКонтрагентов.Наименование = ""Основной договор"" //| И ДоговорыКонтрагентов.ВидДоговора = &amp;ВидДоговора"; //Запрос.УстановитьПараметр("Организация", Объект.Организация); //Запрос.УстановитьПараметр("Владелец", Объект.Контрагент); //Запрос.УстановитьПараметр("ВидДоговора", Перечисления.ВидыДоговоровКонтрагентов.СПокупателем); //Договор = Запрос.Выполнить().Выгрузить(); ////Пока Договор.Следующий() Цикл //// Объект.ДоговорКонтрагента = Договор.Ссылка; ////КонецЦикла; //Объект.ДоговорКонтрагента = Договор[0].Ссылка; ////Юднов Если Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ПоступленияОтПродажПоПлатежнымКартамИБанковскимКредитам Тогда СтрокаРасшифровки = Объект.РасшифровкаПлатежа.Добавить(); СтрокаРасшифровки.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПродажиПоПлатежнымКартам; СтрокаРасшифровки.СуммаПлатежа = Объект.СуммаДокумента; СтрокаРасшифровки.СуммаВзаиморасчетов = Объект.СуммаДокумента; СтрокаРасшифровки.СуммаУслуг = Объект.СуммаУслуг; Выполнить(Алгоритмы.ПодставитьДоговорЭквайринга); КонецЕсли; СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Отбор = Новый Структура; Отбор.Вставить("НеЗаполненныеРеквизиты", Истина); СчетаУчетаВДокументах.Заполнить(Объект, Отбор); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПоступлениеОтКлиентаБезналичныхДС"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>1 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>6 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеОплатыПоПлатежнойКарте Тогда Значение = "ПоступленияОтПродажПоПлатежнымКартамИБанковскимКредитам"; Иначе Значение = "ОплатаПокупателя"; КонецЕсли; <Свойство> <Код>13 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>23 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>////Юднов //Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствИзДругойОрганизации Тогда // Контрагент = Источник.БанковскийСчетОтправитель.Владелец; // Значение = Контрагент; //КонецЕсли; <Свойство> <Код>29 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>550 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>2 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>5 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>--> ДоговорКонтрагента <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>900 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>19 <Наименование>--> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>20 <Наименование>--> КурсВзаиморасчетов <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>27 <Наименование>ОбъектРасчетов --> СчетНаОплату <Порядок>450 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="СчетНаОплату" Вид="Реквизит" Тип="ДокументСсылка.СчетНаОплатуПокупателю"/> <КодПравилаКонвертации>СНОП_СчетНаОплатуПокупателю <ПередВыгрузкой>Если ТипЗнч(ОбъектКоллекции.ОбъектРасчетов.Объект) <> Тип("ДокументСсылка.ЗаказКлиента") Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>33 <Наименование>--> СтавкаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>34 <Наименование>--> СуммаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС); Значение = Окр(ОбъектКоллекции.Сумма - ОбъектКоллекции.Сумма * 100 / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство> <Код>37 <Наименование>--> СуммаУслуг <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаУслуг" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>25 <Наименование>Дата --> <Порядок>950 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Проведен --> <Порядок>1000 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>30 <Наименование>РасшифровкаПлатежа --> <Порядок>1050 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>31 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>32 <Наименование>Партнер --> <Порядок>100 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>36 <Наименование>--> СуммаУслуг <Порядок>1100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаУслуг" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ПБДС_ВозвратОтПоставщикаБезналичныхДС <Наименование>Документ: Поступление безналичных денежных средств <Порядок>300 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ВозвратОтПоставщикаБезналичныхДС"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>15 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>16 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>18 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>13 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Свойство> <Код>20 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>14 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВозвратОтПоставщика"; <Свойство> <Код>19 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>23 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаФизическихЛиц <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>29 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>550 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>8 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>12 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>850 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>22 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>7 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>5 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>6 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>30 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>31 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>25 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПБДС_ПрочиеРасчетыСКонтрагентами <Наименование>Документ: Поступление безналичных денежных средств <Порядок>350 <ПередВыгрузкой> ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПБДС_ПрочиеРасчетыСКонтрагентами"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>8 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>7 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>10 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>13 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>16 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>30 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>17 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>21 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>19 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>20 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>22 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>23 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>24 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>//Сообщить(ВходящиеДанные.Счет); //Значение = ВходящиеДанные.Счет; //Значение = ОбъектКоллекции.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет; //Сообщить(Значение); Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация, | ДанныеДокумента.БанковскийСчет.ВалютаДенежныхСредств КАК ВалютаБанковскогоСчета |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """""); Запрос.УстановитьПараметр("Ссылка", Источник); Рез = Запрос.Выполнить().Выгрузить(); Если Рез.Количество() = 1 Тогда Значение = Рез[0].КорреспондирующийСчет; КонецЕсли; <Свойство Отключить="true"> <Код>25 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_Инкассация <Наименование>Документ: Поступление безналичных денежных средств <Порядок>400 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ЗаполнитьСчетИнкассации); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "В" + Сред(Значение, 7); <Свойство> <Код>6 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>7 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>9 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "Инкассация"; <Свойство> <Код>11 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>12 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = СтрЗаменить(Значение, Параметры.МаркерыОпераций.ВзносНаличнымиВБанк, "") ; <Свойство> <Код>13 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>5 <Наименование>--> СуммаВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалютУТ.ПересчитатьСуммуДокументаВВалюту(Источник.СуммаДокумента, Источник.Валюта, Константы.ВалютаРегламентированногоУчета.Получить(), Источник.Дата); <Свойство> <Код>16 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПБДС_ВозвратЗаймаРаботником <Наименование>Документ: Поступление безналичных денежных средств <Порядок>450 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>23 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>24 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>5 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>6 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>8 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВозвратЗаймаРаботником"; <Свойство> <Код>10 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>500 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>13 <Наименование>Контрагент --> Контрагент <Порядок>550 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>16 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>850 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>Комментарий --> Комментарий <Порядок>900 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>950 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство Отключить="true"> <Код>21 <Наименование>Дата --> <Порядок>1100 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Проведен --> <Порядок>1150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>3 <Наименование>РасшифровкаПлатежа --> <Порядок>1250 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>4 <Наименование>СтатьяДоходов --> <Порядок>100 <Источник Имя="СтатьяДоходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПБДС_ПрочееПоступлениеБезналичныхДС <Наименование>Документ: Поступление безналичных денежных средств <Порядок>450 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>17 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочееПоступление"; <Свойство> <Код>18 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>21 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>38 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>500 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>550 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство Отключить="true"> <Код>23 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Счет; <Свойство> <Код>7 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>11 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>850 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>900 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = Значение + " ПСК " + ТекущаяДата(); <Свойство> <Код>34 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>950 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>4 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство Отключить="true"> <Код>28 <Наименование>--> СтатьяДоходовРасходов <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <ИмяПараметраДляПередачи>СтатьяДоходовРасходов <ПередВыгрузкой>Значение = ВходящиеДанные.СтатьяДоходов; Если ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>32 <Наименование>Дата --> <Порядок>1100 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>33 <Наименование>Проведен --> <Порядок>1150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>29 <Наименование>РасшифровкаПлатежа --> <Порядок>1250 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>31 <Наименование>СтатьяДоходов --> <Порядок>100 <Источник Имя="СтатьяДоходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПБДС_ВозвратОтПодотчетникаБезналичныхДС <Наименование>Документ: Поступление безналичных денежных средств <Порядок>500 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>10 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>8 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочееПоступление"; <Свойство> <Код>20 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>21 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>11 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>500 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>17 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = "71.01"; Иначе Значение = "71.21"; КонецЕсли; <Свойство> <Код>16 <Наименование>ПодотчетноеЛицо --> СубконтоКт1 <Порядок>650 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>2 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>7 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>800 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>15 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Значения/> <Группа> <Код>СписаниеБезналичныхДенежныхСредств <Наименование>ПКО для документа "Списание безналичных денежных средств" <Порядок>550 <Группа> <Код>СБДС_КредитыДепозитыИЗаймы <Наименование>Кредиты, депозиты и займы (списание безналичных ДС) <Порядок>50 <Правило> <Код>СБДС_КредитыЗаймы_ПроцентыКомиссияОснДолг <Наименование>Документ: Списание безналичных денежных средств <Порядок>50 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ | Док.Валюта, | Док.Ссылка, | Док.БанковскийСчетКонтрагента |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК Док |ГДЕ | Док.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ДокРасшифровкаПлатежа.ДоговорКредитаДепозита, | ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ПараметрыОперации.БанковскийСчетКонтрагента |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ДокРасшифровкаПлатежа.ДоговорКредитаДепозита, | ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ПараметрыОперации.БанковскийСчетКонтрагента |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств = РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.СтатьяДДСКомиссии | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИНАЧЕ ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств = РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.СтатьяДДСПроцентов | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымКредитамВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымКредитамВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымЗаймамВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымЗаймамВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеКредиты"" | ИНАЧЕ ""КраткосрочныеКредитыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеКредиты"" | ИНАЧЕ ""ДолгосрочныеКредитыВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеЗаймы"" | ИНАЧЕ ""КраткосрочныеЗаймыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеЗаймы"" | ИНАЧЕ ""ДолгосрочныеЗаймыВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом, | РасшифровкаПлатежаВрем.БанковскийСчетКонтрагента КАК БанковскийСчетКонтрагента |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | СУММА(СуммаДокумента), | МАКСИМУМ(БанковскийСчетКонтрагента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>22 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>23 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>5 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>900 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ЗаймыВыданные_ПеречислениеТранша <Наименование>Документ: Списание безналичных денежных средств <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ | Док.Валюта, | Док.Ссылка |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК Док |ГДЕ | Док.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ДокРасшифровкаПлатежа.ДоговорКредитаДепозита, | ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка, | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО (ДокРасшифровкаПлатежа.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор), | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ДокРасшифровкаПлатежа.ДоговорКредитаДепозита, | ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ЕстьПроценты | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПредоставленныеЗаймы"" | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>22 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>23 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>3 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>4 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>900 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_Депозиты_Размещение <Наименование>Документ: Списание безналичных денежных средств <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО ПараметрыОперации.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДепозитныеСчета"" | ИНАЧЕ ""ДепозитныеСчетаВал"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | СУММА(СуммаДокумента), | МАКСИМУМ(СчетУчетаРасчетовСКонтрагентом) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>22 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>23 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>8 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>9 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>10 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПереводНаДругойСчет"; <Свойство> <Код>12 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>13 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>ВходящиеДанные.Вставить("Организация", Источник.Организация); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента", Значение); Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента); Значение = ВходящиеДанные.БанковскийСчетОрганизации; <Свойство> <Код>14 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>15 <Наименование>Комментарий --> Комментарий <Порядок>550 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>18 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>20 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>21 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>24 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_РасчетыПоКредитамИЗаймам <Наименование>Документ: Списание безналичных денежных средств <Порядок>550 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_РасчетыПоКредитамИЗаймам"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>16 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>20 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>--> ДоговорКонтрагента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>18 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>11 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>30 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>4 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>3 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>//Сообщить(ВходящиеДанные.Счет); //Значение = ВходящиеДанные.Счет; //Значение = ОбъектКоллекции.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет; //Сообщить(Значение); Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """""); Запрос.УстановитьПараметр("Ссылка", Источник); Рез = Запрос.Выполнить().Выгрузить(); Если Рез.Количество() = 1 Тогда Значение = Рез[0].КорреспондирующийСчет; КонецЕсли; <Свойство Отключить="true"> <Код>23 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Группа> <Код>СБДС_Зарплата <Наименование>СБДС_Зарплата <Порядок>100 <Правило> <Код>СБДС_ПеречислениеДепонированнойЗП <Наименование>Документ: Списание безналичных денежных средств <Порядок>550 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>27 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>28 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>8 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>9 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>10 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПеречислениеДепонентов"; <Свойство> <Код>12 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>13 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>14 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>15 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>17 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>18 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>750 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>1100 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>1150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>4 <Наименование>РасшифровкаПлатежа --> <Порядок>1200 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>5 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>50 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>6 <Наименование>СуммаВзаиморасчетов --> <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СБДС_ПеречислениеЗПНаЛицевыеСчета <Наименование>Документ: Списание безналичных денежных средств <Порядок>550 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Если Не (ПолучитьФункциональнуюОпцию("УчетЗарплатыИКадровВоВнешнейПрограмме") И ПолучитьФункциональнуюОпцию("ВедетсяУчетРасчетовПоЗарплатеСводно")) Тогда ПодобраннаяПлатежнаяВедомость = Неопределено; Выполнить(Алгоритмы.ПодобратьПлатежнуюВедомость); Объект.ПлатежнаяВедомость = ПодобраннаяПлатежнаяВедомость; Иначе Объект.ФизЛицо = Справочники.ФизическиеЛица.ПустаяСсылка(); КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПеречислениеЗаработнойПлатыРаботнику"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>28 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>450 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство Отключить="true"> <Код>2 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>500 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>НовыйКонтрагент = Справочники.Контрагенты.ПустаяСсылка(); ФизЛицо = Источник.ПодотчетноеЛицо; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзФизЛица); Значение = НовыйКонтрагент; <Свойство> <Код>10 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаФизическихЛиц <Свойство> <Код>3 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>20 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>21 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>750 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>27 <Наименование>НомерВедомостиНаВыплатуЗарплаты --> НомерВедомостиНаВыплатуЗарплаты <Порядок>900 <Источник Имя="НомерВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерВедомостиНаВыплатуЗарплаты <Свойство> <Код>25 <Наименование>ДатаВедомостиНаВыплатуЗарплаты --> ДатаВедомостиНаВыплатуЗарплаты <Порядок>950 <Источник Имя="ДатаВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДатаВедомостиНаВыплатуЗарплаты <Свойство> <Код>26 <Наименование>ЗаявкаНаРасходованиеДенежныхСредств --> СсылкаНаЗаявку <Порядок>1000 <Источник Имя="ЗаявкаНаРасходованиеДенежныхСредств" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СсылкаНаЗаявку <ПриВыгрузке>Значение = Значение.УникальныйИдентификатор(); <Свойство Отключить="true"> <Код>16 <Наименование>Дата --> <Порядок>1100 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>17 <Наименование>Проведен --> <Порядок>1150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>13 <Наименование>РасшифровкаПлатежа --> <Порядок>1200 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>14 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>50 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>15 <Наименование>СуммаВзаиморасчетов --> <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СБДС_ВыдачаЗаймаРаботнику <Наименование>Документ: Списание безналичных денежных средств <Порядок>550 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>20 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>21 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВыдачаЗаймаРаботнику"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>12 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>14 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>15 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>750 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>16 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>18 <Наименование>Дата --> <Порядок>1100 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>19 <Наименование>Проведен --> <Порядок>1150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>1 <Наименование>РасшифровкаПлатежа --> <Порядок>1200 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>2 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>50 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>3 <Наименование>СуммаВзаиморасчетов --> <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СБДС_ПеречислениеЗП <Наименование>Документ: Списание безналичных денежных средств <Порядок>600 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Если Не (ПолучитьФункциональнуюОпцию("УчетЗарплатыИКадровВоВнешнейПрограмме") И ПолучитьФункциональнуюОпцию("ВедетсяУчетРасчетовПоЗарплатеСводно")) Тогда ПодобраннаяПлатежнаяВедомость = Неопределено; Выполнить(Алгоритмы.ПодобратьПлатежнуюВедомость); Объект.ПеречислениеЗаработнойПлаты[0].Ведомость = ПодобраннаяПлатежнаяВедомость; КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПеречислениеЗП"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>2 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>3 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>22 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>23 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>700 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>30 <Наименование>НомерВедомостиНаВыплатуЗарплаты --> НомерВедомостиНаВыплатуЗарплаты <Порядок>850 <Источник Имя="НомерВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерВедомостиНаВыплатуЗарплаты <Свойство> <Код>28 <Наименование>ДатаВедомостиНаВыплатуЗарплаты --> ДатаВедомостиНаВыплатуЗарплаты <Порядок>900 <Источник Имя="ДатаВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДатаВедомостиНаВыплатуЗарплаты <Свойство> <Код>29 <Наименование>ЗаявкаНаРасходованиеДенежныхСредств --> СсылкаНаЗаявку <Порядок>950 <Источник Имя="ЗаявкаНаРасходованиеДенежныхСредств" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СсылкаНаЗаявку <ПриВыгрузке>Значение = Значение.УникальныйИдентификатор(); <Группа> <Код>25 <Наименование>--> ПеречислениеЗаработнойПлаты <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="ПеречислениеЗаработнойПлаты" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("Ведомость"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>27 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство Отключить="true"> <Код>31 <Наименование>--> Ведомость <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Ведомость" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>18 <Наименование>Дата --> <Порядок>1050 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>19 <Наименование>Проведен --> <Порядок>1100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>16 <Наименование>РасшифровкаПлатежа --> <Порядок>1150 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>17 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>50 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>СуммаВзаиморасчетов --> <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СБДС_ПеречислениеДСВДругуюОрганизацию <Наименование>Документ: Списание безналичных денежных средств <Порядок>150 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); // Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.БанковскийСчетПолучатель, "Владелец"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ПеречислениеДСВДругуюОрганизацию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ОплатаПоставщику"; <Свойство> <Код>7 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>9 <Наименование>--> Контрагент <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>БанковскийСчетПолучатель --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <ПриВыгрузке>БанковскийСчет = Значение; НовыйБанковскийСчет = Неопределено; НовыйВладелецБанковскогоСчета = ВходящиеДанные.Контрагент; Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчет); Значение = НовыйБанковскийСчет; <Свойство> <Код>12 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>11 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>15 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.Заказ; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Организация"), "СКомиссионером", "СКомитентом"); Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Значение.ВидДоговора = "СПоставщиком"; КонецЕсли; Иначе Значение.ВидДоговора = "СПоставщиком"; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>20 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически" <Свойство> <Код>16 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>19 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>28 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>29 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>26 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>21 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>БанковскийСчетПолучатель --> <Порядок>950 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ВозвратДСВДругуюОрганизацию <Наименование>Документ: Списание безналичных денежных средств <Порядок>200 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); // Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.БанковскийСчетПолучатель, "Владелец"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПриЗагрузке>Если Объект <> Неопределено Тогда Объект.ДополнительныеСвойства.Вставить("ТекРасшифровкаПлатежа", Объект.РасшифровкаПлатежа.Выгрузить()); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ВозвратДСВДругуюОрганизацию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВозвратПокупателю"; <Свойство> <Код>7 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>9 <Наименование>--> Контрагент <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>БанковскийСчетПолучатель --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <ПриВыгрузке>БанковскийСчет = Значение; НовыйБанковскийСчет = Неопределено; НовыйВладелецБанковскогоСчета = ВходящиеДанные.Контрагент; Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчет); Значение = НовыйБанковскийСчет; <Свойство> <Код>12 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>26 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>11 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = Значение + " ПСК" + ТекущаяДата(); <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>16 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>Сумма --> СуммаПлатежа <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически" <Свойство> <Код>19 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>20 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>28 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>29 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>21 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>БанковскийСчетПолучатель --> <Порядок>950 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>30 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ОплатаПоставщикуБезналичныеДС <Наименование>Документ: Списание безналичных денежных средств <Порядок>250 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПриЗагрузке>Если Объект <> Неопределено Тогда Объект.ДополнительныеСвойства.Вставить("ТекРасшифровкаПлатежа", Объект.РасшифровкаПлатежа.Выгрузить()); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ОплатаПоставщикуБезналичныеДС"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>16 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>17 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>19 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>21 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>22 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ОплатаПоставщику"; <Свойство> <Код>20 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <Свойство> <Код>11 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>23 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>12 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>30 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = Значение + " ПСК" + ТекущаяДата(); <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>Сумма --> СуммаПлатежа <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>8 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>6 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>7 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>32 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>33 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>31 <Наименование>Партнер --> <Порядок>500 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>34 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ВозвратПокупателюБезналичныеДС <Наименование>Документ: Списание безналичных денежных средств <Порядок>300 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПриЗагрузке>Если Объект <> Неопределено Тогда Объект.ДополнительныеСвойства.Вставить("ТекРасшифровкаПлатежа", Объект.РасшифровкаПлатежа.Выгрузить()); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ВозвратПокупателюБезналичныеДС"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>13 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>14 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>16 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ВозвратПокупателю"; <Свойство> <Код>17 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>18 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>10 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>28 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>Сумма --> СуммаПлатежа <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>6 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>7 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>29 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>30 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>850 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>900 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ТаможенныйПлатеж <Наименование>Документ: Списание безналичных денежных средств <Порядок>350 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ТаможенныйПлатеж"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>16 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>17 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>18 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>11 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>26 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = Параметры.МаркерыОпераций.ТаможенныйПлатеж + Значение + " ПСК "+ ТекущаяДата(); <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>850 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>4 <Наименование>Заказ --> ДоговорКонтрагента <Порядок>100 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>5 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>6 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>200 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>3 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>Сумма --> СуммаПлатежа <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>22 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>27 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ПрочиеРасчетыСКонтрагентами <Наименование>Документ: Списание безналичных денежных средств <Порядок>400 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ПрочиеРасчетыСКонтрагентами"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>16 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>19 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>--> ДоговорКонтрагента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>18 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>11 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>30 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>31 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>4 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>3 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>//Сообщить(ВходящиеДанные.Счет); //Значение = ВходящиеДанные.Счет; //Значение = ОбъектКоллекции.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет; //Сообщить(Значение); Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """""); Запрос.УстановитьПараметр("Ссылка", Источник); Рез = Запрос.Выполнить().Выгрузить(); Если Рез.Количество() = 1 Тогда Значение = Рез[0].КорреспондирующийСчет; КонецЕсли; <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>32 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ПеречислениеНаДругойРСБезналичныхДС <Наименование>Документ: Списание безналичных денежных средств <Порядок>450 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); СчУчета = "СчетУчетаРасчетовСКонтрагентом"; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Если Объект.РасшифровкаПлатежа.Количество() > 0 Тогда Если Не ЗначениеЗаполнено(Объект.ВалютаДокумента) Или Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Объект.РасшифровкаПлатежа[0].СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетныеСчета; Иначе Объект.РасшифровкаПлатежа[0].СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ВалютныеСчета; КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ПеречислениеНаДругойРСБезналичныхДС"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>11 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>12 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>10 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПереводНаДругойСчет"; <Свойство> <Код>18 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>15 <Наименование>БанковскийСчетПолучатель --> СчетКонтрагента <Порядок>450 <Источник Имя="БанковскийСчетПолучатель" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>6 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>550 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>650 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ПеречислениеДенежныхСредствНаДругойСчет; <Свойство> <Код>3 <Наименование>СуммаДокумента --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>20 <Наименование>СуммаДокумента --> СуммаПлатежа <Порядок>150 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>4 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>5 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство Отключить="true"> <Код>21 <Наименование>Дата --> <Порядок>800 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Проведен --> <Порядок>850 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>26 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>900 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ПеречислениеНалога <Наименование>Документ: Списание безналичных денежных средств <Порядок>500 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); // Приводим тип значений субконто Если ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Для Каждого СтрокаВидаСубконто Из Объект.СчетУчетаРасчетовСКонтрагентом.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Субконто = Объект["СубконтоДт" + СтрокаВидаСубконто.НомерСтроки]; Если ТипСубконто.ПривестиЗначение(Субконто) <> Субконто Тогда Объект["СубконтоДт" + СтрокаВидаСубконто.НомерСтроки] = ТипСубконто.ПривестиЗначение(Субконто); КонецЕсли; КонецЦикла; КонецЕсли; //КонецЕсли; Если ПараметрыОбъекта <> Неопределено Тогда ИмяНалога = ПараметрыОбъекта["Налог"]; Если ЗначениеЗаполнено(ИмяНалога) Тогда Налог = Справочники.ВидыНалоговИПлатежейВБюджет.НайтиПоНаименованию(ИмяНалога); Если Налог <> Неопределено Тогда Объект.Налог = Налог; Объект.ВидНалоговогоОбязательства = Справочники.ВидыНалоговИПлатежейВБюджет.ВидНалоговогоОбязательстваПоКБК(Налог.КодБК); Объект.СчетУчетаРасчетовСКонтрагентом = Налог.СчетУчета; КонецЕсли; КонецЕсли; КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>12 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>13 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>15 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>18 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПеречислениеНалога"; <Свойство> <Код>16 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>17 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>27 <Наименование>СтатьяДвиженияДенежныхСредств --> СчетУчетаРасчетовСКонтрагентом <Порядок>550 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПриВыгрузке>Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); <Свойство> <Код>31 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>600 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>9 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>650 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>30 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>7 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>21 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>32 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>33 <Наименование>--> Налог <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>Налог <ПередВыгрузкой>Значение = Строка(Источник.ТипНалога); <Значения/> <Правило> <Код>СБДС_ПеречислениеПодотчетномуЛицу <Наименование>Документ: Списание безналичных денежных средств <Порядок>650 <ПередВыгрузкой>БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБДС_ПеречислениеПодотчетномуЛицу"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПеречислениеПодотчетномуЛицу"; <Свойство> <Код>10 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>12 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>450 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство Отключить="true"> <Код>2 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>500 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>НовыйКонтрагент = Справочники.Контрагенты.ПустаяСсылка(); ФизЛицо = Источник.ПодотчетноеЛицо; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзФизЛица); Значение = НовыйКонтрагент; <Свойство> <Код>13 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаФизическихЛиц <Свойство> <Код>3 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>600 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>650 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>28 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>700 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>22 <Наименование>Дата --> <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>Проведен --> <Порядок>950 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>29 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_КонвертацияВалюты <Наименование>Документ: Списание безналичных денежных средств <Порядок>700 <ПередВыгрузкой>ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); ВходящиеДанные.Вставить("СчетБанк"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; Если Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() Тогда ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом = "ПриобретениеИностраннойВалюты"; ВходящиеДанные.СчетБанк = "РасчетныеСчета"; Иначе ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом = "РеализацияИностраннойВалюты"; ВходящиеДанные.СчетБанк = "ВалютныеСчета"; КонецЕсли; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>27 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>28 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>9 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПрочиеРасчетыСКонтрагентами"; <Свойство> <Код>14 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>15 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>550 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>18 <Наименование>--> СчетБанк <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетБанк" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>19 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>650 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>21 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>5 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>6 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>7 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом; <Свойство> <Код>8 <Наименование>--> ДоговорКонтрагента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>24 <Наименование>Дата --> <Порядок>950 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Проведен --> <Порядок>1000 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>26 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1050 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>СБДС_ПрочееСписаниеБезналичныхДС <Наименование>Документ: Списание безналичных денежных средств <Порядок>750 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Если Источник.РасшифровкаПлатежа.Количество() > 0 Тогда УслугиБанка = Справочники.СтатьиДвиженияДенежныхСредств.НайтиПоНаименованию("Услуги банка"); Если УслугиБанка <> Неопределено и Источник.РасшифровкаПлатежа[0].СтатьяДвиженияДенежныхСредств = УслугиБанка Тогда Значение = "КомиссияБанка"; Иначе Значение = "ПрочееСписание"; КонецЕсли; Иначе Значение = "ПрочееСписание"; КонецЕсли; <Свойство> <Код>22 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>БанковскийСчетКонтрагента --> СчетКонтрагента <Порядок>500 <Источник Имя="БанковскийСчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаКонтрагентов"/> <Приемник Имя="СчетКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаКонтрагентов <Свойство> <Код>29 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет; <Свойство> <Код>10 <Наименование>НазначениеПлатежа --> НазначениеПлатежа <Порядок>700 <Источник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеПлатежа" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>31 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = Источник.Дата; КонецЕсли; <Свойство> <Код>32 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) И Источник.ТипПлатежногоДокумента = Перечисления.ТипыПлатежныхДокументов.ПлатежноеПоручение Тогда Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Источник.Номер, Ложь, Истина); КонецЕсли; <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>30 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>24 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>1000 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Свойство Отключить="true"> <Код>25 <Наименование>Дата --> <Порядок>1050 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Проведен --> <Порядок>1100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>33 <Наименование>РасшифровкаПлатежа --> <Порядок>1150 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>34 <Наименование>СтатьяРасходов --> <Порядок>50 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ДвижениеНаличныхДенежныхСредств <Наименование>ПКО для документов движения наличных денежных средств <Порядок>150 <Группа> <Код>ПриходныйКассовыйОрдер <Наименование>ПКО для документа "Приходный кассовый ордер" <Порядок>300 <Группа> <Код>ПКО_КредитыДепозитыИЗаймы <Наименование>Кредиты, депозиты и займы (поступление наличных ДС) <Порядок>50 <Правило> <Код>ПКО_КредитыЗаймы_ПоступлениеТранша <Наименование>Документ: Приходный кассовый ордер <Порядок>50 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПриходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеКредиты"" | ИНАЧЕ ""КраткосрочныеКредитыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеКредиты"" | ИНАЧЕ ""ДолгосрочныеКредитыВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеЗаймы"" | ИНАЧЕ ""КраткосрочныеЗаймыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеЗаймы"" | ИНАЧЕ ""ДолгосрочныеЗаймыВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>27 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>28 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>19 <Наименование>Основание --> Основание <Порядок>400 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <Свойство> <Код>21 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>22 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПринятоОт --> ПринятоОт <Порядок>700 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Кассир --> Ответственный <Порядок>750 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>25 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>5 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>950 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПКО_ЗаймыВыданные_ОснДолг <Наименование>Документ: Приходный кассовый ордер <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПриходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО ПараметрыОперации.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ЕстьПроценты | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПредоставленныеЗаймы"" | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>27 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>28 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>19 <Наименование>Основание --> Основание <Порядок>400 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <Свойство> <Код>21 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>22 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПринятоОт --> ПринятоОт <Порядок>700 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Кассир --> Ответственный <Порядок>750 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>25 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>5 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>950 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПКО_ЗаймыВыданные_ПроцентыКомиссия <Наименование>Документ: Приходный кассовый ордер <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПриходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента), | МАКСИМУМ(СчетУчетаРасчетовСКонтрагентом) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>26 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>27 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ПрочийПриход"; <Свойство> <Код>18 <Наименование>Основание --> Основание <Порядок>400 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <Свойство> <Код>20 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>21 <Наименование>Приложение --> Приложение <Порядок>700 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>ПринятоОт --> ПринятоОт <Порядок>750 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>800 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>24 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа Отключить="true"> <Код>8 <Наименование>РасшифровкаПлатежа --> <Порядок>1000 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>9 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПКО_Депозиты_Закрытие <Наименование>Документ: Приходный кассовый ордер <Порядок>200 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.ПриходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДепозитныеСчета"" | ИНАЧЕ ""ДепозитныеСчетаВал"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом, | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.БанковскийСчетКонтрагента КАК БанковскийСчетКонтрагента |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | СУММА(СуммаДокумента), | МАКСИМУМ(СчетУчетаРасчетовСКонтрагентом), | МАКСИМУМ(БанковскийСчетКонтрагента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>26 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>27 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ПрочийПриход"; <Свойство> <Код>18 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>19 <Наименование>--> СубконтоКт1 <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПередВыгрузкой>ВходящиеДанные.Вставить("Организация", Источник.Организация); Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента); Значение = ВходящиеДанные.БанковскийСчетОрганизации; <Свойство> <Код>20 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>ПринятоОт --> ПринятоОт <Порядок>600 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>24 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа Отключить="true"> <Код>8 <Наименование>РасшифровкаПлатежа --> <Порядок>850 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>9 <Наименование>ВалютаВзаиморасчетов --> <Порядок>150 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>200 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>250 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>Сумма --> <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПКО_РасчетыПоКредитамИЗаймам <Наименование>Документ: Приходный кассовый ордер <Порядок>250 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_РасчетыПоКредитамИЗаймам"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>3 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>8 <Наименование>Основание --> Основание <Порядок>400 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>26 <Наименование>--> ДоговорКонтрагента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>9 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ПринятоОт --> ПринятоОт <Порядок>600 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>12 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>--> РасшифровкаПлатежа <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>18 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>15 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>16 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>17 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>19 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>20 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>21 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Счет; <Значения/> <Правило> <Код>ПКО_ПоступлениеДСИзДругойОрганизации <Наименование>Документ: Приходный кассовый ордер <Порядок>100 <ПередВыгрузкой>// Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.КассаОтправитель, "Владелец"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_ПоступлениеДСИзДругойОрганизации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>4 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>18 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>2 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ОплатаПокупателя"; <Свойство> <Код>19 <Наименование>--> Контрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>12 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>36 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>35 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>37 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>27 <Наименование>--> РасшифровкаПлатежа <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | РасшифровкаПлатежа.СуммаВзаиморасчетов, | РасшифровкаПлатежа.ВалютаВзаиморасчетов, | РасшифровкаПлатежа.ОбъектРасчетов.Объект Как Заказ, | РасшифровкаПлатежа.Сумма КАК Сумма, | РасшифровкаПлатежа.Сумма КАК СуммаПлатежа |ИЗ | Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.ДокументОснование); РасшифровкаРКО = Запрос.Выполнить().Выгрузить(); КоллекцияОбъектов = РасшифровкаРКО.Скопировать(); КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); <Свойство> <Код>28 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>29 <Наименование>--> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> ДоговорКонтрагента <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Организация"), "СКомиссионером", "СКомитентом"); Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Значение.ВидДоговора = "СПокупателем"; КонецЕсли; Иначе Значение.ВидДоговора = "СПокупателем"; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>31 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>32 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>33 <Наименование>--> СпособПогашенияЗадолженности <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>34 <Наименование>--> СуммаПлатежа <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>40 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>ПКО_ВозвратДСИзДругойОрганизации <Наименование>Документ: Приходный кассовый ордер <Порядок>150 <ПередВыгрузкой>// Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.РасходныйКассовыйОрдер, "Организация"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_ВозвратДСИзДругойОрганизации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>4 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>5 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>2 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ВозвратОтПоставщика"; <Свойство> <Код>11 <Наименование>--> Контрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>7 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>12 <Наименование>--> РасшифровкаПлатежа <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | РасшифровкаПлатежа.СуммаВзаиморасчетов, | РасшифровкаПлатежа.ВалютаВзаиморасчетов, | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК Заказ, | РасшифровкаПлатежа.Сумма Как Сумма, | РасшифровкаПлатежа.Сумма КАК СуммаПлатежа |ИЗ | Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.РасходныйКассовыйОрдер); РасшифровкаРКО = Запрос.Выполнить().Выгрузить(); КоллекцияОбъектов = РасшифровкаРКО.Скопировать(); КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>13 <Наименование>--> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ДоговорКонтрагента <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>18 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>17 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>16 <Наименование>--> СпособПогашенияЗадолженности <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>15 <Наименование>--> СуммаПлатежа <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>41 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>42 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>ПКО_ПоступлениеДСОтКлиента <Наименование>Документ: Приходный кассовый ордер <Порядок>200 <ПередВыгрузкой>Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_ПоступлениеДСОтКлиента"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>10 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>13 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>14 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ОплатаПокупателя"; <Свойство> <Код>17 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>18 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>21 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>750 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>6 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>8 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>2 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>5 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>3 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>4 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>24 <Наименование>ОбъектРасчетов --> СчетНаОплату <Порядок>400 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="СчетНаОплату" Вид="Реквизит" Тип="ДокументСсылка.СчетНаОплатуПокупателю"/> <КодПравилаКонвертации>СНОП_СчетНаОплатуПокупателю <ПередВыгрузкой>Если ТипЗнч(ОбъектКоллекции.ОбъектРасчетов.Объект) <> Тип("ДокументСсылка.ЗаказКлиента") Тогда Отказ = Истина; Иначе Значение = ОбъектКоллекции.ОбъектРасчетов.Объект; КонецЕсли; <Свойство Отключить="true"> <Код>43 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>44 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; //Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство> <Код>45 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>550 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>46 <Наименование>СуммаНДС --> СуммаНДС <Порядок>600 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>47 <Наименование>ДокументОснование --> ДокументОснование <Порядок>800 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <Свойство> <Код>48 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>850 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Значения/> <Правило> <Код>ПКО_ВозвратДСОтПоставщика <Наименование>Документ: Приходный кассовый ордер <Порядок>250 <ПередВыгрузкой>Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_ВозвратДСОтПоставщика"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ВозвратОтПоставщика"; <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>21 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>750 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>16 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>18 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>19 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>20 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>45 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>46 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>ПКО_ПоступлениеРозничнойВыручки <Наименование>Документ: Приходный кассовый ордер <Порядок>300 <ПередВыгрузкой>Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если Объект.ЭтоНовый() и Объект.РасшифровкаПлатежа.Количество()>0 Тогда // Устанавливаем ставку НДС "Без НДС" Для Каждого СтрокаТаблицы из Объект.РасшифровкаПлатежа Цикл СтрокаТаблицы.СтавкаНДС = Перечисления.СтавкиНДС.БезНДС; СтрокаТаблицы.СуммаНДС = 0; КонецЦИкла; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПКО_ПоступлениеРозничнойВыручки"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>1 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "РозничнаяВыручка"; <Свойство> <Код>12 <Наименование>КассаККМ --> Контрагент <Порядок>400 <Источник Имя="КассаККМ" Вид="Реквизит" Тип="СправочникСсылка.КассыККМ"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Склад"); Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>9 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>--> ВыручкаСНТТ <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="ВыручкаСНТТ" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Если ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.КассаККМ, "ТипКассы") = Перечисления.ТипыКассККМ.ФискальныйРегистратор Тогда Значение = Ложь; Иначе Отказ = Истина; КонецЕсли; <Свойство> <Код>21 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>--> РасшифровкаПлатежа <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>14 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ПоступлениеДенежныхСредствИзКассыККМ; <Свойство> <Код>16 <Наименование>СуммаДокумента --> СуммаПлатежа <Порядок>100 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>15 <Наименование>СуммаДокумента --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>17 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>18 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>47 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>48 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>ПКО_ПоступлениеДСИзБанка <Наименование>Документ: Приходный кассовый ордер <Порядок>350 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда СчУчета = "СчетУчетаРасчетовСКонтрагентом"; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>8 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ПолучениеНаличныхВБанке"; <Свойство> <Код>1 <Наименование>БанковскийСчет --> Контрагент <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>5 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Приложение --> Приложение <Порядок>500 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>ПринятоОт --> ПринятоОт <Порядок>550 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ПКО_ВозвратДСОтПодотчетногоЛица <Наименование>Документ: Приходный кассовый ордер <Порядок>400 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда //Определим счет расчета с подотчетником Если НЕ ЗначениеЗаполнено(Объект.ВалютаДокумента) ИЛИ Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПодотчетнымиЛицами; Иначе Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПодотчетнымиЛицамиВал; КонецЕсли; КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>5 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>6 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ВозвратОтПодотчетногоЛица"; <Свойство> <Код>1 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>400 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>22 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>450 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПринятоОт --> ПринятоОт <Порядок>600 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ПКО_КонвертацияВалюты <Наименование>Документ: Приходный кассовый ордер <Порядок>450 <ПередВыгрузкой>ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); Запрос = Новый Запрос( "ВЫБРАТЬ | ВЫБОР | КОГДА Док.РасходныйКассовыйОрдер.Валюта = ВалютаРегламентированногоУчета.Значение | ТОГДА ""ПриобретениеИностраннойВалюты"" | ИНАЧЕ ""РеализацияИностраннойВалюты"" | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | Документ.ПриходныйКассовыйОрдер КАК Док, | Константа.ВалютаРегламентированногоУчета КАК ВалютаРегламентированногоУчета |ГДЕ | Док.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Выборка.Следующий(); ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом = Выборка.СчетУчетаРасчетовСКонтрагентом; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>22 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>23 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ПрочийПриход"; <Свойство> <Код>13 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>14 <Наименование>Контрагент --> СубконтоКт1 <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>--> СубконтоКт2 <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ИмяПКО = "ДоговорыКонтрагентов"; // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаКонвертации); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство> <Код>16 <Наименование>Основание --> Основание <Порядок>550 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>Приложение --> Приложение <Порядок>600 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>ПринятоОт --> ПринятоОт <Порядок>650 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Кассир --> Ответственный <Порядок>700 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ПКО_ПрочееПоступлениеНаличныхДС <Наименование>Документ: Приходный кассовый ордер <Порядок>500 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ПрочийПриход"; <Свойство> <Код>32 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>400 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>29 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>//Значение = ВходящиеДанные.Счет; //Значение = ПланыСчетов.Хозрасчетный.ПрочиеДоходы; Значение ="91.01"; <Свойство> <Код>17 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПринятоОт --> ПринятоОт <Порядок>600 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>21 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>31 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>ПКО_ВозвратЗаймаРаботником <Наименование>Документ: Приходный кассовый ордер <Порядок>500 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриходныйКассовыйОрдер <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>17 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>18 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ВозвратЗаймаРаботником"; <Свойство> <Код>8 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>400 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПринятоОт --> ПринятоОт <Порядок>600 <Источник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПринятоОт" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Группа> <Код>РасходныйКассовыйОрдер <Наименование>ПКО для документа "Расходный кассовый ордер" <Порядок>450 <Группа> <Код>ВыдачаЗПНаличными <Наименование>Выдача заработной платы наличными <Порядок>50 <Правило> <Код>РКО_ВыплатаЗПРаботнику <Наименование>Документ: Расходный кассовый ордер <Порядок>50 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если Не (ПолучитьФункциональнуюОпцию("УчетЗарплатыИКадровВоВнешнейПрограмме") И ПолучитьФункциональнуюОпцию("ВедетсяУчетРасчетовПоЗарплатеСводно")) Тогда ПодобраннаяПлатежнаяВедомость = Неопределено; Выполнить(Алгоритмы.ПодобратьПлатежнуюВедомость); Объект.ПлатежнаяВедомость = ПодобраннаяПлатежнаяВедомость; КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>17 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>18 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>1 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>4 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВыплатаЗаработнойПлатыРаботнику"; <Свойство> <Код>6 <Наименование>Выдать --> Выдать <Порядок>400 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>450 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>7 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>ПоДокументу --> ПоДокументу <Порядок>550 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>Приложение --> Приложение <Порядок>600 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>11 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>НомерВедомостиНаВыплатуЗарплаты --> НомерВедомостиНаВыплатуЗарплаты <Порядок>800 <Источник Имя="НомерВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерВедомостиНаВыплатуЗарплаты <Свойство> <Код>15 <Наименование>ДатаВедомостиНаВыплатуЗарплаты --> ДатаВедомостиНаВыплатуЗарплаты <Порядок>850 <Источник Имя="ДатаВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДатаВедомостиНаВыплатуЗарплаты <Свойство> <Код>14 <Наименование>ЗаявкаНаРасходованиеДенежныхСредств --> СсылкаНаЗаявку <Порядок>900 <Источник Имя="ЗаявкаНаРасходованиеДенежныхСредств" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СсылкаНаЗаявку <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Значение = Значение.УникальныйИдентификатор(); Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>13 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ВыплатаЗППоВедомостям <Наименование>Документ: Расходный кассовый ордер <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если Не (ПолучитьФункциональнуюОпцию("УчетЗарплатыИКадровВоВнешнейПрограмме") И ПолучитьФункциональнуюОпцию("ВедетсяУчетРасчетовПоЗарплатеСводно")) Тогда ПодобраннаяПлатежнаяВедомость = Неопределено; Выполнить(Алгоритмы.ПодобратьПлатежнуюВедомость); Объект.ВыплатаЗаработнойПлаты[0].Ведомость = ПодобраннаяПлатежнаяВедомость; КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>20 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>21 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВыплатаЗаработнойПлатыПоВедомостям"; <Свойство> <Код>9 <Наименование>Выдать --> Выдать <Порядок>400 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ПоДокументу --> ПоДокументу <Порядок>500 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>19 <Наименование>НомерВедомостиНаВыплатуЗарплаты --> НомерВедомостиНаВыплатуЗарплаты <Порядок>750 <Источник Имя="НомерВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерВедомостиНаВыплатуЗарплаты <Свойство> <Код>17 <Наименование>ДатаВедомостиНаВыплатуЗарплаты --> ДатаВедомостиНаВыплатуЗарплаты <Порядок>800 <Источник Имя="ДатаВедомостиНаВыплатуЗарплаты" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДатаВедомостиНаВыплатуЗарплаты <Свойство> <Код>18 <Наименование>ЗаявкаНаРасходованиеДенежныхСредств --> СсылкаНаЗаявку <Порядок>850 <Источник Имя="ЗаявкаНаРасходованиеДенежныхСредств" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СсылкаНаЗаявку <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Значение = Значение.УникальныйИдентификатор(); Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>1 <Наименование>--> ВыплатаЗаработнойПлаты <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="ВыплатаЗаработнойПлаты" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СуммаКВыплате"); КоллекцияОбъектов.Колонки.Добавить("Ведомость"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>3 <Наименование>--> СуммаКВыплате <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаКВыплате" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой> Значение = Источник.СуммаДокумента; <Свойство Отключить="true"> <Код>22 <Наименование>--> Ведомость <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Ведомость" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>16 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>950 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ВыдачаЗаймаРаботнику <Наименование>Документ: Расходный кассовый ордер <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>1 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>4 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВыдачаЗаймаРаботнику"; <Свойство> <Код>6 <Наименование>Выдать --> Выдать <Порядок>400 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>ПоДокументу --> ПоДокументу <Порядок>500 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>11 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>13 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>800 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ВыплатаДепонированнойЗП <Наименование>Документ: Расходный кассовый ордер <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>17 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>18 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВыплатаДепонентов"; <Свойство> <Код>9 <Наименование>Выдать --> Выдать <Порядок>400 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>450 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ПоДокументу --> ПоДокументу <Порядок>500 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>16 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>800 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>РКО_КредитыДепозитыИЗаймы <Наименование>Кредиты, депозиты и займы (выдача наличных ДС) <Порядок>100 <Правило> <Код>РКО_КредитыЗаймы_ПроцентыКомиссияОснДолг <Наименование>Документ: Расходный кассовый ордер <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.РасходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств = РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.СтатьяДДСКомиссии | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИНАЧЕ ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств = РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.СтатьяДДСПроцентов | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымКредитамВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымКредитамВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымЗаймамВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымЗаймамВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеКредиты"" | ИНАЧЕ ""КраткосрочныеКредитыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеКредиты"" | ИНАЧЕ ""ДолгосрочныеКредитыВал"" | КОНЕЦ | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ИЛИ РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""КраткосрочныеЗаймы"" | ИНАЧЕ ""КраткосрочныеЗаймыВал"" | КОНЕЦ | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДолгосрочныеЗаймы"" | ИНАЧЕ ""ДолгосрочныеЗаймыВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>19 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>20 <Наименование>--> ДоговорКонтрагента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>21 <Наименование>Выдать --> Выдать <Порядок>600 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Основание --> Основание <Порядок>650 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПоДокументу --> ПоДокументу <Порядок>700 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Приложение --> Приложение <Порядок>750 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>Кассир --> Ответственный <Порядок>800 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>1000 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ЗаймыВыданные_ВыдачаТранша <Наименование>Документ: Расходный кассовый ордер <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.РасходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьПроценты |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ПроцентныеСтавкиКредитовИДепозитов.СрезПоследних(&Дата, ) КАК ПроцентныеСтавки | ПО ПараметрыОперации.ДоговорКредитаДепозита = ПроцентныеСтавки.Договор, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность, | ВЫБОР | КОГДА ПроцентныеСтавки.Процент ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита КАК ДоговорКонтрагента, | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ЕстьПроценты | ТОГДА ""ПредоставленныеЗаймы"" | ИНАЧЕ ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | МАКСИМУМ(ДоговорКонтрагента), | СУММА(СуммаДокумента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); ВходящиеДанные.РасшифровкаПлатежа = РезультатЗапроса.Выгрузить(); ВходящиеДанные.РасшифровкаПлатежа.Удалить(ВходящиеДанные.РасшифровкаПлатежа[0]); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>17 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>19 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>20 <Наименование>--> ДоговорКонтрагента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>21 <Наименование>Выдать --> Выдать <Порядок>600 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Основание --> Основание <Порядок>650 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПоДокументу --> ПоДокументу <Порядок>700 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Приложение --> Приложение <Порядок>750 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>Кассир --> Ответственный <Порядок>800 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа Отключить="true"> <Код>9 <Наименование>РасшифровкаПлатежа --> <Порядок>1000 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>13 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_Депозиты_Размещение <Наименование>Документ: Расходный кассовый ордер <Порядок>200 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента"); ВходящиеДанные.Вставить("РасшифровкаПлатежа"); Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Валюта, | Док.Ссылка, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.ДоговорКредитаДепозита КАК Справочник.ДоговорыКредитовИДепозитов) КАК ДоговорКредитаДепозита, | ВЫРАЗИТЬ(ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств КАК Справочник.СтатьиДвиженияДенежныхСредств) КАК СтатьяДвиженияДенежныхСредств |ПОМЕСТИТЬ ПараметрыОперации |ИЗ | Документ.РасходныйКассовыйОрдер КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО Док.Ссылка = ДокРасшифровкаПлатежа.Ссылка |ГДЕ | Док.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | ДокРасшифровкаПлатежа.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаДокумента, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаПлатежа, | СУММА(ЕСТЬNULL(ДокРасшифровкаПлатежа.Сумма, 0)) КАК СуммаВзаиморасчетов, | КурсВалютыДокумента.Курс КАК КурсВзаиморасчетов, | КурсВалютыДокумента.Кратность КАК КратностьВзаиморасчетов |ПОМЕСТИТЬ РасшифровкаПлатежаВрем |ИЗ | ПараметрыОперации КАК ПараметрыОперации | ЛЕВОЕ СОЕДИНЕНИЕ Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДокРасшифровкаПлатежа | ПО ПараметрыОперации.Ссылка = ДокРасшифровкаПлатежа.Ссылка | И ПараметрыОперации.ДоговорКредитаДепозита = ДокРасшифровкаПлатежа.ДоговорКредитаДепозита | И ПараметрыОперации.СтатьяДвиженияДенежныхСредств = ДокРасшифровкаПлатежа.СтатьяДвиженияДенежныхСредств, | РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ПараметрыОперации.Валюта | ИЗ | ПараметрыОперации КАК ПараметрыОперации)) КАК КурсВалютыДокумента | |СГРУППИРОВАТЬ ПО | ПараметрыОперации.ДоговорКредитаДепозита, | ПараметрыОперации.СтатьяДвиженияДенежныхСредств, | КурсВалютыДокумента.Курс, | КурсВалютыДокумента.Кратность |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств, | РасшифровкаПлатежаВрем.СуммаВзаиморасчетов, | РасшифровкаПлатежаВрем.КурсВзаиморасчетов, | РасшифровкаПлатежаВрем.СуммаПлатежа, | РасшифровкаПлатежаВрем.СуммаДокумента КАК СуммаДокумента, | РасшифровкаПлатежаВрем.КратностьВзаиморасчетов, | ВЫБОР | КОГДА РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет = """" | ТОГДА ВЫБОР | КОГДА РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ДепозитныеСчета"" | ИНАЧЕ ""ДепозитныеСчетаВал"" | КОНЕЦ | ИНАЧЕ РасшифровкаПлатежаВрем.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет | КОНЕЦ КАК СчетУчетаРасчетовСКонтрагентом, | РасшифровкаПлатежаВрем.ДоговорКредитаДепозита.БанковскийСчетКонтрагента КАК БанковскийСчетКонтрагента |ИЗ | РасшифровкаПлатежаВрем КАК РасшифровкаПлатежаВрем |ИТОГИ | СУММА(СуммаДокумента), | МАКСИМУМ(СчетУчетаРасчетовСКонтрагентом), | МАКСИМУМ(БанковскийСчетКонтрагента) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>28 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ПрочийРасход"; <Свойство> <Код>18 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <Свойство> <Код>19 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>20 <Наименование>--> СубконтоДт1 <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт1" Вид="Реквизит"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПередВыгрузкой>ВходящиеДанные.Вставить("Организация", Источник.Организация); Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента); Значение = ВходящиеДанные.БанковскийСчетОрганизации; <Свойство> <Код>21 <Наименование>Выдать --> Выдать <Порядок>550 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Основание --> Основание <Порядок>600 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПоДокументу --> ПоДокументу <Порядок>650 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Приложение --> Приложение <Порядок>700 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>Кассир --> Ответственный <Порядок>750 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа Отключить="true"> <Код>8 <Наименование>РасшифровкаПлатежа --> <Порядок>950 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>9 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>10 <Наименование>ДоговорКредитаДепозита --> <Порядок>100 <Источник Имя="ДоговорКредитаДепозита" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКредитовИДепозитов"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>11 <Наименование>СтатьяДвиженияДенежныхСредств --> <Порядок>150 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>12 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_РасчетыПоКредитамИЗаймам <Наименование>Документ: Расходный кассовый ордер <Порядок>250 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РКО_РасчетыПоКредитамИЗаймам"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>17 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>18 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>20 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>22 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "РасчетыПоКредитамИЗаймам"; <Свойство> <Код>11 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>23 <Наименование>--> ДоговорКонтрагента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>9 <Наименование>Выдать --> Выдать <Порядок>500 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Основание --> Основание <Порядок>550 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Кассир --> Ответственный <Порядок>700 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>4 <Наименование>--> ДоговорКонтрагента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>ВыгрузитьОбъект = Истина; <Свойство> <Код>3 <Наименование>СуммаДокумента --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>7 <Наименование>СуммаДокумента --> СуммаПлатежа <Порядок>200 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>5 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>6 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>8 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Счет; <Значения/> <Правило> <Код>РКО_ВыдачаДСВДругуюОрганизацию <Наименование>Документ: Расходный кассовый ордер <Порядок>150 <ПередВыгрузкой>// Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.КассаПолучатель, "Владелец"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РКО_ВыдачаДСВДругуюОрганизацию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ОплатаПоставщику"; <Свойство> <Код>8 <Наименование>--> Контрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>Выдать --> Выдать <Порядок>450 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПоДокументу --> ПоДокументу <Порядок>550 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>600 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ОплатаДенежныхСредствВДругуюОрганизацию; <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// См. ПКО "СБДС_ПеречислениеДСВДругуюОрганизацию" // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.Заказ; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ПередачаТоваровМеждуОрганизациями // - ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями Если ТипЗнч(Заказ) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Значение.ВидДоговора = ?(Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Организация"), "СКомиссионером", "СКомитентом"); Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Значение.ВидДоговора = "СПоставщиком"; КонецЕсли; Иначе Значение.ВидДоговора = "СПоставщиком"; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>19 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>20 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>21 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>43 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>44 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>25 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>КассаПолучатель --> <Порядок>850 <Источник Имя="КассаПолучатель" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ВозвратДСВДругуюОрганизацию <Наименование>Документ: Расходный кассовый ордер <Порядок>200 <ПередВыгрузкой>// Вычислим значение реквизита "Контрагент" ОрганизацияКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.КассаПолучатель, "Владелец"); НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РКО_ВозвратДСВДругуюОрганизацию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВозвратПокупателю"; <Свойство> <Код>8 <Наименование>--> Контрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>12 <Наименование>Выдать --> Выдать <Порядок>450 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>21 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>20 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <НеЗамещать>true <Код>17 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>16 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>15 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>45 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>46 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Свойство Отключить="true"> <Код>14 <Наименование>Заказ --> <Порядок>500 <Источник Имя="УдалитьЗаказ" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_ОплатаПоставщику <Наименование>Документ: Расходный кассовый ордер <Порядок>250 <ПередВыгрузкой>Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РКО_ОплатаПоставщику"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ОплатаПоставщику"; <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>Выдать --> Выдать <Порядок>450 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПоДокументу --> ПоДокументу <Порядок>550 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>600 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке> Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>19 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>20 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>47 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>48 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>РКО_ВозвратДСПокупателю <Наименование>Документ: Расходный кассовый ордер <Порядок>300 <ПередВыгрузкой>Выполнить(Алгоритмы.ПодготовитьДанныеРасшифровкиПлатежаНДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РКО_ВозвратДСПокупателю"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВозвратПокупателю"; <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>13 <Наименование>Выдать --> Выдать <Порядок>450 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>Основание --> Основание <Порядок>500 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Приложение --> Приложение <Порядок>550 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Кассир --> Ответственный <Порядок>650 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>26 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>800 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>17 <Наименование>Сумма --> СуммаПлатежа <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>200 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Организация = Источник.Организация; Контрагент = Источник.Контрагент; ОбъектРасчетов = Значение.Объект; Выполнить(Алгоритмы.ВыгрузитьДоговорПлатежногоДокумента); <Свойство> <НеЗамещать>true <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>19 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>20 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>49 <Наименование>--> СтавкаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Значение = ВходящиеДанные.СтавкаНДС; Если Не ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>50 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>СтавкаНДС = ВходящиеДанные.СтавкаНДС; Если ЗначениеЗаполнено(СтавкаНДС) Тогда СтавкаНДСЧисло = ЦенообразованиеКлиентСервер.ПолучитьСтавкуНДСЧислом(СтавкаНДС) * 100; Значение = Окр(ОбъектКоллекции.Сумма * СтавкаНДСЧисло / (100 + СтавкаНДСЧисло), 2); Иначе Значение = 0; КонецЕсли; <Значения/> <Правило> <Код>РКО_ВзносНаличнымиВБанк <Наименование>Документ: Расходный кассовый ордер <Порядок>350 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); СчУчета = "СчетУчетаРасчетовСКонтрагентом"; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВзносНаличнымиВБанк"; <Свойство> <Код>9 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>23 <Наименование>--> Контрагент <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Справочники.Контрагенты.ПустаяСсылка(); <Свойство> <Код>10 <Наименование>Выдать --> Выдать <Порядок>500 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Основание --> Основание <Порядок>550 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Кассир --> Ответственный <Порядок>700 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = СтрЗаменить(Значение, Параметры.МаркерыОпераций.ВзносНаличнымиВБанк, ""); <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа Отключить="true"> <Код>14 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>17 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.СдачаДенежныхСредствВБанк; <Свойство> <Код>19 <Наименование>СуммаДокумента --> СуммаПлатежа <Порядок>100 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>15 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>16 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Значения/> <Правило> <Код>РКО_Инкассация <Наименование>Документ: Расходный кассовый ордер <Порядок>400 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ЗаполнитьСчетИнкассации); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>20 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>21 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>7 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>9 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "Инкассация"; <Свойство> <Код>11 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>12 <Наименование>--> Контрагент <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Справочники.Контрагенты.ПустаяСсылка(); <Свойство> <Код>13 <Наименование>Выдать --> Выдать <Порядок>500 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>14 <Наименование>Основание --> Основание <Порядок>550 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>Кассир --> Ответственный <Порядок>700 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>18 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = СтрЗаменить(Значение, Параметры.МаркерыОпераций.ВзносНаличнымиВБанк, ""); <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>РКО_ВыдачаДСПодотчетномуЛицу <Наименование>Документ: Расходный кассовый ордер <Порядок>450 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда //Определим счет расчета с подотчетником Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Если Не ЗначениеЗаполнено(Объект.ВалютаДокумента) ИЛИ Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПодотчетнымиЛицами; Иначе Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РасчетыСПодотчетнымиЛицамиВал; КонецЕсли; КонецЕсли; КонецЕсли; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВыдачаПодотчетномуЛицу"; <Свойство> <Код>8 <Наименование>ПодотчетноеЛицо --> Контрагент <Порядок>400 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>26 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>450 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>10 <Наименование>Выдать --> Выдать <Порядок>500 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Основание --> Основание <Порядок>550 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПоДокументу --> ПоДокументу <Порядок>600 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>650 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Кассир --> Ответственный <Порядок>700 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Значения/> <Правило> <Код>РКО_ПрочийРасходДС <Наименование>Документ: Расходный кассовый ордер <Порядок>500 <ПередВыгрузкой>ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ПрочийРасход"; <Свойство> <Код>29 <Наименование>--> Контрагент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Справочники.Контрагенты.ПустаяСсылка(); <Свойство Отключить="true"> <Код>28 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Счет; <Свойство> <Код>38 <Наименование>СтатьяДвиженияДенежныхСредств --> СтатьяДвиженияДенежныхСредств <Порядок>600 <Источник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <Свойство> <Код>10 <Наименование>Выдать --> Выдать <Порядок>650 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Основание --> Основание <Порядок>700 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>12 <Наименование>ПоДокументу --> ПоДокументу <Порядок>750 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>Приложение --> Приложение <Порядок>800 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Кассир --> Ответственный <Порядок>850 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>900 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>30 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>950 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>24 <Наименование>--> СтатьяДоходовРасходов <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяДоходовРасходов <ПередВыгрузкой>Значение = ВходящиеДанные.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа Отключить="true"> <Код>25 <Наименование>РасшифровкаПлатежа --> <Порядок>1100 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>СтатьяРасходов --> <Порядок>100 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РКО_КонвертацияВалюты <Наименование>Документ: Расходный кассовый ордер <Порядок>550 <ПередВыгрузкой>ВходящиеДанные.Вставить("СчетУчетаРасчетовСКонтрагентом"); ВходящиеДанные.Вставить("КурсЦБ"); ВходящиеДанные.Вставить("КратностьЦБ"); СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); ВходящиеДанные.КурсЦБ = СтруктураКурса.Курс; ВходящиеДанные.КратностьЦБ = СтруктураКурса.Кратность; Если Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() Тогда ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом = "ПриобретениеИностраннойВалюты"; Иначе ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом = "РеализацияИностраннойВалюты"; КонецЕсли; БанковскийСчетОперации = Источник.БанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); Выполнить(Алгоритмы.ТипизироватьСубконтоВШапкеПлатежногоДокумента); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РасходныйКассовыйОрдер <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>24 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>25 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>11 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ПрочийРасход"; <Свойство> <Код>13 <Наименование>--> Контрагент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Справочники.Контрагенты.ПустаяСсылка(); <Свойство> <Код>14 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>15 <Наименование>Контрагент --> СубконтоДт1 <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="СубконтоДт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>--> СубконтоДт2 <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство> <Код>17 <Наименование>Выдать --> Выдать <Порядок>600 <Источник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Выдать" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>Основание --> Основание <Порядок>650 <Источник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПоДокументу --> ПоДокументу <Порядок>700 <Источник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ПоДокументу" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Приложение --> Приложение <Порядок>750 <Источник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Приложение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>21 <Наименование>Кассир --> Ответственный <Порядок>800 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>2 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Источник.СтатьяДвиженияДенежныхСредств; <Свойство> <Код>3 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>4 <Наименование>--> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>5 <Наименование>--> КратностьВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КратностьЦБ; <Свойство> <Код>6 <Наименование>--> КурсВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.КурсЦБ; <Свойство> <Код>7 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ВходящиеДанные.СчетУчетаРасчетовСКонтрагентом; <Значения/> <Группа> <Код>ФинансыПрочее <Наименование>Прочие операции по финансам <Порядок>100 <Правило> <Код>НачисленияКредитовИДепозитов_ОперацияБух <Наименование>Документ: Начисления по кредитам и депозитам <Порядок>50 <ПередВыгрузкой>ВходящиеДанные.Вставить("Содержание"); ВходящиеДанные.Вставить("СуммаОперации", 0); ВходящиеДанные.Вставить("Хозрасчетный"); Запрос = Новый Запрос( "ВЫБРАТЬ | ДокНачисления.НомерСтроки КАК НомерСтроки, | МАКСИМУМ(КурсыВалют.Период) КАК Период |ПОМЕСТИТЬ ПериодыКурсовВалют |ИЗ | Документ.НачисленияКредитовИДепозитов.Начисления КАК ДокНачисления | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО (ДокНачисления.Дата >= КурсыВалют.Период) | И (ДокНачисления.ВалютаВзаиморасчетов = КурсыВалют.Валюта) |ГДЕ | ДокНачисления.Ссылка = &Ссылка | |СГРУППИРОВАТЬ ПО | ДокНачисления.НомерСтроки | |ИНДЕКСИРОВАТЬ ПО | НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ВЫБОР | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоКредитам) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Комиссия) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИНАЧЕ ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | КОНЕЦ | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Проценты) | ТОГДА ВЫБОР | КОГДА ДокНачисления.Договор.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.КредитВБанке) | ТОГДА ВЫБОР | КОГДА ДокНачисления.Договор.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымКредитамВал"" | КОНЕЦ | КОГДА ДокНачисления.Договор.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымКредитам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымКредитамВал"" | КОНЕЦ | КОНЕЦ | КОГДА ДокНачисления.Договор.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВкладСотрудника) | ИЛИ ДокНачисления.Договор.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнутреннийЗайм) | ИЛИ ДокНачисления.Договор.ТипДоговора = ЗНАЧЕНИЕ(Перечисление.ТипыДоговораКредитовИДепозитов.ВнешнийЗайм) | ТОГДА ВЫБОР | КОГДА ДокНачисления.Договор.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Краткосрочный) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоКраткосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоКраткосрочнымЗаймамВал"" | КОНЕЦ | КОГДА ДокНачисления.Договор.ТипСрочности = ЗНАЧЕНИЕ(Перечисление.ТипыСрочностиКредитовИДепозитов.Долгосрочный) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПроцентыПоДолгосрочнымЗаймам"" | ИНАЧЕ ""ПроцентыПоДолгосрочнымЗаймамВал"" | КОНЕЦ | КОНЕЦ | КОНЕЦ | КОНЕЦ | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоЗаймамВыданным) | ИЛИ Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоДепозитам) | ТОГДА ""ПрочиеДоходы"" | КОНЕЦ КАК СчетКтВычисл, | ВЫБОР | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоКредитам) | ТОГДА ""ПрочиеРасходы"" | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоЗаймамВыданным) | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоДепозитам) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ВалютаВзаиморасчетов = &ВалютаРегУчета | ТОГДА ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИНАЧЕ ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | КОНЕЦ | КОНЕЦ КАК СчетДтВычисл, | ВЫБОР | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоКредитам) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Комиссия) | ТОГДА ДокНачисления.Договор.СтатьяДДСКомиссии.КорреспондирующийСчет | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Проценты) | ТОГДА ДокНачисления.Договор.СтатьяДДСПроцентов.КорреспондирующийСчет | КОНЕЦ | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоЗаймамВыданным) | ИЛИ Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоДепозитам) | ТОГДА ""ПрочиеДоходы"" | КОНЕЦ КАК СчетКтПоДоговору, | ВЫБОР | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоКредитам) | ТОГДА ""ПрочиеРасходы"" | КОГДА Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоЗаймамВыданным) | ИЛИ Док.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.НачисленияПоДепозитам) | ТОГДА ВЫБОР | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Комиссия) | ТОГДА ДокНачисления.Договор.СтатьяДДСКомиссии.КорреспондирующийСчет | КОГДА ДокНачисления.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Проценты) | ТОГДА ДокНачисления.Договор.СтатьяДДСПроцентов.КорреспондирующийСчет | КОНЕЦ | КОНЕЦ КАК СчетДтПоДоговору, | ДокНачисления.Контрагент КАК Контрагент, | ДокНачисления.Договор КАК Договор, | ДокНачисления.СтатьяДоходовРасходов КАК СтатьяДоходовРасходов, | ДокНачисления.Договор.БанковскийСчетКонтрагента КАК БанковскийСчетКонтрагента, | ДокНачисления.Договор.БанковскийСчетПроцентов КАК БанковскийСчетПроцентов, | ДокНачисления.Договор.БанковскийСчетКомиссии КАК БанковскийСчетКомиссии, | ДокНачисления.ТипСуммыГрафика КАК ТипСуммыГрафика, | Док.Дата КАК Дата, | ДокНачисления.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов, | ДокНачисления.СуммаВзаиморасчетов * ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалют.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалют.Кратность, 0) > 0 | ТОГДА КурсыВалют.Курс / КурсыВалют.Кратность | ИНАЧЕ 0 | КОНЕЦ КАК СуммаВзаиморасчетовРег, | ДокНачисления.СуммаВзаиморасчетов КАК СуммаВзаиморасчетов, | Док.Организация КАК Организация, | ДокНачисления.Дата КАК ПериодВозникновения |ПОМЕСТИТЬ ХозрасчетныйВрем1 |ИЗ | Документ.НачисленияКредитовИДепозитов КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ Документ.НачисленияКредитовИДепозитов.Начисления КАК ДокНачисления | ПО Док.Ссылка = ДокНачисления.Ссылка | И (Док.Ссылка = &Ссылка) | ЛЕВОЕ СОЕДИНЕНИЕ ПериодыКурсовВалют КАК ПериодыКурсовВалют | ПО (ДокНачисления.НомерСтроки = ПериодыКурсовВалют.НомерСтроки) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО (ПериодыКурсовВалют.Период = КурсыВалют.Период) | И (ДокНачисления.ВалютаВзаиморасчетов = КурсыВалют.Валюта) |ГДЕ | Док.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ВЫБОР | КОГДА ХозрасчетныйВрем.СчетКтПоДоговору ЕСТЬ NULL | ИЛИ ХозрасчетныйВрем.СчетКтПоДоговору = """" | ТОГДА ХозрасчетныйВрем.СчетКтВычисл | ИНАЧЕ ХозрасчетныйВрем.СчетКтПоДоговору | КОНЕЦ КАК СчетКт, | ВЫБОР | КОГДА ХозрасчетныйВрем.СчетДтПоДоговору ЕСТЬ NULL | ИЛИ ХозрасчетныйВрем.СчетДтПоДоговору = """" | ТОГДА ХозрасчетныйВрем.СчетДтВычисл | ИНАЧЕ ХозрасчетныйВрем.СчетДтПоДоговору | КОНЕЦ КАК СчетДт, | ХозрасчетныйВрем.Контрагент КАК Контрагент, | ХозрасчетныйВрем.Договор КАК Договор, | ХозрасчетныйВрем.СтатьяДоходовРасходов КАК СтатьяДоходовРасходов, | ХозрасчетныйВрем.БанковскийСчетКонтрагента КАК БанковскийСчетКонтрагента, | ХозрасчетныйВрем.БанковскийСчетПроцентов КАК БанковскийСчетПроцентов, | ХозрасчетныйВрем.БанковскийСчетКомиссии КАК БанковскийСчетКомиссии, | ХозрасчетныйВрем.ТипСуммыГрафика КАК ТипСуммыГрафика, | ХозрасчетныйВрем.Дата КАК Дата, | ХозрасчетныйВрем.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов, | ХозрасчетныйВрем.СуммаВзаиморасчетовРег КАК СуммаВзаиморасчетовРег, | ХозрасчетныйВрем.СуммаВзаиморасчетов КАК СуммаВзаиморасчетов, | ХозрасчетныйВрем.Организация КАК Организация, | ХозрасчетныйВрем.ПериодВозникновения КАК ПериодВозникновения |ПОМЕСТИТЬ ХозрасчетныеВрем2 |ИЗ | ХозрасчетныйВрем1 КАК ХозрасчетныйВрем |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ХозрасчетныеВрем2.СчетКт КАК СчетКт, | ХозрасчетныеВрем2.СчетДт КАК СчетДт, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ""Контрагенты"" | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеДоходы"" | ТОГДА ""ПрочиеДоходыИРасходы"" | КОНЕЦ КАК СубконтоКт1Ключ, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ""Договоры"" | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеДоходы"" | ТОГДА ""РеализуемыеАктивы"" | КОНЕЦ КАК СубконтоКт2Ключ, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ХозрасчетныеВрем2.Контрагент | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеДоходы"" | ТОГДА ВЫБОР | КОГДА ХозрасчетныеВрем2.СтатьяДоходовРасходов.КорреспондирующийСчет = ""91.01"" | ТОГДА ХозрасчетныеВрем2.СтатьяДоходовРасходов | ИНАЧЕ ЗНАЧЕНИЕ(ПланВидовХарактеристик.СтатьиРасходов.ПустаяСсылка) | КОНЕЦ | КОНЕЦ КАК СубконтоКт1Значение, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ХозрасчетныеВрем2.Договор | КОНЕЦ КАК СубконтоКт2Значение, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасходы"" | ТОГДА ""ПрочиеДоходыИРасходы"" | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ТОГДА ""Контрагенты"" | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчета"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчетаВал"" | ТОГДА ""БанковскиеСчета"" | КОНЕЦ КАК СубконтоДт1Ключ, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасходы"" | ТОГДА ""РеализуемыеАктивы"" | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ТОГДА ""Договоры"" | КОНЕЦ КАК СубконтоДт2Ключ, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасходы"" | ТОГДА ВЫБОР | КОГДА ХозрасчетныеВрем2.СтатьяДоходовРасходов.КорреспондирующийСчет = ""91.02"" | ТОГДА ХозрасчетныеВрем2.СтатьяДоходовРасходов | ИНАЧЕ ЗНАЧЕНИЕ(ПланВидовХарактеристик.СтатьиДоходов.ПустаяСсылка) | КОНЕЦ | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ТОГДА ХозрасчетныеВрем2.Контрагент | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчета"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчетаВал"" | ТОГДА ВЫБОР | КОГДА ХозрасчетныеВрем2.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Комиссия) | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ХозрасчетныеВрем2.БанковскийСчетКомиссии, ЗНАЧЕНИЕ(Справочник.БанковскиеСчетаКонтрагентов.ПустаяСсылка)) <> ЗНАЧЕНИЕ(Справочник.БанковскиеСчетаКонтрагентов.ПустаяСсылка) | ТОГДА ХозрасчетныеВрем2.БанковскийСчетКомиссии | ИНАЧЕ ХозрасчетныеВрем2.БанковскийСчетКонтрагента | КОНЕЦ | КОГДА ХозрасчетныеВрем2.ТипСуммыГрафика = ЗНАЧЕНИЕ(Перечисление.ТипыСуммГрафикаКредитовИДепозитов.Проценты) | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(ХозрасчетныеВрем2.БанковскийСчетКомиссии, ЗНАЧЕНИЕ(Справочник.БанковскиеСчетаКонтрагентов.ПустаяСсылка)) <> ЗНАЧЕНИЕ(Справочник.БанковскиеСчетаКонтрагентов.ПустаяСсылка) | ТОГДА ХозрасчетныеВрем2.БанковскийСчетПроцентов | ИНАЧЕ ХозрасчетныеВрем2.БанковскийСчетКонтрагента | КОНЕЦ | КОНЕЦ | КОНЕЦ КАК СубконтоДт1Значение, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ТОГДА ХозрасчетныеВрем2.Договор | КОНЕЦ КАК СубконтоДт2Значение, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ХозрасчетныеВрем2.ВалютаВзаиморасчетов | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеДоходы"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ТОГДА ЗНАЧЕНИЕ(Справочник.Валюты.ПустаяСсылка) | КОНЕЦ КАК ВалютаКт, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчетаВал"" | ТОГДА ХозрасчетныеВрем2.ВалютаВзаиморасчетов | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчета"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасходы"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ТОГДА ЗНАЧЕНИЕ(Справочник.Валюты.ПустаяСсылка) | КОНЕЦ КАК ВалютаДт, | ХозрасчетныеВрем2.Организация КАК Организация, | ПРЕДСТАВЛЕНИЕ(ХозрасчетныеВрем2.ТипСуммыГрафика) КАК Содержание, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймамВал"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймамВал"" | ТОГДА ХозрасчетныеВрем2.СуммаВзаиморасчетов | КОГДА ХозрасчетныеВрем2.СчетКт = ""ПрочиеДоходы"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымКредитам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоКраткосрочнымЗаймам"" | ИЛИ ХозрасчетныеВрем2.СчетКт = ""ПроцентыПоДолгосрочнымЗаймам"" | ТОГДА 0 | КОНЕЦ КАК ВалютнаяСуммаКт, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчетаВал"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторамиВал"" | ТОГДА ХозрасчетныеВрем2.СуммаВзаиморасчетов | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчета"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасходы"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ПрочиеРасчетыСРазнымиДебиторамиИКредиторами"" | ТОГДА 0 | КОНЕЦ КАК ВалютнаяСуммаДт, | ХозрасчетныеВрем2.СуммаВзаиморасчетовРег КАК Сумма, | ХозрасчетныеВрем2.СуммаВзаиморасчетовРег КАК СуммаНУКТ, | ВЫБОР | КОГДА ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчета"" | ИЛИ ХозрасчетныеВрем2.СчетДт = ""ДепозитныеСчетаВал"" | ТОГДА 0 | ИНАЧЕ ХозрасчетныеВрем2.СуммаВзаиморасчетовРег | КОНЕЦ КАК СуммаНУДТ, | ИСТИНА КАК Активность, | ХозрасчетныеВрем2.Дата КАК Период, | ХозрасчетныеВрем2.ПериодВозникновения КАК ПериодВозникновения |ИЗ | ХозрасчетныеВрем2 КАК ХозрасчетныеВрем2 |ИТОГИ | СУММА(Сумма) |ПО | ОБЩИЕ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("ВалютаРегУчета", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатЗапроса = Запрос.Выполнить(); ВходящиеДанные.Хозрасчетный = РезультатЗапроса.Выгрузить(); ВходящиеДанные.СуммаОперации = ВходящиеДанные.Хозрасчетный[0].Сумма; ВходящиеДанные.Хозрасчетный.Удалить(ВходящиеДанные.Хозрасчетный[0]); ВходящиеДанные.Хозрасчетный.Колонки.Добавить("СубконтоДт"); ВходящиеДанные.Хозрасчетный.Колонки.Добавить("СубконтоКт"); Для Каждого Строка Из ВходящиеДанные.Хозрасчетный Цикл СубконтоДт = Новый ТаблицаЗначений; СубконтоДт.Колонки.Добавить("Ключ"); СубконтоДт.Колонки.Добавить("Значение"); СубконтоКт = СубконтоДт.Скопировать(); Для НомерСубконто = 1 По 2 Цикл ИмяСубконто = Строка["СубконтоДт" + НомерСубконто + "Ключ"]; Если ЗначениеЗаполнено(ИмяСубконто) Тогда НоваяСтрока = СубконтоДт.Добавить(); НоваяСтрока.Ключ = ИмяСубконто; НоваяСтрока.Значение = Строка["СубконтоДт" + НомерСубконто + "Значение"]; КонецЕсли; КонецЦикла; Строка.СубконтоДт = СубконтоДт; Для НомерСубконто = 1 По 2 Цикл ИмяСубконто = Строка["СубконтоКт" + НомерСубконто + "Ключ"]; Если ЗначениеЗаполнено(ИмяСубконто) Тогда НоваяСтрока = СубконтоКт.Добавить(); НоваяСтрока.Ключ = ИмяСубконто; НоваяСтрока.Значение = Строка["СубконтоКт" + НомерСубконто + "Значение"]; КонецЕсли; КонецЦикла; Строка.СубконтоКт = СубконтоКт; Содержание = Строка.Содержание + " от " + Формат(Строка.ПериодВозникновения, "ДФ=dd.MM.yyyy"); Строка.Содержание = НСтр("ru = '" + Содержание + "'") КонецЦикла; ВходящиеДанные.Содержание = Строка(Источник.ХозяйственнаяОперация); <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.НачисленияКредитовИДепозитов <Приемник>ДокументСсылка.ОперацияБух <Свойства> <Свойство Поиск="true"> <Код>37 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>38 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "Ф" + Сред(Значение, 7); <Свойство> <Код>30 <Наименование>Организация --> Организация <Порядок>150 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>31 <Наименование>--> СуммаОперации <Порядок>200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаОперации" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>Комментарий --> Комментарий <Порядок>250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>34 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>35 <Наименование>--> Содержание <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>39 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Группа> <Код>1 <Наименование>--> Хозрасчетный <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Хозрасчетный" Вид="НаборДвиженийРегистраБухгалтерии"/> <Свойство> <Код>15 <Наименование>--> СчетДт <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СчетДт" Вид="Свойство" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>16 <Наименование>--> СчетКт <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СчетКт" Вид="Свойство" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>2 <Наименование>--> СубконтоДт <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт" Вид="ВидыСубконтоСчета"/> <ПриВыгрузке>Выполнить(Алгоритмы.НачисленияКредитовИДепозитов_ОперацияБух_Субконто); <Свойство> <Код>3 <Наименование>--> СубконтоКт <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт" Вид="ВидыСубконтоСчета"/> <ПриВыгрузке>Выполнить(Алгоритмы.НачисленияКредитовИДепозитов_ОперацияБух_Субконто); <Свойство> <Код>4 <Наименование>--> ВалютаДт <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДт" Вид="Измерение" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>--> ВалютаКт <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаКт" Вид="Измерение" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>--> Организация <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Измерение" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>--> Содержание <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>--> ВалютнаяСуммаДт <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСуммаДт" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВалютнаяСуммаКт <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютнаяСуммаКт" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> Сумма <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> СуммаНУДт <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУДт" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> СуммаНУКт <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУКт" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> Активность <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Активность" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>--> Период <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="Период" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>17 <Наименование>--> СубконтоКт <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтатьиРасходовВСтатьиЗатрат <ИмяПараметраДляПередачи>СубконтоКт <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СубконтоКт) И ОбъектКоллекции.СубконтоКт.Количество() > 0 И ТипЗнч(ОбъектКоллекции.СубконтоКт[0].Значение) = Тип("ПланВидовХарактеристикСсылка.СтатьиДоходов") Тогда Значение = ОбъектКоллекции.СубконтоКт[0].Значение; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>18 <Наименование>--> СубконтоДт <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СтатьиРасходовВПрочиеДоходыИРасходы <ИмяПараметраДляПередачи>СубконтоДт <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СубконтоДт) И ОбъектКоллекции.СубконтоДт.Количество() > 0 И ТипЗнч(ОбъектКоллекции.СубконтоДт[0].Значение) = Тип("ПланВидовХарактеристикСсылка.СтатьиРасходов") Тогда Значение = ОбъектКоллекции.СубконтоДт[0].Значение; Иначе Пусто = Истина; КонецЕсли; <Группа Отключить="true"> <Код>19 <Наименование>--> ЗаполнениеДвижений <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ЗаполнениеДвижений" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("Документ"); КоллекцияОбъектов.Колонки.Добавить("Примечание"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>20 <Наименование>--> Документ <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <Свойство> <Код>21 <Наименование>--> Примечание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Примечание" Вид="Реквизит" Тип="Строка"/> <Значения/> <Группа> <Код>Эквайринг <Наименование>ПКО для документов, связанных с операциями по эквайрингу <Порядок>150 <Правило> <Код>ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаПоступление <Наименование>Документ: Отчет банка по операциям эквайринга <Порядок>50 <ПередВыгрузкой>БанковскийСчетОперации = Источник.УдалитьБанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда СтатьяРасходов = ПараметрыОбъекта.Получить("СтатьяРасходов"); Если ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) И СтатьяРасходов <> Неопределено Тогда // Заполняем аналитику счета расходов Для Каждого СтрокаВидаСубконто Из Объект.СчетУчетаРасчетовСКонтрагентом.ВидыСубконто Цикл ТипЗначенияСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипЗначенияСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда Объект["СубконтоКт" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаПоступление"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетБанкаПоОперациямЭквайринга <Приемник>ДокументСсылка.ПоступлениеНаРасчетныйСчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "Э" + Сред(Источник.Номер, 7); <Свойство> <Код>3 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>250 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>СуммаКомиссии --> СуммаУслуг <Порядок>350 <Источник Имя="СуммаКомиссии" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаУслуг" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПоступленияОтПродажПоПлатежнымКартамИБанковскимКредитам"; <Свойство> <Код>9 <Наименование>УдалитьЭквайер --> Контрагент <Порядок>450 <Источник Имя="УдалитьЭквайер" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>//Значение = Источник.ДоговорЭквайринга <Свойство> <Код>10 <Наименование>УдалитьБанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="УдалитьБанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>11 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>550 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>12 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>600 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Значение, Ложь, Истина); <Свойство> <Код>13 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(Источник.СтатьяРасходов) Тогда Значение = Источник.СтатьяРасходов.КорреспондирующийСчет; КонецЕсли; <Свойство> <Код>14 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>СтатьяРасходов --> СтатьяРасходов <Порядок>750 <Источник Имя="СтатьяРасходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиРасходов"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>17 <Наименование>--> РасшифровкаПлатежа <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Колонки.Добавить("СуммаУслуг"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.УдалитьЭквайер); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", ДенежныеСредстваСервер.ПолучитьПартнераПоКонтрагенту(Источник.УдалитьЭквайер)); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; Значение = ДоговорКонтрагента; <Свойство> <Код>19 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>20 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>22 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>23 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>24 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "57.03"; <Свойство> <Код>25 <Наименование>--> СуммаУслуг <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаУслуг" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаКомиссии; <Значения/> <Правило> <Код>ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаСписание <Наименование>Документ: Отчет банка по операциям эквайринга <Порядок>50 <ПередВыгрузкой>БанковскийСчетОперации = Источник.УдалитьБанковскийСчет; Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда СтатьяРасходов = ПараметрыОбъекта.Получить("СтатьяРасходов"); Если ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) И СтатьяРасходов <> Неопределено Тогда // Заполняем аналитику счета расходов Для Каждого СтрокаВидаСубконто Из Объект.СчетУчетаРасчетовСКонтрагентом.ВидыСубконто Цикл ТипЗначенияСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипЗначенияСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда Объект["СубконтоКт" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; СчУчета = Неопределено; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаБанка); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаПоступление"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетБанкаПоОперациямЭквайринга <Приемник>ДокументСсылка.СписаниеСРасчетногоСчета <Свойства> <Свойство Поиск="true"> <Код>26 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>27 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "Э" + Сред(Источник.Номер, 7); <Свойство> <Код>28 <Наименование>--> Проведен <Порядок>150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>29 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>30 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>250 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>33 <Наименование>--> ВидОперации <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийСписаниеДенежныхСредств"/> <ПередВыгрузкой>Значение = "ПоступленияОтПродажПоПлатежнымКартамИБанковскимКредитам"; <Свойство> <Код>34 <Наименование>Эквайер --> Контрагент <Порядок>450 <Источник Имя="УдалитьЭквайер" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>//Значение = Источник.ДоговорЭквайринга <Свойство> <Код>35 <Наименование>БанковскийСчет --> СчетОрганизации <Порядок>500 <Источник Имя="УдалитьБанковскийСчет" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="СчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <Свойство> <Код>36 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>550 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>37 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>600 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(Значение, Ложь, Истина); <Свойство> <Код>38 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(Источник.СтатьяРасходов) Тогда Значение = Источник.СтатьяРасходов.КорреспондирующийСчет; КонецЕсли; <Свойство> <Код>39 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>40 <Наименование>СтатьяРасходов --> СтатьяРасходов <Порядок>750 <Источник Имя="СтатьяРасходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиРасходов"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>41 <Наименование>--> РасшифровкаПлатежа <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СчетУчетаРасчетовСКонтрагентом"); КоллекцияОбъектов.Колонки.Добавить("СуммаУслуг"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>42 <Наименование>--> ДоговорКонтрагента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "Прочее"); ДоговорКонтрагента.Вставить("Владелец", Источник.УдалитьЭквайер); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора ДоговорКонтрагента.Вставить("ПартнерУТ11", ДенежныеСредстваСервер.ПолучитьПартнераПоКонтрагенту(Источник.УдалитьЭквайер)); ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; Значение = ДоговорКонтрагента; <Свойство> <Код>43 <Наименование>--> КратностьВзаиморасчетов <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>44 <Наименование>--> КурсВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>45 <Наименование>--> СпособПогашенияЗадолженности <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>46 <Наименование>--> СуммаВзаиморасчетов <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = -(Источник.СуммаДокумента); <Свойство> <Код>47 <Наименование>--> СуммаПлатежа <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = -(Источник.СуммаДокумента); <Свойство> <Код>48 <Наименование>--> СчетУчетаРасчетовСКонтрагентом <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаРасчетовСКонтрагентом" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "57.03"; <Значения/> <Правило> <Код>ОплатаПлатежнойКартой <Наименование>Документ: Операция по платежной карте <Порядок>100 <ПередВыгрузкой>ВходящиеДанные.Вставить("ДоговорКонтрагента"); // Инициализируем структуру договора ДоговорКонтрагента = Новый Структура; // Реквизиты договора ДоговорКонтрагента.Вставить("Ссылка"); ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); ДоговорКонтрагента.Вставить("ВидДоговора", "СПокупателем"); ДоговорКонтрагента.Вставить("Владелец", Источник.Контрагент); ДоговорКонтрагента.Вставить("Организация", Источник.Организация); ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); ВходящиеДанные.ДоговорКонтрагента = ДоговорКонтрагента; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ОперацияПоПлатежнойКарте <Приемник>ДокументСсылка.ОплатаПлатежнойКартой <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>100 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>150 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <Свойство Поиск="true"> <Код>4 <Наименование>Номер --> Номер <Порядок>200 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>5 <Наименование>НомерПлатежнойКарты --> НомерПлатежнойКарты <Порядок>250 <Источник Имя="НомерПлатежнойКарты" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерПлатежнойКарты" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Организация --> Организация <Порядок>300 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Ответственный --> Ответственный <Порядок>350 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Проведен --> Проведен <Порядок>450 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>500 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>Договор --> ДоговорКонтрагента <Порядок>600 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов_ДоговорыКонтрагентов <Свойство> <Код>17 <Наименование>--> ВидОперации <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийОплатаПлатежнойКартой"/> <ПередВыгрузкой>Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратОплатыКлиенту Тогда Значение = "ВозвратПокупателю"; ИначеЕсли Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеОплатыОтКлиента Тогда Значение = "ОплатаПокупателя"; КонецЕсли; <Свойство> <Код>19 <Наименование>ЭквайринговыйТерминал --> ВидОплаты <Порядок>700 <Источник Имя="ЭквайринговыйТерминал" Вид="Реквизит" Тип="СправочникСсылка.ЭквайринговыеТерминалы"/> <Приемник Имя="ВидОплаты" Вид="Реквизит" Тип="СправочникСсылка.ВидыОплатОрганизаций"/> <КодПравилаКонвертации>ВидыОплатОрганизаций <Группа> <Код>11 <Наименование>РасшифровкаПлатежа --> РасшифровкаПлатежа <Порядок>750 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Свойство> <Код>20 <Наименование>--> ДоговорКонтрагента <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Значение = ВходящиеДанные.ДоговорКонтрагента; ВыгрузитьОбъект = Истина; <Свойство> <Код>12 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>100 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>13 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>СуммаНДС --> СуммаНДС <Порядок>200 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>Сумма --> СуммаПлатежа <Порядок>250 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> СпособПогашенияЗадолженности <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Значения/> <Группа> <Код>ПодарочныеСертификаты <Наименование>ПодарочныеСертификаты <Порядок>200 <Правило> <Код>РПС_ПоступлениеОплатыОтКлиента_Нал <Наименование>Документ: Приходный кассовый ордер <Порядок>50 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_Нал"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РеализацияПодарочныхСертификатов <Приемник>ДокументСсылка.ПриходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>21 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>22 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>14 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПКО"/> <ПередВыгрузкой>Значение = "ОплатаПокупателя"; <Свойство> <Код>16 <Наименование>--> Контрагент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = Справочники.Контрагенты.РозничныйПокупатель; <Свойство> <Код>17 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>18 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>6 <Наименование>--> СтатьяДвиженияДенежныхСредств <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяДвиженияДенежныхСредств" Вид="Реквизит" Тип="СправочникСсылка.СтатьиДвиженияДенежныхСредств"/> <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <ПередВыгрузкой>Значение = Справочники.СтатьиДвиженияДенежныхСредств.ПоступлениеДенежныхСредствИзКассыККМ; <Свойство> <Код>8 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>7 <Наименование>--> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Справочники.Контрагенты.РозничныйПокупатель); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство> <Код>5 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>9 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Пусто = Истина; <Свойство> <Код>10 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>Значение = 0; <Значения/> <Правило> <Код>ВПС_ВозвратОплатыКлиенту_Нал <Наименование>Документ: Приходный кассовый ордер <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Выполнить(Алгоритмы.ЗагрузитьДанныеРасшифровкиПлатежаНДС); Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); ПараметрыОбъекта.Вставить("Аванс", Истина); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВПС_ВозвратОплатыКлиенту_Нал"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратПодарочныхСертификатов <Приемник>ДокументСсылка.РасходныйКассовыйОрдер <Свойства> <Свойство Поиск="true"> <Код>20 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>21 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>10 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРКО"/> <ПередВыгрузкой>Значение = "ВозвратПокупателю"; <Свойство> <Код>15 <Наименование>--> Контрагент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = Справочники.Контрагенты.РозничныйПокупатель; <Свойство> <Код>16 <Наименование>Кассир --> Ответственный <Порядок>600 <Источник Имя="Кассир" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>17 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> РасшифровкаПлатежа <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>// Формируется одна строка с данными платежа КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("СтатьяДвиженияДенежныхСредств"); КоллекцияОбъектов.Колонки.Добавить("СуммаПлатежа"); КоллекцияОбъектов.Колонки.Добавить("СпособПогашенияЗадолженности"); КоллекцияОбъектов.Колонки.Добавить("КратностьВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("КурсВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("СуммаВзаиморасчетов"); КоллекцияОбъектов.Колонки.Добавить("ДоговорКонтрагента"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>7 <Наименование>--> СуммаПлатежа <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлатежа" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>6 <Наименование>--> СуммаВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.СуммаДокумента; <Свойство> <Код>2 <Наименование>--> ДоговорКонтрагента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Справочники.Контрагенты.РозничныйПокупатель); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство> <Код>5 <Наименование>--> СпособПогашенияЗадолженности <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>8 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтавкаНДС <ПередВыгрузкой>Пусто = Истина; <Свойство> <Код>9 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СуммаНДС <ПередВыгрузкой>Значение = 0; <Значения/> <Правило> <Код>ВПС_ВозвратОплатыКлиенту_ПоКарте <Наименование>Документ: Приходный кассовый ордер <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("Контрагент"); ВходящиеДанные.Вставить("ДоговорЭквайринга"); ВходящиеДанные.Вставить("Эквайрер"); ВходящиеДанные.Вставить("Валюта"); ВходящиеДанные.Вставить("Подразделение"); Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | ДоговорыЭквайринга.Партнер, | ДоговорыЭквайринга.Контрагент, | ДоговорыЭквайринга.Ссылка КАК ДоговорЭквайринга, | БанковскиеСчетаОрганизаций.ВалютаДенежныхСредств КАК Валюта, | БанковскиеСчетаОрганизаций.Подразделение КАК Подразделение |ИЗ | Документ.ВозвратПодарочныхСертификатов.ОплатаПлатежнымиКартами КАК ВозвратПодарочныхСертификатовОплатаПлатежнымиКартами | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ЭквайринговыеТерминалы КАК ЭквайринговыеТерминалы | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ДоговорыЭквайринга КАК ДоговорыЭквайринга | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.БанковскиеСчетаОрганизаций КАК БанковскиеСчетаОрганизаций | ПО ДоговорыЭквайринга.БанковскийСчет = БанковскиеСчетаОрганизаций.Ссылка | ПО ЭквайринговыеТерминалы.Владелец = ДоговорыЭквайринга.Ссылка | ПО ВозвратПодарочныхСертификатовОплатаПлатежнымиКартами.ЭквайринговыйТерминал = ЭквайринговыеТерминалы.Ссылка |ГДЕ | ВозвратПодарочныхСертификатовОплатаПлатежнымиКартами.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда ПараметрыОбъекта.Вставить("Аванс", Истина); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_ПоКарте"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратПодарочныхСертификатов <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>24 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>25 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>12 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>--> КонтрагентКредитор <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентКредитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = Справочники.Контрагенты.РозничныйПокупатель; <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>Валюта --> КратностьДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>17 <Наименование>Валюта --> КурсДокумента <Порядок>400 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>14 <Наименование>СуммаДокумента --> СуммаКтЗадолженности <Порядок>500 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаКтЗадолженности" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> СчетКт <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетКт" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "76.09"; <Свойство> <Код>20 <Наименование>--> СубконтоКт1 <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>21 <Наименование>--> СубконтоКт2 <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.Владелец = ВходящиеДанные.Контрагент; Значение.ПартнерУТ11 = ВходящиеДанные.Эквайрер; ВыгрузитьОбъект = Истина; <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>700 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>ОплатаПлатежнымиКартами --> КредиторскаяЗадолженность <Порядок>850 <Источник Имя="ОплатаПлатежнымиКартами" Вид="ТабличнаяЧасть"/> <Приемник Имя="КредиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>Сумма --> Сумма <Порядок>50 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>Сумма --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>5 <Наименование>--> ДоговорКонтрагента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Справочники.Контрагенты.РозничныйПокупатель); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>8 <Наименование>ЭквайринговыйТерминал --> <Порядок>350 <Источник Имя="ЭквайринговыйТерминал" Вид="Реквизит" Тип="СправочникСсылка.ЭквайринговыеТерминалы"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РПС_ПоступлениеОплатыОтКлиента_ПоКарте <Наименование>Документ: Приходный кассовый ордер <Порядок>200 <ПередВыгрузкой>ВходящиеДанные.Вставить("Контрагент"); //ВходящиеДанные.Вставить("ДоговорЭквайринга"); ВходящиеДанные.Вставить("Эквайрер"); ВходящиеДанные.Вставить("Валюта"); ВходящиеДанные.Вставить("Подразделение"); Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | ЭквайринговыеТерминалы.Владелец.Контрагент КАК Эквайрер, //| ДоговорыЭквайринга.Контрагент, //| ДоговорыЭквайринга.Ссылка КАК ДоговорЭквайринга, | ЭквайринговыеТерминалы.Владелец.БанковскийСчет.ВалютаДенежныхСредств КАК Валюта, | ЭквайринговыеТерминалы.Владелец.БанковскийСчет.Подразделение КАК Подразделение |ИЗ | Документ.РеализацияПодарочныхСертификатов.ОплатаПлатежнымиКартами КАК РеализацияПодарочныхСертификатовОплатаПлатежнымиКартами | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ЭквайринговыеТерминалы КАК ЭквайринговыеТерминалы //| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ДоговорыЭквайринга КАК ДоговорыЭквайринга //| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.БанковскиеСчетаОрганизаций КАК БанковскиеСчетаОрганизаций //| ПО ДоговорыЭквайринга.БанковскийСчет = БанковскиеСчетаОрганизаций.Ссылка //| ПО ЭквайринговыеТерминалы.Владелец = ДоговорыЭквайринга.Ссылка | ПО РеализацияПодарочныхСертификатовОплатаПлатежнымиКартами.ЭквайринговыйТерминал = ЭквайринговыеТерминалы.Ссылка |ГДЕ | РеализацияПодарочныхСертификатовОплатаПлатежнымиКартами.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //ПСК+ Сазанский / Если Не ЗначениеЗаполнено(ПараметрыОбъекта) Тогда ПараметрыОбъекта = Новый Структура; КонецЕсли; //ПСК+ Сазанский \ ПараметрыОбъекта.Вставить("Аванс", Истина); //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_ПоКарте"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РеализацияПодарочныхСертификатов <Приемник>ДокументСсылка.КорректировкаДолга <Свойства> <Свойство Поиск="true"> <Код>23 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>24 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>--> КонтрагентДебитор <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КонтрагентДебитор" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = Справочники.Контрагенты.РозничныйПокупатель; <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>14 <Наименование>Валюта --> КратностьДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>15 <Наименование>Валюта --> КурсДокумента <Порядок>400 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>16 <Наименование>--> ВидОперации <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКорректировкаДолга"/> <ПередВыгрузкой>Значение = "Прочее"; <Свойство> <Код>17 <Наименование>СуммаДокумента --> СуммаДтЗадолженности <Порядок>500 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДтЗадолженности" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> СчетДт <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетДт" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "57.03"; <Свойство> <Код>20 <Наименование>--> СубконтоДт1 <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт1" Вид="Реквизит"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Значение = ВходящиеДанные.Контрагент; <Свойство> <Код>19 <Наименование>--> СубконтоДт2 <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт2" Вид="Реквизит"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.Владелец = ВходящиеДанные.Контрагент; Значение.ПартнерУТ11 = ВходящиеДанные.Эквайрер; ВыгрузитьОбъект = Истина; <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>1 <Наименование>ОплатаПлатежнымиКартами --> ДебиторскаяЗадолженность <Порядок>850 <Источник Имя="ОплатаПлатежнымиКартами" Вид="ТабличнаяЧасть"/> <Приемник Имя="ДебиторскаяЗадолженность" Вид="ТабличнаяЧасть"/> <Свойство> <Код>6 <Наименование>Сумма --> Сумма <Порядок>50 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>2 <Наименование>Сумма --> СуммаВзаиморасчетов <Порядок>100 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> КратностьВзаиморасчетов <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>4 <Наименование>--> КурсВзаиморасчетов <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>5 <Наименование>--> ДоговорКонтрагента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Справочники.Контрагенты.РозничныйПокупатель); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство Отключить="true"> <Код>7 <Наименование>ЭквайринговыйТерминал --> <Порядок>300 <Источник Имя="ЭквайринговыйТерминал" Вид="Реквизит" Тип="СправочникСсылка.ЭквайринговыеТерминалы"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>АПС_ОперацияБух <Наименование>Документ: Ввод остатков <Порядок>250 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ИсторияПодарочныхСертификатов.ПодарочныйСертификат КАК ПодарочныйСертификат, | МАКСИМУМ(ИсторияПодарочныхСертификатов.Регистратор) КАК Регистратор |ПОМЕСТИТЬ ДокументыАктивацииСертификатов |ИЗ | РегистрСведений.ИсторияПодарочныхСертификатов КАК ИсторияПодарочныхСертификатов |ГДЕ | ИсторияПодарочныхСертификатов.Регистратор ССЫЛКА Документ.РеализацияПодарочныхСертификатов | И ИсторияПодарочныхСертификатов.Статус = ЗНАЧЕНИЕ(Перечисление.СтатусыПодарочныхСертификатов.Активирован) | |СГРУППИРОВАТЬ ПО | ИсторияПодарочныхСертификатов.ПодарочныйСертификат | |ИНДЕКСИРОВАТЬ ПО | ПодарочныйСертификат |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПодарочныеСертификаты.ПодарочныйСертификат, | ВЫБОР | КОГДА ПодарочныеСертификаты.ПодарочныйСертификат.Владелец.Валюта = &ВалютаРегламентированногоУчета | ТОГДА ПодарочныеСертификаты.СуммаВВалютеСертификата | ИНАЧЕ ПодарочныеСертификаты.СуммаВВалютеСертификата * ЕСТЬNULL(КурсыВалютСерт.Курс, 1) / ЕСТЬNULL(КурсыВалютСерт.Кратность, 1) / ЕСТЬNULL(КурсВалютыРегл.Курс, 1) * ЕСТЬNULL(КурсВалютыРегл.Кратность, 1) | КОНЕЦ КАК Сумма, | ДокументыАктивацииСертификатов.Регистратор.КассаККМ.Подразделение КАК Подразделение |ИЗ | Документ.АннулированиеПодарочныхСертификатов.ПодарочныеСертификаты КАК ПодарочныеСертификаты | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Период, ) КАК КурсыВалютСерт | ПО (КурсыВалютСерт.Валюта = ПодарочныеСертификаты.ПодарочныйСертификат.Владелец.Валюта) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Период, ) КАК КурсВалютыРегл | ПО (КурсВалютыРегл.Валюта = &ВалютаРегламентированногоУчета) | ЛЕВОЕ СОЕДИНЕНИЕ ДокументыАктивацииСертификатов КАК ДокументыАктивацииСертификатов | ПО ПодарочныеСертификаты.ПодарочныйСертификат = ДокументыАктивацииСертификатов.ПодарочныйСертификат |ГДЕ | ПодарочныеСертификаты.Ссылка = &Ссылка | И ПодарочныеСертификаты.СуммаВВалютеСертификата <> 0"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Период", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРегламентированногоУчета", Константы.ВалютаРегламентированногоУчета.Получить()); ВходящиеДанные.Вставить("Хозрасчетный", Запрос.Выполнить().Выгрузить()); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Если Не ЗначениеЗаполнено(Объект.СпособЗаполнения) Тогда Объект.СпособЗаполнения = "Вручную"; КонецЕсли; //Если РежимЗагрузкиДанныхВИНформационнуюБазу() Тогда ДвиженияХозрасчетный = Объект.Движения.Хозрасчетный.Выгрузить(); Объект.ОбменДанными.Загрузка = Ложь; Объект.Записать(); Для Каждого Движение Из ДвиженияХозрасчетный Цикл Движение.Регистратор = Объект.Ссылка; КонецЦикла; Объект.Движения.Хозрасчетный.Загрузить(ДвиженияХозрасчетный); Объект.Движения.Хозрасчетный.Записать(); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.АннулированиеПодарочныхСертификатов <Приемник>ДокументСсылка.ОперацияБух <Свойства> <Свойство Поиск="true"> <Код>20 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>21 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>15 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>17 <Наименование>--> Содержание <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = НСтр("ru = 'Аннулирование подарочных сертификатов'"); <Свойство> <Код>14 <Наименование>--> СуммаОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаОперации" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Хозрасчетный.Итог("Сумма"); <Свойство> <Код>18 <Наименование>Менеджер --> Ответственный <Порядок>350 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>400 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>11 <Наименование>--> ЗаполнениеДвижений <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ЗаполнениеДвижений" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("Документ"); КоллекцияОбъектов.Колонки.Добавить("Примечание"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>12 <Наименование>--> Документ <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Документ" Вид="Реквизит"/> <Свойство> <Код>13 <Наименование>--> Примечание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Примечание" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>1 <Наименование>--> Хозрасчетный <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Хозрасчетный" Вид="НаборДвиженийРегистраБухгалтерии"/> <Свойство> <Код>2 <Наименование>--> СубконтоДт <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоДт" Вид="ВидыСубконтоСчета"/> <ПередВыгрузкой>ИмяПКОВидСубконто = "ВидыСубконтоХозрасчетные"; Значение = Новый ТаблицаЗначений; Значение.Колонки.Добавить("Ключ"); Значение.Колонки.Добавить("Значение"); СубконтоДт1 = Значение.Добавить(); СубконтоДт2 = Значение.Добавить(); СубконтоДт1.Ключ = "Контрагенты"; СубконтоДт2.Ключ = "Договоры"; СубконтоДт1.Значение = Справочники.Контрагенты.РозничныйПокупатель; // Инициализируем структуру договора Договор = Новый Структура; // Реквизиты договора Договор.Вставить("Ссылка"); Договор.Вставить("ВалютаВзаиморасчетов", Константы.ВалютаРегламентированногоУчета.Получить()); Договор.Вставить("ВидДоговора", "СПокупателем"); Договор.Вставить("Владелец", Справочники.Контрагенты.РозничныйПокупатель); Договор.Вставить("Организация", Источник.Организация); Договор.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Договор.Вставить("ПартнерУТ11", Неопределено); Договор.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Договор.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Договор.Вставить("СделкаСКлиентомУТ11", Неопределено); Договор.Вставить("ЗаказКлиентаУТ11", Неопределено); Договор.Вставить("ЗаказПоставщикуУТ11", Неопределено); СубконтоДт2.Значение = Договор; ВыгрузитьПоПравилу(Договор,,,, "ДоговорыКонтрагентов"); <ПриВыгрузке>Если ВидСубконто = "Договоры" Тогда ИмяПКО = "ДоговорыКонтрагентов"; Иначе ИмяПКО = "Контрагенты"; КонецЕсли; <Свойство Отключить="true"> <Код>3 <Наименование>--> СубконтоКт <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоКт" Вид="ВидыСубконтоСчета"/> <ПередВыгрузкой>//ИмяПКОВидСубконто = "ВидыСубконтоХозрасчетные"; //Значение = Новый ТаблицаЗначений; //Значение.Колонки.Добавить("Ключ"); //Значение.Колонки.Добавить("Значение"); //СубконтоКт1 = Значение.Добавить(); //СубконтоКт1.Ключ = "ПрочиеДоходыИРасходы"; //Если ЗначениеЗаполнено(Источник.СтатьяДоходов) // И ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.СтатьяДоходов, "КорреспондирующийСчет")) Тогда // СтатьяДоходов = Источник.СтатьяДоходов; // ВыгрузитьПоПравилу(СтатьяДоходов,,,, "СтатьиДоходовВПрочиеДоходыИРасходы"); //Иначе // СтатьяДоходов = Неопределено; //КонецЕсли; //СубконтоКт1.Значение = СтатьяДоходов; <Свойство> <Код>4 <Наименование>--> Организация <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Измерение" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <ПередВыгрузкой>Значение = Источник.Организация; <Свойство> <Код>5 <Наименование>--> Содержание <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = НСтр("ru = 'Аннулирование подарочного сертификата '") + ОбъектКоллекции.ПодарочныйСертификат; <Свойство> <Код>6 <Наименование>--> Сумма <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Ресурс" Тип="Число"/> <Свойство> <Код>22 <Наименование>--> СуммаНУДт <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУДт" Вид="Ресурс" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Сумма; <Свойство> <Код>23 <Наименование>--> СуммаНУКт <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНУКт" Вид="Ресурс" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Сумма; <Свойство> <Код>7 <Наименование>--> Активность <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Активность" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Источник.Проведен; <Свойство> <Код>8 <Наименование>--> Период <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Период" Вид="Свойство" Тип="Дата"/> <ПередВыгрузкой>Значение = Источник.Дата; <Свойство> <Код>9 <Наименование>--> СчетДт <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СчетДт" Вид="Свойство" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "РасчетыПоАвансамПолученным"; <Свойство> <Код>10 <Наименование>--> СчетКт <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетКт" Вид="Свойство" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = "ПрочиеДоходы"; <Значения/> <Группа> <Код>Комиссия <Наименование>Комиссия <Порядок>200 <Правило> <Код>ОКОП_ОтчетКомиссионераОПродажах <Наименование>Документ: Отчет комиссионера о продажах <Порядок>50 <ПередВыгрузкой>//Отказ = Истина; // Определяем наличие сторно и не сторно операций ЕстьСторно = Ложь; ЕстьНеСторно = Ложь; Для Каждого Строка Из Источник.Товары Цикл Если Строка.Количество < 0 Тогда ЕстьСторно = Истина; Иначе ЕстьНеСторно = Истина; КонецЕсли; КонецЦикла; ВходящиеДанные.Вставить("ЕстьСторно", ЕстьСторно); ВходящиеДанные.Вставить("ЕстьНеСторно", ЕстьНеСторно); // Вычисление табличных частей документа Запрос = Новый Запрос("ВЫБРАТЬ | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.Ссылка, | Товары.Ссылка.Организация КАК Организация, | Товары.Номенклатура, | Товары.Характеристика, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.СуммаСНДС / Товары.Количество КАК ЦенаПередачи, | Товары.СуммаСНДС КАК СуммаПередачи, | Товары.СуммаПродажи / Товары.Количество КАК Цена, | Товары.СуммаПродажи КАК Сумма, | Товары.СуммаПродажиНДС КАК СуммаНДС, | Товары.СуммаВознаграждения КАК СуммаВознаграждения, | Товары.Покупатель КАК Покупатель, | Товары.ДатаСчетаФактурыКомиссионера КАК ДатаСФ |ПОМЕСТИТЬ Товары |ИЗ | Документ.ОтчетКомиссионера.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И Товары.Количество > 0 | |СГРУППИРОВАТЬ ПО | Товары.НомерСтроки, | Товары.Ссылка, | Товары.Ссылка.Организация, | Товары.Номенклатура, | Товары.Характеристика, | Товары.Номенклатура.ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.СуммаСНДС / Товары.Количество, | Товары.СуммаСНДС, | Товары.СуммаПродажи / Товары.Количество, | Товары.СуммаПродажи, | Товары.СуммаПродажиНДС, | Товары.СуммаВознаграждения, | ВЫБОР | КОГДА Товары.Количество < 0 | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ, | Товары.Покупатель, | Товары.ДатаСчетаФактурыКомиссионера | |ИНДЕКСИРОВАТЬ ПО | Товары.Ссылка, | Организация, | Покупатель, | ДатаСФ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.НомерСтрокиДокумента, | Товары.Номенклатура, | Товары.Характеристика, | Товары.ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.ЦенаПередачи, | Товары.СуммаПередачи, | Товары.Цена, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаВознаграждения, | Товары.Покупатель, | Товары.ДатаСФ, | ЛОЖЬ КАК ВидыЗапасовЗаполнены, | 1 КАК Коэффициент, | 1 КАК КлючСтроки, | ЗНАЧЕНИЕ(Справочник.НомераГТД.ПустаяСсылка) КАК НомерГТД, | ЗНАЧЕНИЕ(Справочник.СтраныМира.ПустаяСсылка) КАК СтранаПроисхождения, | 0 КАК СуммаНДСВознаграждения, | ВЫРАЗИТЬ ("""" КАК СТРОКА (120)) КАК СЧЕТУЧЕТА |ИЗ | Товары КАК Товары |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ВидыЗапасов.Количество КАК Количество, | ВидыЗапасов.НомерГТД, | ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыПереданныеНаКомиссию"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СчетУчета, | ВЫБОР | КОГДА ВидыЗапасов.Количество < 0 | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК Сторно, | ВидыЗапасов.ДатаСчетаФактурыКомиссионера КАК ДатаСФ, | ВидыЗапасов.Покупатель, | Аналитика.Номенклатура, | Аналитика.Характеристика |ИЗ | Документ.ОтчетКомиссионера.ВидыЗапасов КАК ВидыЗапасов | ВНУТРЕННЕЕ СОЕДИНЕНИЕ | РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО | ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики | |ГДЕ | ВидыЗапасов.Ссылка = &Ссылка | И ВидыЗапасов.Количество > 0 |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | 1 КАК КлючСтроки, | ВЫБОР | КОГДА ТоварыОтчета.Покупатель = ЗНАЧЕНИЕ(Справочник.Контрагенты.ПустаяСсылка) | ТОГДА ТоварыОтчета.Ссылка.Контрагент | ИНАЧЕ ТоварыОтчета.Покупатель | КОНЕЦ КАК Покупатель, | ВЫБОР | КОГДА ТоварыОтчета.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1) | ТОГДА СчетФактураВыданный.Дата | ИНАЧЕ ТоварыОтчета.ДатаСФ | КОНЕЦ КАК ДатаСФ, | МАКСИМУМ(ВЫБОР | КОГДА СчетФактураВыданный.Ссылка ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ) КАК ВыставленСФ, //+ПСК Тимохов Отключаем выгрузку СФ //| МАКСИМУМ(ЕСТЬNULL(СчетФактураВыданный.Ссылка, ЗНАЧЕНИЕ(Документ.СчетФактураВыданный.ПустаяСсылка))) КАК СчетФактура, | МАКСИМУМ(ЗНАЧЕНИЕ(Документ.СчетФактураВыданный.ПустаяСсылка)) КАК СчетФактура, //-ПСК Тимохов | МИНИМУМ(ТоварыОтчета.НомерСтрокиДокумента) КАК ЗначениеУпорядочивания |ИЗ | Товары КАК ТоварыОтчета | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетФактураВыданный КАК СчетФактураВыданный | ПО ТоварыОтчета.Ссылка = СчетФактураВыданный.ДокументОснование | И ТоварыОтчета.Организация = СчетФактураВыданный.Организация | И (ТоварыОтчета.ДатаСФ = НАЧАЛОПЕРИОДА(СчетФактураВыданный.Дата, ДЕНЬ) | ИЛИ ТоварыОтчета.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1)) | И ТоварыОтчета.Покупатель = СчетФактураВыданный.Контрагент | И (НЕ СчетФактураВыданный.ПометкаУдаления) | |СГРУППИРОВАТЬ ПО | ВЫБОР | КОГДА ТоварыОтчета.Покупатель = ЗНАЧЕНИЕ(Справочник.Контрагенты.ПустаяСсылка) | ТОГДА ТоварыОтчета.Ссылка.Контрагент | ИНАЧЕ ТоварыОтчета.Покупатель | КОНЕЦ, | ВЫБОР | КОГДА ТоварыОтчета.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1) | ТОГДА СчетФактураВыданный.Дата | ИНАЧЕ ТоварыОтчета.ДатаСФ | КОНЕЦ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запрос.ВыполнитьПакет(); РеквизитыПоиска = "Номенклатура,Характеристика,ДатаСФ,Покупатель"; ЗаполняемыеРеквизиты = "НомерГТД,СтранаПроисхождения,СчетУчета"; ТабТовары = РезультатыЗапроса[1].Выгрузить(); // Распределение НДС вознаграждения БазаРаспределенияПоСуммеВознаграждения = ТабТовары.ВыгрузитьКолонку("СуммаВознаграждения"); РаспределениеНДСВознаграждения = ОбщегоНазначения.РаспределитьСуммуПропорциональноКоэффициентам(Источник.СуммаНДСВознаграждения, БазаРаспределенияПоСуммеВознаграждения); Если ЗначениеЗаполнено(РаспределениеНДСВознаграждения) Тогда ТабТовары.ЗагрузитьКолонку(РаспределениеНДСВознаграждения, "СуммаНДСВознаграждения"); КонецЕсли; СтруктураПоиска = Новый Структура(РеквизитыПоиска + ",ВидыЗапасовЗаполнены"); ТабТовары.Индексы.Добавить(РеквизитыПоиска + ",ВидыЗапасовЗаполнены"); ВидыЗапасов = РезультатыЗапроса[2].Выбрать(); Пока ВидыЗапасов.Следующий() Цикл ЗаполнитьЗначенияСвойств(СтруктураПоиска, ВидыЗапасов, РеквизитыПоиска); СтруктураПоиска.ВидыЗапасовЗаполнены = Ложь; НайденныеСтроки = ТабТовары.НайтиСтроки(СтруктураПоиска); ОсталосьВидаЗапасов = ВидыЗапасов.Количество; Для Каждого СтрокаДокумента Из НайденныеСтроки Цикл Если ОсталосьВидаЗапасов = 0 Тогда Прервать; КонецЕсли; Если СтрокаДокумента.Количество <= ОсталосьВидаЗапасов Тогда ЗаполнитьЗначенияСвойств(СтрокаДокумента, ВидыЗапасов, ЗаполняемыеРеквизиты); СтрокаДокумента.ВидыЗапасовЗаполнены = Истина; ОсталосьВидаЗапасов = ОсталосьВидаЗапасов - СтрокаДокумента.Количество; Иначе // Выделение новой строки с заполненным видом запасов НоваяСтрока = ТабТовары.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаДокумента); ДоляВидаЗапасовВСтрокеДокумента = ОсталосьВидаЗапасов / СтрокаДокумента.Количество; НоваяСтрока.Количество = ОсталосьВидаЗапасов; НоваяСтрока.СуммаПередачи = Окр(СтрокаДокумента.СуммаПередачи * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.Сумма = Окр(СтрокаДокумента.Сумма * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаНДС = Окр(СтрокаДокумента.СуммаНДС * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаВознаграждения = Окр(СтрокаДокумента.СуммаВознаграждения * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаНДСВознаграждения = Окр(СтрокаДокумента.СуммаНДСВознаграждения * ДоляВидаЗапасовВСтрокеДокумента, 2); ЗаполнитьЗначенияСвойств(НоваяСтрока, ВидыЗапасов, ЗаполняемыеРеквизиты); СтрокаДокумента.Количество = СтрокаДокумента.Количество - НоваяСтрока.Количество; СтрокаДокумента.СуммаПередачи = СтрокаДокумента.СуммаПередачи - НоваяСтрока.СуммаПередачи; СтрокаДокумента.Сумма = СтрокаДокумента.Сумма - НоваяСтрока.Сумма; СтрокаДокумента.СуммаНДС = СтрокаДокумента.СуммаНДС - НоваяСтрока.СуммаНДС; СтрокаДокумента.СуммаВознаграждения = СтрокаДокумента.СуммаВознаграждения - НоваяСтрока.СуммаВознаграждения; СтрокаДокумента.СуммаНДСВознаграждения = СтрокаДокумента.СуммаНДСВознаграждения - НоваяСтрока.СуммаНДСВознаграждения; ОсталосьВидаЗапасов = 0; КонецЕсли; КонецЦикла; КонецЦикла; ТабТовары.Сортировать("НомерСтрокиДокумента Возр"); // Таблица покупателей ТабПокупатели = РезультатыЗапроса[3].Выгрузить(); СтруктураПоиска = Новый Структура("Покупатель,ДатаСФ"); Для Каждого Строка Из ТабПокупатели Цикл Строка.КлючСтроки = ТабПокупатели.Индекс(Строка) + 1; ЗаполнитьЗначенияСвойств(СтруктураПоиска, Строка); НайденныеСтроки = ТабТовары.НайтиСтроки(СтруктураПоиска); Для Каждого СтрокаТоваров Из НайденныеСтроки Цикл СтрокаТоваров.КлючСтроки = Строка.КлючСтроки; КонецЦикла; КонецЦикла; ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("Покупатели", ТабПокупатели); <ПослеВыгрузкиВФайл>Если ВходящиеДанные.ЕстьСторно Тогда Если ВходящиеДанные.ЕстьНеСторно Тогда Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комиссионера о продажах"", в котором присутствуют сторнирующие строки |Последствия: документ загрузится без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); Иначе Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комиссионера о продажах"", в котором присутствуют только сторнирующие строки |Последствия: документ загрузится пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); КонецЕсли; //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки>//Отказ = Истина; Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда Если ПараметрыОбъекта["ЕстьСторно"] Тогда Если ПараметрыОбъекта["ЕстьНеСторно"] Тогда ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комиссионера о продажах"", в котором в базе-источнике были сторнирующие строки |Последствия: документ загрузился без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); Иначе ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комиссионера о продажах"", в котором в базе-источнике были только сторнирующие строки |Последствия: документ загрузился пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); КонецЕсли; // выполняем запись в протокол и ЖР Сообщить(ТекстСообщения); КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКОП_ОтчетКомиссионераОПродажах"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетКомиссионера <Приемник>ДокументСсылка.ОтчетКомиссионераОПродажах <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ЕстьНеСторно И Источник.Проведен; <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Увеличиваем сумму документа на модуль отрицательных сумм Значение = Источник.СуммаДокумента; СуммыПродаж = Источник.Товары.ВыгрузитьКолонку("СуммаПродажи"); Для Каждого Сумма Из СуммыПродаж Цикл Значение = Значение + ?(Сумма < 0, - Сумма, 0); КонецЦикла; <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>350 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>Договор --> ДоговорКонтрагента <Порядок>400 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <НеЗамещать>true <Код>24 <Наименование>--> СпособЗачетаАвансов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>22 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>23 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>19 <Наименование>СпособРасчетаВознаграждения --> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="СпособРасчетаВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <КодПравилаКонвертации>СпособыРасчетаКомиссионногоВознаграждения <Свойство> <Код>18 <Наименование>ПроцентВознаграждения --> ПроцентКомиссионногоВознаграждения <Порядок>650 <Источник Имя="ПроцентВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ПроцентКомиссионногоВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>СуммаВознаграждения --> СуммаВознаграждения <Порядок>700 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Увеличиваем сумму документа на модуль отрицательных сумм Значение = Источник.СуммаВознаграждения; СуммыВознаграждений = Источник.Товары.ВыгрузитьКолонку("СуммаВознаграждения"); Для Каждого Сумма Из СуммыВознаграждений Цикл Значение = Значение + ?(Сумма < 0, - Сумма, 0); КонецЦикла; <Свойство> <Код>13 <Наименование>--> СтавкаНДСВознаграждения <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>20 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>800 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>15 <Наименование>УдержатьВознаграждение --> УдержатьВознаграждение <Порядок>850 <Источник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>8 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>900 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>11 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>950 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>43 <Наименование>Менеджер --> Ответственный <Порядок>1000 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>1050 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>60 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>73 <Наименование>НалогообложениеНДС --> СпособУчетаНДС <Порядок>1150 <Источник Имя="НалогообложениеНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Свойство> <Код>63 <Наименование>--> ЕстьНеСторно <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьНеСторно <Свойство> <Код>62 <Наименование>--> ЕстьСторно <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьСторно <Группа> <Код>26 <Наименование>--> Товары <Порядок>1300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>30 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>27 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>28 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>41 <Наименование>--> ЦенаПередачи <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаПередачи" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> СтавкаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>35 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>--> СуммаВознаграждения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>--> СуммаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>38 <Наименование>--> СуммаНДСВознаграждения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СуммаПередачи <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПередачи" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>40 <Наименование>--> Цена <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> НомерГТД <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>34 <Наименование>--> СтранаПроисхождения <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>42 <Наименование>--> СчетУчета <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Отказ = ОбъектКоллекции.СчетУчета = Неопределено; <Свойство> <Код>65 <Наименование>--> КлючСтроки <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <Группа> <Код>66 <Наименование>--> Покупатели <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Покупатели" Вид="ТабличнаяЧасть"/> <Свойство> <Код>70 <Наименование>--> Покупатель <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>67 <Наименование>--> ВыставленСФ <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВыставленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>68 <Наименование>--> ДатаСФ <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>71 <Наименование>--> СчетФактура <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СчетФактура" Вид="Реквизит" Тип="ДокументСсылка.СчетФактураВыданный"/> <КодПравилаКонвертации>СФВ_СчетФактураВыданный <Свойство> <Код>69 <Наименование>--> КлючСтроки <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>61 <Наименование>Соглашение --> <Порядок>1400 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>45 <Наименование>Товары --> <Порядок>1450 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>46 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>47 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>48 <Наименование>СтавкаНДС --> <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>49 <Наименование>СуммаВознаграждения --> <Порядок>200 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>50 <Наименование>СуммаПродажи --> <Порядок>250 <Источник Имя="СуммаПродажи" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>51 <Наименование>СуммаПродажиНДС --> <Порядок>300 <Источник Имя="СуммаПродажиНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>52 <Наименование>СуммаСНДС --> <Порядок>350 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>53 <Наименование>Характеристика --> <Порядок>400 <Источник Имя="Характеристика" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>74 <Наименование>Покупатель --> <Порядок>450 <Источник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>75 <Наименование>ДатаСчетаФактурыКомиссионера --> <Порядок>500 <Источник Имя="ДатаСчетаФактурыКомиссионера" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ОКОС_ОтчетКомиссионераОСписании <Наименование>Документ: Отчет комиссионера о списании <Порядок>100 <ПослеЗагрузки>Отказ = Истина; Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКОС_ОтчетКомиссионераОСписании"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетКомиссионераОСписании <Приемник>ДокументСсылка.ОтчетКомиссионераОПродажах <Свойства> <Свойство Поиск="true"> <Код>7 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>8 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>9 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>350 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>Договор --> ДоговорКонтрагента <Порядок>400 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>12 <Наименование>--> СпособЗачетаАвансов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>13 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>14 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>15 <Наименование>--> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <ПередВыгрузкой>Значение = "НеРассчитывается"; <Свойство> <Код>16 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>650 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>1 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>4 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>31 <Наименование>Менеджер --> Ответственный <Порядок>800 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>48 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>62 <Наименование>НалогообложениеНДС --> СпособУчетаНДС <Порядок>950 <Источник Имя="НалогообложениеНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Группа> <Код>18 <Наименование>--> Товары <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.Номенклатура, | Товары.Характеристика, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | 1 КАК Коэффициент, | Товары.Количество, | Товары.СуммаСНДС / Товары.Количество КАК Цена, | Товары.СуммаСНДС КАК Сумма, | Товары.СтавкаНДС, | Товары.СуммаНДС |ИЗ | Документ.ОтчетКомиссионераОСписании.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Аналитика.Номенклатура, | Аналитика.Характеристика, | ВидыЗапасов.Количество КАК Количество, | ВидыЗапасов.НомерГТД, | ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыПереданныеНаКомиссию"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СчетУчета |ИЗ | Документ.ОтчетКомиссионераОСписании.ВидыЗапасов КАК ВидыЗапасов | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики |ГДЕ | ВидыЗапасов.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запрос.ВыполнитьПакет(); КоллекцияОбъектов = РезультатыЗапроса[0].Выгрузить(); КоллекцияОбъектов.Колонки.Добавить("НомерГТД"); КоллекцияОбъектов.Колонки.Добавить("СтранаПроисхождения"); КоллекцияОбъектов.Колонки.Добавить("СуммаНДСВознаграждения"); КоллекцияОбъектов.Колонки.Добавить("СчетУчета"); КоллекцияОбъектов.Индексы.Добавить("Номенклатура, Характеристика, НомерГТД"); СтруктураПоиска = Новый Структура; СтруктураПоиска.Вставить("Номенклатура", Неопределено); СтруктураПоиска.Вставить("Характеристика", Неопределено); СтруктураПоиска.Вставить("НомерГТД", Неопределено); ВидыЗапасов = РезультатыЗапроса[1].Выбрать(); Пока ВидыЗапасов.Следующий() Цикл СтруктураПоиска.Номенклатура = ВидыЗапасов.Номенклатура; СтруктураПоиска.Характеристика = ВидыЗапасов.Характеристика; НайденныеСтроки = КоллекцияОбъектов.НайтиСтроки(СтруктураПоиска); ОсталосьВидаЗапасов = ВидыЗапасов.Количество; Для Каждого СтрокаДокумента Из НайденныеСтроки Цикл Если ОсталосьВидаЗапасов = 0 Тогда Прервать; КонецЕсли; Если СтрокаДокумента.Количество <= ОсталосьВидаЗапасов Тогда ЗаполнитьЗначенияСвойств(СтрокаДокумента, ВидыЗапасов, "НомерГТД, СтранаПроисхождения, СчетУчета"); ОсталосьВидаЗапасов = ОсталосьВидаЗапасов - СтрокаДокумента.Количество; Иначе // Выделяем из строки документа новую строку с определенным видом запасов НоваяСтрока = КоллекцияОбъектов.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаДокумента); ДоляВидаЗапасовВСтрокеДокумента = ОсталосьВидаЗапасов / СтрокаДокумента.Количество; НоваяСтрока.Количество = ОсталосьВидаЗапасов; НоваяСтрока.Сумма = Окр(СтрокаДокумента.Сумма * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаНДС = Окр(СтрокаДокумента.СуммаНДС * ДоляВидаЗапасовВСтрокеДокумента, 2); ЗаполнитьЗначенияСвойств(НоваяСтрока, ВидыЗапасов, "НомерГТД, СтранаПроисхождения, СчетУчета"); СтрокаДокумента.Количество = СтрокаДокумента.Количество - НоваяСтрока.Количество; СтрокаДокумента.Сумма = СтрокаДокумента.Сумма - НоваяСтрока.Сумма; СтрокаДокумента.СуммаНДС = СтрокаДокумента.СуммаНДС - НоваяСтрока.СуммаНДС; ОсталосьВидаЗапасов = 0; КонецЕсли; КонецЦикла; КонецЦикла; КоллекцияОбъектов.Сортировать("НомерСтрокиДокумента Возр"); <Свойство> <Код>22 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>19 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>20 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> ЦенаПередачи <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаПередачи" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Цена; <Свойство> <Код>28 <Наименование>--> СуммаПередачи <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПередачи" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Сумма; <Свойство> <Код>29 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>27 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> НомерГТД <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>25 <Наименование>--> СтранаПроисхождения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>47 <Наименование>--> СчетУчета <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Отказ = ОбъектКоллекции.СчетУчета = Неопределено; <Свойство> <Код>54 <Наименование>--> КлючСтроки <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Группа> <Код>55 <Наименование>--> Покупатели <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатели" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ВыставленСФ"); КоллекцияОбъектов.Колонки.Добавить("СчетФактура"); КоллекцияОбъектов.Колонки.Добавить("ДатаСФ"); КоллекцияОбъектов.Колонки.Добавить("Покупатель"); КоллекцияОбъектов.Колонки.Добавить("КлючСтроки"); НоваяСтрока = КоллекцияОбъектов.Добавить(); НоваяСтрока.ВыставленСФ = Ложь; НоваяСтрока.Покупатель = Источник.Контрагент; НоваяСтрока.КлючСтроки = 1; <Свойство> <Код>59 <Наименование>--> Покупатель <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>56 <Наименование>--> ВыставленСФ <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВыставленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>60 <Наименование>--> СчетФактура <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СчетФактура" Вид="Реквизит" Тип="ДокументСсылка.СчетФактураВыданный"/> <КодПравилаКонвертации>СФВ_СчетФактураВыданный <Свойство> <Код>57 <Наименование>--> ДатаСФ <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>58 <Наименование>--> КлючСтроки <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>49 <Наименование>Соглашение --> <Порядок>1100 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>34 <Наименование>Товары --> <Порядок>1150 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>36 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>38 <Наименование>СтавкаНДС --> <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>40 <Наименование>СуммаСНДС --> <Порядок>250 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>41 <Наименование>Характеристика --> <Порядок>300 <Источник Имя="Характеристика" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ОКТОП_ОтчетКомитентуОПродажах <Наименование>Документ: Отчет комитенту о продажах <Порядок>150 <ПередВыгрузкой>Отказ = Истина; Товары = Источник.Товары.Выгрузить(); Товары.Колонки.Добавить("СуммаНДСВознаграждения"); БазаРаспределенияПоСуммеВознаграждения = Товары.ВыгрузитьКолонку("СуммаВознаграждения"); РаспределениеНДСВознаграждения = ОбщегоНазначения.РаспределитьСуммуПропорциональноКоэффициентам(Источник.СуммаНДСВознаграждения, БазаРаспределенияПоСуммеВознаграждения); Если ЗначениеЗаполнено(РаспределениеНДСВознаграждения) Тогда Товары.ЗагрузитьКолонку(РаспределениеНДСВознаграждения, "СуммаНДСВознаграждения"); КонецЕсли; ВходящиеДанные.Вставить("Товары", Товары); // Определяем наличие сторно и не сторно операций ЕстьСторно = Ложь; ЕстьНеСторно = Ложь; Для Каждого Строка Из Источник.Товары Цикл Если Строка.Количество < 0 Тогда ЕстьСторно = Истина; Иначе ЕстьНеСторно = Истина; КонецЕсли; КонецЦикла; ВходящиеДанные.Вставить("ЕстьСторно", ЕстьСторно); ВходящиеДанные.Вставить("ЕстьНеСторно", ЕстьНеСторно); <ПослеВыгрузкиВФайл>Если ВходящиеДанные.ЕстьСторно Тогда Если ВходящиеДанные.ЕстьНеСторно Тогда Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комитенту о продажах"", в котором присутствуют сторнирующие строки |Последствия: документ загрузится без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); Иначе Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комитенту о продажах"", в котором присутствуют только сторнирующие строки |Последствия: документ загрузится пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); КонецЕсли; //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки>Отказ = Истина; Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда Если ПараметрыОбъекта["ЕстьСторно"] Тогда Если ПараметрыОбъекта["ЕстьНеСторно"] Тогда ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комитенту о продажах"", в котором в базе-источнике были сторнирующие строки |Последствия: документ загрузился без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); Иначе ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комитенту о продажах"", в котором в базе-источнике были только сторнирующие строки |Последствия: документ загрузился пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); КонецЕсли; // выполняем запись в протокол и ЖР Сообщить(ТекстСообщения); КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКТОП_ОтчетКомитентуОПродажах"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетКомитенту <Приемник>ДокументСсылка.ОтчетКомитентуОПродажах <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ЕстьНеСторно И Источник.Проведен; <Свойство> <Код>52 <Наименование>--> ВидОперации <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийОтчетКомитентуОПродажах"/> <ПередВыгрузкой>Значение = "ОтчетОПродажах"; <Свойство> <Код>3 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Увеличиваем сумму документа на модуль отрицательных сумм Значение = Источник.СуммаДокумента; СуммыПродаж = Источник.Товары.ВыгрузитьКолонку("СуммаПродажи"); Для Каждого Сумма Из СуммыПродаж Цикл Значение = Значение + ?(Сумма < 0, - Сумма, 0); КонецЦикла; <Свойство> <Код>2 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>17 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>18 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>14 <Наименование>СпособРасчетаВознаграждения --> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="СпособРасчетаВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <КодПравилаКонвертации>СпособыРасчетаКомиссионногоВознаграждения <Свойство> <Код>13 <Наименование>ПроцентВознаграждения --> ПроцентКомиссионногоВознаграждения <Порядок>650 <Источник Имя="ПроцентВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ПроцентКомиссионногоВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>СуммаВознаграждения --> СуммаВознаграждения <Порядок>700 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Увеличиваем сумму документа на модуль отрицательных сумм Значение = Источник.СуммаВознаграждения; СуммыВознаграждений = Источник.Товары.ВыгрузитьКолонку("СуммаВознаграждения"); Для Каждого Сумма Из СуммыВознаграждений Цикл Значение = Значение + ?(Сумма < 0, - Сумма, 0); КонецЦикла; <Свойство> <Код>4 <Наименование>--> СтавкаНДСВознаграждения <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>19 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>800 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>7 <Наименование>УдержатьВознаграждение --> УдержатьВознаграждение <Порядок>850 <Источник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Услуга --> УслугаПоВознаграждению <Порядок>900 <Источник Имя="Услуга" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="УслугаПоВознаграждению" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>35 <Наименование>Менеджер --> Ответственный <Порядок>950 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>1000 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>46 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1050 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>49 <Наименование>--> ЕстьНеСторно <Порядок>1100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьНеСторно <Свойство> <Код>48 <Наименование>--> ЕстьСторно <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьСторно <Группа> <Код>21 <Наименование>--> Товары <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередВыгрузкой>Если ОбъектКоллекции.Количество < 0 Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>23 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Свойство> <Код>30 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <ПередВыгрузкой>Значение = ОбъектКоллекции.Номенклатура.ЕдиницаИзмерения; <Свойство> <Код>22 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>24 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>27 <Наименование>--> ЦенаПоступления <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаПоступления" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС / ОбъектКоллекции.Количество; <Свойство> <Код>29 <Наименование>--> СуммаПоступления <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПоступления" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС; <Свойство> <Код>33 <Наименование>--> Цена <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаПродажи / ОбъектКоллекции.Количество; <Свойство> <Код>28 <Наименование>--> Сумма <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаПродажи; <Свойство> <Код>34 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Ценообразование.РассчитатьСуммуНДС(ОбъектКоллекции.СуммаПродажи, ОбъектКоллекции.СтавкаНДС, Истина) <Свойство> <Код>25 <Наименование>--> СуммаВознаграждения <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>32 <Наименование>--> СуммаНДСВознаграждения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>50 <Наименование>--> ДатаРеализации <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаРеализации" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.ДатаСчетаФактуры; <Свойство> <Код>51 <Наименование>--> Покупатель <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство Отключить="true"> <Код>45 <Наименование>СуммаНДСВознаграждения --> <Порядок>1250 <Источник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>47 <Наименование>Соглашение --> <Порядок>1300 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСПоставщиками"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>37 <Наименование>Товары --> <Порядок>1350 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>38 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>41 <Наименование>СтавкаНДС --> <Порядок>200 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>42 <Наименование>Цена --> <Порядок>250 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>43 <Наименование>СуммаСНДС --> <Порядок>300 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>44 <Наименование>СуммаПродажи --> <Порядок>350 <Источник Имя="СуммаПродажи" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>53 <Наименование>ДатаСчетаФактуры --> <Порядок>400 <Источник Имя="ДатаСчетаФактуры" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>54 <Наименование>Покупатель --> <Порядок>450 <Источник Имя="Покупатель" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ОКТОC_ОтчетКомитентуОСписании <Наименование>Документ: Отчет комитенту о списании <Порядок>200 <ПослеЗагрузки>Отказ = Истина; Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКТОC_ОтчетКомитентуОСписании"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетКомитентуОСписании <Приемник>ДокументСсылка.ОтчетКомитентуОПродажах <Свойства> <Свойство Поиск="true"> <Код>16 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>17 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "С" + Сред(Источник.Номер, 7); <Свойство> <Код>19 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>30 <Наименование>--> ВидОперации <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийОтчетКомитентуОПродажах"/> <ПередВыгрузкой>Значение = "ОтчетОПродажах"; <Свойство> <Код>14 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>20 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>23 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>24 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность;; <Свойство> <Код>25 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>26 <Наименование>--> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <ПередВыгрузкой>Значение = "НеРассчитывается"; <Свойство> <Код>29 <Наименование>--> СтавкаНДСВознаграждения <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Значение = "БезНДС"; <Свойство> <Код>22 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>27 <Наименование>Менеджер --> Ответственный <Порядок>750 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>12 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>850 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>Товары --> Товары <Порядок>900 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>3 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>8 <Наименование>Номенклатура --> ЕдиницаИзмерения <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <ПередВыгрузкой>Значение = ОбъектКоллекции.Номенклатура.ЕдиницаИзмерения; <Свойство> <Код>2 <Наименование>Количество --> Количество <Порядок>150 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>11 <Наименование>СуммаСНДС --> ЦенаПоступления <Порядок>250 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ЦенаПоступления" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС / ОбъектКоллекции.Количество; <Свойство> <Код>10 <Наименование>СуммаСНДС --> СуммаПоступления <Порядок>300 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПоступления" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>СуммаСНДС --> Цена <Порядок>350 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС / ОбъектКоллекции.Количество; <Свойство> <Код>5 <Наименование>СуммаСНДС --> Сумма <Порядок>400 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>6 <Наименование>СуммаНДС --> СуммаНДС <Порядок>500 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>Покупка <Наименование>ПКО для документов, связанных с покупкой <Порядок>250 <Группа> <Код>ПриобретениеТоваровУслуг <Наименование>ПКО для документа "Поступление товаров и услуг" <Порядок>50 <Группа> <Код>ПоступлениеТоваровУслугСРасхождениями <Наименование>ПКО для выгрузки документа "Поступление товаров и услуг" с учетом расхождений <Порядок>50 <Правило> <Код>ПТУ_РасхожденияВВозврат <Наименование>Документ: Поступление товаров услуг <Порядок>50 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ДанныеШапкиДокумента.Склад.РозничныйВидЦены КАК РозничныйВидЦены, | ДанныеШапкиДокумента.Валюта, | ДанныеШапкиДокумента.ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеШапкиДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ДанныеШапкиДокумента |ГДЕ | ДанныеШапкиДокумента.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЦеныВРознице.Цена / ЕСТЬNULL(ЦеныВРознице.Упаковка.Коэффициент, 1) * ВЫБОР | КОГДА ЕСТЬNULL(КурсВалютыДокумента.Кратность, 0) > 0 | И ЕСТЬNULL(КурсВалютыДокумента.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Курс, 0) > 0 | ТОГДА КурсыВалютВидовЦены.Курс * КурсВалютыДокумента.Кратность / (КурсыВалютВидовЦены.Кратность * КурсВалютыДокумента.Курс) | КОНЕЦ КАК Цена, | ЦеныВРознице.Номенклатура КАК Номенклатура, | ЦеныВРознице.Характеристика КАК Характеристика |ПОМЕСТИТЬ ЦеныВРознице |ИЗ | РегистрСведений.ЦеныНоменклатуры.СрезПоследних( | &Дата, | ВидЦены В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеШапкиДокумента.РозничныйВидЦены | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента) | И Номенклатура В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Номенклатура | ИЗ | Расхождения КАК ТоварыДокумента) | И Характеристика В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Характеристика | ИЗ | Расхождения КАК ТоварыДокумента)) КАК ЦеныВРознице | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютВидовЦены | ПО ЦеныВРознице.Валюта = КурсыВалютВидовЦены.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ДанныеШапкиДокумента.Валюта | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента)) КАК КурсВалютыДокумента | ПО (ИСТИНА) | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | Характеристика |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(КурсВалютыДокумента.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыДокумента.Кратность, 1) КАК КратностьВзаиморасчетов |ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | Док.ВалютаВзаиморасчетов | ИЗ | ДанныеШапкиДокумента КАК Док)) КАК КурсВалютыДокумента | ПО ДанныеШапкиДокумента.ВалютаВзаиморасчетов = КурсВалютыДокумента.Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Расхождения.ДокументОприходования, | Расхождения.Номенклатура, | Расхождения.Количество, | Расхождения.Цена, | Расхождения.Сумма, | Расхождения.СтавкаНДС, | Расхождения.СуммаНДС, | Расхождения.СуммаСНДС, | Расхождения.Характеристика, | 1 КАК Коэффициент, | ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК ЦенаВРознице, | Расхождения.Количество * ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК СуммаВРознице, | Расхождения.НомерГТД, | Расхождения.СтранаПроисхождения, | Расхождения.ЕдиницаИзмерения |ИЗ | Расхождения КАК Расхождения | ЛЕВОЕ СОЕДИНЕНИЕ ЦеныВРознице КАК ЦеныВРознице | ПО Расхождения.Номенклатура = ЦеныВРознице.Номенклатура | И Расхождения.Характеристика = ЦеныВРознице.Характеристика |ГДЕ | (Расхождения.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Расхождения.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ Расхождения.ВернутьМногооборотнуюТару) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Расхождения.Номенклатура, | Расхождения.Количество, | Расхождения.Цена, | Расхождения.Сумма |ИЗ | Расхождения КАК Расхождения |ГДЕ | Расхождения.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И Расхождения.ВернутьМногооборотнуюТару"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("КонтрагентПретензии", ВходящиеДанные.Контрагент); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапкиДокумента = РезультатыЗапроса[3].Выбрать(); ТабТовары = РезультатыЗапроса[4].Выгрузить(); ТабВозвратнаяТара = РезультатыЗапроса[5].Выгрузить(); ДанныеШапкиДокумента.Следующий(); ВходящиеДанные.Вставить("КурсВзаиморасчетов", ДанныеШапкиДокумента.КурсВзаиморасчетов); ВходящиеДанные.Вставить("КратностьВзаиморасчетов", ДанныеШапкиДокумента.КратностьВзаиморасчетов); ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("ВозвратнаяТара", ТабВозвратнаяТара); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("СуммаСНДС") + ТабВозвратнаяТара.Итог("Сумма")); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_РасхожденияВВозврат"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ВозвратТоваровПоставщику <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = КонецДня(Значение); <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>ДопПрефикс = ?(ВходящиеДанные.Контрагент = Источник.КонтрагентСтороннейКомпании, "РТ", "РП"); Значение = Лев(Значение, 5) + ДопПрефикс + Сред(Значение, 8); <Свойство> <Код>3 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>200 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>25 <Наименование>--> ВидОперации <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровПоставщику"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>44 <Наименование>--> Сделка <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПТУ_ЗакупкаТоваровУслуг <ПередВыгрузкой>Значение = Источник.Ссылка; <Свойство> <Код>6 <Наименование>Организация --> Организация <Порядок>400 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>Склад --> Склад <Порядок>500 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>12 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>550 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>43 <Наименование>--> СуммаДокумента <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> Контрагент <Порядок>700 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>24 <Наименование>Договор --> ДоговорКонтрагента <Порядок>750 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ВходящиеДанные.Контрагент = Источник.КонтрагентСтороннейКомпании Тогда // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетовСоСтороннейКомпанией); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.СторонняяКомпания); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетовСоСтороннейКомпанией; ВыгрузитьОбъект = Истина; ИначеЕсли ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Источник.ЗаказПоставщику); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>26 <Наименование>--> КратностьВзаиморасчетов <Порядок>800 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> КурсВзаиморасчетов <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>Менеджер --> Ответственный <Порядок>900 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>950 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>29 <Наименование>--> Товары <Порядок>1000 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>31 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>30 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>38 <Наименование>--> ЕдиницаИзмерения <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>36 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>35 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>42 <Наименование>--> ЦенаВРознице <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>41 <Наименование>--> СуммаВРознице <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>--> ДокументОприходования <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОприходования" Вид="Реквизит"/> <КодПравилаКонвертации>ПТУ_ЗакупкаТоваровУслуг <Свойство> <Код>32 <Наименование>--> НомерГТД <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>40 <Наименование>--> СтранаПроисхождения <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Значения/> <Правило> <Код>ПТУ_РасхожденияВСписание <Наименование>Документ: Поступление товаров услуг <Порядок>100 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютДок.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютДок.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютРег.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютРег.Кратность, 0) > 0 | ТОГДА КурсыВалютДок.Курс * КурсыВалютРег.Кратность / (КурсыВалютДок.Кратность * КурсыВалютРег.Курс) | ИНАЧЕ 0 | КОНЕЦ КАК Коэффициент |ПОМЕСТИТЬ КоэффициентПересчетаВВалютуРег |ИЗ | РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаДок) КАК КурсыВалютДок | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсыВалютРег | ПО (ИСТИНА)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаДок", Источник.Валюта); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ТабТовары = РезультатыЗапроса[1].Выгрузить(); ТабВозвратнаяТара = РезультатыЗапроса[2].Выгрузить(); ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("ВозвратнаяТара", ТабВозвратнаяТара); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("Себестоимость")); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_РасхожденияВСписание"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = КонецДня(Значение); <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "Р" + Сред(Значение, 7); <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>7 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>300 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>4 <Наименование>--> СуммаДокумента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>Менеджер --> Ответственный <Порядок>500 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>11 <Наименование>--> Основание <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Поступление товаров и услуг № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>600 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>13 <Наименование>--> Товары <Порядок>650 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>14 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> ЕдиницаИзмерения <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>18 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> ДокументОприходования <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОприходования" Вид="Реквизит"/> <КодПравилаКонвертации>ПТУ_ЗакупкаТоваровУслуг <Свойство> <Код>22 <Наименование>--> Себестоимость <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>23 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Группа> <Код>24 <Наименование>--> ВозвратнаяТара <Порядок>700 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>25 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Значения/> <Правило> <Код>ПТУ_РасхожденияВОприходование <Наименование>Документ: Поступление товаров и услуг <Порядок>150 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютДок.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютДок.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютРег.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютРег.Кратность, 0) > 0 | ТОГДА КурсыВалютДок.Курс * КурсыВалютРег.Кратность / (КурсыВалютДок.Кратность * КурсыВалютРег.Курс) | ИНАЧЕ 0 | КОНЕЦ КАК Коэффициент |ПОМЕСТИТЬ КоэффициентПересчетаВВалютуРег |ИЗ | РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаДок) КАК КурсыВалютДок | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &ВалютаРег) КАК КурсыВалютРег | ПО (ИСТИНА)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаДок", Источник.Валюта); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ТабТовары = РезультатыЗапроса[1].Выгрузить(); ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("Сумма")); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если НЕ ЗначениеЗаполнено(Объект.СтатьяПрочихДоходовРасходов) Тогда // Объект.СтатьяПрочихДоходовРасходов = Параметры.СтатьяПрочихДоходовРасходов_ОприходованиеТоваров; //КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_РасхожденияВОприходование"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "Р" + Сред(Значение, 7); <Свойство> <Код>17 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>18 <Наименование>--> СтатьяПрочихДоходовРасходов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>13 <Наименование>--> СуммаДокумента <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>Менеджер --> Ответственный <Порядок>400 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>--> Основание <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Поступление товаров и услуг № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>16 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>2 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ЕдиницаИзмерения <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>8 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>9 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>6 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>ПоступлениеТоваровУслугБезРасхождений <Наименование>ПКО для выгрузки документа "Поступление товаров и услуг" без учета расхождений <Порядок>100 <Правило> <Код>ПТУ_ЗакупкаТоваровУслуг <Наименование>Документ: Поступление товаров услуг <Порядок>50 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); Запрос = Новый Запрос( "ВЫБРАТЬ | ДанныеШапкиДокумента.Склад.РозничныйВидЦены КАК РозничныйВидЦены, | ДанныеШапкиДокумента.Валюта КАК Валюта, | ДанныеШапкиДокумента.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеШапкиДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ДанныеШапкиДокумента |ГДЕ | ДанныеШапкиДокумента.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура КАК Номенклатура, | Товары.Характеристика КАК Характеристика, | Товары.Количество КАК Количество, | Товары.СтавкаНДС КАК СтавкаНДС, | Товары.СуммаНДС КАК СуммаНДС, | Товары.Цена / ВЫБОР | КОГДА ЕСТЬNULL(Товары.Упаковка.Знаменатель, 0) > 0 | И ЕСТЬNULL(Товары.Упаковка.Числитель, 0) > 0 | ТОГДА Товары.Упаковка.Знаменатель / Товары.Упаковка.Числитель | ИНАЧЕ 1 | КОНЕЦ КАК Цена, | Товары.Сумма КАК Сумма, | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.СтатьяРасходов КАК СтатьяРасходов, | 1 КАК Коэффициент, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | Товары.НомерГТД КАК НомерГТД, | Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | Товары.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | Товары.СуммаСНДС КАК СуммаСНДС, | Товары.Ссылка.ВернутьМногооборотнуюТару КАК ВернутьМногооборотнуюТару, | Товары.Ссылка.ЗакупкаПодДеятельность КАК СпособУчетаНДС |ПОМЕСТИТЬ ТоварыИУслугиДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЦеныВРознице.Цена / ВЫБОР | КОГДА ЕСТЬNULL(ЦеныВРознице.Упаковка.Знаменатель, 0) > 0 | И ЕСТЬNULL(ЦеныВРознице.Упаковка.Числитель, 0) > 0 | ТОГДА ЦеныВРознице.Упаковка.Знаменатель / ЦеныВРознице.Упаковка.Числитель | ИНАЧЕ 1 | КОНЕЦ * ВЫБОР | КОГДА ЕСТЬNULL(КурсВалютыДокумента.Кратность, 0) > 0 | И ЕСТЬNULL(КурсВалютыДокумента.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Курс, 0) > 0 | ТОГДА КурсыВалютВидовЦены.Курс * КурсВалютыДокумента.Кратность / (КурсыВалютВидовЦены.Кратность * КурсВалютыДокумента.Курс) | КОНЕЦ КАК Цена, | ЦеныВРознице.Номенклатура КАК Номенклатура, | ЦеныВРознице.Характеристика КАК Характеристика |ПОМЕСТИТЬ ЦеныВРознице |ИЗ | РегистрСведений.ЦеныНоменклатуры.СрезПоследних( | &Дата, | ВидЦены В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеШапкиДокумента.РозничныйВидЦены | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента) | И Номенклатура В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыИУслугиДокумента.Номенклатура | ИЗ | ТоварыИУслугиДокумента КАК ТоварыИУслугиДокумента) | И Характеристика В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыИУслугиДокумента.Характеристика | ИЗ | ТоварыИУслугиДокумента КАК ТоварыИУслугиДокумента)) КАК ЦеныВРознице | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютВидовЦены | ПО ЦеныВРознице.Валюта = КурсыВалютВидовЦены.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ДанныеШапкиДокумента.Валюта | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента)) КАК КурсВалютыДокумента | ПО (ИСТИНА) | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | Характеристика |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыИУслугиДокумента.Номенклатура КАК Номенклатура, | ТоварыИУслугиДокумента.Характеристика КАК Характеристика, | ТоварыИУслугиДокумента.Количество КАК Количество, | ТоварыИУслугиДокумента.СтавкаНДС КАК СтавкаНДС, | ТоварыИУслугиДокумента.СуммаНДС КАК СуммаНДС, | ТоварыИУслугиДокумента.Цена КАК Цена, | ТоварыИУслугиДокумента.Сумма КАК Сумма, | ТоварыИУслугиДокумента.НомерСтрокиДокумента КАК НомерСтрокиДокумента, | ТоварыИУслугиДокумента.СтатьяРасходов КАК СтатьяРасходов, | ТоварыИУслугиДокумента.Коэффициент КАК Коэффициент, | ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК ЦенаВРознице, | ТоварыИУслугиДокумента.Количество * ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК СуммаВРознице, | ТоварыИУслугиДокумента.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | ТоварыИУслугиДокумента.НомерГТД КАК НомерГТД, | ТоварыИУслугиДокумента.СтранаПроисхождения КАК СтранаПроисхождения, | ТоварыИУслугиДокумента.СуммаСНДС КАК СуммаСНДС, | ТоварыИУслугиДокумента.ВернутьМногооборотнуюТару КАК ВернутьМногооборотнуюТару, | ТоварыИУслугиДокумента.СпособУчетаНДС КАК СпособУчетаНДС |ПОМЕСТИТЬ ТоварыИУслугиДокументаСЦенамиРозницы |ИЗ | ТоварыИУслугиДокумента КАК ТоварыИУслугиДокумента | ЛЕВОЕ СОЕДИНЕНИЕ ЦеныВРознице КАК ЦеныВРознице | ПО ТоварыИУслугиДокумента.Номенклатура = ЦеныВРознице.Номенклатура | И ТоварыИУслугиДокумента.Характеристика = ЦеныВРознице.Характеристика |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(КурсВалютыДокумента.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыДокумента.Кратность, 1) КАК КратностьВзаиморасчетов |ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | Док.ВалютаВзаиморасчетов | ИЗ | ДанныеШапкиДокумента КАК Док)) КАК КурсВалютыДокумента | ПО ДанныеШапкиДокумента.ВалютаВзаиморасчетов = КурсВалютыДокумента.Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура КАК Номенклатура, | ТоварыДокумента.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | ТоварыДокумента.Характеристика КАК Характеристика, | ТоварыДокумента.Количество КАК Количество, | ТоварыДокумента.Цена КАК Цена, | ТоварыДокумента.Сумма КАК Сумма, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДС, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДСВРознице, | ТоварыДокумента.СуммаНДС КАК СуммаНДС, | ТоварыДокумента.Коэффициент КАК Коэффициент, | ТоварыДокумента.ЦенаВРознице КАК ЦенаВРознице, | ТоварыДокумента.СуммаВРознице КАК СуммаВРознице, | ТоварыДокумента.НомерГТД КАК НомерГТД, | ТоварыДокумента.СтранаПроисхождения КАК СтранаПроисхождения, | ТоварыДокумента.СуммаСНДС КАК СуммаСНДС, | ТоварыДокумента.СпособУчетаНДС КАК СпособУчетаНДС |ИЗ | ТоварыИУслугиДокументаСЦенамиРозницы КАК ТоварыДокумента |ГДЕ | (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ТоварыДокумента.ВернутьМногооборотнуюТару) | |УПОРЯДОЧИТЬ ПО | ТоварыДокумента.НомерСтрокиДокумента |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура КАК Номенклатура, | ТоварыДокумента.Количество КАК Количество, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДС, | ТоварыДокумента.СуммаНДС КАК СуммаНДС, | ТоварыДокумента.Цена КАК Цена, | ТоварыДокумента.Сумма КАК Сумма, | ТоварыДокумента.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ТоварыДокумента.СтатьяРасходов КАК СтатьяРасходов, | ТоварыДокумента.СуммаСНДС КАК СуммаСНДС, | ТоварыДокумента.СпособУчетаНДС КАК СпособУчетаНДС |ИЗ | ТоварыИУслугиДокументаСЦенамиРозницы КАК ТоварыДокумента |ГДЕ | (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | И ЕСТЬNULL(ТоварыДокумента.СтатьяРасходов.ВариантРаспределенияРасходовУпр, НЕОПРЕДЕЛЕНО) <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыИУслугиДокумента.Номенклатура КАК Номенклатура, | ТоварыИУслугиДокумента.Количество КАК Количество, | ТоварыИУслугиДокумента.Цена КАК Цена, | ТоварыИУслугиДокумента.Сумма КАК Сумма |ИЗ | ТоварыИУслугиДокумента КАК ТоварыИУслугиДокумента |ГДЕ | ТоварыИУслугиДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И ТоварыИУслугиДокумента.ВернутьМногооборотнуюТару"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапкиДокумента = РезультатыЗапроса[4].Выбрать(); ТабТовары = РезультатыЗапроса[5].Выгрузить(); ТабУслуги = РезультатыЗапроса[6].Выгрузить(); ТабВозвратнаяТара = РезультатыЗапроса[7].Выгрузить(); ДанныеШапкиДокумента.Следующий(); ВходящиеДанные.Вставить("КурсВзаиморасчетов", ДанныеШапкиДокумента.КурсВзаиморасчетов); ВходящиеДанные.Вставить("КратностьВзаиморасчетов", ДанныеШапкиДокумента.КратностьВзаиморасчетов); ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("Услуги", ТабУслуги); ВходящиеДанные.Вставить("ВозвратнаяТара", ТабВозвратнаяТара); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("СуммаСНДС") + ТабУслуги.Итог("СуммаСНДС") + ТабВозвратнаяТара.Итог("Сумма")); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("УслугиТабличнаяЧасть"); Если ТаблицаСтатейРасходов <> Неопределено Тогда Для Каждого СтрокаТЧ Из Объект.Услуги Цикл СчетЗатрат = СтрокаТЧ.СчетЗатрат; СчетЗатратНУ = СтрокаТЧ.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТЧ.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>11 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Источник.ЗаказПоставщику); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <НеЗамещать>true <Код>26 <Наименование>--> СпособЗачетаАвансов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>34 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>35 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>Склад --> Склад <Порядок>650 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>28 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>9 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>12 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>52 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>1000 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>53 <Наименование>Менеджер --> Ответственный <Порядок>1050 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>1100 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>67 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>72 <Наименование>ЗакупкаПодДеятельность --> ЭтоЕНВД <Порядок>1200 <Источник Имя="ЗакупкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <ПриВыгрузке>Если Значение = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Группа> <Код>15 <Наименование>--> Товары <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>20 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>17 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>18 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <НеЗамещать>true <Код>22 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>36 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>23 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>68 <Наименование>--> СтавкаНДСВРознице <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВРознице" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>69 <Наименование>--> СуммаВРознице <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>70 <Наименование>--> ЦенаВРознице <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>81 <Наименование>--> СпособУчетаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>38 <Наименование>--> Услуги <Порядок>1300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>39 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>40 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>41 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>42 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>43 <Наименование>--> СуммаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>44 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>64 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>65 <Наименование>--> СчетЗатратНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>82 <Наименование>--> СпособУчетаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>66 <Наименование>--> СтатьяРасходов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>76 <Наименование>--> ВозвратнаяТара <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>77 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>78 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>79 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>80 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ПТУ_ПриемНаКомиссию <Наименование>Документ: Поступление товаров услуг <Порядок>100 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ДанныеШапкиДокумента.Склад.РозничныйВидЦены КАК РозничныйВидЦены, | ДанныеШапкиДокумента.Валюта, | ДанныеШапкиДокумента.ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеШапкиДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ДанныеШапкиДокумента |ГДЕ | ДанныеШапкиДокумента.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Характеристика, | Товары.Количество, | Товары.СтавкаНДС, | Товары.СуммаНДС, | Товары.Цена / ЕСТЬNULL(Товары.Упаковка.Знаменатель / ЕСТЬNULL(Товары.Упаковка.Числитель, 1), 1) КАК Цена, | Товары.Сумма, | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.СтатьяРасходов, | 1 КАК Коэффициент, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | Товары.НомерГТД, | Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | Товары.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | Товары.СуммаСНДС, | Товары.Ссылка.ВернутьМногооборотнуюТару, | Товары.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС |ПОМЕСТИТЬ ТоварыДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЦеныВРознице.Цена / ЕСТЬNULL(ЦеныВРознице.Упаковка.Знаменатель / ЕСТЬNULL(ЦеныВРознице.Упаковка.Числитель, 1), 1) * ВЫБОР | КОГДА ЕСТЬNULL(КурсВалютыДокумента.Кратность, 0) > 0 | И ЕСТЬNULL(КурсВалютыДокумента.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Курс, 0) > 0 | ТОГДА КурсыВалютВидовЦены.Курс * КурсВалютыДокумента.Кратность / (КурсыВалютВидовЦены.Кратность * КурсВалютыДокумента.Курс) | КОНЕЦ КАК Цена, | ЦеныВРознице.Номенклатура КАК Номенклатура, | ЦеныВРознице.Характеристика КАК Характеристика |ПОМЕСТИТЬ ЦеныВРознице |ИЗ | РегистрСведений.ЦеныНоменклатуры.СрезПоследних( | &Дата, | ВидЦены В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеШапкиДокумента.РозничныйВидЦены | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента) | И Номенклатура В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Номенклатура | ИЗ | ТоварыДокумента КАК ТоварыДокумента) | И Характеристика В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Характеристика | ИЗ | ТоварыДокумента КАК ТоварыДокумента)) КАК ЦеныВРознице | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютВидовЦены | ПО ЦеныВРознице.Валюта = КурсыВалютВидовЦены.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ДанныеШапкиДокумента.Валюта | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента)) КАК КурсВалютыДокумента | ПО (ИСТИНА) | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | Характеристика |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(КурсВалютыДокумента.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыДокумента.Кратность, 1) КАК КратностьВзаиморасчетов |ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | Док.ВалютаВзаиморасчетов | ИЗ | ДанныеШапкиДокумента КАК Док)) КАК КурсВалютыДокумента | ПО ДанныеШапкиДокумента.ВалютаВзаиморасчетов = КурсВалютыДокумента.Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура, | ТоварыДокумента.Характеристика, | ТоварыДокумента.Количество, | ТоварыДокумента.СтавкаНДС, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДСВРознице, | ТоварыДокумента.СуммаНДС, | ТоварыДокумента.Цена, | ТоварыДокумента.Сумма, | ТоварыДокумента.НомерСтрокиДокумента, | ТоварыДокумента.СтатьяРасходов, | ТоварыДокумента.Коэффициент, | ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК ЦенаВРознице, | ТоварыДокумента.Количество * ЕСТЬNULL(ЦеныВРознице.Цена, 0) КАК СуммаВРознице, | ТоварыДокумента.ЕдиницаИзмерения, | ТоварыДокумента.НомерГТД, | ТоварыДокумента.СтранаПроисхождения, | ТоварыДокумента.СуммаСНДС, | ТоварыДокумента.СпособУчетаНДС |ИЗ | ТоварыДокумента КАК ТоварыДокумента | ЛЕВОЕ СОЕДИНЕНИЕ ЦеныВРознице КАК ЦеныВРознице | ПО ТоварыДокумента.Номенклатура = ЦеныВРознице.Номенклатура | И ТоварыДокумента.Характеристика = ЦеныВРознице.Характеристика |ГДЕ | (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ТоварыДокумента.ВернутьМногооборотнуюТару) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура, | ТоварыДокумента.Количество, | ТоварыДокумента.Цена, | ТоварыДокумента.Сумма |ИЗ | ТоварыДокумента КАК ТоварыДокумента |ГДЕ | ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И ТоварыДокумента.ВернутьМногооборотнуюТару"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапкиДокумента = РезультатыЗапроса[3].Выбрать(); ТабТовары = РезультатыЗапроса[4].Выгрузить(); ТабВозвратнаяТара = РезультатыЗапроса[5].Выгрузить(); ДанныеШапкиДокумента.Следующий(); ВходящиеДанные.Вставить("КурсВзаиморасчетов", ДанныеШапкиДокумента.КурсВзаиморасчетов); ВходящиеДанные.Вставить("КратностьВзаиморасчетов", ДанныеШапкиДокумента.КратностьВзаиморасчетов); ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("ВозвратнаяТара", ТабВозвратнаяТара); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("СуммаСНДС") + ТабВозвратнаяТара.Итог("Сумма")); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_ПриемНаКомиссию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>23 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>27 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <НеЗамещать>true <Код>32 <Наименование>--> СпособЗачетаАвансов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "НеЗачитывать"; <Свойство> <Код>33 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>Склад --> Склад <Порядок>650 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>36 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>21 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>24 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>51 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>1050 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>52 <Наименование>Менеджер --> Ответственный <Порядок>1100 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>1150 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>53 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>13 <Наименование>--> Товары <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>29 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>14 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>19 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>31 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>55 <Наименование>--> СтавкаНДСВРознице <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВРознице" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>56 <Наименование>--> СуммаВРознице <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> ЦенаВРознице <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>63 <Наименование>--> ОтражениеВУСН <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <ПередВыгрузкой>Значение = "НеПринимаются"; <Свойство> <Код>69 <Наименование>--> СпособУчетаНДС <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>64 <Наименование>--> ВозвратнаяТара <Порядок>1300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>65 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>66 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>67 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>68 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ПТУ_ЗакупкаИмпорт <Наименование>Документ: Поступление товаров услуг <Порядок>150 <ПередВыгрузкой>Запрос = Новый Запрос("ВЫБРАТЬ | ДанныеШапкиДокумента.Склад.РозничныйВидЦены КАК РозничныйВидЦены, | ДанныеШапкиДокумента.Валюта КАК Валюта, | ДанныеШапкиДокумента.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеШапкиДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг КАК ДанныеШапкиДокумента |ГДЕ | ДанныеШапкиДокумента.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура КАК Номенклатура, | Товары.Характеристика КАК Характеристика, | Товары.Количество КАК Количество, | Товары.СтавкаНДС КАК СтавкаНДС, | Товары.СуммаНДС КАК СуммаНДС, | Товары.Цена / ЕСТЬNULL(Товары.Упаковка.Знаменатель / ЕСТЬNULL(Товары.Упаковка.Числитель, 1), 1) КАК Цена, | Товары.Сумма КАК Сумма, | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.СтатьяРасходов КАК СтатьяРасходов, | 1 КАК Коэффициент, | Товары.Ссылка.ВернутьМногооборотнуюТару КАК ВернутьМногооборотнуюТару, | Товары.Ссылка.ЗакупкаПодДеятельность КАК СпособУчетаНДС |ПОМЕСТИТЬ ТоварыДокумента |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ДвиженияДокумента.Организация КАК Организация, | ДвиженияДокумента.Поставщик КАК Поставщик, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.Номенклатура КАК Номенклатура, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.Характеристика КАК Характеристика, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.МестоХранения КАК Склад, | ДвиженияДокумента.ВидЗапасов КАК ВидЗапасов, | СУММА(ДвиженияДокумента.Количество) КАК Количество |ПОМЕСТИТЬ ДвиженияДокумента |ИЗ | РегистрНакопления.ТоварыКОформлениюТаможенныхДеклараций КАК ДвиженияДокумента |ГДЕ | ДвиженияДокумента.Регистратор = &Ссылка | И ДвиженияДокумента.ВидДвижения = ЗНАЧЕНИЕ(ВидДвиженияНакопления.Приход) | |СГРУППИРОВАТЬ ПО | ДвиженияДокумента.Организация, | ДвиженияДокумента.Поставщик, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.Номенклатура, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.Характеристика, | ДвиженияДокумента.АналитикаУчетаНоменклатуры.МестоХранения, | ДвиженияДокумента.ВидЗапасов | |ИНДЕКСИРОВАТЬ ПО | Характеристика, | Номенклатура, | ВидЗапасов, | Поставщик, | Склад, | Организация |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(КурсВалютыДокумента.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыДокумента.Кратность, 1) КАК КратностьВзаиморасчетов |ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | Док.ВалютаВзаиморасчетов | ИЗ | ДанныеШапкиДокумента КАК Док)) КАК КурсВалютыДокумента | ПО ДанныеШапкиДокумента.ВалютаВзаиморасчетов = КурсВалютыДокумента.Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура КАК Номенклатура, | ТоварыДокумента.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | ТоварыДокумента.Характеристика КАК Характеристика, | ТоварыДокумента.Количество КАК Количество, | ТоварыДокумента.Цена КАК Цена, | ТоварыДокумента.Сумма КАК Сумма, | ВЫБОР | КОГДА ЦеныВРознице.Цена ЕСТЬ NULL | ТОГДА 0 | ИНАЧЕ ЦеныВРознице.Цена / ЕСТЬNULL(ЦеныВРознице.Упаковка.Знаменатель / ЕСТЬNULL(ЦеныВРознице.Упаковка.Числитель, 1), 1) * ВЫБОР | КОГДА ЕСТЬNULL(КурсВалютыДокумента.Кратность, 0) > 0 | И ЕСТЬNULL(КурсВалютыДокумента.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютВидовЦены.Курс, 0) > 0 | ТОГДА КурсыВалютВидовЦены.Курс * КурсВалютыДокумента.Кратность / (КурсыВалютВидовЦены.Кратность * КурсВалютыДокумента.Курс) | КОНЕЦ | КОНЕЦ КАК ЦенаВРознице, | 0 КАК СуммаВРознице, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДС, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДСВРознице, | ТоварыДокумента.СуммаНДС КАК СуммаНДС, | ТоварыДокумента.НомерСтрокиДокумента КАК НомерСтрокиДокумента, | ТоварыДокумента.Коэффициент КАК Коэффициент, | ТоварыДокумента.СпособУчетаНДС КАК СпособУчетаНДС |ИЗ | ТоварыДокумента КАК ТоварыДокумента | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних( | &Дата, | ВидЦены В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеШапкиДокумента.РозничныйВидЦены | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента) | И Номенклатура В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Номенклатура | ИЗ | ТоварыДокумента КАК ТоварыДокумента) | И Характеристика В | (ВЫБРАТЬ РАЗЛИЧНЫЕ | ТоварыДокумента.Характеристика | ИЗ | ТоварыДокумента КАК ТоварыДокумента)) КАК ЦеныВРознице | ПО ТоварыДокумента.Номенклатура = ЦеныВРознице.Номенклатура | И ТоварыДокумента.Характеристика = ЦеныВРознице.Характеристика | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних( | &Дата, | Валюта В | (ВЫБРАТЬ | ДанныеШапкиДокумента.Валюта | ИЗ | ДанныеШапкиДокумента КАК ДанныеШапкиДокумента)) КАК КурсВалютыДокумента | ПО (ИСТИНА) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютВидовЦены | ПО (ЦеныВРознице.Валюта = КурсыВалютВидовЦены.Валюта) |ГДЕ | (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ТоварыДокумента.ВернутьМногооборотнуюТару) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОстаткиНеоформленныхТоваров.Организация КАК Организация, | ОстаткиНеоформленныхТоваров.Поставщик КАК Поставщик, | ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.Номенклатура КАК Номенклатура, | ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.Характеристика КАК Характеристика, | ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.МестоХранения КАК Склад, | ОстаткиНеоформленныхТоваров.ВидЗапасов КАК ВидЗапасов, | ОстаткиНеоформленныхТоваров.КоличествоОстаток КАК Количество |ИЗ | РегистрНакопления.ТоварыКОформлениюТаможенныхДеклараций.Остатки(&Дата, ) КАК ОстаткиНеоформленныхТоваров | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДвиженияДокумента КАК ДвиженияДокумента | ПО ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.Характеристика = ДвиженияДокумента.Характеристика | И ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.Номенклатура = ДвиженияДокумента.Номенклатура | И ОстаткиНеоформленныхТоваров.ВидЗапасов = ДвиженияДокумента.ВидЗапасов | И ОстаткиНеоформленныхТоваров.Поставщик = ДвиженияДокумента.Поставщик | И ОстаткиНеоформленныхТоваров.АналитикаУчетаНоменклатуры.МестоХранения = ДвиженияДокумента.Склад | И ОстаткиНеоформленныхТоваров.Организация = ДвиженияДокумента.Организация |ГДЕ | ОстаткиНеоформленныхТоваров.КоличествоОстаток > 0 |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОформлениеГТД.Организация КАК Организация, | ОформлениеГТД.Поставщик КАК Поставщик, | ОформлениеГТД.АналитикаУчетаНоменклатуры.Номенклатура КАК Номенклатура, | ОформлениеГТД.АналитикаУчетаНоменклатуры.Характеристика КАК Характеристика, | ОформлениеГТД.АналитикаУчетаНоменклатуры.МестоХранения КАК Склад, | ОформлениеГТД.ВидЗапасов КАК ВидЗапасов, | СУММА(ОформлениеГТД.Количество) КАК Количество, | ОформлениеГТД.Период КАК Период, | ОформлениеГТД.НомерГТД КАК НомерГТД, | ОформлениеГТД.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения |ИЗ | РегистрНакопления.ТоварыКОформлениюТаможенныхДеклараций КАК ОформлениеГТД | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДвиженияДокумента КАК ДвиженияДокумента | ПО ОформлениеГТД.АналитикаУчетаНоменклатуры.Характеристика = ДвиженияДокумента.Характеристика | И ОформлениеГТД.АналитикаУчетаНоменклатуры.Номенклатура = ДвиженияДокумента.Номенклатура | И ОформлениеГТД.ВидЗапасов = ДвиженияДокумента.ВидЗапасов | И ОформлениеГТД.Поставщик = ДвиженияДокумента.Поставщик | И ОформлениеГТД.Организация = ДвиженияДокумента.Организация |ГДЕ | ОформлениеГТД.МоментВремени > &Дата | И ОформлениеГТД.ВидДвижения = ЗНАЧЕНИЕ(ВидДвиженияНакопления.Расход) | |СГРУППИРОВАТЬ ПО | ОформлениеГТД.Организация, | ОформлениеГТД.Поставщик, | ОформлениеГТД.АналитикаУчетаНоменклатуры.Номенклатура, | ОформлениеГТД.АналитикаУчетаНоменклатуры.Характеристика, | ОформлениеГТД.АналитикаУчетаНоменклатуры.МестоХранения, | ОформлениеГТД.ВидЗапасов, | ОформлениеГТД.Период, | ОформлениеГТД.НомерГТД, | ОформлениеГТД.НомерГТД.СтранаПроисхождения | |УПОРЯДОЧИТЬ ПО | Период |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура КАК Номенклатура, | ТоварыДокумента.Количество КАК Количество, | ТоварыДокумента.СтавкаНДС КАК СтавкаНДС, | ТоварыДокумента.СуммаНДС КАК СуммаНДС, | ТоварыДокумента.Цена КАК Цена, | ТоварыДокумента.Сумма КАК Сумма, | ТоварыДокумента.НомерСтрокиДокумента КАК НомерСтрокиДокумента, | ТоварыДокумента.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ТоварыДокумента.СтатьяРасходов КАК СтатьяРасходов, | ТоварыДокумента.СпособУчетаНДС КАК СпособУчетаНДС |ИЗ | ТоварыДокумента КАК ТоварыДокумента |ГДЕ | (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | И ЕСТЬNULL(ТоварыДокумента.СтатьяРасходов.ВариантРаспределенияРасходовУпр, НЕОПРЕДЕЛЕНО) <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |УПОРЯДОЧИТЬ ПО | НомерСтрокиДокумента |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДокумента.Номенклатура КАК Номенклатура, | ТоварыДокумента.Количество КАК Количество, | ТоварыДокумента.Цена КАК Цена, | ТоварыДокумента.Сумма КАК Сумма |ИЗ | ТоварыДокумента КАК ТоварыДокумента |ГДЕ | ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И ТоварыДокумента.ВернутьМногооборотнуюТару"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.МоментВремени()); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапкиДокумента = РезультатыЗапроса[3].Выбрать(); ТабТоварыДокумента = РезультатыЗапроса[4].Выгрузить(); ТабТоварыДокумента.Колонки.Добавить("НомерГТД", Новый ОписаниеТипов("СправочникСсылка.НомераГТД")); ТабТоварыДокумента.Колонки.Добавить("СтранаПроисхождения", Новый ОписаниеТипов("СправочникСсылка.СтраныМира")); ТабТоварыДокумента.Колонки.Добавить("ЕстьНомерГТД", Новый ОписаниеТипов("Булево")); ТабТоварыДокумента.Колонки.Добавить("НетКоличества", Новый ОписаниеТипов("Булево")); ТабОстаткиНеоформленныхТоваров = РезультатыЗапроса[5].Выгрузить(); ТабОстаткиНеоформленныхТоваров.Колонки.Добавить("ОстаткиЗакрыты", Новый ОписаниеТипов("Булево")); ДанныеШапкиДокумента.Следующий(); ВходящиеДанные.Вставить("КурсВзаиморасчетов", ДанныеШапкиДокумента.КурсВзаиморасчетов); ВходящиеДанные.Вставить("КратностьВзаиморасчетов", ДанныеШапкиДокумента.КратностьВзаиморасчетов); // Распределение номеров ГТД ВыборкаОформлениеГТДКРаспределению = РезультатыЗапроса[6].Выбрать(); Пока ВыборкаОформлениеГТДКРаспределению.Следующий() Цикл КоличествоКРаспределению = ВыборкаОформлениеГТДКРаспределению.Количество; СтруктураОтбора = Новый Структура("Организация,Поставщик,Номенклатура,Характеристика,Склад,ВидЗапасов,ОстаткиЗакрыты"); ЗаполнитьЗначенияСвойств(СтруктураОтбора, ВыборкаОформлениеГТДКРаспределению); СтруктураОтбора.ОстаткиЗакрыты = Ложь; ОстаткиНеоформленногоТовараЗакрыты = Истина; НеоформленныеТовары = ТабОстаткиНеоформленныхТоваров.НайтиСтроки(СтруктураОтбора); Для Каждого Строка Из НеоформленныеТовары Цикл КоличествоКСписанию = Мин(Строка.Количество, КоличествоКРаспределению); Строка.Количество = Строка.Количество - КоличествоКСписанию; КоличествоКРаспределению = КоличествоКРаспределению - КоличествоКСписанию; Если Строка.Количество = 0 Тогда Строка.ОстаткиЗакрыты = Истина; КонецЕсли; КонецЦикла; СтруктураОтбораСтрокДокумента = Новый Структура("Номенклатура, Характеристика, ЕстьНомерГТД, НетКоличества", СтруктураОтбора.Номенклатура, СтруктураОтбора.Характеристика, Ложь, Ложь); СтрокиДокумента = ТабТоварыДокумента.НайтиСтроки(СтруктураОтбораСтрокДокумента); Для Каждого СтрокаДокумента Из СтрокиДокумента Цикл Если КоличествоКРаспределению = 0 Тогда Прервать; КонецЕсли; КоличествоКСписанию = Мин(СтрокаДокумента.Количество, КоличествоКРаспределению); КоличествоКРаспределению = КоличествоКРаспределению - КоличествоКСписанию; СуммаКСписанию = ?(СтрокаДокумента.Количество <= КоличествоКСписанию, СтрокаДокумента.Сумма, Окр(СтрокаДокумента.Сумма / СтрокаДокумента.Количество * КоличествоКСписанию)); СтрокаДокумента.Количество = СтрокаДокумента.Количество - КоличествоКСписанию; СтрокаДокумента.Сумма = СтрокаДокумента.Сумма - СуммаКСписанию; СтрокаДокументаГТД = ТабТоварыДокумента.Добавить(); ЗаполнитьЗначенияСвойств(СтрокаДокументаГТД, СтрокаДокумента); СтрокаДокументаГТД.Количество = КоличествоКСписанию; СтрокаДокументаГТД.Сумма = СуммаКСписанию; СтрокаДокументаГТД.СуммаВРознице = КоличествоКСписанию * СтрокаДокументаГТД.ЦенаВРознице; СтрокаДокументаГТД.НомерГТД = ВыборкаОформлениеГТДКРаспределению.НомерГТД; СтрокаДокументаГТД.СтранаПроисхождения = ВыборкаОформлениеГТДКРаспределению.СтранаПроисхождения; СтрокаДокументаГТД.ЕстьНомерГТД = Истина; Если СтрокаДокумента.Количество = 0 Тогда СтрокаДокумента.НетКоличества = Истина; КонецЕсли; КонецЦикла; КонецЦикла; СтруктураОтбора = Новый Структура("НетКоличества", Ложь); ТабТовары = ТабТоварыДокумента.Скопировать(СтруктураОтбора); ТабТовары.Сортировать("НомерСтрокиДокумента, НомерГТД"); ВходящиеДанные.Вставить("Товары", ТабТовары); ТабУслуги = РезультатыЗапроса[7].Выгрузить(); ТабВозвратнаяТара = РезультатыЗапроса[8].Выгрузить(); ВходящиеДанные.Вставить("Услуги", ТабУслуги); ВходящиеДанные.Вставить("ВозвратнаяТара", ТабВозвратнаяТара); ВходящиеДанные.Вставить("СуммаДокумента", ТабТовары.Итог("Сумма") + ТабУслуги.Итог("Сумма") + ТабВозвратнаяТара.Итог("Сумма")); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("УслугиТабличнаяЧасть"); Если ТаблицаСтатейРасходов <> Неопределено Тогда Для Каждого СтрокаТЧ Из Объект.Услуги Цикл СчетЗатрат = СтрокаТЧ.СчетЗатрат; СчетЗатратНУ = СтрокаТЧ.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТЧ.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_ЗакупкаИмпорт"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>28 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Источник.ЗаказПоставщику); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <НеЗамещать>true <Код>29 <Наименование>--> СпособЗачетаАвансов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>32 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>Склад --> Склад <Порядок>650 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>31 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>8 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>750 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>11 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>800 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>46 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>1000 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>47 <Наименование>Менеджер --> Ответственный <Порядок>1050 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>1100 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>59 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1150 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>61 <Наименование>ЗакупкаПодДеятельность --> ЭтоЕНВД <Порядок>1200 <Источник Имя="ЗакупкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <ПриВыгрузке>Если Значение = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Группа> <Код>14 <Наименование>--> Товары <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>16 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>15 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>17 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>22 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>20 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>19 <Наименование>--> СтавкаНДСВРознице <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВРознице" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>18 <Наименование>--> СуммаВРознице <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> ЦенаВРознице <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>69 <Наименование>--> СпособУчетаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>34 <Наименование>--> Услуги <Порядок>1300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>37 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>35 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>38 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>41 <Наименование>--> СуммаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>40 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>42 <Наименование>--> СчетЗатратНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>70 <Наименование>--> СпособУчетаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>43 <Наименование>--> СтатьяРасходов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>64 <Наименование>--> ВозвратнаяТара <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>65 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>66 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>67 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>68 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>60 <Наименование>Соглашение --> <Порядок>1400 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСПоставщиками"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>62 <Наименование>СуммаДокумента --> <Порядок>1450 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>48 <Наименование>Товары --> <Порядок>1500 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>57 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>58 <Наименование>КоличествоУпаковок --> <Порядок>100 <Источник Имя="КоличествоУпаковок" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>51 <Наименование>Номенклатура --> <Порядок>150 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>56 <Наименование>НомерГТД --> <Порядок>200 <Источник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>50 <Наименование>СтавкаНДС --> <Порядок>250 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>49 <Наименование>Сумма --> <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>52 <Наименование>СуммаНДС --> <Порядок>350 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>53 <Наименование>Упаковка --> <Порядок>400 <Источник Имя="Упаковка" Вид="Реквизит" Тип="СправочникСсылка.УпаковкиЕдиницыИзмерения"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>54 <Наименование>Цена --> <Порядок>450 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>55 <Наименование>СтатьяРасходов --> <Порядок>500 <Источник Имя="СтатьяРасходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиРасходов"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПТУ_ПоступлениеДопРасходов <Наименование>Документ: Поступление товаров услуг <Порядок>200 <ПередВыгрузкой>Если Не ТолькоПолучитьУзелСсылки Тогда ВходящиеДанные = Новый Структура(); ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("Содержание", ""); ВходящиеДанные.Вставить("Товары"); // Номенклатура, Количество, СтоимостьТоваров, Сумма, СуммаНДС, ДокументПоступления Товары = ДоходыИРасходыСервер.РаспределениеРасходовНаСебестоимостьТоваров(Источник.Ссылка); Если Товары.Количество() > 0 Тогда Товары.Колонки.Добавить("СпособУчетаНДС"); Товары.ЗаполнитьЗначения(Источник.ЗакупкаПодДеятельность, "СпособУчетаНДС"); ВходящиеДанные.Товары = Товары; ВходящиеДанные.СуммаДокумента = Товары.Итог("Сумма") + ?(Источник.ЦенаВключаетНДС, 0, Товары.Итог("СуммаНДС")); Запрос = Новый Запрос("ВЫБРАТЬ | Товары.Номенклатура.Наименование КАК Наименование |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | И ЕСТЬNULL(Товары.СтатьяРасходов.ВариантРаспределенияРасходовУпр, Неопределено) = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура.Наименование"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл ВходящиеДанные.Содержание = ВходящиеДанные.Содержание + Выборка.Наименование + "; "; КонецЦикла; ВходящиеДанные.Содержание = Лев(ВходящиеДанные.Содержание, СтрДлина(ВходящиеДанные.Содержание) - 2); Иначе Отказ = Истина; ТипПриемника = "ДокументСсылка.ПоступлениеДопРасходов"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Источник.Ссылка, "ДокументСсылка.ПоступлениеДопРасходов", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТУ_ПоступлениеДопРасходов"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.ПоступлениеДопРасходов <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "П" + Сред(Значение, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>35 <Наименование>--> Содержание <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> СуммаДокумента <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <НеЗамещать>true <Код>36 <Наименование>--> СтавкаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Значение = "НДС18"; <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>550 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>19 <Наименование>Договор --> ДоговорКонтрагента <Порядок>600 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Источник.ЗаказПоставщику); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>20 <Наименование>--> СпособЗачетаАвансов <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>21 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>700 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>22 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>750 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>25 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>850 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>1 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>900 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>4 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>950 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>29 <Наименование>--> СпособРаспределения <Порядок>1250 <Источник Имя="" Вид=""/> <Приемник Имя="СпособРаспределения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРаспределенияДопРасходов"/> <ПередВыгрузкой>Значение = "ПоСумме"; <Свойство> <Код>28 <Наименование>Менеджер --> Ответственный <Порядок>1300 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>1350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>24 <Наименование>ЗакупкаПодДеятельность --> ЭтоЕНВД <Порядок>1450 <Источник Имя="ЗакупкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <ПриВыгрузке>Если Значение = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Группа> <Код>30 <Наименование>--> Товары <Порядок>1500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>32 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>31 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>--> СуммаНДС <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СуммаТовара <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаТовара" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СтоимостьТоваров; <Свойство> <Код>40 <Наименование>--> ДокументПартии <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументПартии" Вид="Реквизит"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.ДокументПоступления; Если ЗначениеЗаполнено(Значение) Тогда Если ТипЗнч(Значение) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда Если Значение.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | Закупки.Ссылка |ИЗ | Документ.АвансовыйОтчет.ЗакупкаЗаНаличныйРасчет КАК Закупки |ГДЕ | Закупки.ДокументПоступления = &ДокументПоступления | И Закупки.Ссылка.Проведен"); Запрос.УстановитьПараметр("ДокументПоступления", Значение); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда Пусто = Истина; Иначе Выборка = Результат.Выбрать(); Выборка.Следующий(); Значение = Выборка.Ссылка; ИмяПКО = "АО_АвансовыйОтчетЗакупкаТоваровУслуг"; КонецЕсли; Иначе ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг"; КонецЕсли; Иначе ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>41 <Наименование>--> СпособУчетаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Значения/> <Правило> <Код>АвансовыйОтчетИзПриобретенияТИУ <Наименование>Документ: ПриобретениеТоваровУслуг <Порядок>250 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); ВходящиеДанные.Вставить("НомерВходящего", Источник.НомерВходящегоДокумента); ВходящиеДанные.Вставить("ДатаВходящего", Источник.ДатаВходящегоДокумента); <ПослеЗагрузки>//Для Каждого Элекмента Из Объект.Прочее Цикл // Элекмента.НомерВходящегоДокумента = ВходящиеДанные.НомерВходящего; // Элекмента.ДатаВходящегоДокумента = ВходящиеДанные.ДатаВходящего; //КонецЦикла; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеТоваровУслуг <Приемник>ДокументСсылка.АвансовыйОтчет <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>КоличествоДокументов --> КоличествоДокументов <Порядок>100 <Источник Имя="КоличествоДокументов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КоличествоДокументов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>3 <Наименование>КоличествоЛистов --> КоличествоЛистов <Порядок>150 <Источник Имя="КоличествоЛистов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КоличествоЛистов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Комментарий --> Комментарий <Порядок>200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>НазначениеАванса --> НазначениеАванса <Порядок>250 <Источник Имя="НазначениеАванса" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеАванса" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>300 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Организация --> Организация <Порядок>350 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Проведен --> Проведен <Порядок>450 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Склад --> Склад <Порядок>500 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <Свойство> <Код>11 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>550 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Группа> <Код>12 <Наименование>Товары --> Товары <Порядок>600 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>13 <Наименование>Количество --> Количество <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>Номенклатура --> Номенклатура <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>15 <Наименование>НомерГТД --> НомерГТД <Порядок>150 <Источник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>16 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>200 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>17 <Наименование>Сумма --> Сумма <Порядок>250 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>СуммаНДС --> СуммаНДС <Порядок>300 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>Цена --> Цена <Порядок>350 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>48 <Наименование>--> ДатаВходящегоДокумента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ДатаВходящего; <Свойство> <Код>49 <Наименование>--> НомерВходящегоДокумента <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ВходящиеДанные.НомерВходящего; <Свойство> <Код>20 <Наименование>ПодотчетноеЛицо --> ФизЛицо <Порядок>650 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="ФизЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Группа Отключить="true"> <Код>21 <Наименование>--> Прочее <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Прочее" Вид="ТабличнаяЧасть"/> <Свойство Отключить="true"> <Код>22 <Наименование>--> БланкСтрогойОтчетности <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="БланкСтрогойОтчетности" Вид="Реквизит" Тип="Булево"/> <Свойство Отключить="true"> <Код>23 <Наименование>--> ВидДокВходящий <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВидДокВходящий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>--> ДатаВходящегоДокумента <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ДатаВходящего; <Свойство Отключить="true"> <Код>25 <Наименование>--> ДатаСФ <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство Отключить="true"> <Код>26 <Наименование>--> Номенклатура <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Свойство> <Код>27 <Наименование>--> НомерВходящегоДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ВходящиеДанные.НомерВходящего; <Свойство Отключить="true"> <Код>28 <Наименование>--> НомерСФ <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерСФ" Вид="Реквизит" Тип="Строка"/> <Свойство Отключить="true"> <Код>29 <Наименование>--> ОтражениеВУСН <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Свойство Отключить="true"> <Код>30 <Наименование>--> ПодразделениеЗатрат <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ПодразделениеЗатрат" Вид="Реквизит" Тип="СправочникСсылка.ПодразделенияОрганизаций"/> <Свойство Отключить="true"> <Код>31 <Наименование>--> Поставщик <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Поставщик" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Свойство Отключить="true"> <Код>32 <Наименование>--> ПредъявленСФ <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ПредъявленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство Отключить="true"> <Код>33 <Наименование>--> Содержание <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство Отключить="true"> <Код>34 <Наименование>--> СпособУчетаНДС <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство Отключить="true"> <Код>35 <Наименование>--> СтавкаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство Отключить="true"> <Код>36 <Наименование>--> Субконто1 <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто1" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>37 <Наименование>--> Субконто2 <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто2" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>38 <Наименование>--> Субконто3 <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="Субконто3" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>39 <Наименование>--> СубконтоНУ1 <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоНУ1" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>40 <Наименование>--> СубконтоНУ2 <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоНУ2" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>41 <Наименование>--> СубконтоНУ3 <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="СубконтоНУ3" Вид="Реквизит"/> <Свойство Отключить="true"> <Код>42 <Наименование>--> Сумма <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>43 <Наименование>--> СуммаНДС <Порядок>1100 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>44 <Наименование>--> СчетЗатрат <Порядок>1150 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>45 <Наименование>--> СчетЗатратНУ <Порядок>1200 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>46 <Наименование>--> СчетУчетаНДС <Порядок>1250 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаНДС" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>47 <Наименование>--> СчетФактура <Порядок>1300 <Источник Имя="" Вид=""/> <Приемник Имя="СчетФактура" Вид="Реквизит" Тип="ДокументСсылка.СчетФактураПолученный"/> <Свойство> <Код>51 <Наименование>Валюта --> ВалютаДокумента <Порядок>800 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Значения/> <Группа> <Код>ПоступлениеУслугПрочихАктивов <Наименование>ПКО для документа "Поступление услуг и прочих активов" <Порядок>100 <Правило> <Код>ПУВА_ПоступлениеУслуг <Наименование>Документ: Поступление услуг и прочих активов <Порядок>50 <ПередВыгрузкой>Запрос = Новый Запрос("ВЫБРАТЬ | Расходы.СуммаСНДС КАК СуммаСНДС, | Расходы.Содержание КАК Содержание, | Расходы.Количество КАК Количество, | Расходы.Цена КАК Цена, | Расходы.Сумма КАК Сумма, | ВЫБОР | КОГДА Расходы.Ссылка.НалогообложениеНДС = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.НалоговыйАгентПоНДС) | ТОГДА ЗНАЧЕНИЕ(Справочник.СтавкиНДС.БезНДС) | ИНАЧЕ Расходы.СтавкаНДС | КОНЕЦ КАК СтавкаНДС, | Расходы.СуммаНДС КАК СуммаНДС, | Расходы.СтатьяРасходов КАК СтатьяРасходов, | Расходы.Ссылка.ЗакупкаПодДеятельность КАК СпособУчетаНДС |ИЗ | Документ.ПриобретениеУслугПрочихАктивов.Расходы КАК Расходы |ГДЕ | Расходы.Ссылка = &Ссылка | И Расходы.СтатьяРасходов.ВариантРаспределенияРасходовУпр <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | И Расходы.СтатьяРасходов.ВариантРаспределенияРасходовУпр <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаПрочиеАктивы)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Услуги = Запрос.Выполнить().Выгрузить(); ВходящиеДанные.Вставить("Услуги", Услуги); ВходящиеДанные.Вставить("СуммаДокумента", Услуги.Итог("СуммаСНДС")); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("УслугиТабличнаяЧасть"); Если ТаблицаСтатейРасходов <> Неопределено Тогда Для Каждого СтрокаТЧ Из Объект.Услуги Цикл СчетЗатрат = СтрокаТЧ.СчетЗатрат; СчетЗатратНУ = СтрокаТЧ.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТЧ.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; Иначе Если ТипСубконто.ПривестиЗначение(СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки]) <> СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = ТипСубконто.ПривестиЗначение(СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки]); КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатратНУ.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; Иначе Если ТипСубконто.ПривестиЗначение(СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки]) <> СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = ТипСубконто.ПривестиЗначение(СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки]); КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПУВА_ПоступлениеУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеУслугПрочихАктивов <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "У" + Сред(Значение, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>7 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>14 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <НеЗамещать>true <Код>15 <Наименование>--> СпособЗачетаАвансов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>16 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>17 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>600 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>19 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>650 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>1 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>700 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>4 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>750 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Менеджер --> Ответственный <Порядок>950 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>1000 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1050 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>45 <Наименование>ЗакупкаПодДеятельность --> ЭтоЕНВД <Порядок>1100 <Источник Имя="ЗакупкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <ПриВыгрузке>Если Значение = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Группа> <Код>23 <Наименование>--> Услуги <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>25 <Наименование>--> Содержание <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>28 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СтатьяРасходов) Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ОбъектКоллекции.СтатьяРасходов, "КорреспондирующийСчет"); Иначе Отказ = Истина; КонецЕсли; <Свойство> <Код>31 <Наименование>--> СчетЗатратНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СтатьяРасходов) Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ОбъектКоллекции.СтатьяРасходов, "КорреспондирующийСчет"); Иначе Отказ = Истина; КонецЕсли; <Свойство> <Код>46 <Наименование>--> СчетУчетаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчетаНДС" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СуммаНДС) Тогда Значение = "19.04"; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>47 <Наименование>--> СпособУчетаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>32 <Наименование>--> СтатьяРасходов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>33 <Наименование>СуммаДокумента --> <Порядок>1200 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>35 <Наименование>Расходы --> <Порядок>1250 <Источник Имя="Расходы" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>36 <Наименование>АналитикаРасходов --> <Порядок>50 <Источник Имя="АналитикаРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>Количество --> <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>38 <Наименование>Содержание --> <Порядок>150 <Источник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>СтавкаНДС --> <Порядок>200 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>40 <Наименование>СтатьяРасходов --> <Порядок>250 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>41 <Наименование>Сумма --> <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>42 <Наименование>СуммаНДС --> <Порядок>350 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>43 <Наименование>СуммаСНДС --> <Порядок>400 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>44 <Наименование>Цена --> <Порядок>450 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПУВА_ПоступлениеДопРасходов <Наименование>Документ: Поступление услуг и прочих активов <Порядок>100 <ПередВыгрузкой>ТолькоПолучитьУзелСсылки = Ложь; Если Не ТолькоПолучитьУзелСсылки Тогда ВходящиеДанные = Новый Структура(); ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("Содержание", ""); ВходящиеДанные.Вставить("Товары"); // Номенклатура, Количество, СтоимостьТоваров, Сумма, СуммаНДС, ДокументПоступления Товары = ДоходыИРасходыСервер.РаспределениеРасходовНаСебестоимостьТоваров(Источник.Ссылка); СуммаНДС = Товары.Итог("СуммаНДС"); Если СуммаНДС > 0 Тогда ВходящиеДанные.Вставить("СтавкаНДС", Перечисления.СтавкиНДС.НДС20); Иначе ВходящиеДанные.Вставить("СтавкаНДС", Перечисления.СтавкиНДС.БезНДС); КонецЕсли; Если Товары.Количество() > 0 Тогда Товары.Колонки.Добавить("СпособУчетаНДС"); Товары.ЗаполнитьЗначения(Источник.ЗакупкаПодДеятельность, "СпособУчетаНДС"); ВходящиеДанные.Товары = Товары; ВходящиеДанные.СуммаДокумента = Товары.Итог("Сумма") + ?(Источник.ЦенаВключаетНДС, 0, СуммаНДС); Запрос = Новый Запрос("ВЫБРАТЬ | Расходы.Содержание КАК Наименование |ИЗ | Документ.ПриобретениеУслугПрочихАктивов.Расходы КАК Расходы |ГДЕ | Расходы.Ссылка = &Ссылка | И Расходы.СтатьяРасходов.ВариантРаспределенияРасходовУпр = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |СГРУППИРОВАТЬ ПО | Расходы.Содержание"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл ВходящиеДанные.Содержание = ВходящиеДанные.Содержание + Выборка.Наименование + "; "; КонецЦикла; ВходящиеДанные.Содержание = Лев(ВходящиеДанные.Содержание, СтрДлина(ВходящиеДанные.Содержание) - 2); Иначе Отказ = Истина; КонецЕсли; КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПУВА_ПоступлениеДопРасходов"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПриобретениеУслугПрочихАктивов <Приемник>ДокументСсылка.ПоступлениеДопРасходов <Свойства> <Свойство Поиск="true"> <Код>8 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>9 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "У" + Сред(Значение, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>31 <Наименование>--> Содержание <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>--> СуммаДокумента <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <НеЗамещать>true <Код>32 <Наименование>--> СтавкаНДС <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>3 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>13 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>14 <Наименование>--> СпособЗачетаАвансов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>15 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>600 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>16 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>650 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>19 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>750 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>1 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>800 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>4 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>850 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>--> СпособРаспределения <Порядок>1150 <Источник Имя="" Вид=""/> <Приемник Имя="СпособРаспределения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРаспределенияДопРасходов"/> <ПередВыгрузкой>Значение = "ПоСумме"; <Свойство> <Код>22 <Наименование>Менеджер --> Ответственный <Порядок>1200 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>1250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>24 <Наименование>--> Товары <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>27 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>28 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> СуммаНДС <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> СуммаТовара <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаТовара" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СтоимостьТоваров; <Свойство> <Код>30 <Наименование>--> ДокументПартии <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументПартии" Вид="Реквизит"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.ДокументПоступления; Если ЗначениеЗаполнено(Значение) Тогда Если ТипЗнч(Значение) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда Если Значение.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | Закупки.Ссылка |ИЗ | Документ.АвансовыйОтчет.ЗакупкаЗаНаличныйРасчет КАК Закупки |ГДЕ | Закупки.ДокументПоступления = &ДокументПоступления | И Закупки.Ссылка.Проведен"); Запрос.УстановитьПараметр("ДокументПоступления", Значение); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда Пусто = Истина; Иначе Выборка = Результат.Выбрать(); Выборка.Следующий(); Значение = Выборка.Ссылка; ИмяПКО = "АО_АвансовыйОтчетЗакупкаТоваровУслуг"; КонецЕсли; Иначе ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг"; КонецЕсли; Иначе ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>33 <Наименование>--> СпособУчетаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Значения/> <Группа> <Код>КорректировкаПоступления <Наименование>ПКО для документа "Корректировка поступления" <Порядок>150 <Правило> <Код>КорректировкаПриобретения_КорректировкаПоступления <Наименование>Документ: Корректировка поступления <Порядок>50 <ПередВыгрузкой>Если Не ТолькоПолучитьУзелСсылки Тогда ВходящиеДанные = Новый Структура(); ВходящиеДанные.Вставить("ВидОперации"); ВходящиеДанные.Вставить("Грузоотправитель"); ВходящиеДанные.Вставить("ДокументПоступления"); ВходящиеДанные.Вставить("ЗаказПоставщику"); ВходящиеДанные.Вставить("ИсправляемыйДокументПоступления"); ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("Товары"); ВходящиеДанные.Вставить("Услуги"); ВходящиеДанные.Вставить("ЭтоЕНВД", Ложь); Запрос = Новый Запрос(); Запрос.УстановитьПараметр("ДокументОснование", Источник.ДокументОснование); Запрос.УстановитьПараметр("МоментВремени", Источник.МоментВремени()); Запрос.УстановитьПараметр("ПоступлениеУслуг", ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов")); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("СпособУчетаНДС", Источник.НалогообложениеНДС); // Данные исходного документа поступления Запрос.Текст = "ВЫБРАТЬ | Док.ЗаказПоставщику, | Док.Грузоотправитель, | ВЫБОР | КОГДА Док.ЗакупкаПодДеятельность = ЗНАЧЕНИЕ(Перечисление.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК ЭтоЕНВД, | Док.ВернутьМногооборотнуюТару КАК ВернутьМногооборотнуюТару |ПОМЕСТИТЬ ДанныеДокументаПоступления |ИЗ | Документ.ПриобретениеТоваровУслуг КАК Док |ГДЕ | Док.Ссылка = &ДокументОснование |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Док.ЗаказПоставщику, | Док.Грузоотправитель, | Док.ЭтоЕНВД, | Док.ВернутьМногооборотнуюТару |ИЗ | ДанныеДокументаПоступления КАК Док |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Ссылка на исправляемый документ Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Док.Ссылка, | Док.МоментВремени, | ЛОЖЬ КАК ЭтоДокументОснование |ПОМЕСТИТЬ ПоследовательностьДокументов |ИЗ | Документ.КорректировкаПриобретения КАК Док |ГДЕ | Док.ДокументОснование = &ДокументОснование | И Док.МоментВремени <= &МоментВремени | И Док.Проведен | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Док.ДокументОснование, | Док.ДокументОснование.МоментВремени, | ИСТИНА |ИЗ | Документ.КорректировкаПриобретения КАК Док |ГДЕ | Док.Ссылка = &Ссылка | |ИНДЕКСИРОВАТЬ ПО | Док.Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПоследовательностьДокументов.Ссылка, | ПоследовательностьДокументов.МоментВремени, | ПоследовательностьДокументов.ЭтоДокументОснование, | МАКСИМУМ(ВЫБОР | КОГДА СчетФактураПолученный.Ссылка ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ) КАК Корректировочный |ПОМЕСТИТЬ ПараметрыДокументовПоследовательности |ИЗ | ПоследовательностьДокументов КАК ПоследовательностьДокументов | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетФактураПолученный.ДокументыОснования КАК СчетФактураПолученный | ПО ПоследовательностьДокументов.Ссылка = СчетФактураПолученный.ДокументОснование | И (СчетФактураПолученный.Ссылка.Корректировочный) | И (СчетФактураПолученный.Ссылка.Проведен) | |СГРУППИРОВАТЬ ПО | ПоследовательностьДокументов.Ссылка, | ПоследовательностьДокументов.МоментВремени, | ПоследовательностьДокументов.ЭтоДокументОснование |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Параметры1.Ссылка, | Параметры1.Корректировочный, | МИНИМУМ(ВЫБОР | КОГДА Параметры1.Корректировочный | И НЕ Параметры2.Корректировочный | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ) КАК ИсходныйКорректировочный |ПОМЕСТИТЬ ПараметрыОтбора |ИЗ | ПараметрыДокументовПоследовательности КАК Параметры1 | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыДокументовПоследовательности КАК Параметры2 | ПО (Параметры1.Ссылка = &Ссылка) | И (Параметры2.Ссылка <> &Ссылка) | |СГРУППИРОВАТЬ ПО | Параметры1.Ссылка, | Параметры1.Корректировочный |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка |ПОМЕСТИТЬ ИсправляемыйДокумент |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО (ИсправляемыеДокументы.Корректировочный = ПараметрыОтбора.Корректировочный | ИЛИ ПараметрыОтбора.ИсходныйКорректировочный | ИЛИ ИсправляемыеДокументы.ЭтоДокументОснование) | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.МоментВремени УБЫВ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ИсправляемыйДокумент.Ссылка |ИЗ | ИсправляемыйДокумент КАК ИсправляемыйДокумент |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Ссылка на основание исправления (корректировки) и документ до корректировки Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО (ИсправляемыеДокументы.Корректировочный = ПараметрыОтбора.Корректировочный | ИЛИ ИсправляемыеДокументы.ЭтоДокументОснование) | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.ЭтоДокументОснование, | ИсправляемыеДокументы.МоментВремени |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка |ПОМЕСТИТЬ ДокументДоКорректировки |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО ПараметрыОтбора.Корректировочный И Не ПараметрыОтбора.ИсходныйКорректировочный | И ИсправляемыеДокументы.Корректировочный = Ложь | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.ЭтоДокументОснование, | ИсправляемыеДокументы.МоментВремени УБЫВ |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Табличные части Товары и Услуги исправляемого документа Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Товары.Номенклатура, | """" КАК Содержание, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаСНДС, | Товары.СтатьяРасходов, | Товары.НомерСтроки |ПОМЕСТИТЬ ТоварыУслугиИсправляемогоДокументаРазвернутые |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка В | (ВЫБРАТЬ | ИсправляемыйДокумент.Ссылка | ИЗ | ИсправляемыйДокумент КАК ИсправляемыйДокумент) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка), | Расходы.Содержание, | Расходы.СтавкаНДС, | ЗНАЧЕНИЕ(Справочник.НомераГТД.ПустаяСсылка), | Расходы.Количество, | Расходы.Сумма, | Расходы.СуммаНДС, | Расходы.СуммаСНДС, | Расходы.СтатьяРасходов, | Расходы.НомерСтроки |ИЗ | Документ.ПриобретениеУслугПрочихАктивов.Расходы КАК Расходы |ГДЕ | Расходы.Ссылка В | (ВЫБРАТЬ | ИсправляемыйДокумент.Ссылка | ИЗ | ИсправляемыйДокумент КАК ИсправляемыйДокумент) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаСНДС, | Товары.СтатьяРасходов, | Товары.НомерСтроки |ИЗ | Документ.КорректировкаПриобретения.Товары КАК Товары |ГДЕ | Товары.Ссылка В | (ВЫБРАТЬ | ИсправляемыйДокумент.Ссылка | ИЗ | ИсправляемыйДокумент КАК ИсправляемыйДокумент) |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Табличные части Товары и Услуги документа до корректировки Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Товары.Номенклатура, | """" КАК Содержание, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаСНДС, | Товары.СтатьяРасходов, | Товары.НомерСтроки |ПОМЕСТИТЬ ТоварыУслугиДокументаДоКорректировкиРазвернутые |ИЗ | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары |ГДЕ | Товары.Ссылка В | (ВЫБРАТЬ | ДокументДоКорректировки.Ссылка | ИЗ | ДокументДоКорректировки КАК ДокументДоКорректировки) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка), | Расходы.Содержание, | Расходы.СтавкаНДС, | ЗНАЧЕНИЕ(Справочник.НомераГТД.ПустаяСсылка), | Расходы.Количество, | Расходы.Сумма, | Расходы.СуммаНДС, | Расходы.СуммаСНДС, | Расходы.СтатьяРасходов, | Расходы.НомерСтроки |ИЗ | Документ.ПриобретениеУслугПрочихАктивов.Расходы КАК Расходы |ГДЕ | Расходы.Ссылка В | (ВЫБРАТЬ | ДокументДоКорректировки.Ссылка | ИЗ | ДокументДоКорректировки КАК ДокументДоКорректировки) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаСНДС, | Товары.СтатьяРасходов, | Товары.НомерСтроки |ИЗ | Документ.КорректировкаПриобретения.Товары КАК Товары |ГДЕ | Товары.Ссылка В | (ВЫБРАТЬ | ДокументДоКорректировки.Ссылка | ИЗ | ДокументДоКорректировки КАК ДокументДоКорректировки) |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Результирующие табличные части Товары и Услуги Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД, | СУММА(Товары.Количество) КАК Количество, | СУММА(Товары.Сумма) КАК Сумма, | СУММА(Товары.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыИсправляемогоДокумента |ИЗ | ТоварыУслугиИсправляемогоДокументаРазвернутые КАК Товары, | ДанныеДокументаПоступления КАК ДанныеДокументаПоступления |ГДЕ | Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаПоступления.ВернутьМногооборотнуюТару | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД | |ИНДЕКСИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД, | СУММА(Товары.Количество) КАК Количество, | СУММА(Товары.Сумма) КАК Сумма, | СУММА(Товары.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыДокументаДоКорректировки |ИЗ | ТоварыУслугиДокументаДоКорректировкиРазвернутые КАК Товары, | ДанныеДокументаПоступления КАК ДанныеДокументаПоступления |ГДЕ | Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаПоступления.ВернутьМногооборотнуюТару | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД | |ИНДЕКСИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД, | СУММА(Товары.Количество) КАК Количество, | СУММА(Товары.Сумма) КАК Сумма, | СУММА(Товары.СуммаНДС) КАК СуммаНДС, | СУММА(Товары.СуммаСНДС) КАК СуммаСНДС |ПОМЕСТИТЬ ТоварыИсправительногоДокумента |ИЗ | Документ.КорректировкаПриобретения.Товары КАК Товары, | ДанныеДокументаПоступления КАК ДанныеДокументаПоступления |ГДЕ | Товары.Ссылка = &Ссылка | И Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаПоступления.ВернутьМногооборотнуюТару | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД | |ИНДЕКСИРОВАТЬ ПО | Товары.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(ЕСТЬNULL(ТоварыИсправляемогоДокумента.Номенклатура, ТоварыИсправительногоДокумента.Номенклатура), ТоварыДокументаДоКорректировки.Номенклатура) КАК Номенклатура, | ЕСТЬNULL(ЕСТЬNULL(ТоварыИсправляемогоДокумента.СтавкаНДС, ТоварыИсправительногоДокумента.СтавкаНДС), ТоварыДокументаДоКорректировки.СтавкаНДС) КАК СтавкаНДС, | ЕСТЬNULL(ЕСТЬNULL(ТоварыИсправляемогоДокумента.НомерГТД, ТоварыИсправительногоДокумента.НомерГТД), ТоварыДокументаДоКорректировки.НомерГТД) КАК НомерГТД, | ТоварыДокументаДоКорректировки.Количество КАК КоличествоДоКорректировки, | ТоварыДокументаДоКорректировки.Сумма КАК СуммаДоКорректировки, | ТоварыДокументаДоКорректировки.СуммаНДС КАК СуммаНДСДоКорректировки, | ТоварыИсправляемогоДокумента.Количество КАК КоличествоДоИзменения, | ТоварыИсправляемогоДокумента.Сумма КАК СуммаДоИзменения, | ТоварыИсправляемогоДокумента.СуммаНДС КАК СуммаНДСДоИзменения, | ТоварыИсправительногоДокумента.Количество, | ТоварыИсправительногоДокумента.Сумма, | ТоварыИсправительногоДокумента.СуммаНДС, | ТоварыИсправительногоДокумента.СуммаСНДС, | ВЫБОР | КОГДА ЕСТЬNULL(ТоварыДокументаДоКорректировки.Номенклатура, ТоварыИсправляемогоДокумента.Номенклатура) ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьВДокументеПоступления |ПОМЕСТИТЬ РезультатСопоставленияТоваров |ИЗ | ТоварыИсправляемогоДокумента КАК ТоварыИсправляемогоДокумента | ПОЛНОЕ СОЕДИНЕНИЕ ТоварыИсправительногоДокумента КАК ТоварыИсправительногоДокумента | ПО ТоварыИсправляемогоДокумента.Номенклатура = ТоварыИсправительногоДокумента.Номенклатура | И ТоварыИсправляемогоДокумента.СтавкаНДС = ТоварыИсправительногоДокумента.СтавкаНДС | И ТоварыИсправляемогоДокумента.НомерГТД = ТоварыИсправительногоДокумента.НомерГТД | ПОЛНОЕ СОЕДИНЕНИЕ ТоварыДокументаДоКорректировки КАК ТоварыДокументаДоКорректировки | ПО (ТоварыДокументаДоКорректировки.Номенклатура = ТоварыИсправляемогоДокумента.Номенклатура | ИЛИ ТоварыДокументаДоКорректировки.Номенклатура = ТоварыИсправительногоДокумента.Номенклатура) | И (ТоварыДокументаДоКорректировки.СтавкаНДС = ТоварыИсправляемогоДокумента.СтавкаНДС | ИЛИ ТоварыДокументаДоКорректировки.СтавкаНДС = ТоварыИсправительногоДокумента.СтавкаНДС) | И (ТоварыДокументаДоКорректировки.НомерГТД = ТоварыИсправляемогоДокумента.НомерГТД | ИЛИ ТоварыДокументаДоКорректировки.НомерГТД = ТоварыИсправительногоДокумента.НомерГТД) | |ИНДЕКСИРОВАТЬ ПО | Номенклатура |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура КАК Номенклатура, | Товары.Содержание КАК Содержание, | МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки |ПОМЕСТИТЬ НомерСтрок |ИЗ | ТоварыУслугиИсправляемогоДокументаРазвернутые КАК Товары | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура, | Товары.Содержание | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | Содержание |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РезультатСопоставления.Номенклатура, | РезультатСопоставления.СтавкаНДС, | РезультатСопоставления.СтавкаНДС КАК СтавкаНДСДоИзменения, | РезультатСопоставления.НомерГТД, | РезультатСопоставления.НомерГТД КАК НомерГТДДоИзменения, | РезультатСопоставления.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | РезультатСопоставления.НомерГТД.СтранаПроисхождения КАК СтранаПроисхожденияДоИзменения, | РезультатСопоставления.КоличествоДоКорректировки, | РезультатСопоставления.СуммаДоКорректировки, | РезультатСопоставления.СуммаНДСДоКорректировки, | РезультатСопоставления.КоличествоДоИзменения, | РезультатСопоставления.СуммаДоИзменения, | РезультатСопоставления.СуммаНДСДоИзменения, | РезультатСопоставления.Количество, | РезультатСопоставления.Сумма, | РезультатСопоставления.СуммаНДС, | РезультатСопоставления.СуммаСНДС, | &СпособУчетаНДС КАК СпособУчетаНДС, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.КоличествоДоКорректировки ЕСТЬ NULL | ИЛИ РезультатСопоставления.КоличествоДоКорректировки = 0) | ТОГДА РезультатСопоставления.СуммаДоКорректировки / РезультатСопоставления.КоличествоДоКорректировки | ИНАЧЕ 0 | КОНЕЦ КАК ЦенаДоКорректировки, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.КоличествоДоИзменения ЕСТЬ NULL | ИЛИ РезультатСопоставления.КоличествоДоИзменения = 0) | ТОГДА РезультатСопоставления.СуммаДоИзменения / РезультатСопоставления.КоличествоДоИзменения | ИНАЧЕ 0 | КОНЕЦ КАК ЦенаДоИзменения, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.Количество ЕСТЬ NULL | ИЛИ РезультатСопоставления.Количество = 0) | ТОГДА РезультатСопоставления.Сумма / РезультатСопоставления.Количество | ИНАЧЕ 0 | КОНЕЦ КАК Цена, | РезультатСопоставления.ЕстьВДокументеПоступления |ИЗ | РезультатСопоставленияТоваров КАК РезультатСопоставления | ЛЕВОЕ СОЕДИНЕНИЕ НомерСтрок КАК НомерСтрок | ПО РезультатСопоставления.Номенклатура = НомерСтрок.НомерСтроки | |УПОРЯДОЧИТЬ ПО | РезультатСопоставления.ЕстьВДокументеПоступления УБЫВ, | НомерСтрок.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.СтатьяРасходов КАК СтатьяРасходов, | СУММА(Услуги.Количество) КАК Количество, | СУММА(Услуги.Сумма) КАК Сумма, | СУММА(Услуги.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ УслугиИсправляемогоДокумента |ИЗ | ТоварыУслугиИсправляемогоДокументаРазвернутые КАК Услуги |ГДЕ | (Услуги.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Услуги.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) | ИЛИ &ПоступлениеУслуг) | И ЕСТЬNULL(Услуги.СтатьяРасходов.ВариантРаспределенияРасходовУпр, НЕОПРЕДЕЛЕНО) <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |СГРУППИРОВАТЬ ПО | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.СтатьяРасходов | |ИНДЕКСИРОВАТЬ ПО | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | СтатьяРасходов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.СтатьяРасходов КАК СтатьяРасходов, | СУММА(Услуги.Количество) КАК Количество, | СУММА(Услуги.Сумма) КАК Сумма, | СУММА(Услуги.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ УслугиДокументаДоКорректировки |ИЗ | ТоварыУслугиДокументаДоКорректировкиРазвернутые КАК Услуги |ГДЕ | (Услуги.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Услуги.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) | ИЛИ &ПоступлениеУслуг) | И ЕСТЬNULL(Услуги.СтатьяРасходов.ВариантРаспределенияРасходовУпр, НЕОПРЕДЕЛЕНО) <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |СГРУППИРОВАТЬ ПО | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.СтатьяРасходов | |ИНДЕКСИРОВАТЬ ПО | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | СтатьяРасходов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | КорректировкаПриобретенияТовары.Номенклатура КАК Номенклатура, | КорректировкаПриобретенияТовары.Содержание КАК Содержание, | КорректировкаПриобретенияТовары.СтавкаНДС КАК СтавкаНДС, | КорректировкаПриобретенияТовары.СтатьяРасходов КАК СтатьяРасходов, | СУММА(КорректировкаПриобретенияТовары.Количество) КАК Количество, | СУММА(КорректировкаПриобретенияТовары.Сумма) КАК Сумма, | СУММА(КорректировкаПриобретенияТовары.СуммаНДС) КАК СуммаНДС, | СУММА(КорректировкаПриобретенияТовары.СуммаСНДС) КАК СуммаСНДС |ПОМЕСТИТЬ УслугиИсправительногоДокумента |ИЗ | Документ.КорректировкаПриобретения.Товары КАК КорректировкаПриобретенияТовары |ГДЕ | КорректировкаПриобретенияТовары.Ссылка = &Ссылка | И (КорректировкаПриобретенияТовары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ КорректировкаПриобретенияТовары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) | ИЛИ &ПоступлениеУслуг) | И ЕСТЬNULL(КорректировкаПриобретенияТовары.СтатьяРасходов.ВариантРаспределенияРасходовУпр, НЕОПРЕДЕЛЕНО) <> ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | |СГРУППИРОВАТЬ ПО | КорректировкаПриобретенияТовары.Номенклатура, | КорректировкаПриобретенияТовары.Содержание, | КорректировкаПриобретенияТовары.СтавкаНДС, | КорректировкаПриобретенияТовары.СтатьяРасходов | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | Содержание, | СтавкаНДС, | СтатьяРасходов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(ЕСТЬNULL(УслугиИсправляемогоДокумента.Номенклатура, УслугиИсправительногоДокумента.Номенклатура), УслугиДокументаДоКорректировки.Номенклатура) КАК Номенклатура, | ЕСТЬNULL(ЕСТЬNULL(УслугиИсправляемогоДокумента.Содержание, УслугиИсправительногоДокумента.Содержание), УслугиДокументаДоКорректировки.Содержание) КАК Содержание, | ЕСТЬNULL(ЕСТЬNULL(УслугиИсправляемогоДокумента.СтавкаНДС, УслугиИсправительногоДокумента.СтавкаНДС), УслугиДокументаДоКорректировки.СтавкаНДС) КАК СтавкаНДС, | ЕСТЬNULL(ЕСТЬNULL(УслугиИсправляемогоДокумента.СтатьяРасходов, УслугиИсправительногоДокумента.СтатьяРасходов), УслугиДокументаДоКорректировки.СтатьяРасходов) КАК СтатьяРасходов, | УслугиДокументаДоКорректировки.Количество КАК КоличествоДоКорректировки, | УслугиДокументаДоКорректировки.Сумма КАК СуммаДоКорректировки, | УслугиДокументаДоКорректировки.СуммаНДС КАК СуммаНДСДоКорректировки, | УслугиИсправляемогоДокумента.Количество КАК КоличествоДоИзменения, | УслугиИсправляемогоДокумента.Сумма КАК СуммаДоИзменения, | УслугиИсправляемогоДокумента.СуммаНДС КАК СуммаНДСДоИзменения, | УслугиИсправительногоДокумента.Количество, | УслугиИсправительногоДокумента.Сумма, | УслугиИсправительногоДокумента.СуммаНДС, | УслугиИсправительногоДокумента.СуммаСНДС, | ВЫБОР | КОГДА ЕСТЬNULL(УслугиИсправляемогоДокумента.Номенклатура, УслугиДокументаДоКорректировки.Номенклатура) ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьВДокументеПоступления |ПОМЕСТИТЬ РезультатСопоставленияУслуг |ИЗ | УслугиИсправляемогоДокумента КАК УслугиИсправляемогоДокумента | ПОЛНОЕ СОЕДИНЕНИЕ УслугиИсправительногоДокумента КАК УслугиИсправительногоДокумента | ПО УслугиИсправляемогоДокумента.Номенклатура = УслугиИсправительногоДокумента.Номенклатура | И УслугиИсправляемогоДокумента.СтавкаНДС = УслугиИсправительногоДокумента.СтавкаНДС | И УслугиИсправляемогоДокумента.СтатьяРасходов = УслугиИсправительногоДокумента.СтатьяРасходов | ПОЛНОЕ СОЕДИНЕНИЕ УслугиДокументаДоКорректировки КАК УслугиДокументаДоКорректировки | ПО (УслугиДокументаДоКорректировки.Номенклатура = УслугиИсправительногоДокумента.Номенклатура | ИЛИ УслугиДокументаДоКорректировки.Номенклатура = УслугиИсправляемогоДокумента.Номенклатура) | И (УслугиДокументаДоКорректировки.СтавкаНДС = УслугиИсправительногоДокумента.СтавкаНДС | ИЛИ УслугиДокументаДоКорректировки.СтавкаНДС = УслугиИсправляемогоДокумента.СтавкаНДС) | И (УслугиДокументаДоКорректировки.СтатьяРасходов = УслугиИсправительногоДокумента.СтатьяРасходов | ИЛИ УслугиДокументаДоКорректировки.СтатьяРасходов = УслугиИсправляемогоДокумента.СтатьяРасходов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РезультатСопоставления.Номенклатура, | РезультатСопоставления.Содержание, | РезультатСопоставления.Содержание КАК СодержаниеДоИзменения, | РезультатСопоставления.СтавкаНДС, | РезультатСопоставления.СтавкаНДС КАК СтавкаНДСДоИзменения, | РезультатСопоставления.КоличествоДоКорректировки, | РезультатСопоставления.СуммаДоКорректировки, | РезультатСопоставления.СуммаНДСДоКорректировки, | РезультатСопоставления.КоличествоДоИзменения, | РезультатСопоставления.СуммаДоИзменения, | РезультатСопоставления.СуммаНДСДоИзменения, | РезультатСопоставления.Количество, | РезультатСопоставления.Сумма, | РезультатСопоставления.СуммаНДС, | РезультатСопоставления.СуммаСНДС, | &СпособУчетаНДС КАК СпособУчетаНДС, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.Количество ЕСТЬ NULL | ИЛИ РезультатСопоставления.Количество = 0) | ТОГДА РезультатСопоставления.Сумма / РезультатСопоставления.Количество | ИНАЧЕ 0 | КОНЕЦ КАК Цена, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.КоличествоДоИзменения ЕСТЬ NULL | ИЛИ РезультатСопоставления.КоличествоДоИзменения = 0) | ТОГДА РезультатСопоставления.СуммаДоИзменения / РезультатСопоставления.КоличествоДоИзменения | ИНАЧЕ 0 | КОНЕЦ КАК ЦенаДоИзменения, | ВЫБОР | КОГДА НЕ(РезультатСопоставления.КоличествоДоКорректировки ЕСТЬ NULL | ИЛИ РезультатСопоставления.КоличествоДоКорректировки = 0) | ТОГДА РезультатСопоставления.СуммаДоКорректировки / РезультатСопоставления.КоличествоДоКорректировки | ИНАЧЕ 0 | КОНЕЦ КАК ЦенаДоКорректировки, | РезультатСопоставления.СтатьяРасходов, | РезультатСопоставления.СтатьяРасходов.КорреспондирующийСчет КАК СчетЗатрат, | РезультатСопоставления.СтатьяРасходов.КорреспондирующийСчет КАК СчетЗатратНУ, | РезультатСопоставления.ЕстьВДокументеПоступления КАК ЕстьВДокументеПоступления, | НомерСтрок.НомерСтроки КАК НомерСтроки |ИЗ | РезультатСопоставленияУслуг КАК РезультатСопоставления | ЛЕВОЕ СОЕДИНЕНИЕ НомерСтрок КАК НомерСтрок | ПО РезультатСопоставления.Номенклатура = НомерСтрок.Номенклатура | И РезультатСопоставления.Содержание = НомерСтрок.Содержание | |УПОРЯДОЧИТЬ ПО | ЕстьВДокументеПоступления УБЫВ, | НомерСтроки"; РезультатыЗапроса = Запрос.ВыполнитьПакет(); Выборка = РезультатыЗапроса[1].Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; ВыборкаДанных = РезультатыЗапроса[6].Выбрать(); Если ВыборкаДанных.Следующий() Тогда ВходящиеДанные.ДокументПоступления = ВыборкаДанных.Ссылка; КонецЕсли; ВходящиеДанные.ВидОперации = ?(Источник.ВидКорректировки = Перечисления.ХозяйственныеОперации.КорректировкаПоСогласованиюСторон, "СогласованноеИзменение", "ИсправлениеОшибки"); ВыборкаДанных = РезультатыЗапроса[7].Выбрать(); Если ВыборкаДанных.Следующий() Тогда ВходящиеДанные.ИсправляемыйДокументПоступления = ВыборкаДанных.Ссылка; КонецЕсли; ВходящиеДанные.Товары = РезультатыЗапроса[16].Выгрузить(); ВходящиеДанные.Услуги = РезультатыЗапроса[21].Выгрузить(); ВходящиеДанные.СуммаДокумента = ВходящиеДанные.Товары.Итог("СуммаСНДС") + ВходящиеДанные.Услуги.Итог("СуммаСНДС"); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("УслугиТабличнаяЧасть"); Для Каждого СтрокаТЧ Из Объект.Услуги Цикл СчетЗатрат = СтрокаТЧ.СчетЗатрат; СчетЗатратНУ = СтрокаТЧ.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТЧ.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "КорректировкаПриобретения_КорректировкаПоступления"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.КорректировкаПриобретения <Приемник>ДокументСсылка.КорректировкаПоступления <Свойства> <Свойство Поиск="true"> <Код>29 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>30 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>32 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>26 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>33 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>28 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>--> ВидОперации <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийИсправленияПоступленияРеализации"/> <Свойство> <НеЗамещать>true <Код>66 <Наименование>--> ВосстановитьНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВосстановитьНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Если ВходящиеДанные.ВидОперации = "СогласованноеИзменение" Или ТипЗнч(ВходящиеДанные.ИсправляемыйДокументПоступления) = Тип("ДокументСсылка.КорректировкаПриобретения") Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Свойство> <Код>24 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>41 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", ВходящиеДанные.ЗаказПоставщику); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>25 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>550 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>600 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>23 <Наименование>Комментарий --> Комментарий <Порядок>650 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>Склад --> Склад <Порядок>700 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>35 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>800 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>37 <Наименование>--> Грузоотправитель <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Свойство> <Код>38 <Наименование>--> ДокументПоступления <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДокументПоступления" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаПриобретения") Тогда ИмяПКО = "КорректировкаПриобретения_КорректировкаПоступления"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов") Тогда ИмяПКО = "ПУВА_ПоступлениеУслуг"; Иначе ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг"; КонецЕсли; <Свойство> <Код>39 <Наименование>--> ИсправляемыйДокументПоступления <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ИсправляемыйДокументПоступления" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаПриобретения") Тогда ИмяПКО = "КорректировкаПриобретения_КорректировкаПоступления"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов") Тогда ИмяПКО = "ПУВА_ПоступлениеУслуг"; Иначе ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг"; КонецЕсли; <Свойство> <Код>42 <Наименование>--> КорректироватьБУиНУ <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="КорректироватьБУиНУ" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>40 <Наименование>Менеджер --> Ответственный <Порядок>1050 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>31 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>3 <Наименование>--> СтавкаНДСДоИзменения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСДоИзменения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>5 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>18 <Наименование>--> КоличествоДоКорректировки <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> КоличествоДоИзменения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> Количество <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> ЦенаДоКорректировки <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> ЦенаДоИзменения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> Цена <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> СуммаДоКорректировки <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> СуммаДоИзменения <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> Сумма <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> СуммаНДСДоКорректировки <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> СуммаНДСДоИзменения <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> СуммаНДС <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> НомерГТДДоИзменения <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТДДоИзменения" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>11 <Наименование>--> НомерГТД <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>10 <Наименование>--> СтранаПроисхожденияДоИзменения <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхожденияДоИзменения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>9 <Наименование>--> СтранаПроисхождения <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>8 <Наименование>--> ЕстьВДокументеПоступления <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="ЕстьВДокументеПоступления" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>69 <Наименование>--> СпособУчетаНДС <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>43 <Наименование>--> Услуги <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>47 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>46 <Наименование>--> Содержание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>45 <Наименование>--> СодержаниеДоИзменения <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СодержаниеДоИзменения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>44 <Наименование>--> СтавкаНДСДоИзменения <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСДоИзменения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>48 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>61 <Наименование>--> КоличествоДоКорректировки <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>49 <Наименование>--> КоличествоДоИзменения <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> Количество <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>62 <Наименование>--> СуммаДоКорректировки <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>58 <Наименование>--> СуммаДоИзменения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>55 <Наименование>--> Сумма <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>63 <Наименование>--> СуммаНДСДоКорректировки <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>54 <Наименование>--> СуммаНДСДоИзменения <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>53 <Наименование>--> СуммаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>64 <Наименование>--> ЦенаДоКорректировки <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>56 <Наименование>--> ЦенаДоИзменения <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>51 <Наименование>--> Цена <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>59 <Наименование>--> СчетЗатрат <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПриВыгрузке>Отказ = Не ЗначениеЗаполнено(Значение); <Свойство> <Код>52 <Наименование>--> СчетЗатратНУ <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПриВыгрузке>Отказ = Не ЗначениеЗаполнено(Значение); <Свойство> <Код>50 <Наименование>--> ЕстьВДокументеПоступления <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="ЕстьВДокументеПоступления" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>70 <Наименование>--> СпособУчетаНДС <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>60 <Наименование>--> СтатьяРасходов <Порядок>1100 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СчетЗатрат) Тогда Значение = ОбъектКоллекции.СтатьяРасходов; ИмяПКО = ?(Найти(ОбъектКоллекции.СчетЗатрат, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>65 <Наименование>--> ЭтоЕНВД <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Свойство Отключить="true"> <Код>67 <Наименование>ДокументОснование --> <Порядок>1300 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>КорректировкаПоступления_ОприходованиеТоваров <Наименование>Документ: Корректировка поступления -> Документ: Оприходование товаров <Порядок>100 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "КорректировкаПоступления_ОприходованиеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.КорректировкаПриобретения <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>12 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>13 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "КП" + Сред(Значение, 8); <Свойство> <Код>15 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>11 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>20 <Наименование>--> СуммаДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Товары.Итог("Сумма"); <Свойство> <Код>18 <Наименование>СтатьяДоходов --> СтатьяПрочихДоходовРасходов <Порядок>350 <Источник Имя="СтатьяДоходов" Вид="Реквизит"/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиРасходовВСтатьиЗатрат <ПриВыгрузке>//КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); //Пусто = (Найти(КоррСчет, "91.01") = 0); <Свойство> <Код>17 <Наименование>Менеджер --> Ответственный <Порядок>400 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>16 <Наименование>--> Основание <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Корректировка поступления № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>14 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>3 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>8 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> НомерГТД <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>9 <Наименование>--> СтранаПроисхождения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>7 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> Количество <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>КорректировкаПоступления_СписаниеТоваров <Наименование>Документ: Корректировка поступления -> Документ: Списание товаров <Порядок>150 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "КорректировкаПоступления_СписаниеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.КорректировкаПриобретения <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>13 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>14 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "КП" + Сред(Значение, 8); <Свойство> <Код>16 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>17 <Наименование>Менеджер --> Ответственный <Порядок>350 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>21 <Наименование>--> СуммаДокумента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Товары.Итог("Себестоимость"); <Свойство> <Код>19 <Наименование>--> Основание <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Корректировка поступления № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>2 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>4 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> НомерГТД <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>5 <Наименование>--> СтранаПроисхождения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>8 <Наименование>--> Количество <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> Себестоимость <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>ВозвратТоваровПоставщику <Наименование>ПКО для документа "Возврат товаров поставщику" <Порядок>200 <Правило> <Код>ВТП_ВозвратТоваровПоставщику <Наименование>Документ: Возврат товаров поставщику <Порядок>50 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Соглашение, "Валюта")); ИначеЕсли Источник.РасшифровкаПлатежа.Количество() > 0 Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.РасшифровкаПлатежа[0].ВалютаВзаиморасчетов); Иначе ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); КонецЕсли; ЗапросТовары = Запросы.ТоварыИзВидовЗапасовДляВозвратаПоставщику; ЗапросТовары.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатЗапроса = ЗапросТовары.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатЗапроса[3].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТП_ВозвратТоваровПоставщику"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровПоставщику <Приемник>ДокументСсылка.ВозвратТоваровПоставщику <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровПоставщику"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>11 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>13 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ВходящиеДанные.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); // Заказ поставщику берем из табличной части "Расшифровка платежа" // Если там указано несколько заказов или в качестве заказа указан документ, не являющийся заказом, то ничего не далаем Запрос = Новый Запрос("ВЫБРАТЬ РАЗЛИЧНЫЕ | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК ЗаказПоставщику |ИЗ | Документ.ВозвратТоваровПоставщику.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); ТабЗаказов = Запрос.Выполнить().Выгрузить(); Если ТабЗаказов.Количество() = 1 Тогда ЗаказПоставщику = ТабЗаказов[0].ЗаказПоставщику; Если ТипЗнч(ЗаказПоставщику) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ЗаказПоставщику; КонецЕсли; КонецЕсли; Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Источник.Соглашение); Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ВходящиеДанные.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>14 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>15 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>9 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>650 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>19 <Наименование>--> Сделка <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПТУ_ЗакупкаТоваровУслуг <ПередВыгрузкой>ТабДокументовПоступления = Источник.Товары.Выгрузить(, "ДокументПоступления"); ТабДокументовПоступления.Свернуть("ДокументПоступления"); Если ТабДокументовПоступления.Количество() = 1 Тогда ДокументПоступления = ТабДокументовПоступления[0].ДокументПоступления; Если ДокументПоступления.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда Значение = ДокументПоступления; Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>16 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>750 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>17 <Наименование>Грузополучатель --> Грузополучатель <Порядок>800 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>38 <Наименование>Менеджер --> Ответственный <Порядок>850 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>18 <Наименование>Комментарий --> Комментарий <Порядок>900 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>49 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>950 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>20 <Наименование>--> Товары <Порядок>1000 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>21 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>22 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>23 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>24 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> СуммаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> ЕдиницаИзмерения <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>28 <Наименование>--> Коэффициент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>30 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Группа> <Код>55 <Наименование>--> ВозвратнаяТара <Порядок>1050 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>56 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>58 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>59 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ВТП_ВозвратТоваровКомитенту <Наименование>Документ: Возврат товаров поставщику <Порядок>100 <ПередВыгрузкой>ЗапросТовары = Запросы.ТоварыИзВидовЗапасовДляВозвратаКомитенту; ЗапросТовары.УстановитьПараметр("Ссылка", Источник.Ссылка); ЗапросТовары.УстановитьПараметр("Дата", Источник.Дата); РезультатЗапроса = ЗапросТовары.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатЗапроса[3].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатЗапроса[4].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТП_ВозвратТоваровКомитенту"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровПоставщику <Приемник>ДокументСсылка.ВозвратТоваровПоставщику <Свойства> <Свойство Поиск="true"> <Код>19 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>20 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>22 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>23 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>18 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровПоставщику"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>17 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>15 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>25 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>26 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>27 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>600 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>35 <Наименование>--> Сделка <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПТУ_ПриемНаКомиссию <ПередВыгрузкой>ТабДокументовПоступления = Источник.Товары.Выгрузить(, "ДокументПоступления"); ТабДокументовПоступления.Свернуть("ДокументПоступления"); Если ТабДокументовПоступления.Количество() = 1 Тогда ДокументПоступления = ТабДокументовПоступления[0].ДокументПоступления; Если ДокументПоступления.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда Значение = ДокументПоступления; Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>12 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>700 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>13 <Наименование>Грузополучатель --> Грузополучатель <Порядок>750 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>36 <Наименование>Менеджер --> Ответственный <Порядок>800 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>14 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>44 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>5 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ЕдиницаИзмерения <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>9 <Наименование>--> Коэффициент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>11 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>53 <Наименование>--> СтавкаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>54 <Наименование>--> СуммаНДС <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Группа> <Код>48 <Наименование>--> ВозвратнаяТара <Порядок>1000 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>49 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>50 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>51 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>52 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>45 <Наименование>ДокументПоступления --> <Порядок>1100 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПриобретениеТоваровУслуг"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>46 <Наименование>Товары --> <Порядок>1150 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>47 <Наименование>ДокументПоступления --> <Порядок>50 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПриобретениеТоваровУслуг"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ТаможеннаяДекларацияИмпорт <Наименование>ПКО для документа "Таможенная декларация импорт" <Порядок>250 <Правило> <Код>ТаможеннаяДекларацияИмпорт_ГТДИмпорт <Наименование>Документ: Таможенная декларация на импорт <Порядок>50 <ПередВыгрузкой>ВходящиеДанные = Новый Структура; ВходящиеДанные.Вставить("РасчетыВУсловныхЕдиницах"); ВходящиеДанные.Вставить("КурсДокумента"); ВходящиеДанные.Вставить("КратностьДокумента"); ВходящиеДанные.Вставить("КурсВзаиморасчетов"); ВходящиеДанные.Вставить("КратностьВзаиморасчетов"); ВходящиеДанные.Вставить("КоррСчет"); Запрос = Новый Запрос("ВЫБРАТЬ | КурсыВалют.Валюта КАК Валюта, | КурсыВалют.Курс, | КурсыВалют.Кратность |ПОМЕСТИТЬ КурсыВалют |ИЗ | РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | |ИНДЕКСИРОВАТЬ ПО | Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ВЫБОР | КОГДА Док.Соглашение.ПорядокОплаты ЕСТЬ NULL | ТОГДА ВЫБОР | КОГДА Док.ВалютаВзаиморасчетов <> &ВалютаРег | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | ИНАЧЕ ВЫБОР | КОГДА Док.Соглашение.ПорядокОплаты = ЗНАЧЕНИЕ(Перечисление.ПорядокОплатыПоСоглашениям.РасчетыВВалютеОплатаВРублях) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ | КОНЕЦ КАК РасчетыВУсловныхЕдиницах, | ЕСТЬNULL(КурсВалютыВзаиморасчетов.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыВзаиморасчетов.Кратность, 1) КАК КратностьВзаиморасчетов, | ЕСТЬNULL(КурсВалютыДокумента.Курс, 1) КАК КурсДокумента, | ЕСТЬNULL(КурсВалютыДокумента.Кратность, 1) КАК КратностьДокумента, | Док.СтатьяРасходовШтраф.КорреспондирующийСчет КАК КоррСчет |ИЗ | Документ.ТаможеннаяДекларацияИмпорт КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ КурсыВалют КАК КурсВалютыДокумента | ПО Док.Валюта = КурсВалютыДокумента.Валюта | ЛЕВОЕ СОЕДИНЕНИЕ КурсыВалют КАК КурсВалютыВзаиморасчетов | ПО (Док.ВалютаВзаиморасчетов = КурсВалютыВзаиморасчетов.Валюта)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапки = РезультатыЗапроса[1].Выбрать(); Если ДанныеШапки.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, ДанныеШапки, "РасчетыВУсловныхЕдиницах, |КурсДокумента, |КратностьДокумента, |КурсВзаиморасчетов, |КратностьВзаиморасчетов, |КоррСчет"); КонецЕсли; ВходящиеДанные.Вставить("ДокументВВалюте", Источник.Валюта <> Константы.ВалютаРегламентированногоУчета.Получить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ТаможеннаяДекларацияИмпорт_ГТДИмпорт"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ТаможеннаяДекларацияИмпорт <Приемник>ДокументСсылка.ГТДИмпорт <Свойства> <Свойство Поиск="true"> <Код>22 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>23 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>25 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>27 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>19 <Наименование>Организация --> Организация <Порядок>300 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>17 <Наименование>Контрагент --> Контрагент <Порядок>350 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>28 <Наименование>Договор --> ДоговорКонтрагентаРегл <Порядок>400 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагентаРегл" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Не ВходящиеДанные.ДокументВВалюте Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Константы.ВалютаРегламентированногоУчета.Получить()); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ВходящиеДанные.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>42 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Если Не ВходящиеДанные.ДокументВВалюте Тогда Пусто = Истина; Иначе ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; КонецЕсли; Иначе Если Не ВходящиеДанные.ДокументВВалюте Тогда Пусто = Истина; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "Прочее"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ВходящиеДанные.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Источник.Соглашение); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ИмяПКО = "ДоговорыКонтрагентов"; ВыгрузитьОбъект = Истина; КонецЕсли; КонецЕсли; <Свойство> <Код>20 <Наименование>ТаможенныйСбор --> ТаможенныйСбор <Порядок>500 <Источник Имя="ТаможенныйСбор" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ТаможенныйСбор" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если ВходящиеДанные.ДокументВВалюте Тогда Значение = 0; КонецЕсли; <Свойство> <Код>21 <Наименование>ТаможенныйШтраф --> ТаможенныйШтраф <Порядок>550 <Источник Имя="ТаможенныйШтраф" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ТаможенныйШтраф" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если ВходящиеДанные.ДокументВВалюте Тогда Значение = 0; КонецЕсли; <Свойство> <Код>43 <Наименование>ТаможенныйСбор --> ТаможенныйСборВал <Порядок>600 <Источник Имя="ТаможенныйСбор" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ТаможенныйСборВал" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Не ВходящиеДанные.ДокументВВалюте Тогда Значение = 0; КонецЕсли; <Свойство> <Код>44 <Наименование>ТаможенныйШтраф --> ТаможенныйШтрафВал <Порядок>650 <Источник Имя="ТаможенныйШтраф" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ТаможенныйШтрафВал" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Если Не ВходящиеДанные.ДокументВВалюте Тогда Значение = 0; КонецЕсли; <Свойство> <Код>26 <Наименование>Менеджер --> Ответственный <Порядок>700 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>32 <Наименование>--> КурсДокумента <Порядок>750 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> КратностьДокумента <Порядок>800 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> КурсВзаиморасчетов <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> КратностьВзаиморасчетов <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <НеЗамещать>true <Код>38 <Наименование>--> НДСПредъявленКВычету <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="НДСПредъявленКВычету" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>47 <Наименование>НомерДекларации --> НомерГТД <Порядок>1000 <Источник Имя="НомерДекларации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД_ПоПолямПоиска <ПриВыгрузке>Значение = Новый Структура("Код", Значение); <Свойство> <Код>39 <Наименование>СтатьяРасходовШтраф --> СтатьяПрочихДоходовРасходов <Порядок>1150 <Источник Имя="СтатьяРасходовШтраф" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиРасходов"/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиРасходовВПрочиеДоходыИРасходы <ПередВыгрузкой>Пусто = (Найти(ВходящиеДанные.КоррСчет, "91.02") = 0); <Свойство> <Код>16 <Наименование>Комментарий --> Комментарий <Порядок>1200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>1 <Наименование>Разделы --> Разделы <Порядок>1250 <Источник Имя="Разделы" Вид="ТабличнаяЧасть"/> <Приемник Имя="Разделы" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>50 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>3 <Наименование>СтавкаПошлины --> СтавкаПошлины <Порядок>100 <Источник Имя="СтавкаПошлины" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СтавкаПошлины" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>СуммаНДС --> СуммаНДС <Порядок>150 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>СуммаПошлины --> СуммаПошлины <Порядок>200 <Источник Имя="СуммаПошлины" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПошлины" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>ТаможеннаяСтоимость --> ТаможеннаяСтоимость <Порядок>250 <Источник Имя="ТаможеннаяСтоимость" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ТаможеннаяСтоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>45 <Наименование>--> НДСВВалюте <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="НДСВВалюте" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ДокументВВалюте; <Свойство> <Код>46 <Наименование>--> ПошлинаВВалюте <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ПошлинаВВалюте" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ДокументВВалюте; <Свойство Отключить="true"> <Код>48 <Наименование>НомерРаздела --> <Порядок>400 <Источник Имя="НомерРаздела" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Группа> <Код>7 <Наименование>Товары --> Товары <Порядок>1300 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>9 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>8 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>НомерРаздела --> НомерРаздела <Порядок>150 <Источник Имя="НомерРаздела" Вид="Реквизит" Тип="Число"/> <Приемник Имя="НомерРаздела" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>СуммаНДС --> СуммаНДС <Порядок>200 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>СуммаПошлины --> СуммаПошлины <Порядок>250 <Источник Имя="СуммаПошлины" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаПошлины" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>13 <Наименование>--> ДокументПартии <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументПартии" Вид="Реквизит" Тип="ДокументСсылка.ПоступлениеТоваровУслуг"/> <КодПравилаКонвертации>ПТУ_ЗакупкаИмпорт <ПередВыгрузкой>Значение = Источник.ПоступлениеТоваров; <Свойство> <Код>14 <Наименование>СтранаПроисхождения --> СтранаПроисхождения <Порядок>350 <Источник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>15 <Наименование>ТаможеннаяСтоимость --> ФактурнаяСтоимость <Порядок>400 <Источник Имя="ТаможеннаяСтоимость" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ФактурнаяСтоимость" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>49 <Наименование>--> СпособУчетаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <ПередВыгрузкой>Запрос = Новый Запрос(" |ВЫБРАТЬ | ПриобретениеТоваровУслуг.ЗакупкаПодДеятельность КАК СпособУчетаНДС |ИЗ | Документ.ТаможеннаяДекларацияИмпорт КАК ТаможеннаяДекларацияИмпорт | ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПриобретениеТоваровУслуг КАК ПриобретениеТоваровУслуг | ПО ТаможеннаяДекларацияИмпорт.ПоступлениеТоваров = ПоступлениеТоваровУслуг.Ссылка |ГДЕ | ТаможеннаяДекларацияИмпорт.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатЗапроса = Запрос.Выполнить(); Если РезультатЗапроса.Пустой() Тогда Значение = "ПринимаетсяКВычету"; Иначе Выборка = РезультатЗапроса.Выбрать(); Выборка.Следующий(); Значение = Выборка.СпособУчетаНДС; КонецЕсли; <Свойство Отключить="true"> <Код>34 <Наименование>ВалютаВзаиморасчетов --> <Порядок>1350 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>35 <Наименование>Партнер --> <Порядок>1400 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>36 <Наименование>Соглашение --> <Порядок>1450 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСПоставщиками"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>Продажа <Наименование>ПКО для документов реализации <Порядок>300 <Группа> <Код>РеализацияТоваровУслуг <Наименование>ПКО для документа "Реализация товаров и услуг" <Порядок>50 <Правило> <Код>РТУ_ПродажаТоваровУслуг <Наименование>Документ: Реализация товаров услуг <Порядок>50 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); Запросы.ТоварыИзВидовЗапасовДляРеализацииТУПродажа.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запросы.ТоварыИзВидовЗапасовДляРеализацииТУПродажа.ВыполнитьПакет(); ВходящиеДанные.Вставить("Услуги", РезультатыЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("Товары", РезультатыЗапроса[4].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатыЗапроса[5].Выгрузить()); //ПСК Тимохов// Временно отключаем выгрузку этого типа документов //Если Тип("ДокументСсылка.ОтчетКомитенту") = ТипЗнч(Источник) Тогда // Отказ = Истина; //ИначеЕсли Тип("ДокументСсылка.ОтчетКомиссионера") = ТипЗнч(Источник) Тогда // Отказ = Истина; //КонецЕсли; //ПСК+ Сазанский Если ТипЗнч(Источник) = Тип("ДокументСсылка.ВыкупВозвратнойТарыКлиентом") Тогда Отказ = Истина; КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РТУ_ПродажаТоваровУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РеализацияТоваровУслуг <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>14 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>6 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>20 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке> Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>16 <Наименование>Договор --> ДоговорКонтрагента <Порядок>600 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Источник.Сделка); Значение.Вставить("ЗаказКлиентаУТ11", Источник.ЗаказКлиента); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>17 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>18 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>700 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <НеЗамещать>true <Код>19 <Наименование>--> СпособЗачетаАвансов <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>59 <Наименование>ЗаказКлиента --> СчетНаОплатуПокупателю <Порядок>800 <Источник Имя="ЗаказКлиента" Вид="Реквизит"/> <Приемник Имя="СчетНаОплатуПокупателю" Вид="Реквизит" Тип="ДокументСсылка.СчетНаОплатуПокупателю"/> <КодПравилаКонвертации>СНОП_СчетНаОплатуПокупателю <ПередВыгрузкой>Отказ = ТипЗнч(Источник.ЗаказКлиента) <> Тип("ДокументСсылка.ЗаказКлиента"); <Свойство> <Код>7 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>850 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>8 <Наименование>Грузополучатель --> Грузополучатель <Порядок>900 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>5 <Наименование>АдресДоставки --> АдресДоставки <Порядок>950 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>68 <Наименование>Руководитель --> Руководитель <Порядок>1000 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>67 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1050 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>69 <Наименование>ДоверенностьВыдана --> ДоверенностьВыдана <Порядок>1100 <Источник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>70 <Наименование>ДоверенностьДата --> ДоверенностьДата <Порядок>1150 <Источник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>71 <Наименование>ДоверенностьНомер --> ДоверенностьНомер <Порядок>1200 <Источник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>72 <Наименование>ДоверенностьЛицо --> ДоверенностьЧерезКого <Порядок>1250 <Источник Имя="ДоверенностьЛицо" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьЧерезКого" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>42 <Наименование>Менеджер --> Ответственный <Порядок>1300 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>1350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>60 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>22 <Наименование>--> Товары <Порядок>1450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>24 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>31 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>32 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>26 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> СуммаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> Цена <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>30 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>41 <Наименование>--> СчетУчета <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Отказ = ОбъектКоллекции.СчетУчета = Неопределено; <Группа> <Код>33 <Наименование>--> Услуги <Порядок>1500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>35 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>36 <Наименование>--> Содержание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>34 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>40 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>38 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СуммаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Группа> <Код>62 <Наименование>--> ВозвратнаяТара <Порядок>1550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>63 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>64 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>65 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>66 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>61 <Наименование>Соглашение --> <Порядок>1600 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>44 <Наименование>Товары --> <Порядок>1650 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>45 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>46 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>47 <Наименование>СтавкаНДС --> <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>48 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>49 <Наименование>СуммаНДС --> <Порядок>250 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>50 <Наименование>Цена --> <Порядок>300 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РТУ_ПередачаТоваровНаКомиссию <Наименование>Документ: Реализация товаров услуг <Порядок>100 <ПередВыгрузкой>Запросы.ТоварыИзВидовЗапасовДляРеализацииТУКомиссия.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запросы.ТоварыИзВидовЗапасовДляРеализацииТУКомиссия.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатыЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатыЗапроса[3].Выгрузить()); //ПСК Тимохов// Временно отключаем выгрузку этого типа документов Если Тип("ДокументСсылка.ОтчетОРозничныхПродажах") = ТипЗнч(Источник) Тогда Отказ = Истина; КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РТУ_ПередачаТоваровНаКомиссию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.РеализацияТоваровУслуг <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>21 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>22 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>18 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>25 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>20 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>13 <Наименование>--> БанковскийСчетОрганизации <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если Тип("ДокументСсылка.ОтчетОРозничныхПродажах") <> ТипЗнч(Источник) Тогда Значение = Источник.БанковскийСчетОрганизации; Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; Иначе Значение = ""; КонецЕсли; <Свойство> <Код>31 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>17 <Наименование>--> Контрагент <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Тип("ДокументСсылка.ОтчетОРозничныхПродажах") <> ТипЗнч(Источник) Тогда Значение = Источник.Контрагент; КонецЕсли; <Свойство> <Код>19 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>27 <Наименование>--> ДоговорКонтрагента <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если Тип("ДокументСсылка.ОтчетОРозничныхПродажах") <> ТипЗнч(Источник) Тогда Значение = Источник.Договор; Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; КонецЕсли; <Свойство> <Код>28 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>29 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>700 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <НеЗамещать>true <Код>30 <Наименование>--> СпособЗачетаАвансов <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "НеЗачитывать"; <Свойство> <Код>52 <Наименование>ЗаказКлиента --> СчетНаОплатуПокупателю <Порядок>800 <Источник Имя="ЗаказКлиента" Вид="Реквизит"/> <Приемник Имя="СчетНаОплатуПокупателю" Вид="Реквизит" Тип="ДокументСсылка.СчетНаОплатуПокупателю"/> <КодПравилаКонвертации>СНОП_СчетНаОплатуПокупателю <ПередВыгрузкой>Отказ = ТипЗнч(Источник.ЗаказКлиента) <> Тип("ДокументСсылка.ЗаказКлиента"); <Свойство> <Код>14 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>850 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>Грузополучатель --> Грузополучатель <Порядок>900 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>12 <Наименование>АдресДоставки --> АдресДоставки <Порядок>950 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>61 <Наименование>Руководитель --> Руководитель <Порядок>1000 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>60 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1050 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>62 <Наименование>ДоверенностьВыдана --> ДоверенностьВыдана <Порядок>1100 <Источник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>63 <Наименование>ДоверенностьДата --> ДоверенностьДата <Порядок>1150 <Источник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>64 <Наименование>ДоверенностьНомер --> ДоверенностьНомер <Порядок>1200 <Источник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>65 <Наименование>ДоверенностьЛицо --> ДоверенностьЧерезКого <Порядок>1250 <Источник Имя="ДоверенностьЛицо" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьЧерезКого" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>Менеджер --> Ответственный <Порядок>1300 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>16 <Наименование>Комментарий --> Комментарий <Порядок>1350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>53 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>1450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>2 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>4 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>5 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> СуммаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> ЕдиницаИзмерения <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>9 <Наименование>--> Коэффициент <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>11 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>33 <Наименование>--> ПереданныеСчетУчета <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ПереданныеСчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Отказ = ОбъектКоллекции.ПереданныеСчетУчета = Неопределено; <Свойство> <Код>34 <Наименование>--> СчетУчета <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Отказ = ОбъектКоллекции.СчетУчета = Неопределено; <Группа> <Код>55 <Наименование>--> ВозвратнаяТара <Порядок>1500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>56 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>58 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>59 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>54 <Наименование>Соглашение --> <Порядок>1550 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ВозвратОтПокупателя <Наименование>ВозвратОтПокупателя <Порядок>100 <Правило> <Код>ВТОП_ВозвратТоваровОтРозничногоПокупателя <Наименование>Документ: Возврат товаров от клиента <Порядок>50 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Соглашение, "Валюта")); ИначеЕсли Источник.РасшифровкаПлатежа.Количество() > 0 Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.РасшифровкаПлатежа[0].ВалютаВзаиморасчетов); Иначе ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); КонецЕсли; ЗапросТовары = Запросы.ТоварыИзВидовЗапасовДляВозвратаОтКлиента; ЗапросТовары.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатЗапроса = ЗапросТовары.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатЗапроса[3].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТОП_ВозвратТоваровОтРозничногоПокупателя"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровОтКлиента <Приемник>ДокументСсылка.ВозвратТоваровОтПокупателя <Свойства> <Свойство Поиск="true"> <Код>16 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>17 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>19 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>20 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровОтПокупателя"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>14 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>11 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>25 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; <Свойство> <Код>26 <Наименование>Соглашение --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Кратность; <Свойство> <Код>27 <Наименование>Соглашение --> КурсВзаиморасчетов <Порядок>600 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Курс; <Свойство> <Код>23 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>650 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство Отключить="true"> <Код>21 <Наименование>--> Сделка <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ОРП_ОтчетОРозничныхПродажах <ПередВыгрузкой>Если Источник.ВозвратПорчи Тогда Пусто = Истина; Иначе ТабДокументовРеализации = Источник.Товары.Выгрузить(, "ДокументРеализации"); ТабДокументовРеализации.Свернуть("ДокументРеализации"); Если ТабДокументовРеализации.Количество() = 1 Тогда Значение = ТабДокументовРеализации[0].ДокументРеализации; КонецЕсли; КонецЕсли; Если НЕ ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>63 <Наименование>НомерРасходногоКассовогоОрдера --> НомерРасходногоКассовогоОрдера <Порядок>800 <Источник Имя="НомерРасходногоКассовогоОрдера" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерРасходногоКассовогоОрдера" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>62 <Наименование>ДатаРасходногоКассовогоОрдера --> ДатаРасходногоКассовогоОрдера <Порядок>850 <Источник Имя="ДатаРасходногоКассовогоОрдера" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаРасходногоКассовогоОрдера" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>28 <Наименование>Менеджер --> Ответственный <Порядок>900 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>950 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1000 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>1050 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>2 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>8 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>6 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>29 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>42 <Наименование>--> Себестоимость <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>64 <Наименование>--> СпособУчетаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>55 <Наименование>--> ВозвратнаяТара <Порядок>1100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>56 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Свойство> <Код>58 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>60 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>43 <Наименование>ВозвратПорчи --> <Порядок>1150 <Источник Имя="ВозвратПорчи" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>52 <Наименование>Партнер --> <Порядок>1200 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>39 <Наименование>РасшифровкаПлатежа --> <Порядок>1300 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>40 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>44 <Наименование>Товары --> <Порядок>1350 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>45 <Наименование>Порча --> <Порядок>50 <Источник Имя="Порча" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>46 <Наименование>НоменклатураОприходование --> <Порядок>100 <Источник Имя="НоменклатураОприходование" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>54 <Наименование>ДокументРеализации --> <Порядок>150 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Поиск="true"> <Код>53 <Наименование>ДокументРеализации --> Сделка <Порядок>1400 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ОРП_ОтчетОРозничныхПродажах <Значения/> <Правило> <Код>ВТОП_ВозвратТоваровОтПокупателя <Наименование>Документ: Возврат товаров от клиента <Порядок>100 <ПередВыгрузкой> Выполнить(Алгоритмы.ОграничениеВыгрузкиПоДополнительнымСвойствам); Если ЗначениеЗаполнено(Источник.Соглашение) Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Соглашение, "Валюта")); ИначеЕсли Источник.РасшифровкаПлатежа.Количество() > 0 Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.РасшифровкаПлатежа[0].ВалютаВзаиморасчетов); Иначе ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); КонецЕсли; РеквизитыСчетФактуры = Неопределено; Документы.СчетФактураПолученный.СчетаФактурыПоОснованию(Источник.Ссылка, Источник.Организация, РеквизитыСчетФактуры); ВходящиеДанные.Вставить("ПокупателемВыставляетсяСчетФактураНаВозврат", ЗначениеЗаполнено(РеквизитыСчетФактуры.Ссылка)); ВходящиеДанные.Вставить("ЭтоЕНВД", Ложь); ЗапросТовары = Запросы.ТоварыИзВидовЗапасовДляВозвратаОтКлиента; ЗапросТовары.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатЗапроса = ЗапросТовары.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатЗапроса[3].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТОП_ВозвратТоваровОтПокупателя"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровОтКлиента <Приемник>ДокументСсылка.ВозвратТоваровОтПокупателя <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровОтПокупателя"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>9 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ВходящиеДанные.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Источник.Сделка); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); // Заказ клиента берем из табличной части "Расшифровка платежа" // Если там указано несколько заказов или в качестве заказа указан документ, не являющийся заказом, то ничего не далаем Запрос = Новый Запрос("ВЫБРАТЬ РАЗЛИЧНЫЕ | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК ЗаказКлиента |ИЗ | Документ.ВозвратТоваровОтКлиента.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); ТабЗаказов = Запрос.Выполнить().Выгрузить(); Если ТабЗаказов.Количество() = 1 Тогда ЗаказКлиента = ТабЗаказов[0].ЗаказКлиента; Если ТипЗнч(ЗаказКлиента) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = ЗаказКлиента; КонецЕсли; КонецЕсли; Если ЗначениеЗаполнено(Источник.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ВходящиеДанные.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>16 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Кратность; <Свойство> <Код>17 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Курс; <Свойство> <Код>15 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>650 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>14 <Наименование>ДокументРеализации --> Сделка <Порядок>700 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>РТУ_ПродажаТоваровУслуг <ПередВыгрузкой>Если Источник.ВозвратПорчи Тогда Значение = Документы.РеализацияТоваровУслуг.ПустаяСсылка(); КонецЕсли; <Свойство> <Код>13 <Наименование>--> ПокупателемВыставляетсяСчетФактураНаВозврат <Порядок>750 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ПокупателемВыставляетсяСчетФактураНаВозврат" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>49 <Наименование>--> ОтразитьВКнигеПокупок <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="ОтразитьВКнигеПокупок" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>38 <Наименование>Менеджер --> Ответственный <Порядок>1000 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>18 <Наименование>Комментарий --> Комментарий <Порядок>1050 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>42 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>19 <Наименование>--> Товары <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>21 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>20 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>27 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>22 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>25 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>37 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>47 <Наименование>--> Себестоимость <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>60 <Наименование>--> СпособУчетаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>54 <Наименование>--> ВозвратнаяТара <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>55 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>56 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Свойство> <Код>57 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>59 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>43 <Наименование>Соглашение --> <Порядок>1250 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>44 <Наименование>ВозвратПорчи --> ВозвратПорчи <Порядок>1300 <Источник Имя="ВозвратПорчи" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ВозвратПорчи <Свойство> <Код>53 <Наименование>--> ЭтоЕНВД <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Группа Отключить="true"> <Код>40 <Наименование>РасшифровкаПлатежа --> <Порядок>1400 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>41 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>45 <Наименование>Товары --> <Порядок>1450 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>46 <Наименование>Порча --> <Порядок>50 <Источник Имя="Порча" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>48 <Наименование>НоменклатураОприходование --> <Порядок>100 <Источник Имя="НоменклатураОприходование" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>51 <Наименование>ДокументРеализации --> <Порядок>150 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>52 <Наименование>ДокументРеализации --> <Порядок>1550 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ВТОП_ВозвратТоваровОтКомиссионера <Наименование>Документ: Возврат товаров от клиента <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("ЭтоЕНВД", Ложь); ЗапросТовары = Запросы.ТоварыИзВидовЗапасовДляВозвратаОтКомиссионера; ЗапросТовары.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатЗапроса = ЗапросТовары.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатЗапроса[2].Выгрузить()); ВходящиеДанные.Вставить("ВозвратнаяТара", РезультатЗапроса[3].Выгрузить()); <ПослеВыгрузкиВФайл>Если Источник.ВозвратПорчи Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Возврат товаров от клиента"" с операцией ""Возврат от комиссионера"" отражающий возврат порчи |Последствия: документ выгрузится в базу-приемник непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта["ВозвратПорчи"] Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Возврат товаров от покупателя"" на основании документа ""Возврат товаров от клиента"" с операцией ""Возврат от комиссионера"" отражающего возврат порчи |Последствия: документ загрузился непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'")); // выполняем запись в протокол и ЖР //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТОП_ВозвратТоваровОтКомиссионера"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровОтКлиента <Приемник>ДокументСсылка.ВозвратТоваровОтПокупателя <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>4 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Если Источник.ВозвратПорчи Тогда Значение = Ложь; КонецЕсли; <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>2 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровОтПокупателя"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>9 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>450 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>11 <Наименование>Договор --> ДоговорКонтрагента <Порядок>500 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>15 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>16 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>600 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс;; <Свойство> <Код>13 <Наименование>--> Сделка <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>РТУ_ПередачаТоваровНаКомиссию <ПередВыгрузкой>ТабДокументовРеализации = Источник.Товары.Выгрузить(, "ДокументРеализации"); ТабДокументовРеализации.Свернуть("ДокументРеализации"); Если ТабДокументовРеализации.Количество() = 1 Тогда Значение = ТабДокументовРеализации[0].ДокументРеализации; КонецЕсли; Если НЕ ЗначениеЗаполнено(Значение) Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>27 <Наименование>Менеджер --> Ответственный <Порядок>900 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>17 <Наименование>Комментарий --> Комментарий <Порядок>950 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>39 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1000 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>41 <Наименование>ВозвратПорчи --> ВозвратПорчи <Порядок>1050 <Источник Имя="ВозвратПорчи" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ВозвратПорчи <Группа> <Код>18 <Наименование>--> Товары <Порядок>1100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>20 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>19 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>23 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>29 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>28 <Наименование>--> ПереданныеСчетУчета <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ПереданныеСчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>50 <Наименование>--> ОтражениеВУСН <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Свойство> <Код>58 <Наименование>--> СпособУчетаНДС <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>54 <Наименование>--> ВозвратнаяТара <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВозвратнаяТара" Вид="ТабличнаяЧасть"/> <Свойство> <Код>55 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>56 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>53 <Наименование>--> ЭтоЕНВД <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Свойство Отключить="true"> <Код>40 <Наименование>Соглашение --> <Порядок>1250 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>42 <Наименование>Товары --> <Порядок>1350 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>43 <Наименование>Порча --> <Порядок>50 <Источник Имя="Порча" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>44 <Наименование>НоменклатураОприходование --> <Порядок>100 <Источник Имя="НоменклатураОприходование" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>52 <Наименование>ДокументРеализации --> <Порядок>150 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>51 <Наименование>ДокументРеализации --> <Порядок>1450 <Источник Имя="ДокументРеализации" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>КорректировкаРеализации <Наименование>ПКО для документа "Корректировка реализации" <Порядок>150 <Правило> <Код>КорректировкаРеализации_КорректировкаРеализации <Наименование>Документ: Корректировка реализации <Порядок>50 <ПередВыгрузкой>Если Не ТолькоПолучитьУзелСсылки Тогда ВходящиеДанные = Новый Структура(); //ВходящиеДанные.Вставить("ВидОперации"); ВходящиеДанные.Вставить("ДокументРеализации"); ВходящиеДанные.Вставить("ЗаказКлиента"); ВходящиеДанные.Вставить("ИсправляемыйДокументРеализации"); ВходящиеДанные.Вставить("СуммаДокумента"); ВходящиеДанные.Вставить("Товары"); ВходящиеДанные.Вставить("Услуги"); // Данные исходного документа реализации Запрос = Новый Запрос(); Запрос.УстановитьПараметр("ДокументОснование", Источник.ДокументОснование); Запрос.УстановитьПараметр("МоментВремени", Источник.МоментВремени()); Запрос.УстановитьПараметр("РеализацияУслуг", ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.АктВыполненныхРабот")); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("ЦенаВключаетНДС", Источник.ЦенаВключаетНДС); // Данные исходного документа реализации Запрос.Текст = "ВЫБРАТЬ | Док.ЗаказКлиента, | Док.ВернутьМногооборотнуюТару КАК ВернутьМногооборотнуюТару |ПОМЕСТИТЬ ДанныеДокументаРеализации |ИЗ | Документ.РеализацияТоваровУслуг КАК Док |ГДЕ | Док.Ссылка = &ДокументОснование | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Док.ЗаказКлиента, | ЛОЖЬ |ИЗ | Документ.АктВыполненныхРабот КАК Док |ГДЕ | Док.Ссылка = &ДокументОснование |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Док.ЗаказКлиента |ИЗ | ДанныеДокументаРеализации КАК Док |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Ссылка на исправляемый документ Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Док.Ссылка, | Док.МоментВремени, | ЛОЖЬ КАК ЭтоДокументОснование |ПОМЕСТИТЬ ПоследовательностьДокументов |ИЗ | Документ.КорректировкаРеализации КАК Док |ГДЕ | Док.ДокументОснование = &ДокументОснование | И Док.МоментВремени <= &МоментВремени | И Док.Проведен | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Док.ДокументОснование, | Док.ДокументОснование.МоментВремени, | ИСТИНА |ИЗ | Документ.КорректировкаРеализации КАК Док |ГДЕ | Док.Ссылка = &Ссылка | |ИНДЕКСИРОВАТЬ ПО | Док.Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ПоследовательностьДокументов.Ссылка, | ПоследовательностьДокументов.МоментВремени, | ПоследовательностьДокументов.ЭтоДокументОснование, | МАКСИМУМ(ВЫБОР | КОГДА СчетФактураВыданный.Ссылка ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ) КАК Корректировочный |ПОМЕСТИТЬ ПараметрыДокументовПоследовательности |ИЗ | ПоследовательностьДокументов КАК ПоследовательностьДокументов | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетФактураВыданный КАК СчетФактураВыданный | ПО ПоследовательностьДокументов.Ссылка = СчетФактураВыданный.ДокументОснование | И (СчетФактураВыданный.Корректировочный) | И (НЕ СчетФактураВыданный.ПометкаУдаления) | |СГРУППИРОВАТЬ ПО | ПоследовательностьДокументов.Ссылка, | ПоследовательностьДокументов.МоментВремени, | ПоследовательностьДокументов.ЭтоДокументОснование |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Параметры1.Ссылка, | Параметры1.Корректировочный, | МИНИМУМ(ВЫБОР | КОГДА Параметры1.Корректировочный | И НЕ Параметры2.Корректировочный | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ) КАК ИсходныйКорректировочный |ПОМЕСТИТЬ ПараметрыОтбора |ИЗ | ПараметрыДокументовПоследовательности КАК Параметры1 | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыДокументовПоследовательности КАК Параметры2 | ПО (Параметры1.Ссылка = &Ссылка) | И (Параметры2.Ссылка <> &Ссылка) | |СГРУППИРОВАТЬ ПО | Параметры1.Ссылка, | Параметры1.Корректировочный |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка, | ИсправляемыеДокументы.МоментВремени |ПОМЕСТИТЬ ИсправляемыйДокумент |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО (ИсправляемыеДокументы.Корректировочный = ПараметрыОтбора.Корректировочный | ИЛИ ПараметрыОтбора.ИсходныйКорректировочный | ИЛИ ИсправляемыеДокументы.ЭтоДокументОснование) | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.МоментВремени УБЫВ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ИсправляемыйДокумент.Ссылка |ИЗ | ИсправляемыйДокумент КАК ИсправляемыйДокумент |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Вид операции Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | ПараметрыОтбора.ИсходныйКорректировочный |ИЗ | ПараметрыОтбора |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Ссылка на основание исправления (корректировки) и документ до корректировки Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО (ИсправляемыеДокументы.Корректировочный = ПараметрыОтбора.Корректировочный | ИЛИ ИсправляемыеДокументы.ЭтоДокументОснование) | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.ЭтоДокументОснование, | ИсправляемыеДокументы.МоментВремени |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ИсправляемыеДокументы.Ссылка, | ИсправляемыеДокументы.МоментВремени |ПОМЕСТИТЬ ДокументДоКорректировки |ИЗ | ПараметрыДокументовПоследовательности КАК ИсправляемыеДокументы | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыОтбора КАК ПараметрыОтбора | ПО ПараметрыОтбора.Корректировочный И Не ПараметрыОтбора.ИсходныйКорректировочный | И ИсправляемыеДокументы.Корректировочный = Ложь | И ИсправляемыеДокументы.Ссылка <> ПараметрыОтбора.Ссылка | |УПОРЯДОЧИТЬ ПО | ИсправляемыеДокументы.ЭтоДокументОснование, | ИсправляемыеДокументы.МоментВремени УБЫВ |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Товары исходной реализации Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Аналитика.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.ВидЗапасов.ТипЗапасов КАК ТипЗапасов, | СУММА(Товары.Количество) КАК Количество, | СУММА(Товары.СуммаСНДС) КАК СуммаСНДС, | СУММА(Товары.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыИсходнойРеализации |ИЗ | Документ.РеализацияТоваровУслуг.ВидыЗапасов КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО Товары.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики |ГДЕ | Товары.Ссылка = &ДокументОснование | И (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ Товары.Ссылка.ВернутьМногооборотнуюТару) | |СГРУППИРОВАТЬ ПО | Аналитика.Номенклатура, | Товары.СтавкаНДС, | Товары.НомерГТД, | Товары.ВидЗапасов.ТипЗапасов |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Изменения в товарах Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | КорректировкаВыручки.Ссылка, | Аналитика.Номенклатура, | КорректировкаВыручки.НомерГТД, | КорректировкаВыручки.СтавкаНДС, | КорректировкаВыручки.ВидЗапасов.ТипЗапасов КАК ТипЗапасов, | 0 КАК Количество, | КорректировкаВыручки.СуммаНДС КАК СуммаНДС, | КорректировкаВыручки.СуммаСНДС КАК СуммаСНДС |ПОМЕСТИТЬ ИзмененияВТоварахНеФильтрованые |ИЗ | Документ.КорректировкаРеализации.ВидыЗапасовКорректировкаВыручки КАК КорректировкаВыручки | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО КорректировкаВыручки.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики, | ДанныеДокументаРеализации КАК ДанныеДокументаРеализации |ГДЕ | (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаРеализации.ВернутьМногооборотнуюТару) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ТоварыКОприходованию.Ссылка, | Аналитика.Номенклатура, | ТоварыКОприходованию.НомерГТД, | ТоварыКОприходованию.СтавкаНДС, | ТоварыКОприходованию.ВидЗапасов.ТипЗапасов, | -ТоварыКОприходованию.Количество, | -ТоварыКОприходованию.СуммаНДС, | -ТоварыКОприходованию.СуммаСНДС |ИЗ | Документ.КорректировкаРеализации.ВидыЗапасовОприходование КАК ТоварыКОприходованию | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО ТоварыКОприходованию.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики, | ДанныеДокументаРеализации КАК ДанныеДокументаРеализации |ГДЕ | (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаРеализации.ВернутьМногооборотнуюТару) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ТоварыКСписанию.Ссылка, | Аналитика.Номенклатура, | ТоварыКСписанию.НомерГТД, | ТоварыКСписанию.СтавкаНДС, | ТоварыКСписанию.ВидЗапасов.ТипЗапасов, | ТоварыКСписанию.Количество, | ТоварыКСписанию.СуммаНДС, | ТоварыКСписанию.СуммаСНДС |ИЗ | Документ.КорректировкаРеализации.ВидыЗапасовСписание КАК ТоварыКСписанию | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО ТоварыКСписанию.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики, | ДанныеДокументаРеализации КАК ДанныеДокументаРеализации |ГДЕ | (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) | И НЕ ДанныеДокументаРеализации.ВернутьМногооборотнуюТару) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Изменения.Номенклатура, | Изменения.НомерГТД, | Изменения.СтавкаНДС, | Изменения.ТипЗапасов, | Изменения.Количество, | Изменения.СуммаНДС, | Изменения.СуммаСНДС, | ВЫБОР | КОГДА НЕ Последовательность.Корректировочный | И Последовательность.МоментВремени <= ДокументДоКорректировки.МоментВремени | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК ИзмененияДоКорректировки, | ВЫБОР | КОГДА Последовательность.МоментВремени <= ИсправляемыйДокумент.МоментВремени | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК ИзмененияДоИсправления |ПОМЕСТИТЬ ИзмененияВТоварах |ИЗ | ИзмененияВТоварахНеФильтрованые КАК Изменения | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ПараметрыДокументовПоследовательности КАК Последовательность | ПО (НЕ Последовательность.ЭтоДокументОснование) | И Изменения.Ссылка = Последовательность.Ссылка | ЛЕВОЕ СОЕДИНЕНИЕ ДокументДоКорректировки КАК ДокументДоКорректировки | ПО (ИСТИНА), | ИсправляемыйДокумент КАК ИсправляемыйДокумент |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Табличные части Товары (до корректировки, до исправления, после исправления) Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | ТоварыИсходнойРеализации.Номенклатура, | ТоварыИсходнойРеализации.СтавкаНДС, | ТоварыИсходнойРеализации.НомерГТД, | ТоварыИсходнойРеализации.ТипЗапасов, | ТоварыИсходнойРеализации.Количество, | ТоварыИсходнойРеализации.СуммаСНДС, | ТоварыИсходнойРеализации.СуммаНДС |ПОМЕСТИТЬ ТоварыДоКорректировкиРазвернутые |ИЗ | ТоварыИсходнойРеализации КАК ТоварыИсходнойРеализации | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ИзмененияВТоварах.Номенклатура, | ИзмененияВТоварах.СтавкаНДС, | ИзмененияВТоварах.НомерГТД, | ИзмененияВТоварах.ТипЗапасов, | ИзмененияВТоварах.Количество, | ИзмененияВТоварах.СуммаСНДС, | ИзмененияВТоварах.СуммаНДС |ИЗ | ИзмененияВТоварах КАК ИзмененияВТоварах |ГДЕ | ИзмененияВТоварах.ИзмененияДоКорректировки |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДоКорректировкиРазвернутые.Номенклатура КАК Номенклатура, | ТоварыДоКорректировкиРазвернутые.СтавкаНДС КАК СтавкаНДС, | ТоварыДоКорректировкиРазвернутые.НомерГТД КАК НомерГТД, | ТоварыДоКорректировкиРазвернутые.ТипЗапасов КАК ТипЗапасов, | СУММА(ТоварыДоКорректировкиРазвернутые.Количество) КАК Количество, | СУММА(ТоварыДоКорректировкиРазвернутые.СуммаСНДС) КАК СуммаСНДС, | СУММА(ТоварыДоКорректировкиРазвернутые.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыДоКорректировки |ИЗ | ТоварыДоКорректировкиРазвернутые КАК ТоварыДоКорректировкиРазвернутые | |СГРУППИРОВАТЬ ПО | ТоварыДоКорректировкиРазвернутые.Номенклатура, | ТоварыДоКорректировкиРазвернутые.СтавкаНДС, | ТоварыДоКорректировкиРазвернутые.НомерГТД, | ТоварыДоКорректировкиРазвернутые.ТипЗапасов | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | СтавкаНДС, | НомерГТД, | ТипЗапасов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыИсходнойРеализации.Номенклатура, | ТоварыИсходнойРеализации.СтавкаНДС, | ТоварыИсходнойРеализации.НомерГТД, | ТоварыИсходнойРеализации.ТипЗапасов, | ТоварыИсходнойРеализации.Количество, | ТоварыИсходнойРеализации.СуммаСНДС, | ТоварыИсходнойРеализации.СуммаНДС |ПОМЕСТИТЬ ТоварыДоИсправленияРазвернутые |ИЗ | ТоварыИсходнойРеализации КАК ТоварыИсходнойРеализации | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ИзмененияВТоварах.Номенклатура, | ИзмененияВТоварах.СтавкаНДС, | ИзмененияВТоварах.НомерГТД, | ИзмененияВТоварах.ТипЗапасов, | ИзмененияВТоварах.Количество, | ИзмененияВТоварах.СуммаСНДС, | ИзмененияВТоварах.СуммаНДС |ИЗ | ИзмененияВТоварах КАК ИзмененияВТоварах |ГДЕ | ИзмененияВТоварах.ИзмененияДоИсправления |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыДоИсправленияРазвернутые.Номенклатура КАК Номенклатура, | ТоварыДоИсправленияРазвернутые.СтавкаНДС КАК СтавкаНДС, | ТоварыДоИсправленияРазвернутые.НомерГТД КАК НомерГТД, | ТоварыДоИсправленияРазвернутые.ТипЗапасов КАК ТипЗапасов, | СУММА(ТоварыДоИсправленияРазвернутые.Количество) КАК Количество, | СУММА(ТоварыДоИсправленияРазвернутые.СуммаСНДС) КАК СуммаСНДС, | СУММА(ТоварыДоИсправленияРазвернутые.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыДоИсправления |ИЗ | ТоварыДоИсправленияРазвернутые КАК ТоварыДоИсправленияРазвернутые | |СГРУППИРОВАТЬ ПО | ТоварыДоИсправленияРазвернутые.Номенклатура, | ТоварыДоИсправленияРазвернутые.СтавкаНДС, | ТоварыДоИсправленияРазвернутые.НомерГТД, | ТоварыДоИсправленияРазвернутые.ТипЗапасов | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | СтавкаНДС, | НомерГТД, | ТипЗапасов |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыИсходнойРеализации.Номенклатура, | ТоварыИсходнойРеализации.СтавкаНДС, | ТоварыИсходнойРеализации.НомерГТД, | ТоварыИсходнойРеализации.ТипЗапасов, | ТоварыИсходнойРеализации.Количество, | ТоварыИсходнойРеализации.СуммаСНДС, | ТоварыИсходнойРеализации.СуммаНДС |ПОМЕСТИТЬ ТоварыКонечныеРазвернутые |ИЗ | ТоварыИсходнойРеализации КАК ТоварыИсходнойРеализации | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ИзмененияВТоварах.Номенклатура, | ИзмененияВТоварах.СтавкаНДС, | ИзмененияВТоварах.НомерГТД, | ИзмененияВТоварах.ТипЗапасов, | ИзмененияВТоварах.Количество, | ИзмененияВТоварах.СуммаСНДС, | ИзмененияВТоварах.СуммаНДС |ИЗ | ИзмененияВТоварах КАК ИзмененияВТоварах |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ТоварыКонечныеРазвернутые.Номенклатура КАК Номенклатура, | ТоварыКонечныеРазвернутые.СтавкаНДС КАК СтавкаНДС, | ТоварыКонечныеРазвернутые.НомерГТД КАК НомерГТД, | ТоварыКонечныеРазвернутые.ТипЗапасов КАК ТипЗапасов, | СУММА(ТоварыКонечныеРазвернутые.Количество) КАК Количество, | СУММА(ТоварыКонечныеРазвернутые.СуммаСНДС) КАК СуммаСНДС, | СУММА(ТоварыКонечныеРазвернутые.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ ТоварыКонечные |ИЗ | ТоварыКонечныеРазвернутые КАК ТоварыКонечныеРазвернутые | |СГРУППИРОВАТЬ ПО | ТоварыКонечныеРазвернутые.Номенклатура, | ТоварыКонечныеРазвернутые.СтавкаНДС, | ТоварыКонечныеРазвернутые.НомерГТД, | ТоварыКонечныеРазвернутые.ТипЗапасов | |ИНДЕКСИРОВАТЬ ПО | Номенклатура, | СтавкаНДС, | НомерГТД, | ТипЗапасов |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Результирующая табличная часть Товары Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Товары.Номенклатура, | """" КАК Содержание, | Товары.НомерСтроки |ПОМЕСТИТЬ НомераСтрокРазвернутые |ИЗ | Документ.РеализацияТоваровУслуг.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Товары.Ссылка = ИсправляемыйДокумент.Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка), | Услуги.Содержание, | Услуги.НомерСтроки |ИЗ | Документ.АктВыполненныхРабот.Услуги КАК Услуги | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Услуги.Ссылка = ИсправляемыйДокумент.Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.НомерСтроки |ИЗ | Документ.КорректировкаРеализации.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Товары.Ссылка = ИсправляемыйДокумент.Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | НомераСтрокРазвернутые.Номенклатура, | НомераСтрокРазвернутые.Содержание, | МАКСИМУМ(НомераСтрокРазвернутые.НомерСтроки) КАК НомерСтроки |ПОМЕСТИТЬ НомераСтрок |ИЗ | НомераСтрокРазвернутые КАК НомераСтрокРазвернутые | |СГРУППИРОВАТЬ ПО | НомераСтрокРазвернутые.Номенклатура, | НомераСтрокРазвернутые.Содержание | |ИНДЕКСИРОВАТЬ ПО | НомераСтрокРазвернутые.Номенклатура, | НомераСтрокРазвернутые.Содержание |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ЕСТЬNULL(ЕСТЬNULL(ТоварыКонечные.Номенклатура, ТоварыДоИсправления.Номенклатура), ТоварыДоКорректировки.Номенклатура) КАК Номенклатура, | ЕСТЬNULL(ЕСТЬNULL(ТоварыКонечные.СтавкаНДС, ТоварыДоИсправления.СтавкаНДС), ТоварыДоКорректировки.СтавкаНДС) КАК СтавкаНДС, | ВЫРАЗИТЬ(ЕСТЬNULL(ЕСТЬNULL(ТоварыКонечные.НомерГТД, ТоварыДоИсправления.НомерГТД), ТоварыДоКорректировки.НомерГТД) КАК Справочник.НомераГТД) КАК НомерГТД, | ВЫБОР | КОГДА ЕСТЬNULL(ЕСТЬNULL(ТоварыКонечные.ТипЗапасов, ТоварыДоИсправления.ТипЗапасов), ТоварыДоКорректировки.ТипЗапасов) = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыНаСкладе"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СчетУчета, | ТоварыДоКорректировки.Количество КАК КоличествоДоКорректировки, | ТоварыДоКорректировки.СуммаСНДС - Выбор Когда &ЦенаВключаетНДС Тогда 0 Иначе ТоварыДоКорректировки.СуммаНДС Конец КАК СуммаДоКорректировки, | ТоварыДоКорректировки.СуммаНДС КАК СуммаНДСДоКорректировки, | ТоварыДоИсправления.Количество КАК КоличествоДоИзменения, | ТоварыДоИсправления.СуммаСНДС - Выбор Когда &ЦенаВключаетНДС Тогда 0 Иначе ТоварыДоИсправления.СуммаНДС Конец КАК СуммаДоИзменения, | ТоварыДоИсправления.СуммаНДС КАК СуммаНДСДоИзменения, | ТоварыКонечные.СуммаСНДС, | ТоварыКонечные.Количество, | ТоварыКонечные.СуммаСНДС - Выбор Когда &ЦенаВключаетНДС Тогда 0 Иначе ТоварыКонечные.СуммаНДС Конец КАК Сумма, | ТоварыКонечные.СуммаНДС, | ВЫБОР | КОГДА ТоварыДоИсправления.Номенклатура ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьВДокументеРеализации |ПОМЕСТИТЬ РезультатСопоставленияТоваров |ИЗ | ТоварыКонечные КАК ТоварыКонечные | ПОЛНОЕ СОЕДИНЕНИЕ ТоварыДоИсправления КАК ТоварыДоИсправления | ПО ТоварыКонечные.Номенклатура = ТоварыДоИсправления.Номенклатура | И ТоварыКонечные.НомерГТД = ТоварыДоИсправления.НомерГТД | И ТоварыКонечные.СтавкаНДС = ТоварыДоИсправления.СтавкаНДС | И ТоварыКонечные.ТипЗапасов = ТоварыДоИсправления.ТипЗапасов | ПОЛНОЕ СОЕДИНЕНИЕ ТоварыДоКорректировки КАК ТоварыДоКорректировки | ПО (ТоварыКонечные.Номенклатура = ТоварыДоКорректировки.Номенклатура | ИЛИ ТоварыДоИсправления.Номенклатура = ТоварыДоКорректировки.Номенклатура) | И (ТоварыКонечные.НомерГТД = ТоварыДоКорректировки.НомерГТД | ИЛИ ТоварыДоИсправления.НомерГТД = ТоварыДоКорректировки.НомерГТД) | И (ТоварыКонечные.СтавкаНДС = ТоварыДоКорректировки.СтавкаНДС | ИЛИ ТоварыДоИсправления.СтавкаНДС = ТоварыДоКорректировки.СтавкаНДС) | И (ТоварыКонечные.ТипЗапасов = ТоварыДоКорректировки.ТипЗапасов | ИЛИ ТоварыДоИсправления.ТипЗапасов = ТоварыДоКорректировки.ТипЗапасов) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РезультатСопоставления.Номенклатура, | РезультатСопоставления.СтавкаНДС, | РезультатСопоставления.СтавкаНДС КАК СтавкаНДСДоИзменения, | РезультатСопоставления.НомерГТД, | РезультатСопоставления.НомерГТД КАК НомерГТДДоИзменения, | РезультатСопоставления.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | РезультатСопоставления.НомерГТД.СтранаПроисхождения КАК СтранаПроисхожденияДоИзменения, | РезультатСопоставления.КоличествоДоКорректировки, | РезультатСопоставления.КоличествоДоИзменения, | РезультатСопоставления.Количество, | РезультатСопоставления.СуммаДоКорректировки, | РезультатСопоставления.СуммаДоИзменения, | РезультатСопоставления.Сумма, | РезультатСопоставления.СуммаНДСДоКорректировки, | РезультатСопоставления.СуммаНДСДоИзменения, | РезультатСопоставления.СуммаНДС, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.КоличествоДоКорректировки, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.СуммаДоКорректировки / РезультатСопоставления.КоличествоДоКорректировки | КОНЕЦ КАК ЦенаДоКорректировки, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.КоличествоДоИзменения, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.СуммаДоИзменения / РезультатСопоставления.КоличествоДоИзменения | КОНЕЦ КАК ЦенаДоИзменения, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.Количество, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.Сумма / РезультатСопоставления.Количество | КОНЕЦ КАК Цена, | РезультатСопоставления.СчетУчета, | РезультатСопоставления.СуммаСНДС, | РезультатСопоставления.ЕстьВДокументеРеализации |ИЗ | РезультатСопоставленияТоваров КАК РезультатСопоставления | ЛЕВОЕ СОЕДИНЕНИЕ НомераСтрок КАК НомераСтрок | ПО РезультатСопоставления.Номенклатура = НомераСтрок.Номенклатура | |УПОРЯДОЧИТЬ ПО | РезультатСопоставления.ЕстьВДокументеРеализации УБЫВ, | НомераСтрок.НомерСтроки |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Табличные части Услуги (до корректировки, до исправления, после исправления) Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | Товары.Номенклатура, | """" КАК Содержание, | Товары.СтавкаНДС, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС |ПОМЕСТИТЬ УслугиДоКорректировкиРазвернутые |ИЗ | Документ.РеализацияТоваровУслуг.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДокументДоКорректировки КАК ДокументДоКорректировки | ПО Товары.Ссылка = ДокументДоКорректировки.Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.Количество, | Услуги.Сумма, | Услуги.СуммаНДС |ИЗ | Документ.АктВыполненныхРабот.Услуги КАК Услуги | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДокументДоКорректировки КАК ДокументДоКорректировки | ПО Услуги.Ссылка = ДокументДоКорректировки.Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС |ИЗ | Документ.КорректировкаРеализации.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДокументДоКорректировки КАК ДокументДоКорректировки | ПО Товары.Ссылка = ДокументДоКорректировки.Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | ИЛИ &РеализацияУслуг |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | УслугиДоКорректировкиРазвернутые.Номенклатура, | УслугиДоКорректировкиРазвернутые.Содержание, | УслугиДоКорректировкиРазвернутые.СтавкаНДС, | СУММА(УслугиДоКорректировкиРазвернутые.Количество) КАК Количество, | СУММА(УслугиДоКорректировкиРазвернутые.Сумма) КАК Сумма, | СУММА(УслугиДоКорректировкиРазвернутые.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ УслугиДоКорректировки |ИЗ | УслугиДоКорректировкиРазвернутые КАК УслугиДоКорректировкиРазвернутые | |СГРУППИРОВАТЬ ПО | УслугиДоКорректировкиРазвернутые.Номенклатура, | УслугиДоКорректировкиРазвернутые.Содержание, | УслугиДоКорректировкиРазвернутые.СтавкаНДС |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура, | """" КАК Содержание, | Товары.СтавкаНДС, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС |ПОМЕСТИТЬ УслугиДоИсправленияРазвернутые |ИЗ | Документ.РеализацияТоваровУслуг.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Товары.Ссылка = ИсправляемыйДокумент.Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Услуги.Номенклатура, | Услуги.Содержание, | Услуги.СтавкаНДС, | Услуги.Количество, | Услуги.Сумма, | Услуги.СуммаНДС |ИЗ | Документ.АктВыполненныхРабот.Услуги КАК Услуги | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Услуги.Ссылка = ИсправляемыйДокумент.Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС, | Товары.Количество, | Товары.Сумма, | Товары.СуммаНДС |ИЗ | Документ.КорректировкаРеализации.Товары КАК Товары | ВНУТРЕННЕЕ СОЕДИНЕНИЕ ИсправляемыйДокумент КАК ИсправляемыйДокумент | ПО Товары.Ссылка = ИсправляемыйДокумент.Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | ИЛИ &РеализацияУслуг |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | УслугиДоИсправленияРазвернутые.Номенклатура, | УслугиДоИсправленияРазвернутые.Содержание, | УслугиДоИсправленияРазвернутые.СтавкаНДС, | СУММА(УслугиДоИсправленияРазвернутые.Количество) КАК Количество, | СУММА(УслугиДоИсправленияРазвернутые.Сумма) КАК Сумма, | СУММА(УслугиДоИсправленияРазвернутые.СуммаНДС) КАК СуммаНДС |ПОМЕСТИТЬ УслугиДоИсправления |ИЗ | УслугиДоИсправленияРазвернутые КАК УслугиДоИсправленияРазвернутые | |СГРУППИРОВАТЬ ПО | УслугиДоИсправленияРазвернутые.Номенклатура, | УслугиДоИсправленияРазвернутые.Содержание, | УслугиДоИсправленияРазвернутые.СтавкаНДС |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС, | СУММА(Товары.Количество) КАК Количество, | СУММА(Товары.Сумма) КАК Сумма, | СУММА(Товары.СуммаНДС) КАК СуммаНДС, | СУММА(Товары.СуммаСНДС) КАК СуммаСНДС |ПОМЕСТИТЬ УслугиКонечные |ИЗ | Документ.КорректировкаРеализации.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | ИЛИ &РеализацияУслуг | |СГРУППИРОВАТЬ ПО | Товары.Номенклатура, | Товары.Содержание, | Товары.СтавкаНДС |; | |//////////////////////////////////////////////////////////////////////////////// |"; // Результирующая табличная часть Услуги Запрос.Текст = Запрос.Текст + "ВЫБРАТЬ | ЕСТЬNULL(ЕСТЬNULL(УслугиКонечные.Номенклатура, УслугиДоИсправления.Номенклатура), УслугиДоКорректировки.Номенклатура) КАК Номенклатура, | ЕСТЬNULL(ЕСТЬNULL(УслугиКонечные.Содержание, УслугиДоИсправления.Содержание), УслугиДоКорректировки.Содержание) КАК Содержание, | ЕСТЬNULL(ЕСТЬNULL(УслугиКонечные.СтавкаНДС, УслугиДоИсправления.СтавкаНДС), УслугиДоКорректировки.СтавкаНДС) КАК СтавкаНДС, | УслугиДоКорректировки.Количество КАК КоличествоДоКорректировки, | УслугиДоКорректировки.Сумма КАК СуммаДоКорректировки, | УслугиДоКорректировки.СуммаНДС КАК СуммаНДСДоКорректировки, | УслугиДоИсправления.Количество КАК КоличествоДоИзменения, | УслугиДоИсправления.Сумма КАК СуммаДоИзменения, | УслугиДоИсправления.СуммаНДС КАК СуммаНДСДоИзменения, | УслугиКонечные.СуммаСНДС, | УслугиКонечные.Количество, | УслугиКонечные.Сумма, | УслугиКонечные.СуммаНДС, | ВЫБОР | КОГДА УслугиДоИсправления.Номенклатура ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ КАК ЕстьВДокументеРеализации |ПОМЕСТИТЬ РезультатСопоставленияУслуг |ИЗ | УслугиКонечные КАК УслугиКонечные | ПОЛНОЕ СОЕДИНЕНИЕ УслугиДоИсправления КАК УслугиДоИсправления | ПО УслугиКонечные.Номенклатура = УслугиДоИсправления.Номенклатура | И УслугиКонечные.Содержание = УслугиДоИсправления.Содержание | И УслугиКонечные.СтавкаНДС = УслугиДоИсправления.СтавкаНДС | ПОЛНОЕ СОЕДИНЕНИЕ УслугиДоКорректировки КАК УслугиДоКорректировки | ПО (УслугиКонечные.Номенклатура = УслугиДоКорректировки.Номенклатура | ИЛИ УслугиДоИсправления.Номенклатура = УслугиДоКорректировки.Номенклатура) | И (УслугиКонечные.Содержание = УслугиДоКорректировки.Содержание | ИЛИ УслугиДоИсправления.Содержание = УслугиДоКорректировки.Содержание) | И (УслугиКонечные.СтавкаНДС = УслугиДоКорректировки.СтавкаНДС | ИЛИ УслугиДоИсправления.СтавкаНДС = УслугиДоКорректировки.СтавкаНДС) |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | РезультатСопоставления.Номенклатура, | РезультатСопоставления.Содержание, | РезультатСопоставления.Содержание КАК СодержаниеДоИзменения, | РезультатСопоставления.СтавкаНДС, | РезультатСопоставления.СтавкаНДС КАК СтавкаНДСДоИзменения, | РезультатСопоставления.КоличествоДоКорректировки, | РезультатСопоставления.КоличествоДоИзменения, | РезультатСопоставления.Количество, | РезультатСопоставления.СуммаДоКорректировки, | РезультатСопоставления.СуммаДоИзменения, | РезультатСопоставления.Сумма, | РезультатСопоставления.СуммаНДСДоКорректировки, | РезультатСопоставления.СуммаНДСДоИзменения, | РезультатСопоставления.СуммаНДС, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.КоличествоДоКорректировки, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.СуммаДоКорректировки / РезультатСопоставления.КоличествоДоКорректировки | КОНЕЦ КАК ЦенаДоКорректировки, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.КоличествоДоИзменения, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.СуммаДоИзменения / РезультатСопоставления.КоличествоДоИзменения | КОНЕЦ КАК ЦенаДоИзменения, | ВЫБОР | КОГДА ЕСТЬNULL(РезультатСопоставления.Количество, 0) = 0 | ТОГДА 0 | ИНАЧЕ РезультатСопоставления.Сумма / РезультатСопоставления.Количество | КОНЕЦ КАК Цена, | РезультатСопоставления.СуммаСНДС, | РезультатСопоставления.ЕстьВДокументеРеализации |ИЗ | РезультатСопоставленияУслуг КАК РезультатСопоставления | ЛЕВОЕ СОЕДИНЕНИЕ НомераСтрок КАК НомераСтрок | ПО РезультатСопоставления.Номенклатура = НомераСтрок.Номенклатура | И РезультатСопоставления.Содержание = НомераСтрок.Содержание | |УПОРЯДОЧИТЬ ПО | РезультатСопоставления.ЕстьВДокументеРеализации УБЫВ, | НомераСтрок.НомерСтроки"; РезультатыЗапроса = Запрос.ВыполнитьПакет(); Выборка = РезультатыЗапроса[1].Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; ВыборкаДанных = РезультатыЗапроса[6].Выбрать(); Если ВыборкаДанных.Следующий() Тогда ВходящиеДанные.ДокументРеализации = ВыборкаДанных.Ссылка; КонецЕсли; //ПСК Юднов+ //ВыборкаДанных = РезультатыЗапроса[7].Выбрать(); //Если ВыборкаДанных.Следующий() Тогда // ВходящиеДанные.ВидОперации = ?(ВыборкаДанных.ИсходныйКорректировочный, "СогласованноеИзменение", "ИсправлениеОшибки"); //КонецЕсли; //ПСК Юднов- ВыборкаДанных = РезультатыЗапроса[8].Выбрать(); Если ВыборкаДанных.Следующий() Тогда ВходящиеДанные.ИсправляемыйДокументРеализации = ВыборкаДанных.Ссылка; КонецЕсли; //Запрос = Новый Запрос(); //Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); //Запрос.Текст = "ВЫБРАТЬ //|КорректировкаРеализацииРасхождения.Номенклатура КАК Номенклатура, //|КорректировкаРеализацииРасхождения.Количество КАК Количество, //|КорректировкаРеализацииРасхождения.Сумма КАК Сумма //|ИЗ //| Документ.КорректировкаРеализации.Расхождения КАК КорректировкаРеализацииРасхождения //|ГДЕ //| КорректировкаРеализацииРасхождения.Ссылка = &Ссылка //|; // //|//////////////////////////////////////////////////////////////////////////////// //|ВЫБРАТЬ //| КорректировкаРеализацииТовары.Номенклатура КАК Номенклатура, //| КорректировкаРеализацииТовары.Количество КАК Количество, //| КорректировкаРеализацииТовары.Цена КАК Цена, //| КорректировкаРеализацииТовары.Сумма КАК Сумма //|ИЗ //| Документ.КорректировкаРеализации.Товары КАК КорректировкаРеализацииТовары //|ГДЕ //| КорректировкаРеализацииТовары.Ссылка = &Ссылка"; // //РезультатыЗапроса1 = Запрос.ВыполнитьПакет(); // ВходящиеДанные.Товары = РезультатыЗапроса[22].Выгрузить(); ВходящиеДанные.Услуги = РезультатыЗапроса[29].Выгрузить(); //ВходящиеДанные.СуммаДокумента = ВходящиеДанные.Товары.Итог("СуммаСНДС") + ВходящиеДанные.Услуги.Итог("СуммаСНДС"); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.КорректировкаРеализации <Приемник>ДокументСсылка.КорректировкаРеализации <Свойства> <Свойство Поиск="true"> <Код>31 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>32 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>34 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>28 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>35 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>30 <Наименование>--> СуммаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>40 <Наименование>ВидКорректировки --> ВидОперации <Порядок>350 <Источник Имя="ВидКорректировки" Вид="Реквизит" Тип="ПеречислениеСсылка.ХозяйственныеОперации"/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийИсправленияПоступленияРеализации"/> <ПередВыгрузкой>Если Источник.ВидКорректировки = Перечисления.ХозяйственныеОперации.КорректировкаПоСогласованиюСторон Тогда Значение = "СогласованноеИзменение"; ИначеЕсли Источник.ВидКорректировки = Перечисления.ХозяйственныеОперации.ИсправлениеОшибок Тогда Значение = "ИсправлениеОшибки"; КонецЕсли; <Свойство> <Код>27 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>36 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Источник.Сделка); Значение.Вставить("ЗаказКлиентаУТ11", ВходящиеДанные.ЗаказКлиента); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>23 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>500 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>39 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>550 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>29 <Наименование>Склад --> Склад <Порядок>600 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>22 <Наименование>АдресДоставки --> АдресДоставки <Порядок>650 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>700 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>25 <Наименование>Грузополучатель --> Грузополучатель <Порядок>750 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>26 <Наименование>Комментарий --> Комментарий <Порядок>800 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>--> ДокументРеализации <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДокументРеализации" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.АктВыполненныхРабот") Тогда ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда ИмяПКО = "РТУ_ПродажаТоваровУслуг"; КонецЕсли; <Свойство> <Код>42 <Наименование>--> ИсправляемыйДокументРеализации <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ИсправляемыйДокументРеализации" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.АктВыполненныхРабот") Тогда ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда ИмяПКО = "РТУ_ПродажаТоваровУслуг"; КонецЕсли; <Свойство> <Код>43 <Наименование>--> КорректироватьБУиНУ <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="КорректироватьБУиНУ" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>37 <Наименование>Менеджер --> Ответственный <Порядок>1050 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>33 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>12 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>13 <Наименование>--> СтавкаНДСДоИзменения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСДоИзменения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>14 <Наименование>--> СтавкаНДС <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>18 <Наименование>--> КоличествоДоКорректировки <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> КоличествоДоИзменения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> Количество <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> ЦенаДоКорректировки <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> ЦенаДоИзменения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> Цена <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> СуммаДоКорректировки <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> СуммаДоИзменения <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> Сумма <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> СуммаНДСДоКорректировки <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>2 <Наименование>--> СуммаНДСДоИзменения <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> СуммаНДС <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>--> НомерГТДДоИзменения <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТДДоИзменения" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>15 <Наименование>--> НомерГТД <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>16 <Наименование>--> СтранаПроисхождения <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>10 <Наименование>--> СтранаПроисхожденияДоИзменения <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхожденияДоИзменения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>9 <Наименование>--> ЕстьВДокументеРеализации <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="ЕстьВДокументеРеализации" Вид="Реквизит" Тип="Булево"/> <Группа> <Код>44 <Наименование>--> Услуги <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>52 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>51 <Наименование>--> Содержание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>50 <Наименование>--> СодержаниеДоИзменения <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СодержаниеДоИзменения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>49 <Наименование>--> СтавкаНДС <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>48 <Наименование>--> СтавкаНДСДоИзменения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСДоИзменения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Выполнить(Алгоритмы.ЗаполнитьСтавкуНДСТабличнойЧасти); <Свойство> <Код>59 <Наименование>--> КоличествоДоКорректировки <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>46 <Наименование>--> КоличествоДоИзменения <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КоличествоДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>47 <Наименование>--> Количество <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>60 <Наименование>--> СуммаДоКорректировки <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>53 <Наименование>--> СуммаДоИзменения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>45 <Наименование>--> Сумма <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>61 <Наименование>--> СуммаНДСДоКорректировки <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>54 <Наименование>--> СуммаНДСДоИзменения <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>55 <Наименование>--> СуммаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>62 <Наименование>--> ЦенаДоКорректировки <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоКорректировки" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> ЦенаДоИзменения <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаДоИзменения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>56 <Наименование>--> Цена <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>58 <Наименование>--> ЕстьВДокументеРеализации <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="ЕстьВДокументеРеализации" Вид="Реквизит" Тип="Булево"/> <Свойство Отключить="true"> <Код>63 <Наименование>ДокументОснование --> <Порядок>1250 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>КорректировкаРеализации_ОприходованиеТоваров <Наименование>Документ: Корректировка реализации <Порядок>100 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "КорректировкаРеализации_ОприходованиеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.КорректировкаРеализации <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "КР" + Сред(Значение, 8); <Свойство> <Код>5 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>3 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>4 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>20 <Наименование>--> СуммаДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ВходящиеДанные.Товары.Итог("Сумма"); <Свойство> <Код>6 <Наименование>СтатьяДоходов --> СтатьяПрочихДоходовРасходов <Порядок>350 <Источник Имя="СтатьяДоходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиДоходов"/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиРасходовВСтатьиЗатрат <ПриВыгрузке>КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Пусто = (Найти(КоррСчет, "91.01") = 0); <Свойство> <Код>8 <Наименование>Менеджер --> Ответственный <Порядок>400 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>7 <Наименование>--> Основание <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Корректировка реализации № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>9 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>21 <Наименование>Комментарий --> Комментарий <Порядок>550 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>10 <Наименование>--> Товары <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>18 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>17 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>15 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> НомерГТД <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>12 <Наименование>--> СтранаПроисхождения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>11 <Наименование>--> Цена <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> Количество <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>КорректировкаРеализации_СписаниеТоваров <Наименование>Документ: Корректировка реализации <Порядок>150 <ПослеЗагрузки>Сообщить("1.1"); Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); Сообщить("1.2"); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); Сообщить("1.3"); НоваяСтрока.ИмяПКО = "КорректировкаРеализации_СписаниеТоваров"; Сообщить("1.4"); НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; Сообщить("1.5"); //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.КорректировкаРеализации <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "КР" + Сред(Значение, 8); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>20 <Наименование>--> СуммаДокумента <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой> //Значение = ВходящиеДанные.Товары.Итог("Себестоимость"); <Свойство> <Код>8 <Наименование>Менеджер --> Ответственный <Порядок>400 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>--> Основание <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "Корректировка реализации № " + ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Источник.Номер, Ложь, Ложь) + " от " + Формат(Источник.Дата, "ДФ='дд ММММ гггг'")+ " г."; Значение = НСтр("ru = '" + Значение + "'"); <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>10 <Наименование>--> Товары <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>17 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>16 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>15 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> НомерГТД <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>13 <Наименование>--> СтранаПроисхождения <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>12 <Наименование>--> Количество <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> Себестоимость <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>ПрочаяРеализация <Наименование>ПКО для документов прочей реализации <Порядок>200 <Правило> <Код>ВыполнениеРабот_РеализацияТоваровУслуг <Наименование>Документ: Выполнение работ <Порядок>50 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.АктВыполненныхРабот <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "У" + Сред(Значение, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>5 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>19 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Контрагент --> Контрагент <Порядок>500 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>Договор --> ДоговорКонтрагента <Порядок>550 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Источник.Сделка); Значение.Вставить("ЗаказКлиентаУТ11", Источник.ЗаказКлиента); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>16 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>600 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>17 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>650 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <НеЗамещать>true <Код>18 <Наименование>--> СпособЗачетаАвансов <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>57 <Наименование>ЗаказКлиента --> СчетНаОплатуПокупателю <Порядок>750 <Источник Имя="ЗаказКлиента" Вид="Реквизит"/> <Приемник Имя="СчетНаОплатуПокупателю" Вид="Реквизит" Тип="ДокументСсылка.СчетНаОплатуПокупателю"/> <КодПравилаКонвертации>СНОП_СчетНаОплатуПокупателю <ПередВыгрузкой>Отказ = ТипЗнч(Источник.ЗаказКлиента) <> Тип("ДокументСсылка.ЗаказКлиента"); <Свойство> <Код>62 <Наименование>Руководитель --> Руководитель <Порядок>800 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>61 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>850 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>41 <Наименование>Менеджер --> Ответственный <Порядок>900 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>950 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>58 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1000 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>33 <Наименование>Услуги --> Услуги <Порядок>1050 <Источник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>40 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>39 <Наименование>Содержание --> Содержание <Порядок>100 <Источник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>38 <Наименование>Количество --> Количество <Порядок>150 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>Цена --> Цена <Порядок>200 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>250 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>35 <Наименование>Сумма --> Сумма <Порядок>300 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>СуммаНДС --> СуммаНДС <Порядок>350 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>59 <Наименование>Соглашение --> <Порядок>1100 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>60 <Наименование>Партнер --> <Порядок>1150 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РеализацияУслугПрочихАкт_РеализацияТоваровУслуг <Наименование>Документ: Реализация услуг и прочих активов <Порядок>100 <ПередВыгрузкой>ВходящиеДанные = Новый Структура; ВходящиеДанные.Вставить("РасчетыВУсловныхЕдиницах"); ВходящиеДанные.Вставить("КурсВзаиморасчетов"); ВходящиеДанные.Вставить("КратностьВзаиморасчетов"); Запрос = Новый Запрос("ВЫБРАТЬ | КурсыВалют.Валюта КАК Валюта, | КурсыВалют.Курс, | КурсыВалют.Кратность |ПОМЕСТИТЬ КурсыВалют |ИЗ | РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалют | |ИНДЕКСИРОВАТЬ ПО | Валюта |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Док.Соглашение.ОплатаВВалюте КАК РасчетыВУсловныхЕдиницах, | ЕСТЬNULL(КурсВалютыВзаиморасчетов.Курс, 1) КАК КурсВзаиморасчетов, | ЕСТЬNULL(КурсВалютыВзаиморасчетов.Кратность, 1) КАК КратностьВзаиморасчетов |ИЗ | Документ.РеализацияУслугПрочихАктивов КАК Док | ЛЕВОЕ СОЕДИНЕНИЕ КурсыВалют КАК КурсВалютыВзаиморасчетов | ПО (Док.ВалютаВзаиморасчетов = КурсВалютыВзаиморасчетов.Валюта)"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВалютаРег", Константы.ВалютаРегламентированногоУчета.Получить()); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапки = РезультатыЗапроса[1].Выбрать(); Если ДанныеШапки.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, ДанныеШапки, "РасчетыВУсловныхЕдиницах, |КурсВзаиморасчетов, |КратностьВзаиморасчетов"); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РеализацияУслугПрочихАкт_РеализацияТоваровУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.РеализацияУслугПрочихАктивов <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>8 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "П" + Сред(Значение, 7); <Свойство> <Код>11 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>10 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>200 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>13 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>18 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>350 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>7 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>14 <Наименование>Договор --> ДоговорКонтрагента <Порядок>450 <Источник Имя="Договор" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", ВходящиеДанные.РасчетыВУсловныхЕдиницах); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>33 <Наименование>--> СпособЗачетаАвансов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>15 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>550 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>12 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>600 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> КурсВзаиморасчетов <Порядок>650 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> КратностьВзаиморасчетов <Порядок>700 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>1 <Наименование>АдресДоставки --> АдресДоставки <Порядок>750 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>2 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>800 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>3 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>850 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>4 <Наименование>Грузополучатель --> Грузополучатель <Порядок>900 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>35 <Наименование>Руководитель --> Руководитель <Порядок>950 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>34 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1000 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>36 <Наименование>ДоверенностьВыдана --> ДоверенностьВыдана <Порядок>1050 <Источник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>37 <Наименование>ДоверенностьДата --> ДоверенностьДата <Порядок>1100 <Источник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>38 <Наименование>ДоверенностьНомер --> ДоверенностьНомер <Порядок>1150 <Источник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>39 <Наименование>ДоверенностьЛицо --> ДоверенностьЧерезКого <Порядок>1200 <Источник Имя="ДоверенностьЛицо" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьЧерезКого" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>17 <Наименование>Менеджер --> Ответственный <Порядок>1250 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>6 <Наименование>Комментарий --> Комментарий <Порядок>1300 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>22 <Наименование>Доходы --> Услуги <Порядок>1350 <Источник Имя="Доходы" Вид="ТабличнаяЧасть"/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>24 <Наименование>Содержание --> Содержание <Порядок>50 <Источник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>26 <Наименование>Сумма --> Сумма <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>СуммаНДС --> СуммаНДС <Порядок>250 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>Цена --> Цена <Порядок>300 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>29 <Наименование>ВалютаВзаиморасчетов --> <Порядок>1400 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>30 <Наименование>Партнер --> <Порядок>1450 <Источник Имя="Партнер" Вид="Реквизит" Тип="СправочникСсылка.Партнеры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>31 <Наименование>Соглашение --> <Порядок>1500 <Источник Имя="Соглашение" Вид="Реквизит" Тип="СправочникСсылка.СоглашенияСКлиентами"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>32 <Наименование>ХозяйственнаяОперация --> <Порядок>1550 <Источник Имя="ХозяйственнаяОперация" Вид="Реквизит" Тип="ПеречислениеСсылка.ХозяйственныеОперации"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СНОП_СчетНаОплатуПокупателю <Наименование>Документ: Счет на оплату клиенту <Порядок>250 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ЗаказКлиента <Приемник>ДокументСсылка.СчетНаОплатуПокупателю <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>150 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>16 <Наименование>--> ВалютаДокумента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>13 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>250 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>Контрагент --> Контрагент <Порядок>300 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>19 <Наименование>--> ДоговорКонтрагента <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", Источник.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Источник.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Источник.Соглашение); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(Источник.Ссылка, Источник.Соглашение, Источник.ХозяйственнаяОперация); Значение.ВалютаВзаиморасчетов = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Соглашение, "Валюта"); Если Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Значение.РасчетыВУсловныхЕдиницах = Источник.Соглашение.ОплатаВВалюте; Значение.СделкаСКлиентомУТ11 = Источник.Сделка; Значение.ЗаказКлиентаУТ11 = Источник.Ссылка; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>20 <Наименование>--> КратностьВзаиморасчетов <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(Источник.Соглашение) Тогда СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Соглашение.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; Иначе // Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; КонецЕсли; <Свойство> <Код>21 <Наименование>--> КурсВзаиморасчетов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(Источник.Соглашение) Тогда СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Соглашение.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; Иначе // Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; КонецЕсли; <Свойство> <Код>31 <Наименование>Организация --> ОрганизацияПолучатель <Порядок>500 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>30 <Наименование>--> СтруктурнаяЕдиница <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СтруктурнаяЕдиница" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>600 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>18 <Наименование>--> СуммаВключаетНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>8 <Наименование>АдресДоставки --> АдресДоставки <Порядок>750 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>32 <Наименование>--> Ответственный <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>9 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>37 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>Товары --> Товары <Порядок>950 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | Товары.НомерСтроки КАК НомерСтроки, | Товары.Номенклатура, | Товары.Количество, | Товары.Сумма / Товары.Количество КАК Цена, | Товары.Сумма, | Товары.СтавкаНДС, | Товары.СуммаНДС |ИЗ | Документ.ЗаказКлиента.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) | И Товары.Отменено = ЛОЖЬ | |УПОРЯДОЧИТЬ ПО | НомерСтроки"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>3 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>2 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>Цена --> Цена <Порядок>150 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>200 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>5 <Наименование>Сумма --> Сумма <Порядок>250 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>СуммаНДС --> СуммаНДС <Порядок>300 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Группа Отключить="true"> <Код>22 <Наименование>Товары --> Услуги <Порядок>1000 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос("ВЫБРАТЬ | Товары.НомерСтроки КАК НомерСтроки, | Товары.Номенклатура, | Товары.Количество, | Товары.Цена, | Товары.Сумма, | Товары.СтавкаНДС, | Товары.СуммаНДС |ИЗ | Документ.ЗаказКлиента.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) | И Товары.Отменено = ЛОЖЬ | |УПОРЯДОЧИТЬ ПО | НомерСтроки"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>24 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>23 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>Цена --> Цена <Порядок>150 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>Сумма --> Сумма <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>250 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>28 <Наименование>СуммаНДС --> СуммаНДС <Порядок>300 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>Номенклатура --> Содержание <Порядок>350 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(ОбъектКоллекции.Номенклатура); <Значения/> <Правило> <Код>ОРП_ОтчетОРозничныхПродажах <Наименование>Документ: Отчет о розничных продажах <Порядок>300 <ПередВыгрузкой>Запрос = Новый Запрос( "ВЫБРАТЬ | ""Оплата платежными картами"" КАК ВидОплаты, | 1 КАК ТипСтроки, | ОплатаКартами.НомерСтроки, | ОплатаКартами.ЭквайринговыйТерминал.Владелец.Контрагент КАК Партнер, | ""Прочее"" КАК ВидДоговора, | ОплатаКартами.ЭквайринговыйТерминал.Владелец.БанковскийСчет.ВалютаДенежныхСредств КАК ВалютаВзаиморасчетов, | ОплатаКартами.ЭквайринговыйТерминал.Владелец.Контрагент КАК Контрагент, | ОплатаКартами.Сумма КАК СуммаОплаты |ПОМЕСТИТЬ Оплата |ИЗ | Документ.ОтчетОРозничныхПродажах.ОплатаПлатежнымиКартами КАК ОплатаКартами |ГДЕ | ОплатаКартами.Ссылка = &Ссылка | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | НЕОПРЕДЕЛЕНО, | 2, | Сертификаты.НомерСтроки, | НЕОПРЕДЕЛЕНО, | ""СПокупателем"", | Сертификаты.Ссылка.Валюта, | ЗНАЧЕНИЕ(Справочник.Контрагенты.РозничныйПокупатель), | Сертификаты.Сумма |ИЗ | Документ.ОтчетОРозничныхПродажах.ПодарочныеСертификаты КАК Сертификаты |ГДЕ | Сертификаты.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Оплата.ВидОплаты, | Оплата.ТипСтроки, | Оплата.ВидДоговора, | Оплата.Партнер, | Оплата.ВалютаВзаиморасчетов, | Оплата.Контрагент, | Оплата.СуммаОплаты |ИЗ | Оплата КАК Оплата | |УПОРЯДОЧИТЬ ПО | Оплата.ТипСтроки, | Оплата.НомерСтроки"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); ВходящиеДанные.Вставить("Оплата", Запрос.Выполнить().Выгрузить()); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОРП_ОтчетОРозничныхПродажах"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетОРозничныхПродажах <Приемник>ДокументСсылка.ОтчетОРозничныхПродажах <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>9 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>Валюта --> КратностьДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>12 <Наименование>Валюта --> КурсДокумента <Порядок>400 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>450 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>10 <Наименование>--> ВидОперации <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийОтчетОРозничныхПродажах"/> <ПередВыгрузкой>Значение = "ОтчетККМОПродажах"; <Свойство> <Код>13 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>600 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>30 <Наименование>Ответственный --> Ответственный <Порядок>700 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>40 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>15 <Наименование>--> Товары <Порядок>850 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовДляОтчетаОРозничныхПродажах.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовДляОтчетаОРозничныхПродажах.Выполнить().Выгрузить(); <Свойство> <Код>17 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>16 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>22 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>20 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>29 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа> <Код>24 <Наименование>ОплатаПлатежнымиКартами --> Оплата <Порядок>900 <Источник Имя="ОплатаПлатежнымиКартами" Вид="ТабличнаяЧасть"/> <Приемник Имя="Оплата" Вид="ТабличнаяЧасть"/> <Свойство> <Код>25 <Наименование>ЭквайринговыйТерминал --> ВидОплаты <Порядок>50 <Источник Имя="ЭквайринговыйТерминал" Вид="Реквизит" Тип="СправочникСсылка.ЭквайринговыеТерминалы"/> <Приемник Имя="ВидОплаты" Вид="Реквизит" Тип="СправочникСсылка.ВидыОплатОрганизаций"/> <КодПравилаКонвертации>ВидыОплатОрганизаций <ПередВыгрузкой>//Если ОбъектКоллекции.ТипСтроки = 1 Тогда // ИмяПКО = "ВидыОплатОрганизаций"; //ИначеЕсли ОбъектКоллекции.ТипСтроки = 2 Тогда // // // Инициализируем структуру договора // ДоговорКонтрагента = Новый Структура; // // // Реквизиты договора // ДоговорКонтрагента.Вставить("Ссылка"); // ДоговорКонтрагента.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ДоговорКонтрагента_ВалютаВзаиморасчетов); // ДоговорКонтрагента.Вставить("ВидДоговора", ОбъектКоллекции.ДоговорКонтрагента_ВидДоговора); // ДоговорКонтрагента.Вставить("Владелец", ОбъектКоллекции.ДоговорКонтрагента_Контрагент); // ДоговорКонтрагента.Вставить("Организация", Источник.Организация); // ДоговорКонтрагента.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // // Дополнительные свойства договора // ДоговорКонтрагента.Вставить("ПартнерУТ11", ОбъектКоллекции.ДоговорКонтрагента_Партнер); // ДоговорКонтрагента.Вставить("СоглашениеСКлиентомУТ11", Неопределено); // ДоговорКонтрагента.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); // ДоговорКонтрагента.Вставить("СделкаСКлиентомУТ11", Неопределено); // ДоговорКонтрагента.Вставить("ЗаказКлиентаУТ11", Неопределено); // ДоговорКонтрагента.Вставить("ЗаказПоставщикуУТ11", Неопределено); // // // Оплата сертификатом // Значение = Новый Структура; // Значение.Вставить("Ссылка"); // Значение.Вставить("Организация", Источник.Организация); // Значение.Вставить("Контрагент", ОбъектКоллекции.ДоговорКонтрагента_Контрагент); // Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ДоговорКонтрагента_ВалютаВзаиморасчетов); // Значение.Вставить("ДоговорКонтрагента", ДоговорКонтрагента); // // ИмяПКО = "ПодарочныйСертификат"; // ВыгрузитьОбъект = Истина; // //КонецЕсли; <Свойство> <Код>26 <Наименование>Сумма --> СуммаОплаты <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаОплаты" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>Ценообразование <Наименование>Продажа <Порядок>350 <Правило> <Код>ЦеныНоменклатуры_УстановкаЦенНоменклатуры <Наименование>: <Порядок>100 <ПослеЗагрузки>Если Объект.ПометкаУдаления И Объект.ЭтоНовый() Тогда Отказ = Истина; Иначе Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки) КонецЕсли; <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>ДокументСсылка.УстановкаЦенНоменклатуры <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>--> Дата <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>--> ТипЦен <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ТипЦен" Вид="Реквизит" Тип="СправочникСсылка.ТипыЦенНоменклатуры"/> <КодПравилаКонвертации>ТипыЦенНоменклатуры <Свойство> <Код>5 <Наименование>--> Проведен <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>--> НеПроводитьНулевыеЗначения <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НеПроводитьНулевыеЗначения" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Ложь; <Свойство> <Код>4 <Наименование>--> ПометкаУдаления <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>6 <Наименование>--> Товары <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>7 <Наименование>--> Валюта <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>8 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>9 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Значения/> <Группа> <Код>Интеркампани <Наименование>Интеркампани <Порядок>400 <Группа> <Код>ПокупкаПродажа <Наименование>ПокупкаПродажа <Порядок>50 <Правило> <Код>ПДТ_ПередачаТоваровПродажа <Наименование>Документ: Передача товаров между организациями <Порядок>50 <ПередВыгрузкой>Запросы.ТоварыИУслугиИзВидовЗапасовИКПродажа.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запросы.ТоварыИУслугиИзВидовЗапасовИКПродажа.ВыполнитьПакет(); ВходящиеДанные.Вставить("Услуги", РезультатыЗапроса[1].Выгрузить()); ВходящиеДанные.Вставить("Товары", РезультатыЗапроса[3].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПДТ_ПередачаТоваровПродажа"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПередачаТоваровМеждуОрганизациями <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>33 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>17 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>11 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>10 <Наименование>ОрганизацияПолучатель --> Контрагент <Порядок>500 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>9 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>12 <Наименование>--> ДоговорКонтрагента <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>13 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>14 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>700 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>15 <Наименование>--> СпособЗачетаАвансов <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>18 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>800 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>19 <Наименование>Грузополучатель --> Грузополучатель <Порядок>850 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>16 <Наименование>АдресДоставки --> АдресДоставки <Порядок>900 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>53 <Наименование>Руководитель --> Руководитель <Порядок>950 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>52 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1000 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>54 <Наименование>ДоверенностьВыдана --> ДоверенностьВыдана <Порядок>1050 <Источник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>55 <Наименование>ДоверенностьДата --> ДоверенностьДата <Порядок>1100 <Источник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>56 <Наименование>ДоверенностьНомер --> ДоверенностьНомер <Порядок>1150 <Источник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>57 <Наименование>ДоверенностьЛицо --> ДоверенностьЧерезКого <Порядок>1200 <Источник Имя="ДоверенностьЛицо" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьЧерезКого" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>1250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>43 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>21 <Наименование>--> Товары <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>25 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>22 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>23 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>27 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>30 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>28 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>32 <Наименование>--> СчетУчета <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Группа> <Код>44 <Наименование>--> Услуги <Порядок>1400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>46 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>47 <Наименование>--> Содержание <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>45 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>51 <Наименование>--> Цена <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>48 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство> <Код>49 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>50 <Наименование>--> СуммаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ПДТ_ПередачаТоваровПокупка <Наименование>Документ: Передача товаров между организациями <Порядок>100 <ПередВыгрузкой>ВходящиеДанные = Новый Структура(); Запросы.ТоварыИУслугиИзВидовЗапасовИКПокупка.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запросы.ТоварыИУслугиИзВидовЗапасовИКПокупка.ВыполнитьПакет(); ВходящиеДанные.Вставить("Услуги", РезультатыЗапроса[1].Выгрузить()); ВходящиеДанные.Вставить("Товары", РезультатыЗапроса[3].Выгрузить()); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта <> Неопределено Тогда ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("УслугиТабличнаяЧасть"); Для Каждого СтрокаТЧ Из Объект.Услуги Цикл СчетЗатрат = СтрокаТЧ.СчетЗатрат; СчетЗатратНУ = СтрокаТЧ.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТЧ.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТЧ["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПередачаТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>3 <Наименование>НачалоПериода --> Дата <Порядок>50 <Источник Имя="НачалоПериода" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Значение = Источник.Дата; КонецЕсли; Значение = НачалоДня(Значение); <Свойство Поиск="true"> <Код>34 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>5 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>2 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>8 <Наименование>Организация --> Контрагент <Порядок>400 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>450 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>33 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.ОрганизацияПолучатель); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> Источник.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>9 <Наименование>--> СпособЗачетаАвансов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>10 <Наименование>ВалютаВзаиморасчетов --> КратностьВзаиморасчетов <Порядок>600 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>11 <Наименование>ВалютаВзаиморасчетов --> КурсВзаиморасчетов <Порядок>650 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>16 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>750 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>800 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>15 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>850 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>НомерВхДокумента = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(НомерВхДокумента, Ложь, Истина); <Свойство> <Код>20 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>1150 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>21 <Наименование>Грузополучатель --> Грузополучатель <Порядок>1200 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>22 <Наименование>Комментарий --> Комментарий <Порядок>1250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>43 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>44 <Наименование>ПередачаПодДеятельность --> ЭтоЕНВД <Порядок>1350 <Источник Имя="ПередачаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <ПриВыгрузке>Если Значение = Перечисления.ТипыНалогообложенияНДС.ПродажаОблагаетсяЕНВД Тогда Значение = Истина; Иначе Значение = Ложь; КонецЕсли; <Группа> <Код>23 <Наименование>--> Товары <Порядок>1400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>27 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>24 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>25 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>29 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>30 <Наименование>--> Сумма <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>32 <Наименование>--> Цена <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>57 <Наименование>--> НомерГТД <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>63 <Наименование>--> СпособУчетаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>46 <Наименование>--> Услуги <Порядок>1450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Услуги" Вид="ТабличнаяЧасть"/> <Свойство> <Код>48 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>47 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>55 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>51 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>50 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство> <Код>52 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>53 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>54 <Наименование>--> СчетЗатратНУ <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Отказ = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>64 <Наименование>--> СпособУчетаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>56 <Наименование>--> СтатьяРасходов <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>61 <Наименование>Дата --> <Порядок>1500 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПДТ_ПередачаТоваровПередачаНаКомиссию <Наименование>Документ: Передача товаров между организациями <Порядок>150 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПДТ_ПередачаТоваровПередачаНаКомиссию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПередачаТоваровМеждуОрганизациями <Приемник>ДокументСсылка.РеализацияТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>34 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийРеализацияТоваров"/> <ПередВыгрузкой>Значение = "ПродажаКомиссия"; <Свойство> <Код>8 <Наименование>БанковскийСчетОрганизации --> БанковскийСчетОрганизации <Порядок>400 <Источник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчетаОрганизаций"/> <Приемник Имя="БанковскийСчетОрганизации" Вид="Реквизит" Тип="СправочникСсылка.БанковскиеСчета"/> <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Значение.Владелец <> Источник.Организация Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>11 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>10 <Наименование>ОрганизацияПолучатель --> Контрагент <Порядок>500 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>12 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>13 <Наименование>--> ДоговорКонтрагента <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>14 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>15 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>700 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>16 <Наименование>--> СпособЗачетаАвансов <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "НеЗачитывать"; <Свойство> <Код>18 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>800 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>19 <Наименование>Грузополучатель --> Грузополучатель <Порядок>850 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>17 <Наименование>АдресДоставки --> АдресДоставки <Порядок>900 <Источник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="АдресДоставки" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>46 <Наименование>Руководитель --> Руководитель <Порядок>950 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>45 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1000 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>47 <Наименование>ДоверенностьВыдана --> ДоверенностьВыдана <Порядок>1050 <Источник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьВыдана" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>48 <Наименование>ДоверенностьДата --> ДоверенностьДата <Порядок>1100 <Источник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДоверенностьДата" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>49 <Наименование>ДоверенностьНомер --> ДоверенностьНомер <Порядок>1150 <Источник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьНомер" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>50 <Наименование>ДоверенностьЛицо --> ДоверенностьЧерезКого <Порядок>1200 <Источник Имя="ДоверенностьЛицо" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ДоверенностьЧерезКого" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>Комментарий --> Комментарий <Порядок>1250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>44 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1300 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>21 <Наименование>--> Товары <Порядок>1350 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовИКПередачаКомиссионеру.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовИКПередачаКомиссионеру.Выполнить().Выгрузить(); <Свойство> <Код>25 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>22 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>23 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>32 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>30 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>28 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>27 <Наименование>--> ПереданныеСчетУчета <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ПереданныеСчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>31 <Наименование>--> СчетУчета <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Правило> <Код>ПДТ_ПередачаТоваровПриемНаКомиссию <Наименование>Документ: Передача товаров между организациями <Порядок>200 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПДТ_ПередачаТоваровПриемНаКомиссию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПередачаТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ПоступлениеТоваровУслуг <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>НачалоПериода --> Дата <Порядок>50 <Источник Имя="НачалоПериода" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Значение = Источник.Дата; КонецЕсли; Значение = НачалоДня(Значение); <Свойство Поиск="true"> <Код>46 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>7 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийПоступлениеТоваровУслуг"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>8 <Наименование>Организация --> Контрагент <Порядок>400 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>9 <Наименование>Склад --> Склад <Порядок>450 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>10 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.ОрганизацияПолучатель); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>11 <Наименование>--> СпособЗачетаАвансов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "НеЗачитывать" <Свойство> <Код>23 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>600 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>24 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>650 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>26 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>750 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>44 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>800 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>45 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>850 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>НомерВхДокумента = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(НомерВхДокумента, Ложь, Истина); <Свойство> <Код>29 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>1100 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>30 <Наименование>Грузополучатель --> Грузополучатель <Порядок>1150 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>31 <Наименование>Комментарий --> Комментарий <Порядок>1200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>54 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>32 <Наименование>--> Товары <Порядок>1300 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИУслугиИзВидовЗапасовИКПокупка.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИУслугиИзВидовЗапасовИКПокупка.ВыполнитьПакет()[3].Выгрузить(); <Свойство> <Код>36 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>33 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>34 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>35 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>43 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>40 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>38 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>41 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>39 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>59 <Наименование>--> ОтражениеВУСН <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <ПередВыгрузкой>Значение = "НеПринимаются"; <Свойство> <Код>63 <Наименование>--> СпособУчетаНДС <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство Отключить="true"> <Код>61 <Наименование>Дата --> <Порядок>1350 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>Возврат <Наименование>Возврат <Порядок>100 <Правило> <Код>ВТМО_ВозвратПоставщику <Наименование>Документ: Возврат товаров между организациями <Порядок>50 <ПередВыгрузкой>Если Источник.РасшифровкаПлатежа.Количество() > 0 Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.РасшифровкаПлатежа[0].ВалютаВзаиморасчетов); Иначе ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТМО_ВозвратПоставщику"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ВозвратТоваровПоставщику <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>32 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>4 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>ХозяйственнаяОперация --> ВидОперации <Порядок>350 <Источник Имя="ХозяйственнаяОперация" Вид="Реквизит" Тип="ПеречислениеСсылка.ХозяйственныеОперации"/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровПоставщику"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>10 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>9 <Наименование>ОрганизацияПолучатель --> Контрагент <Порядок>500 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>8 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ВходящиеДанные.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ВходящиеДанные.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>12 <Наименование>--> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Кратность; <Свойство> <Код>13 <Наименование>--> КурсВзаиморасчетов <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Курс; <Свойство> <Код>42 <Наименование>ДокументПоступления --> Сделка <Порядок>750 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПередачаТоваровМеждуОрганизациями"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПДТ_ПередачаТоваровПокупка <Свойство> <Код>17 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>850 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>18 <Наименование>Грузополучатель --> Грузополучатель <Порядок>900 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>43 <Наименование>Менеджер --> Ответственный <Порядок>950 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>19 <Наименование>Комментарий --> Комментарий <Порядок>1000 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1050 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>20 <Наименование>--> Товары <Порядок>1100 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовИКВозвратПоставщику.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовИКВозвратПоставщику.Выполнить().Выгрузить(); <Свойство> <Код>24 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>22 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>30 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>25 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>29 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>23 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Значения/> <Правило> <Код>ВТМО_ВозвратКомитенту <Наименование>Документ: Возврат товаров между организациями <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТМО_ВозвратКомитенту"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ВозвратТоваровПоставщику <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>29 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>4 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>ХозяйственнаяОперация --> ВидОперации <Порядок>350 <Источник Имя="ХозяйственнаяОперация" Вид="Реквизит" Тип="ПеречислениеСсылка.ХозяйственныеОперации"/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровПоставщику"/> <ПередВыгрузкой>Значение = "ПокупкаКомиссия"; <Свойство> <Код>41 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>450 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>9 <Наименование>ОрганизацияПолучатель --> Контрагент <Порядок>500 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>8 <Наименование>Склад --> Склад <Порядок>550 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>11 <Наименование>--> ДоговорКонтрагента <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.ОрганизацияПолучатель; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>12 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>650 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата).Кратность; <Свойство> <Код>13 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>700 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата).Курс; <Свойство> <Код>39 <Наименование>ДокументПоступления --> Сделка <Порядок>750 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПередачаТоваровМеждуОрганизациями"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПДТ_ПередачаТоваровПриемНаКомиссию <Свойство> <Код>14 <Наименование>Грузоотправитель --> Грузоотправитель <Порядок>800 <Источник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузоотправитель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>Грузополучатель --> Грузополучатель <Порядок>850 <Источник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Грузополучатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>40 <Наименование>Менеджер --> Ответственный <Порядок>900 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>16 <Наименование>Комментарий --> Комментарий <Порядок>950 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>38 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1000 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>17 <Наименование>--> Товары <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовИКВозвратПоставщику.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовИКВозвратПоставщику.Выполнить().Выгрузить(); <Свойство> <Код>25 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>27 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>19 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> СтавкаНДС <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>24 <Наименование>--> СуммаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>26 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Значения/> <Правило> <Код>ВТМО_ВозвратОтПокупателя <Наименование>Документ: Возврат товаров от клиента <Порядок>150 <ПередВыгрузкой>ВходящиеДанные = Новый Структура(); ВходящиеДанные.Вставить("ПокупателемВыставляетсяСчетФактураНаВозврат"); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда РеквизитыСчетФактуры = Неопределено; Документы.СчетФактураПолученный.СчетаФактурыПоОснованию(Источник.Ссылка, Источник.ОрганизацияПолучатель, РеквизитыСчетФактуры); ВходящиеДанные.ПокупателемВыставляетсяСчетФактураНаВозврат = ЗначениеЗаполнено(РеквизитыСчетФактуры.Ссылка); Иначе Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Ссылка КАК Ссылка, | ИСТИНА КАК ПокупателемВыставляетсяСчетФактураНаВозврат |ИЗ | Документ.СчетФактураВыданный КАК Док |ГДЕ | Док.ДокументОснование = &Ссылка | |УПОРЯДОЧИТЬ ПО | Док.НомерИсправления УБЫВ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; КонецЕсли; Если Источник.РасшифровкаПлатежа.Количество() > 0 Тогда ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.РасшифровкаПлатежа[0].ВалютаВзаиморасчетов); Иначе ВходящиеДанные.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); КонецЕсли; ВходящиеДанные.Вставить("ЭтоЕНВД", Ложь); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТМО_ВозвратОтПокупателя"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ВозвратТоваровОтПокупателя <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = НачалоДня(Значение); <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровОтПокупателя"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>8 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>7 <Наименование>Организация --> Контрагент <Порядок>450 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>10 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ВходящиеДанные.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.ОрганизацияПолучатель); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ВходящиеДанные.ВалютаВзаиморасчетов; ВыгрузитьОбъект = Истина; <Свойство> <Код>15 <Наименование>--> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Кратность; <Свойство> <Код>16 <Наименование>--> КурсВзаиморасчетов <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ВходящиеДанные.ВалютаВзаиморасчетов, Источник.Дата).Курс; <Свойство> <Код>14 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>13 <Наименование>ДокументПоступления --> Сделка <Порядок>750 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПередачаТоваровМеждуОрганизациями"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПДТ_ПередачаТоваровПродажа <Свойство> <Код>44 <Наименование>--> ОтразитьВКнигеПокупок <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ОтразитьВКнигеПокупок" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>12 <Наименование>--> ПокупателемВыставляетсяСчетФактураНаВозврат <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ПокупателемВыставляетсяСчетФактураНаВозврат" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>32 <Наименование>Менеджер --> Ответственный <Порядок>1150 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>17 <Наименование>Комментарий --> Комментарий <Порядок>1200 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1250 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>18 <Наименование>--> Товары <Порядок>1300 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовИКВозвратОтПокупателя.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовИКВозвратОтПокупателя.Выполнить().Выгрузить(); <Свойство> <Код>27 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>26 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>21 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>19 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>22 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>28 <Наименование>--> Себестоимость <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="Себестоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>50 <Наименование>--> СпособУчетаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа Отключить="true"> <Код>33 <Наименование>РасшифровкаПлатежа --> <Порядок>1350 <Источник Имя="РасшифровкаПлатежа" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>34 <Наименование>ВалютаВзаиморасчетов --> <Порядок>50 <Источник Имя="ВалютаВзаиморасчетов" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="" Вид=""/> <Свойство> <Код>48 <Наименование>--> ЭтоЕНВД <Порядок>1500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Значения/> <Правило> <Код>ВТМО_ВозвратОтКомиссионера <Наименование>Документ: Возврат товаров от клиента <Порядок>200 <ПередВыгрузкой>ВходящиеДанные.Вставить("ЭтоЕНВД", Ложь); <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВТМО_ВозвратОтКомиссионера"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВозвратТоваровМеждуОрганизациями <Приемник>ДокументСсылка.ВозвратТоваровОтПокупателя <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = НачалоДня(Значение); <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПриВыгрузке>Значение = Лев(Значение, 5) + "И" + Сред(Значение, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>ОрганизацияПолучатель --> Организация <Порядок>200 <Источник Имя="ОрганизацияПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийВозвратТоваровОтПокупателя"/> <ПередВыгрузкой>Значение = "Товары"; <Свойство> <Код>8 <Наименование>Склад --> Склад <Порядок>400 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>7 <Наименование>Организация --> Контрагент <Порядок>450 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>10 <Наименование>--> ДоговорКонтрагента <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.ОрганизацияПолучатель); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>15 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата).Кратность; <Свойство> <Код>16 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>600 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Значение, Источник.Дата).Курс; <Свойство> <Код>14 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>700 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>13 <Наименование>ДокументПоступления --> Сделка <Порядок>750 <Источник Имя="ДокументПоступления" Вид="Реквизит" Тип="ДокументСсылка.ПередачаТоваровМеждуОрганизациями"/> <Приемник Имя="Сделка" Вид="Реквизит"/> <КодПравилаКонвертации>ПДТ_ПередачаТоваровПередачаНаКомиссию <Свойство> <Код>32 <Наименование>Менеджер --> Ответственный <Порядок>1000 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>17 <Наименование>Комментарий --> Комментарий <Порядок>1050 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>35 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>18 <Наименование>--> Товары <Порядок>1150 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовИКВозвратОтКомиссионера.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовИКВозвратОтКомиссионера.Выполнить().Выгрузить(); <Свойство> <Код>27 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>26 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> Цена <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>24 <Наименование>--> Сумма <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>23 <Наименование>--> СтавкаНДС <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>21 <Наименование>--> СуммаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>19 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>22 <Наименование>--> СчетУчета <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>44 <Наименование>--> ПереданныеСчетУчета <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="ПереданныеСчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>51 <Наименование>--> СпособУчетаНДС <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>49 <Наименование>--> ЭтоЕНВД <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Значения/> <Правило> <Код>ОКОПМО_ОтчетКомиссионераОПродажах <Наименование>Документ: Отчет по комиссии между организациями <Порядок>150 <ПередВыгрузкой>ВходящиеДанные = Новый Структура(); // Контрагент Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда ВходящиеДанные.Вставить("Контрагент", Источник.Контрагент); Иначе ОрганизацияКонтрагента = Источник.Комиссионер; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); ВходящиеДанные.Вставить("Контрагент", НовыйКонтрагент); КонецЕсли; // Определяем наличие сторно и не сторно операций ЕстьСторно = Ложь; ЕстьНеСторно = Ложь; Для Каждого Строка Из Источник.Товары Цикл Если Строка.Количество < 0 Тогда ЕстьСторно = Истина; Иначе ЕстьНеСторно = Истина; КонецЕсли; КонецЦикла; ВходящиеДанные.Вставить("ЕстьСторно", ЕстьСторно); ВходящиеДанные.Вставить("ЕстьНеСторно", ЕстьНеСторно); // Вычисление табличных частей документа Запрос = Новый Запрос("ВЫБРАТЬ | Товары.НомерСтроки КАК НомерСтрокиДокумента, | Товары.Ссылка, | Товары.Ссылка.Организация КАК Организация, | Товары.Номенклатура, | Товары.Характеристика, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.СуммаСНДС / Товары.Количество КАК ЦенаПередачи, | Товары.СуммаСНДС КАК СуммаПередачи, | Товары.СуммаПродажи / Товары.Количество КАК Цена, | Товары.СуммаПродажи КАК Сумма, | Товары.СуммаПродажиНДС КАК СуммаНДС, | Товары.СуммаВознаграждения КАК СуммаВознаграждения, | Товары.Покупатель КАК Покупатель, | Товары.ДатаСчетаФактурыКомиссионера КАК ДатаСФ |ПОМЕСТИТЬ Товары |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | И Товары.Количество > 0 | |СГРУППИРОВАТЬ ПО | Товары.НомерСтроки, | Товары.Ссылка, | Товары.Ссылка.Организация, | Товары.Номенклатура, | Товары.Характеристика, | Товары.Номенклатура.ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.СуммаСНДС / Товары.Количество, | Товары.СуммаСНДС, | Товары.СуммаПродажи / Товары.Количество, | Товары.СуммаПродажи, | Товары.СуммаПродажиНДС, | Товары.СуммаВознаграждения, | ВЫБОР | КОГДА Товары.Количество < 0 | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ, | Товары.Покупатель, | Товары.ДатаСчетаФактурыКомиссионера | |ИНДЕКСИРОВАТЬ ПО | Товары.Ссылка, | Организация, | Покупатель, | ДатаСФ |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Товары.НомерСтрокиДокумента, | Товары.Номенклатура, | Товары.Характеристика, | Товары.ЕдиницаИзмерения, | Товары.Количество, | Товары.СтавкаНДС, | Товары.ЦенаПередачи, | Товары.СуммаПередачи, | Товары.Цена, | Товары.Сумма, | Товары.СуммаНДС, | Товары.СуммаВознаграждения, | Товары.Покупатель, | Товары.ДатаСФ, | ЛОЖЬ КАК ВидыЗапасовЗаполнены, | 1 КАК Коэффициент, | 1 КАК КлючСтроки, | ЗНАЧЕНИЕ(Справочник.НомераГТД.ПустаяСсылка) КАК НомерГТД, | ЗНАЧЕНИЕ(Справочник.СтраныМира.ПустаяСсылка) КАК СтранаПроисхождения, | 0 КАК СуммаНДСВознаграждения, | ВЫРАЗИТЬ ("""" КАК СТРОКА (120)) КАК СЧЕТУЧЕТА |ИЗ | Товары КАК Товары |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | Аналитика.Номенклатура, | Аналитика.Характеристика, | ВидыЗапасов.Количество КАК Количество, | ВидыЗапасов.НомерГТД, | ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.РеализацияЗапасовДругойОрганизации | ТОГДА ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.ВидЗапасовВладельца.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыПереданныеНаКомиссию"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СчетУчета, | ВЫБОР | КОГДА ВидыЗапасов.Количество < 0 | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ КАК Сторно, | ВидыЗапасов.ДатаСчетаФактурыКомиссионера КАК ДатаСФ, | ВидыЗапасов.Покупатель |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики |ГДЕ | ВидыЗапасов.Ссылка = &Ссылка | И ВидыЗапасов.Количество > 0 |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | 1 КАК КлючСтроки, | ВЫБОР | КОГДА Товары.Покупатель = ЗНАЧЕНИЕ(Справочник.Контрагенты.ПустаяСсылка) | ТОГДА Товары.Ссылка.Контрагент | ИНАЧЕ Товары.Покупатель | КОНЕЦ КАК Покупатель, | ВЫБОР | КОГДА Товары.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1) | ТОГДА СчетФактураВыданный.Дата | ИНАЧЕ Товары.ДатаСФ | КОНЕЦ КАК ДатаСФ, | МАКСИМУМ(ВЫБОР | КОГДА СчетФактураВыданный.Ссылка ЕСТЬ NULL | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ) КАК ВыставленСФ, | МАКСИМУМ(ЕСТЬNULL(СчетФактураВыданный.Ссылка, ЗНАЧЕНИЕ(Документ.СчетФактураВыданный.ПустаяСсылка))) КАК СчетФактура, | МИНИМУМ(Товары.НомерСтрокиДокумента) КАК ЗначениеУпорядочивания |ИЗ | Товары КАК Товары | ЛЕВОЕ СОЕДИНЕНИЕ Документ.СчетФактураВыданный КАК СчетФактураВыданный | ПО Товары.Ссылка = СчетФактураВыданный.ДокументОснование | И Товары.Организация = СчетФактураВыданный.Организация | И (Товары.ДатаСФ = НАЧАЛОПЕРИОДА(СчетФактураВыданный.Дата, ДЕНЬ) | ИЛИ Товары.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1)) | И Товары.Покупатель = СчетФактураВыданный.Контрагент | И (НЕ СчетФактураВыданный.ПометкаУдаления) | |СГРУППИРОВАТЬ ПО | ВЫБОР | КОГДА Товары.Покупатель = ЗНАЧЕНИЕ(Справочник.Контрагенты.ПустаяСсылка) | ТОГДА Товары.Ссылка.Контрагент | ИНАЧЕ Товары.Покупатель | КОНЕЦ, | ВЫБОР | КОГДА Товары.ДатаСФ = ДАТАВРЕМЯ(1, 1, 1) | ТОГДА СчетФактураВыданный.Дата | ИНАЧЕ Товары.ДатаСФ | КОНЕЦ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запрос.ВыполнитьПакет(); РеквизитыПоиска = "Номенклатура,Характеристика,ДатаСФ,Покупатель"; ЗаполняемыеРеквизиты = "НомерГТД,СтранаПроисхождения,СчетУчета"; ТабТовары = РезультатыЗапроса[1].Выгрузить(); // Распределение НДС вознаграждения БазаРаспределенияПоСуммеВознаграждения = ТабТовары.ВыгрузитьКолонку("СуммаВознаграждения"); РаспределениеНДСВознаграждения = ОбщегоНазначения.РаспределитьСуммуПропорциональноКоэффициентам(Источник.СуммаНДСВознаграждения, БазаРаспределенияПоСуммеВознаграждения); Если ЗначениеЗаполнено(РаспределениеНДСВознаграждения) Тогда ТабТовары.ЗагрузитьКолонку(РаспределениеНДСВознаграждения, "СуммаНДСВознаграждения"); КонецЕсли; СтруктураПоиска = Новый Структура(РеквизитыПоиска + ",ВидыЗапасовЗаполнены"); ТабТовары.Индексы.Добавить(РеквизитыПоиска + ",ВидыЗапасовЗаполнены"); ВидыЗапасов = РезультатыЗапроса[2].Выбрать(); Пока ВидыЗапасов.Следующий() Цикл ЗаполнитьЗначенияСвойств(СтруктураПоиска, ВидыЗапасов, РеквизитыПоиска); СтруктураПоиска.ВидыЗапасовЗаполнены = Ложь; НайденныеСтроки = ТабТовары.НайтиСтроки(СтруктураПоиска); ОсталосьВидаЗапасов = ВидыЗапасов.Количество; Для Каждого СтрокаДокумента Из НайденныеСтроки Цикл Если ОсталосьВидаЗапасов = 0 Тогда Прервать; КонецЕсли; Если СтрокаДокумента.Количество <= ОсталосьВидаЗапасов Тогда ЗаполнитьЗначенияСвойств(СтрокаДокумента, ВидыЗапасов, ЗаполняемыеРеквизиты); СтрокаДокумента.ВидыЗапасовЗаполнены = Истина; ОсталосьВидаЗапасов = ОсталосьВидаЗапасов - СтрокаДокумента.Количество; Иначе // Выделение новой строки с заполненным видом запасов НоваяСтрока = ТабТовары.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаДокумента); ДоляВидаЗапасовВСтрокеДокумента = ОсталосьВидаЗапасов / СтрокаДокумента.Количество; НоваяСтрока.Количество = ОсталосьВидаЗапасов; НоваяСтрока.СуммаПередачи = Окр(СтрокаДокумента.СуммаПередачи * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.Сумма = Окр(СтрокаДокумента.Сумма * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаНДС = Окр(СтрокаДокумента.СуммаНДС * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаВознаграждения = Окр(СтрокаДокумента.СуммаВознаграждения * ДоляВидаЗапасовВСтрокеДокумента, 2); НоваяСтрока.СуммаНДСВознаграждения = Окр(СтрокаДокумента.СуммаНДСВознаграждения * ДоляВидаЗапасовВСтрокеДокумента, 2); ЗаполнитьЗначенияСвойств(НоваяСтрока, ВидыЗапасов, ЗаполняемыеРеквизиты); СтрокаДокумента.Количество = СтрокаДокумента.Количество - НоваяСтрока.Количество; СтрокаДокумента.СуммаПередачи = СтрокаДокумента.СуммаПередачи - НоваяСтрока.СуммаПередачи; СтрокаДокумента.Сумма = СтрокаДокумента.Сумма - НоваяСтрока.Сумма; СтрокаДокумента.СуммаНДС = СтрокаДокумента.СуммаНДС - НоваяСтрока.СуммаНДС; СтрокаДокумента.СуммаВознаграждения = СтрокаДокумента.СуммаВознаграждения - НоваяСтрока.СуммаВознаграждения; СтрокаДокумента.СуммаНДСВознаграждения = СтрокаДокумента.СуммаНДСВознаграждения - НоваяСтрока.СуммаНДСВознаграждения; ОсталосьВидаЗапасов = 0; КонецЕсли; КонецЦикла; КонецЦикла; ТабТовары.Сортировать("НомерСтрокиДокумента Возр"); // Таблица покупателей ТабПокупатели = РезультатыЗапроса[3].Выгрузить(); СтруктураПоиска = Новый Структура("Покупатель,ДатаСФ"); Для Каждого Строка Из ТабПокупатели Цикл Строка.КлючСтроки = ТабПокупатели.Индекс(Строка) + 1; ЗаполнитьЗначенияСвойств(СтруктураПоиска, Строка); НайденныеСтроки = ТабТовары.НайтиСтроки(СтруктураПоиска); Для Каждого СтрокаТоваров Из НайденныеСтроки Цикл СтрокаТоваров.КлючСтроки = Строка.КлючСтроки; КонецЦикла; КонецЦикла; ВходящиеДанные.Вставить("Товары", ТабТовары); ВходящиеДанные.Вставить("Покупатели", ТабПокупатели); <ПослеВыгрузкиВФайл>Если ВходящиеДанные.ЕстьСторно Тогда Если ВходящиеДанные.ЕстьНеСторно Тогда Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комиссионера о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором присутствуют сторнирующие строки |Последствия: документ загрузится без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); Иначе Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комиссионера о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором присутствуют только сторнирующие строки |Последствия: документ загрузится пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); КонецЕсли; //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта["ЕстьСторно"] Тогда Если ПараметрыОбъекта["ЕстьНеСторно"] Тогда ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комиссионера о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором в базе-источнике были сторнирующие строки |Последствия: документ загрузился без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); Иначе ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комиссионера о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором в базе-источнике были только сторнирующие строки |Последствия: документ загрузился пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); КонецЕсли; // выполняем запись в протокол и ЖР Сообщить(ТекстСообщения); КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями <Приемник>ДокументСсылка.ОтчетКомиссионераОПродажах <Свойства> <Свойство Поиск="true"> <Код>7 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>42 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ЕстьНеСторно И Источник.Проведен; <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>20 <Наименование>Валюта --> ВалютаДокумента <Порядок>250 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>5 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>300 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> Контрагент <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>10 <Наименование>--> ДоговорКонтрагента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомиссионером"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Комиссионер; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>18 <Наименование>--> СпособЗачетаАвансов <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СпособЗачетаАвансов" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыЗачетаАвансов"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>13 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>12 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>21 <Наименование>СпособРасчетаВознаграждения --> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="СпособРасчетаВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <КодПравилаКонвертации>СпособыРасчетаКомиссионногоВознаграждения <Свойство> <Код>17 <Наименование>ПроцентВознаграждения --> ПроцентКомиссионногоВознаграждения <Порядок>650 <Источник Имя="ПроцентВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ПроцентКомиссионногоВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>СуммаВознаграждения --> СуммаВознаграждения <Порядок>700 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>СтавкаНДСВознаграждения --> СтавкаНДСВознаграждения <Порядок>750 <Источник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>22 <Наименование>--> СуммаВключаетНДС <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>6 <Наименование>УдержатьВознаграждение --> УдержатьВознаграждение <Порядок>850 <Источник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>23 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>900 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>24 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>950 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>НомерВхДокумента = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(НомерВхДокумента, Ложь, Истина); <Свойство> <Код>41 <Наименование>Менеджер --> Ответственный <Порядок>1000 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>1050 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>56 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>72 <Наименование>НалогообложениеНДС --> СпособУчетаНДС <Порядок>1150 <Источник Имя="НалогообложениеНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Свойство> <Код>58 <Наименование>--> ЕстьНеСторно <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьНеСторно <Свойство> <Код>57 <Наименование>--> ЕстьСторно <Порядок>1250 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьСторно <Группа> <Код>25 <Наименование>--> Товары <Порядок>1300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>29 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>26 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>27 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>38 <Наименование>--> ЦенаПередачи <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаПередачи" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>--> СуммаПередачи <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПередачи" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>37 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>33 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство> <Код>35 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>--> СуммаВознаграждения <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СуммаНДСВознаграждения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> НомерГТД <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>32 <Наименование>--> СтранаПроисхождения <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>40 <Наименование>--> СчетУчета <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>60 <Наименование>--> КлючСтроки <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <Группа> <Код>61 <Наименование>--> Покупатели <Порядок>1350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Покупатели" Вид="ТабличнаяЧасть"/> <Свойство> <Код>65 <Наименование>--> Покупатель <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>62 <Наименование>--> ВыставленСФ <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ВыставленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>63 <Наименование>--> ДатаСФ <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>66 <Наименование>--> СчетФактура <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СчетФактура" Вид="Реквизит" Тип="ДокументСсылка.СчетФактураВыданный"/> <КодПравилаКонвертации>СФВ_СчетФактураВыданный <Свойство> <Код>64 <Наименование>--> КлючСтроки <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="КлючСтроки" Вид="Реквизит" Тип="Число"/> <Группа Отключить="true"> <Код>43 <Наименование>Товары --> <Порядок>1400 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>44 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>45 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>46 <Наименование>СтавкаНДС --> <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>47 <Наименование>СуммаВознаграждения --> <Порядок>200 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>48 <Наименование>СуммаПродажи --> <Порядок>250 <Источник Имя="СуммаПродажи" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>49 <Наименование>СуммаПродажиНДС --> <Порядок>300 <Источник Имя="СуммаПродажиНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>50 <Наименование>СуммаСНДС --> <Порядок>350 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>69 <Наименование>СуммаНДСВознаграждения --> <Порядок>400 <Источник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>71 <Наименование>ДатаСчетаФактурыКомиссионера --> <Порядок>450 <Источник Имя="ДатаСчетаФактурыКомиссионера" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>73 <Наименование>Покупатель --> <Порядок>500 <Источник Имя="Покупатель" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ОКТОПМО_ОтчетКомитентуОПродажах <Наименование>Документ: Отчет по комиссии между организациями <Порядок>200 <ПередВыгрузкой>Товары = Источник.Товары.Выгрузить(); Если Товары.Итог("СуммаНДСВознаграждения") <> Источник.СуммаНДСВознаграждения Тогда БазаРаспределенияПоСуммеВознаграждения = Товары.ВыгрузитьКолонку("СуммаВознаграждения"); РаспределениеНДСВознаграждения = ОбщегоНазначения.РаспределитьСуммуПропорциональноКоэффициентам(Источник.СуммаНДСВознаграждения, БазаРаспределенияПоСуммеВознаграждения); Если ЗначениеЗаполнено(РаспределениеНДСВознаграждения) Тогда Товары.ЗагрузитьКолонку(РаспределениеНДСВознаграждения, "СуммаНДСВознаграждения"); КонецЕсли; КонецЕсли; ВходящиеДанные.Вставить("Товары", Товары); // Определяем наличие сторно и не сторно операций ЕстьСторно = Ложь; ЕстьНеСторно = Ложь; Для Каждого Строка Из Источник.Товары Цикл Если Строка.Количество < 0 Тогда ЕстьСторно = Истина; Иначе ЕстьНеСторно = Истина; КонецЕсли; КонецЦикла; ВходящиеДанные.Вставить("ЕстьСторно", ЕстьСторно); ВходящиеДанные.Вставить("ЕстьНеСторно", ЕстьНеСторно); <ПослеВыгрузкиВФайл>Если ВходящиеДанные.ЕстьСторно Тогда Если ВходящиеДанные.ЕстьНеСторно Тогда Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комитенту о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором присутствуют сторнирующие строки |Последствия: документ загрузится без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); Иначе Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Отчет комитенту о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором присутствуют только сторнирующие строки |Последствия: документ загрузится пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); КонецЕсли; //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта["ЕстьСторно"] Тогда Если ПараметрыОбъекта["ЕстьНеСторно"] Тогда ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комитенту о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором в базе-источнике были сторнирующие строки |Последствия: документ загрузился без учета сторнирующих строк |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); Иначе ТекстСообщения = НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Отчет комитенту о продажах"" на основании документа ""Отчет по комиссии между организациями"", в котором в базе-источнике были только сторнирующие строки |Последствия: документ загрузился пустым и непроведенным |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'"); КонецЕсли; // выполняем запись в протокол и ЖР Сообщить(ТекстСообщения); КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями <Приемник>ДокументСсылка.ОтчетКомитентуОПродажах <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>33 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "И" + Сред(Источник.Номер, 7); <Свойство> <Код>3 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = ВходящиеДанные.ЕстьНеСторно И Источник.Проведен; <Свойство> <Код>48 <Наименование>--> ВидОперации <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийОтчетКомитентуОПродажах"/> <ПередВыгрузкой>Значение = "ОтчетОПродажах"; <Свойство> <Код>1 <Наименование>Комиссионер --> Организация <Порядок>250 <Источник Имя="Комиссионер" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>300 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>4 <Наименование>СуммаДокумента --> СуммаДокумента <Порядок>350 <Источник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>Организация --> Контрагент <Порядок>400 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <ПередВыгрузкой>Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение = Источник.Контрагент; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение = НовыйКонтрагент; КонецЕсли; <Свойство> <Код>7 <Наименование>--> ДоговорКонтрагента <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>// Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Источник.Валюта); Значение.Вставить("ВидДоговора", "СКомитентом"); Значение.Вставить("Владелец", Неопределено); Значение.Вставить("Организация", Источник.Комиссионер); Значение.Вставить("РасчетыВУсловныхЕдиницах", Ложь); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Если Источник.РасчетыЧерезОтдельногоКонтрагента Тогда Значение.Владелец = Источник.Контрагент; Значение.ПартнерУТ11 = Источник.Партнер; Иначе ОрганизацияКонтрагента = Источник.Организация; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Значение.Владелец = НовыйКонтрагент; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>8 <Наименование>Валюта --> КратностьВзаиморасчетов <Порядок>500 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>9 <Наименование>Валюта --> КурсВзаиморасчетов <Порядок>550 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>13 <Наименование>СпособРасчетаВознаграждения --> СпособРасчетаКомиссионногоВознаграждения <Порядок>600 <Источник Имя="СпособРасчетаВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <Приемник Имя="СпособРасчетаКомиссионногоВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыРасчетаКомиссионногоВознаграждения"/> <КодПравилаКонвертации>СпособыРасчетаКомиссионногоВознаграждения <Свойство> <Код>10 <Наименование>СтавкаНДСВознаграждения --> СтавкаНДСВознаграждения <Порядок>650 <Источник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДСВознаграждения" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(Источник.СтавкаНДСВознаграждения) Тогда ИмяПКО = "СтавкиНДС"; Иначе Значение = "БезНДС"; КонецЕсли; <Свойство> <Код>11 <Наименование>СуммаВознаграждения --> СуммаВознаграждения <Порядок>700 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>ПроцентВознаграждения --> ПроцентКомиссионногоВознаграждения <Порядок>750 <Источник Имя="ПроцентВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ПроцентКомиссионногоВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>ЦенаВключаетНДС --> СуммаВключаетНДС <Порядок>800 <Источник Имя="ЦенаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>15 <Наименование>УдержатьВознаграждение --> УдержатьВознаграждение <Порядок>850 <Источник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="УдержатьВознаграждение" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>18 <Наименование>Услуга --> УслугаПоВознаграждению <Порядок>900 <Источник Имя="Услуга" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="УслугаПоВознаграждению" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>32 <Наименование>Менеджер --> Ответственный <Порядок>950 <Источник Имя="Менеджер" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>17 <Наименование>Комментарий --> Комментарий <Порядок>1000 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>41 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1050 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>43 <Наименование>--> ЕстьНеСторно <Порядок>1100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьНеСторно <Свойство> <Код>42 <Наименование>--> ЕстьСторно <Порядок>1150 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЕстьСторно <Группа> <Код>19 <Наименование>--> Товары <Порядок>1200 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередВыгрузкой>Если ОбъектКоллекции.Количество < 0 Тогда Отказ = Истина; КонецЕсли; <Свойство> <Код>23 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>20 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Номенклатура.ЕдиницаИзмерения; <Свойство> <Код>21 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.Количество; <Свойство> <Код>22 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = 1; <Свойство> <Код>31 <Наименование>--> ЦенаПоступления <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаПоступления" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС / ОбъектКоллекции.Количество; <Свойство> <Код>29 <Наименование>--> СуммаПоступления <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПоступления" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаСНДС; <Свойство> <Код>30 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаПродажи / ОбъектКоллекции.Количество; <Свойство> <Код>25 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаПродажи; <Свойство> <Код>24 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство> <Код>27 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.СуммаПродажиНДС; <Свойство> <Код>26 <Наименование>--> СуммаВознаграждения <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> СуммаНДСВознаграждения <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>46 <Наименование>--> ДатаРеализации <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаРеализации" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.ДатаСчетаФактурыКомиссионера; <Свойство> <Код>47 <Наименование>--> Покупатель <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="Покупатель" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Свойство Отключить="true"> <Код>34 <Наименование>СуммаНДСВознаграждения --> <Порядок>1250 <Источник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>35 <Наименование>Товары --> <Порядок>1300 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>36 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>37 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>38 <Наименование>СуммаНДС --> <Порядок>150 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>39 <Наименование>СуммаПродажи --> <Порядок>200 <Источник Имя="СуммаПродажи" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>40 <Наименование>СуммаСНДС --> <Порядок>250 <Источник Имя="СуммаСНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>44 <Наименование>СуммаВознаграждения --> <Порядок>300 <Источник Имя="СуммаВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>45 <Наименование>СуммаНДСВознаграждения --> <Порядок>350 <Источник Имя="СуммаНДСВознаграждения" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>49 <Наименование>ДатаСчетаФактурыКомиссионера --> <Порядок>400 <Источник Имя="ДатаСчетаФактурыКомиссионера" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>50 <Наименование>Покупатель --> <Порядок>450 <Источник Имя="Покупатель" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>СкладскиеОперации <Наименование>СкладскиеОперации <Порядок>450 <Группа> <Код>КомплектацияРазукомплектация <Наименование>КомплектацияРазукомплектация <Порядок>50 <Правило> <Код>СБТ_СборкаИзКомплектующих <Наименование>Документ: Сборка товаров <Порядок>50 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СБТ_СборкаИзКомплектующих"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СборкаТоваров <Приемник>ДокументСсылка.КомплектацияНоменклатуры <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>3 <Наименование>Номенклатура --> Номенклатура <Порядок>300 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>1 <Наименование>Количество --> Количество <Порядок>350 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> НДСвСтоимостиТоваров <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="НДСвСтоимостиТоваров" Вид="Реквизит" Тип="ПеречислениеСсылка.ДействиеНДСВСтоимостиТоваров"/> <ПередВыгрузкой>Значение = "НеИзменять"; <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКомплектацияНоменклатуры"/> <ПередВыгрузкой>Значение = "Комплектация"; <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>500 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>550 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>600 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>27 <Наименование>СборкаПодДеятельность --> СпособУчетаНДС <Порядок>650 <Источник Имя="СборкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Группа> <Код>10 <Наименование>--> Комплектующие <Порядок>700 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Комплектующие" Вид="ТабличнаяЧасть"/> <Свойство> <Код>12 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>11 <Наименование>--> Количество <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> НомерГТД <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>14 <Наименование>--> СтранаПроисхождения <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>18 <Наименование>--> СчетУчета <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>28 <Наименование>--> СпособУчетаНДС <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство Отключить="true"> <Код>25 <Наименование>Статус --> <Порядок>800 <Источник Имя="Статус" Вид="Реквизит" Тип="ПеречислениеСсылка.СтатусыСборокТоваров"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>РБТ_РазборкаНаКомплектующие <Наименование>Документ: Сборка товаров <Порядок>100 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "РБТ_РазборкаНаКомплектующие"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СборкаТоваров <Приемник>ДокументСсылка.КомплектацияНоменклатуры <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>9 <Наименование>--> ВидОперации <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ВидОперации" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидыОперацийКомплектацияНоменклатуры"/> <ПередВыгрузкой>Значение = "Разукомплектация"; <Свойство> <Код>3 <Наименование>Номенклатура --> Номенклатура <Порядок>350 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>1 <Наименование>Количество --> Количество <Порядок>400 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Значение = Источник.Количество; <Свойство> <Код>10 <Наименование>--> НДСвСтоимостиТоваров <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НДСвСтоимостиТоваров" Вид="Реквизит" Тип="ПеречислениеСсылка.ДействиеНДСВСтоимостиТоваров"/> <ПередВыгрузкой>Значение = "НеИзменять"; <Свойство> <Код>15 <Наименование>Ответственный --> Ответственный <Порядок>500 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>550 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>600 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>25 <Наименование>СборкаПодДеятельность --> СпособУчетаНДС <Порядок>650 <Источник Имя="СборкаПодДеятельность" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Группа> <Код>11 <Наименование>Товары --> Комплектующие <Порядок>700 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Комплектующие" Вид="ТабличнаяЧасть"/> <Свойство> <Код>14 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>13 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>ДоляСтоимости --> ДоляСтоимости <Порядок>150 <Источник Имя="ДоляСтоимости" Вид="Реквизит" Тип="Число"/> <Приемник Имя="ДоляСтоимости" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>26 <Наименование>--> СпособУчетаНДС <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <ПередВыгрузкой>Значение = Источник.СборкаПодДеятельность; <Свойство Отключить="true"> <Код>23 <Наименование>Статус --> <Порядок>800 <Источник Имя="Статус" Вид="Реквизит" Тип="ПеречислениеСсылка.СтатусыСборокТоваров"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СРТС_СписаниеТоваровПриСборкеРазборке <Наименование>Документ: Списание товаров <Порядок>150 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СРТС_СписаниеТоваровПриСборкеРазборке"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СборкаТоваров <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "К" + Сред(Источник.Номер, 7); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>6 <Наименование>--> Основание <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> Товары <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>14 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>13 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>10 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Свойство> <Код>9 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>24 <Наименование>Статус --> <Порядок>650 <Источник Имя="Статус" Вид="Реквизит" Тип="ПеречислениеСсылка.СтатусыСборокТоваров"/> <Приемник Имя="" Вид=""/> <Значения/> <Группа> <Код>ПорчаТоваров <Наименование>Пересортица <Порядок>100 <Правило> <Код>ПорчаТоваровВОприходованиеТоваров <Наименование>Документ: Пересортица товаров <Порядок>50 <ПослеВыгрузкиВФайл>Если Источник.ПриходоватьТоварыПоСебестоимостиСписания Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Оприходование товаров"" на основании документа ""Порча товаров"" с признаком ""Товары приходуются по себестоимости списания"" |Последствия: стоимость оприходования товаров будет установлена в соответствии с видом цен, указанном в документе |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если НЕ ЗначениеЗаполнено(Объект.СтатьяПрочихДоходовРасходов) Тогда // Объект.СтатьяПрочихДоходовРасходов = Параметры.СтатьяПрочихДоходовРасходов_ОприходованиеТоваров; //КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта["ПриходоватьТоварыПоСебестоимостиСписания"] Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Оприходование товаров"" на основании документа ""Порча товаров"" с признаком ""Товары приходуются по себестоимости списания"" |Последствия: стоимость оприходования товаров установлена в соответствии с видом цен, указанным в операции |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'")); // выполняем запись в протокол и ЖР //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПорчаТоваровВОприходованиеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПорчаТоваров <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>11 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>12 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "К" + Сред(Источник.Номер, 7); <Свойство> <Код>13 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>14 <Наименование>--> Основание <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>15 <Наименование>Ответственный --> Ответственный <Порядок>350 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>400 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>450 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>26 <Наименование>ПриходоватьТоварыПоСебестоимостиСписания --> ПриходоватьТоварыПоСебестоимостиСписания <Порядок>500 <Источник Имя="ПриходоватьТоварыПоСебестоимостиСписания" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ПриходоватьТоварыПоСебестоимостиСписания <Группа> <Код>1 <Наименование>--> Товары <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = ?(Источник.ПриходоватьТоварыПоСебестоимостиСписания, Запросы["ТоварыИзВидовЗапасовДляПорчиТоваровПриходСебест"], Запросы["ТоварыИзВидовЗапасовДляПорчиТоваровПриходЦены"]); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВидЦен", Источник.ВидЦены); Запрос.УстановитьПараметр("РегВалюта", Константы.ВалютаРегламентированногоУчета.Получить()); Запрос.УстановитьПараметр("УпрВалюта", Константы.ВалютаУправленческогоУчета.Получить()); Запрос.Выполнить(); КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>6 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>5 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>4 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>19 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>20 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>31 <Наименование>--> СтранаПроисхождения <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>32 <Наименование>--> СчетУчета <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>27 <Наименование>ВидЦены --> <Порядок>600 <Источник Имя="ВидЦены" Вид="Реквизит" Тип="СправочникСсылка.ВидыЦен"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>21 <Наименование>Товары --> <Порядок>650 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>НоменклатураОприходование --> <Порядок>50 <Источник Имя="НоменклатураОприходование" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>ХарактеристикаОприходование --> <Порядок>100 <Источник Имя="ХарактеристикаОприходование" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>Цена --> <Порядок>150 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>Количество --> <Порядок>200 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>28 <Наименование>Номенклатура --> <Порядок>250 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>29 <Наименование>Характеристика --> <Порядок>300 <Источник Имя="Характеристика" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПорчаТоваровВСписаниеТоваров <Наименование>Документ: Порча товаров <Порядок>100 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПорчаТоваровВСписаниеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПорчаТоваров <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "К" + Сред(Источник.Номер, 7); <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>16 <Наименование>--> Основание <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> Товары <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовДляПорчиТоваровСписание.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовДляПорчиТоваровСписание.Выполнить().Выгрузить(); <Свойство> <Код>14 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>13 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>11 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>9 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>12 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Группа> <Код>Пересортица <Наименование>Пересортица <Порядок>150 <Правило> <Код>ПТ_ПересортицаТоваровОприходование <Наименование>Документ: Пересортица товаров <Порядок>50 <ПослеВыгрузкиВФайл>Если Источник.ПриходоватьТоварыПоСебестоимостиСписания Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Выгрузка документа выполнена с предупреждением |Причина: выгружен документ ""Оприходование товаров"" на основании документа ""Пересортица товаров"" с признаком ""Товары приходуются по себестоимости списания"" |Последствия: стоимость оприходования товаров будет установлена в соответствии с видом цен, указанном в документе |Рекомендация: рекомендуется проконтролировать результат отражения операции в базе-приемнике'")); //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если НЕ ЗначениеЗаполнено(Объект.СтатьяПрочихДоходовРасходов) Тогда // Объект.СтатьяПрочихДоходовРасходов = Параметры.СтатьяПрочихДоходовРасходов_ОприходованиеТоваров; //КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда Если ПараметрыОбъекта["ПриходоватьТоварыПоСебестоимостиСписания"] Тогда // формируем текст сообщения Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: загружен документ ""Оприходование товаров"" на основании документа ""Пересортица товаров"" с признаком ""Товары приходуются по себестоимости списания"" |Последствия: стоимость оприходования товаров установлена в соответствии с видом цен, указанным в операции |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе'")); // выполняем запись в протокол и ЖР //ЗарегистрироватьПредупреждение(ТекстСообщения); КонецЕсли; //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТ_ПересортицаТоваровОприходование"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПересортицаТоваров <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>11 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>12 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "П" + Сред(Источник.Номер, 7); <Свойство> <Код>13 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>14 <Наименование>--> Основание <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>15 <Наименование>Ответственный --> Ответственный <Порядок>350 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>400 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>450 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>29 <Наименование>СтатьяДоходов --> СтатьяПрочихДоходовРасходов <Порядок>500 <Источник Имя="СтатьяДоходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиДоходов"/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <ПередВыгрузкой>Если Источник.ПриходоватьТоварыПоСебестоимостиСписания Тогда Пусто = Истина; КонецЕсли; <ПриВыгрузке>Если Источник.ПриходоватьТоварыПоСебестоимостиСписания Тогда Пусто = Истина; ИначеЕсли ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>28 <Наименование>ПриходоватьТоварыПоСебестоимостиСписания --> ПриходоватьТоварыПоСебестоимостиСписания <Порядок>550 <Источник Имя="ПриходоватьТоварыПоСебестоимостиСписания" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ПриходоватьТоварыПоСебестоимостиСписания <Группа> <Код>1 <Наименование>--> Товары <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос; Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВидЦен", Источник.ВидЦены); Запрос.УстановитьПараметр("РегВалюта", Константы.ВалютаРегламентированногоУчета.Получить()); Запрос.УстановитьПараметр("УпрВалюта", Константы.ВалютаУправленческогоУчета.Получить()); Запрос.Текст = "ВЫБРАТЬ | Товары.НоменклатураОприходование КАК Номенклатура, | Товары.ХарактеристикаОприходование КАК Характеристика, | Товары.Номенклатура КАК НоменклатураСписание, | Товары.Характеристика КАК ХарактеристикаСписание, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | 1 КАК Коэффициент, | Товары.Количество, | Товары.Цена, | Товары.Цена * Товары.Количество КАК Сумма, | Товары.НомерГТД, | Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | Товары.НомерСтроки |ПОМЕСТИТЬ ВременнаяТаблицаТовары |ИЗ | Документ.ПересортицаТоваров.Товары КАК Товары |ГДЕ | Товары.Ссылка = &Ссылка | |ИНДЕКСИРОВАТЬ ПО | НоменклатураСписание, | ХарактеристикаСписание"; Запрос.Выполнить(); Если Источник.ПриходоватьТоварыПоСебестоимостиСписания Тогда Запрос.Текст = "ВЫБРАТЬ | ВременнаяТаблицаТовары.Номенклатура КАК Номенклатура, | ВременнаяТаблицаТовары.Характеристика КАК Характеристика, | ЦеныНоменклатурыСрезПоследних.Цена * ВЫБОР | КОГДА &РегВалюта <> ЦеныНоменклатурыСрезПоследних.Валюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Цена, | ЦеныНоменклатурыСрезПоследних.Цена * ВЫБОР | КОГДА &РегВалюта <> ЦеныНоменклатурыСрезПоследних.Валюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ * ВременнаяТаблицаТовары.Количество КАК Сумма, | ВременнаяТаблицаТовары.НомерГТД КАК НомерГТД, | ВременнаяТаблицаТовары.СтранаПроисхождения КАК СтранаПроисхождения, | ВременнаяТаблицаТовары.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | ВременнаяТаблицаТовары.Коэффициент КАК Коэффициент, | ВременнаяТаблицаТовары.Количество КАК Количество |ИЗ | ВременнаяТаблицаТовары КАК ВременнаяТаблицаТовары | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних( | &Дата, | ВидЦены = &ВидЦен | И (Номенклатура, Характеристика) В | (ВЫБРАТЬ | ВременнаяТаблицаТовары.НоменклатураСписание, | ВременнаяТаблицаТовары.ХарактеристикаСписание | ИЗ | ВременнаяТаблицаТовары КАК ВременнаяТаблицаТовары)) КАК ЦеныНоменклатурыСрезПоследних | ПО ВременнаяТаблицаТовары.НоменклатураСписание = ЦеныНоменклатурыСрезПоследних.Номенклатура | И ВременнаяТаблицаТовары.ХарактеристикаСписание = ЦеныНоменклатурыСрезПоследних.Характеристика | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютыЦены | ПО (ЦеныНоменклатурыСрезПоследних.Валюта = КурсыВалютыЦены.Валюта) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты | ПО (ИСТИНА) | |УПОРЯДОЧИТЬ ПО | ВременнаяТаблицаТовары.НомерСтроки"; Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("ВидЦен", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Склад, "УчетныйВидЦены")); Запрос.УстановитьПараметр("Валюта", Константы.ВалютаРегламентированногоУчета.Получить()); Иначе Запрос.Текст = "ВЫБРАТЬ | ВременнаяТаблицаТовары.Номенклатура КАК Номенклатура, | ВременнаяТаблицаТовары.Характеристика КАК Характеристика, | ВременнаяТаблицаТовары.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | ВременнаяТаблицаТовары.Коэффициент КАК Коэффициент, | ВременнаяТаблицаТовары.Количество КАК Количество, | ВременнаяТаблицаТовары.Цена * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Цена, | ВременнаяТаблицаТовары.Сумма * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ВременнаяТаблицаТовары.НомерГТД КАК НомерГТД, | ВременнаяТаблицаТовары.СтранаПроисхождения КАК СтранаПроисхождения |ИЗ | ВременнаяТаблицаТовары КАК ВременнаяТаблицаТовары | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &УпрВалюта) КАК КурсыВалютыЦены | ПО (ИСТИНА) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты | ПО (ИСТИНА) | |УПОРЯДОЧИТЬ ПО | ВременнаяТаблицаТовары.НомерСтроки"; КонецЕсли; КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>4 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>5 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>6 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>2 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>7 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Свойство> <Код>20 <Наименование>--> Цена <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>30 <Наименование>ВидЦены --> <Порядок>650 <Источник Имя="ВидЦены" Вид="Реквизит" Тип="СправочникСсылка.ВидыЦен"/> <Приемник Имя="" Вид=""/> <Группа Отключить="true"> <Код>22 <Наименование>Товары --> <Порядок>700 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>24 <Наименование>НоменклатураОприходование --> <Порядок>100 <Источник Имя="НоменклатураОприходование" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>25 <Наименование>НомерГТД --> <Порядок>150 <Источник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>ХарактеристикаОприходование --> <Порядок>200 <Источник Имя="ХарактеристикаОприходование" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>27 <Наименование>Цена --> <Порядок>250 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>31 <Наименование>Номенклатура --> <Порядок>300 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>32 <Наименование>Характеристика --> <Порядок>350 <Источник Имя="Характеристика" Вид="Реквизит" Тип="СправочникСсылка.ХарактеристикиНоменклатуры"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ПТ_ПересортицаТоваровСписание <Наименование>Документ: Пересортица товаров <Порядок>100 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПТ_ПересортицаТоваровСписание"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПересортицаТоваров <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "П" + Сред(Источник.Номер, 7); <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>16 <Наименование>--> Основание <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> Товары <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовДляПересортицыСписание.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовДляПересортицыСписание.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Свойство> <Код>12 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>13 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>14 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Свойство> <Код>15 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Группа> <Код>ВнутреннееПотреблениеТоваров <Наименование>Внутреннее потребление товаров <Порядок>200 <Правило> <Код>ВПТ_ТребованиеНакладная <Наименование>Документ: Требование-накладная <Порядок>50 <ПередВыгрузкой>Запросы.ТоварыИзВидовЗапасовДляВнутреннегоПотребления.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запросы.ТоварыИзВидовЗапасовДляВнутреннегоПотребления.Выполнить(); ВходящиеДанные.Вставить("Материалы", РезультатыЗапроса.Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВПТ_ТребованиеНакладная"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВнутреннееПотребление <Приемник>ДокументСсылка.ТребованиеНакладная <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>17 <Наименование>--> НДСвСтоимостиТоваров <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="НДСвСтоимостиТоваров" Вид="Реквизит" Тип="ПеречислениеСсылка.ДействиеНДСВСтоимостиТоваров"/> <ПередВыгрузкой>Значение = "НеИзменять"; <Свойство> <Код>18 <Наименование>Ответственный --> Ответственный <Порядок>350 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>400 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>27 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>450 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>28 <Наименование>--> СчетаУчетаЗатратВТаблице <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СчетаУчетаЗатратВТаблице" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = "Истина"; <Свойство> <Код>34 <Наименование>ПотреблениеДляДеятельности --> СпособУчетаНДС <Порядок>550 <Источник Имя="ПотреблениеДляДеятельности" Вид="Реквизит" Тип="ПеречислениеСсылка.ТипыНалогообложенияНДС"/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <КодПравилаКонвертации>СпособыУчетаНДС <Группа> <Код>7 <Наименование>--> Материалы <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Материалы" Вид="ТабличнаяЧасть"/> <Свойство> <Код>13 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>10 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>12 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>15 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>32 <Наименование>--> СчетЗатрат <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если ЗначениеЗаполнено(ОбъектКоллекции.СтатьяРасходов) Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ОбъектКоллекции.СтатьяРасходов, "КорреспондирующийСчет"); Иначе Отказ = Истина; КонецЕсли; <Свойство> <Код>30 <Наименование>--> СтатьяЗатрат <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтатьяЗатрат" Вид="Реквизит" Тип="СправочникСсылка.СтатьиЗатрат"/> <КодПравилаКонвертации>СтатьиРасходовВСтатьиЗатрат <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Пусто = НЕ ЗначениеЗаполнено(КоррСчет) ИЛИ Найти(КоррСчет, "91.02") > 0; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>35 <Наименование>--> СпособУчетаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Значения/> <Правило> <Код>ВПТ_ПередачаМатериаловВЭксплуатацию <Наименование>Документ: Внутреннее потребление (списание) товаров <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Заполняем местонахождение по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.Местонахождение) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.Местонахождение = ПодразделениеОрганизации; КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВПТ_ПередачаМатериаловВЭксплуатацию"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ВнутреннееПотребление <Приемник>ДокументСсылка.ПередачаМатериаловВЭксплуатацию <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>4 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>300 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>9 <Наименование>Товары --> Спецодежда <Порядок>450 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Спецодежда" Вид="ТабличнаяЧасть"/> <Свойство> <Код>11 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>Номенклатура <ИмяПараметраДляПередачи>Номенклатура <Свойство> <Код>10 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>Количество <Свойство> <Код>14 <Наименование>ФизическоеЛицо --> ФизическоеЛицо <Порядок>200 <Источник Имя="ФизическоеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ФизическиеЛица <ИмяПараметраДляПередачи>ФизическоеЛицо <Свойство> <Код>17 <Наименование>СтатьяРасходов --> НазначениеИспользования <Порядок>300 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СР_НазначенияИспользования <ИмяПараметраДляПередачи>НазначениеИспользования <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда ИсходящиеДанные = Новый Структура; ИсходящиеДанные.Вставить("СрокПолезногоИспользования", ОбъектКоллекции.СрокЭксплуатации); ИсходящиеДанные.Вставить("Владелец", ОбъектКоллекции.Номенклатура); Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>15 <Наименование>СтатьяРасходов --> СпособОтраженияРасходов <Порядок>300 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>СР_СпособыОтраженияРасходовПоАмортизации <ИмяПараметраДляПередачи>СпособОтраженияРасходов <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; ВыгрузитьОбъект = Истина; <Свойство> <Код>16 <Наименование>Количество --> Количество <Порядок>350 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ПОТ_ВозвратМатериаловИзЭксплуатации <Наименование>Документ: Прочее оприходование товаров <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Заполняем подразделение организации по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.ПодразделениеОрганизации) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.ПодразделениеОрганизации = ПодразделениеОрганизации; КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПОТ_ВозвратМатериаловИзЭксплуатации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПрочееОприходованиеТоваров <Приемник>ДокументСсылка.ВозвратМатериаловИзЭксплуатации <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>4 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПередВыгрузкой>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>3 <Наименование>Ответственный --> Ответственный <Порядок>300 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>350 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>400 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>9 <Наименование>Товары --> Спецодежда <Порядок>450 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="Спецодежда" Вид="ТабличнаяЧасть"/> <Свойство> <Код>11 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>Номенклатура <ИмяПараметраДляПередачи>Номенклатура <Свойство> <Код>10 <Наименование>Количество --> Количество <Порядок>100 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>Количество <Свойство> <Код>12 <Наименование>ФизическоеЛицо --> ФизическоеЛицо <Порядок>150 <Источник Имя="ФизическоеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>ФизическиеЛица <ИмяПараметраДляПередачи>ФизическоеЛицо <Свойство> <Код>13 <Наименование>Количество --> Количество <Порядок>250 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Значения/> <Правило> <Код>ВПТ_СписаниеТоваровПриПередачеВПроизводство <Наименование>Документ: Списание товаров <Порядок>200 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ВПТ_СписаниеТоваровПриПередачеВПроизводство"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ВнутреннееПотребление <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер, 5) + "Т" + Сред(Источник.Номер, 7); <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>6 <Наименование>--> Основание <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник); <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> Товары <Порядок>550 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>15 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>14 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>13 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>10 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Свойство> <Код>9 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Правило> <Код>ПОТ_ОтчетПроизводстваЗаСмену <Наименование>Документ: Прочее оприходование товаров <Порядок>250 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Заполняем подразделение затрат по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.ПодразделениеЗатрат) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.ПодразделениеЗатрат = ПодразделениеОрганизации; КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПОТ_ОтчетПроизводстваЗаСмену"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.ПрочееОприходованиеТоваров <Приемник>ДокументСсылка.ОтчетПроизводстваЗаСмену <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>3 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>5 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПередВыгрузкой>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>18 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Если Источник.Товары.Количество() > 0 Тогда Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.Товары[0].СтатьяРасходовДоходов, "КорреспондирующийСчет"); Иначе Значение = Пусто; КонецЕсли; <Свойство> <Код>7 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>6 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>9 <Наименование>--> Продукция <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Продукция" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("РегВалюта", Константы.ВалютаРегламентированногоУчета.Получить()); Запрос.УстановитьПараметр("УпрВалюта", Константы.ВалютаУправленческогоУчета.Получить()); Запрос.Текст = "ВЫБРАТЬ | Товары.Номенклатура, | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | 1 КАК Коэффициент, | Товары.Количество, | Товары.Цена * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК ПлановаяСтоимость, | Товары.Сумма * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК СуммаПлановая |ИЗ | Документ.ПрочееОприходованиеТоваров.Товары КАК Товары | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &УпрВалюта) КАК КурсыВалютыЦены | ПО (ИСТИНА) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты | ПО (ИСТИНА) |ГДЕ | Товары.Ссылка = &Ссылка"; КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>10 <Наименование>--> Количество <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> Номенклатура <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>12 <Наименование>--> СуммаПлановая <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаПлановая" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> ПлановаяСтоимость <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ПлановаяСтоимость" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> Коэффициент <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>14 <Наименование>--> ЕдиницаИзмерения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Значения/> <Группа> <Код>ПеремещениеТоваров <Наименование>ПКО для документа "Перемещение товаров" <Порядок>250 <Правило> <Код>ПеремещениеТоваров_ПеремещениеТоваров <Наименование>Документ: Перемещение товаров <Порядок>50 <ПередВыгрузкой>ДанныеСкладаПолучателя = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Источник.СкладПолучатель, "ТипСклада, РозничныйВидЦены"); ДанныеСкладаОтправителя = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Источник.СкладОтправитель, "ТипСклада, РозничныйВидЦены"); Если ДанныеСкладаПолучателя.ТипСклада = Перечисления.ТипыСкладов.РозничныйМагазин И ЗначениеЗаполнено(ДанныеСкладаПолучателя.РозничныйВидЦены) Тогда РозничныйВидЦены = ДанныеСкладаПолучателя.РозничныйВидЦены; ИначеЕсли ДанныеСкладаОтправителя.ТипСклада = Перечисления.ТипыСкладов.РозничныйМагазин И ЗначениеЗаполнено(ДанныеСкладаОтправителя.РозничныйВидЦены) Тогда РозничныйВидЦены = ДанныеСкладаОтправителя.РозничныйВидЦены; Иначе РозничныйВидЦены = Неопределено; КонецЕсли; Если ЗначениеЗаполнено(РозничныйВидЦены) Тогда Запрос = Запросы.ТоварыИзВидовЗапасовПеремещенияСЦенамиДляРозницы; Запрос.УстановитьПараметр("Дата", КонецДня(Источник.Дата)); Запрос.УстановитьПараметр("Валюта", Константы.ВалютаРегламентированногоУчета.Получить()); Запрос.УстановитьПараметр("ВидЦен", РозничныйВидЦены); Иначе Запрос = Запросы.ТоварыИзВидовЗапасовПеремещения; КонецЕсли; Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); РезультатыЗапроса = Запрос.ВыполнитьПакет(); ВходящиеДанные.Вставить("Товары", РезультатыЗапроса[1].Выгрузить()); ВходящиеДанные.Вставить("ТоварыНаКомиссии", РезультатыЗапроса[2].Выгрузить()); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ПеремещениеТоваров_ПеремещениеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ПеремещениеТоваров <Приемник>ДокументСсылка.ПеремещениеТоваров <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>СкладОтправитель --> СкладОтправитель <Порядок>300 <Источник Имя="СкладОтправитель" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="СкладОтправитель" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>4 <Наименование>СкладПолучатель --> СкладПолучатель <Порядок>350 <Источник Имя="СкладПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="СкладПолучатель" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>26 <Наименование>--> НДСвСтоимостиТоваров <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="НДСвСтоимостиТоваров" Вид="Реквизит" Тип="ПеречислениеСсылка.ДействиеНДСВСтоимостиТоваров"/> <ПередВыгрузкой>Значение = "НеИзменять"; <Свойство> <Код>27 <Наименование>Ответственный --> Ответственный <Порядок>450 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>500 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>33 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>550 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>14 <Наименование>--> Товары <Порядок>600 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>16 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>17 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>18 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>15 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>34 <Наименование>--> СтавкаНДСВРознице <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДСВРознице" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство> <Код>35 <Наименование>--> СуммаВРознице <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>36 <Наименование>--> ЦенаВРознице <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="ЦенаВРознице" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>39 <Наименование>--> СпособУчетаНДС <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Группа> <Код>19 <Наименование>--> ТоварыНаКомиссии <Порядок>650 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ТоварыНаКомиссии" Вид="ТабличнаяЧасть"/> <Свойство> <Код>23 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>20 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <Свойство> <Код>22 <Наименование>--> Коэффициент <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> Количество <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>25 <Наименование>--> СчетУчета <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство> <Код>24 <Наименование>--> НовыйСчетУчета <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="НовыйСчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Свойство Отключить="true"> <Код>37 <Наименование>Статус --> <Порядок>750 <Источник Имя="Статус" Вид="Реквизит" Тип="ПеречислениеСсылка.СтатусыПеремещенийТоваров"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>ОТ_ОприходованиеТоваров <Наименование>Документ: Оприходование товаров <Порядок>300 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если НЕ ЗначениеЗаполнено(Объект.СтатьяПрочихДоходовРасходов) Тогда // Объект.СтатьяПрочихДоходовРасходов = Параметры.СтатьяПрочихДоходовРасходов_ОприходованиеТоваров; //КонецЕсли; //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "ОТ_ОприходованиеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.ОприходованиеИзлишковТоваров <Приемник>ДокументСсылка.ОприходованиеТоваров <Свойства> <Свойство Поиск="true"> <Код>14 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>15 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>16 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>11 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Склад --> Склад <Порядок>250 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство> <Код>18 <Наименование>СтатьяДоходов --> СтатьяПрочихДоходовРасходов <Порядок>300 <Источник Имя="СтатьяДоходов" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.СтатьиДоходов"/> <Приемник Имя="СтатьяПрочихДоходовРасходов" Вид="Реквизит" Тип="СправочникСсылка.ПрочиеДоходыИРасходы"/> <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Пусто = НЕ ЗначениеЗаполнено(ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет")); Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>350 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство Отключить="true"> <Код>20 <Наименование>--> Основание <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник.ДокументОснование); <Свойство> <Код>10 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>1 <Наименование>--> Товары <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запрос = Новый Запрос(); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("Дата", Источник.Дата); Запрос.УстановитьПараметр("РегВалюта", Константы.ВалютаРегламентированногоУчета.Получить()); Запрос.УстановитьПараметр("УпрВалюта", Константы.ВалютаУправленческогоУчета.Получить()); Запрос.Текст = "ВЫБРАТЬ | ОприходованиеТоваровТовары.Номенклатура, | ОприходованиеТоваровТовары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | 1 КАК Коэффициент, | ОприходованиеТоваровТовары.Количество, | ОприходованиеТоваровТовары.Цена * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Цена, | ОприходованиеТоваровТовары.Сумма * ВЫБОР | КОГДА &РегВалюта <> &УпрВалюта | ТОГДА ВЫБОР | КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 | И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 | ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) | ИНАЧЕ 0 | КОНЕЦ | ИНАЧЕ 1 | КОНЕЦ КАК Сумма, | ОприходованиеТоваровТовары.НомерГТД, | ОприходованиеТоваровТовары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения |ИЗ | Документ.ОприходованиеИзлишковТоваров.Товары КАК ОприходованиеТоваровТовары | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &УпрВалюта) КАК КурсыВалютыЦены | ПО (ИСТИНА) | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты | ПО (ИСТИНА) |ГДЕ | ОприходованиеТоваровТовары.Ссылка = &Ссылка"; КоллекцияОбъектов = Запрос.Выполнить().Выгрузить(); <Свойство> <Код>3 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>7 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>2 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>6 <Наименование>--> Цена <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>5 <Наименование>--> Сумма <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>--> НомерГТД <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>9 <Наименование>--> СтранаПроисхождения <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Группа Отключить="true"> <Код>21 <Наименование>Товары --> <Порядок>600 <Источник Имя="Товары" Вид="ТабличнаяЧасть"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>22 <Наименование>Количество --> <Порядок>50 <Источник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>23 <Наименование>Номенклатура --> <Порядок>100 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>Номенклатура <Свойство Отключить="true"> <Код>24 <Наименование>НомерГТД --> <Порядок>150 <Источник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Приемник Имя="" Вид=""/> <КодПравилаКонвертации>НомераГТД <Свойство Отключить="true"> <Код>25 <Наименование>Сумма --> <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Свойство Отключить="true"> <Код>26 <Наименование>Цена --> <Порядок>250 <Источник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Приемник Имя="" Вид=""/> <Значения/> <Правило> <Код>СПТ_СписаниеТоваров <Наименование>Документ: Списание товаров <Порядок>350 <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СПТ_СписаниеТоваров"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СписаниеНедостачТоваров <Приемник>ДокументСсылка.СписаниеТоваров <Свойства> <Свойство Поиск="true"> <Код>4 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>5 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>7 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>3 <Наименование>Склад --> Склад <Порядок>300 <Источник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <Приемник Имя="Склад" Вид="Реквизит" Тип="СправочникСсылка.Склады"/> <КодПравилаКонвертации>Склады <ПриВыгрузке>Выполнить(Алгоритмы.ВыполнитьСверткуСкладаПриНеобходимости); <Свойство Отключить="true"> <Код>6 <Наименование>--> Основание <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Основание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Строка(Источник.ДокументОснование); <Свойство> <Код>17 <Наименование>Ответственный --> Ответственный <Порядок>400 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>450 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>23 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>500 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>8 <Наименование>--> Товары <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Запросы.ТоварыИзВидовЗапасовДляСписания.УстановитьПараметр("Ссылка", Источник.Ссылка); КоллекцияОбъектов = Запросы.ТоварыИзВидовЗапасовДляСписания.Выполнить().Выгрузить(); <Свойство> <Код>12 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>9 <Наименование>--> ЕдиницаИзмерения <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ЕдиницаИзмерения" Вид="Реквизит" Тип="СправочникСсылка.КлассификаторЕдиницИзмерения"/> <Свойство> <Код>10 <Наименование>--> Количество <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>11 <Наименование>--> Коэффициент <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="Коэффициент" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> НомерГТД <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <Свойство> <Код>14 <Наименование>--> СтранаПроисхождения <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <Свойство> <Код>15 <Наименование>--> СчетУчета <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетУчета" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <Значения/> <Группа> <Код>СчетаФактуры <Наименование>ПКО для документов "Счет-фактура полученный" и "Счет-фактура выданный" <Порядок>500 <Группа> <Код>СчетФактураПолученный <Наименование>ПКО для документов "Счет-фактура полученный" <Порядок>250 <Правило> <Код>СФПА_СчетФактураПолученныйАванс <Наименование>Документ: Счет-фактура полученный (аванс) <Порядок>50 <ПередВыгрузкой>// Вычисляем значение реквизита "Контрагент" Если ТипЗнч(Источник.Контрагент) = Тип("СправочникСсылка.Организации") Тогда ОрганизацияКонтрагента = Источник.Контрагент; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Контрагент = НовыйКонтрагент; ИначеЕсли ТипЗнч(Источник.Контрагент) = Тип("СправочникСсылка.Контрагенты") Тогда Контрагент = Источник.Контрагент; Иначе Контрагент = Справочники.Контрагенты.ПустаяСсылка(); КонецЕсли; ВходящиеДанные.Вставить("Контрагент", Контрагент); // Вычисляем валюту документа-основания Если ЗначениеЗаполнено(Источник.ДокументОснование) Тогда ВходящиеДанные.Вставить("ВалютаДокумента", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Валюта")); Иначе ВходящиеДанные.Вставить("ВалютаДокумента", Константы.ВалютаРегламентированногоУчета.Получить()); КонецЕсли; <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураПолученныйАванс <Приемник>ДокументСсылка.СчетФактураПолученный <Свойства> <Свойство Поиск="true"> <Код>6 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = Макс(Значение, ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Дата") + 1); <Свойство Поиск="true"> <Код>7 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Значение = Лев(Источник.Номер,5) + "А" + Сред(Источник.Номер, 7); <Свойство> <Код>8 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>--> ВидСчетаФактуры <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчетаФактуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидСчетаФактурыПолученного"/> <ПередВыгрузкой>Значение = "НаАванс"; <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>--> ВалютаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>Сумма --> СуммаДокумента <Порядок>350 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>3 <Наименование>--> Контрагент <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>18 <Наименование>--> ДоговорКонтрагента <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Договор = Неопределено; // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", "СПоставщиком"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Запрос = Новый Запрос(); Запрос.УстановитьПараметр("Ссылка", Источник.ДокументОснование); Запрос.УстановитьПараметр("Контрагент", ВходящиеДанные.Контрагент); ТипЗначенияДокументаОснования = ТипЗнч(Источник.ДокументОснование); Если ТипЗначенияДокументаОснования = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Или ТипЗначенияДокументаОснования = Тип("ДокументСсылка.СписаниеБезналичныхДенежныхСредств") Тогда Запрос.Текст = " |ВЫБРАТЬ | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК Заказ, | Выразить(РасшифровкаПлатежа.ОбъектРасчетов КАК Документ.ЗаказКлиента).Партнер КАК Партнер, | Выразить(РасшифровкаПлатежа.ОбъектРасчетов КАК Документ.ЗаказКлиента).Соглашение КАК Соглашение, | РасшифровкаПлатежа.ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ." + Источник.ДокументОснование.Метаданные().Имя + ".РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Партнер |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Соглашение |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.ВалютаВзаиморасчетов |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); СверткаПоПартнеру = ДанныеДоговора[1].Выгрузить(); Если СверткаПоПартнеру.Количество() = 1 Тогда Значение.ПартнерУТ11 = СверткаПоПартнеру[0].Партнер; КонецЕсли; СверткаПоСоглашениям = ДанныеДоговора[2].Выгрузить(); Если СверткаПоСоглашениям.Количество() = 1 Тогда Значение.СоглашениеСПоставщикомУТ11 = СверткаПоСоглашениям[0].Соглашение; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[3].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказПоставщику = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказПоставщику) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ЗаказПоставщику; ИначеЕсли ТипЗнч(ЗаказПоставщику) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказПоставщику; КонецЕсли; КонецЕсли; СверткаПоВалютеВзаиморасчетов = ДанныеДоговора[4].Выгрузить(); Если СверткаПоВалютеВзаиморасчетов.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = СверткаПоВалютеВзаиморасчетов[0].ВалютаВзаиморасчетов; Если ЗначениеЗаполнено(Значение.СоглашениеСПоставщикомУТ11) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСПоставщикомУТ11); Иначе Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВозвратТоваровПоставщику") Тогда Запрос.Текст = " |ВЫБРАТЬ | РасшифровкаПлатежа.Ссылка.Партнер КАК Партнер, | РасшифровкаПлатежа.Ссылка.Соглашение КАК Соглашение, | РасшифровкаПлатежа.Ссылка.Соглашение.Валюта КАК ВалютаСоглашения, | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК Заказ, | РасшифровкаПлатежа.ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ.ВозвратТоваровПоставщику.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДоговора.Партнер, | ДанныеДоговора.Соглашение, | ДанныеДоговора.ВалютаВзаиморасчетов, | ДанныеДоговора.ВалютаСоглашения |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); ОсновныеРеквизиты = ДанныеДоговора[1].Выгрузить(); Если ОсновныеРеквизиты.Количество() > 0 Тогда Значение.ПартнерУТ11 = ОсновныеРеквизиты[0].Партнер; Значение.СоглашениеСПоставщикомУТ11 = ОсновныеРеквизиты[0].Соглашение; Если ЗначениеЗаполнено(Значение.СоглашениеСПоставщикомУТ11) Тогда Значение.ВалютаВзаиморасчетов = ОсновныеРеквизиты[0].ВалютаСоглашения; Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСПоставщикомУТ11); Иначе Значение.ВалютаВзаиморасчетов = ОсновныеРеквизиты[0].ВалютаВзаиморасчетов; Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[2].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказПоставщику = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказПоставщику) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ЗаказПоставщику; ИначеЕсли ТипЗнч(ЗаказПоставщику) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказПоставщику; КонецЕсли; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.АвансовыйОтчет") Тогда Запрос.Текст = "ВЫБРАТЬ | ОплатаПоставщикам.Поставщик КАК Партнер, | ОплатаПоставщикам.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов, | ВЫРАЗИТЬ(ОплатаПоставщикам.ОбъектРасчетов.Объект КАК Документ.ЗаказКлиента).Соглашение КАК Соглашение, | ОплатаПоставщикам.ОбъектРасчетов.Объект КАК Заказ |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ.АвансовыйОтчет.ОплатаПоставщикам КАК ОплатаПоставщикам |ГДЕ | ОплатаПоставщикам.Ссылка = &Ссылка | И ОплатаПоставщикам.Контрагент = &Контрагент |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Партнер КАК Партнер |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Соглашение КАК Соглашение |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ КАК Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); СверткаПоПартнеру = ДанныеДоговора[1].Выгрузить(); Если СверткаПоПартнеру.Количество() = 1 Тогда Значение.ПартнерУТ11 = СверткаПоПартнеру[0].Партнер; КонецЕсли; СверткаПоСоглашениям = ДанныеДоговора[2].Выгрузить(); Если СверткаПоСоглашениям.Количество() = 1 Тогда Значение.СоглашениеСПоставщикомУТ11 = СверткаПоСоглашениям[0].Соглашение; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[3].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказПоставщику = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказПоставщику) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ЗаказПоставщику; ИначеЕсли ТипЗнч(ЗаказПоставщику) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказПоставщику; КонецЕсли; КонецЕсли; СверткаПоВалютеВзаиморасчетов = ДанныеДоговора[4].Выгрузить(); Если СверткаПоВалютеВзаиморасчетов.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = СверткаПоВалютеВзаиморасчетов[0].ВалютаВзаиморасчетов; Если ЗначениеЗаполнено(Значение.СоглашениеСПоставщикомУТ11) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСПоставщикомУТ11); Иначе Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ИмяТЧ = "КредиторскаяЗадолженность"; ТипРасчетов = "РасчетыСПоставщиком"; Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "КонтрагентКредитор") Тогда ИмяТЧ = "ДебиторскаяЗадолженность"; ТипРасчетов = "РасчетыСКлиентом"; КонецЕсли; Запрос.Текст = " |ВЫБРАТЬ | ТабДок.ОбъектРасчетов.Объект КАК Заказ, | ТабДок.ВалютаВзаиморасчетов, | Выразить(ТабДок.ОбъектРасчетов КАК Документ.ЗаказКлиента).Соглашение КАК Соглашение, | ТабДок.Партнер |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ.ВзаимозачетЗадолженности." + ИмяТЧ + " КАК ТабДок |ГДЕ | ТабДок.Ссылка = &Ссылка | И ТабДок.ТипРасчетов = ЗНАЧЕНИЕ(Перечисление.ТипыРасчетовСПартнерами." + ТипРасчетов + ") |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Партнер |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Соглашение |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.ВалютаВзаиморасчетов |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); СверткаПоПартнеру = ДанныеДоговора[1].Выгрузить(); Если СверткаПоПартнеру.Количество() = 1 Тогда Значение.ПартнерУТ11 = СверткаПоПартнеру[0].Партнер; КонецЕсли; СверткаПоСоглашениям = ДанныеДоговора[2].Выгрузить(); Если СверткаПоСоглашениям.Количество() = 1 Тогда Значение.СоглашениеСПоставщикомУТ11 = СверткаПоСоглашениям[0].Соглашение; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[3].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказПоставщику = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказПоставщику) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ЗаказПоставщику; ИначеЕсли ТипЗнч(ЗаказПоставщику) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказПоставщику; КонецЕсли; КонецЕсли; СверткаПоВалютеВзаиморасчетов = ДанныеДоговора[4].Выгрузить(); Если СверткаПоВалютеВзаиморасчетов.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = СверткаПоВалютеВзаиморасчетов[0].ВалютаВзаиморасчетов; Если ЗначениеЗаполнено(Значение.СоглашениеСПоставщикомУТ11) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСПоставщикомУТ11); Иначе Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда Запрос.Текст = " |ВЫБРАТЬ | Док.Партнер, | Док.Валюта |ИЗ | Документ.ВозвратТоваровМеждуОрганизациями КАК Док |ГДЕ | Док.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | РасшифровкаПлатежа.ВалютаВзаиморасчетов |ИЗ | Документ.ВозвратТоваровМеждуОрганизациями.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | РасшифровкаПлатежа.НомерСтроки"; РезультатЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапки = РезультатЗапроса[0].Выгрузить()[0]; ДанныеРасшифровкиПлатежа = РезультатЗапроса[1].Выгрузить(); Значение.ПартнерУТ11 = ДанныеШапки.Партнер; Если ДанныеРасшифровкиПлатежа.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = ДанныеРасшифровкиПлатежа[0].ВалютаВзаиморасчетов; Значение.РасчетыВУсловныхЕдиницах = ДанныеШапки.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеШапки.Валюта <> Значение.ВалютаВзаиморасчетов; Иначе Значение.ВалютаВзаиморасчетов = ДанныеШапки.Валюта; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если ЗначениеЗаполнено(Договор) Тогда Значение = Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>19 <Наименование>ДокументОснование --> ДокументОснование <Порядок>500 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ДанныеВзаимозачета = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Значение, "Организация,КонтрагентДебитор,КонтрагентКредитор"); ОрганизацияСФ = Источник.Организация; Если ОрганизацияСФ = ДанныеВзаимозачета.Организация Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентДебитор Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентКредитор Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор"; КонецЕсли; КонецЕсли; <Свойство> <Код>21 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>650 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Значение = "02"; КонецЕсли; <Свойство> <Код>22 <Наименование>ПолученВЭлектронномВиде --> КодСпособаПолучения <Порядок>700 <Источник Имя="ПолученВЭлектронномВиде" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="КодСпособаПолучения" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Значение = ?(Значение, 2, 1); <Свойство> <Код>2 <Наименование>Комментарий --> Комментарий <Порядок>750 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>20 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>800 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>9 <Наименование>Авансы --> Авансы <Порядок>850 <Источник Имя="Авансы" Вид="ТабличнаяЧасть"/> <Приемник Имя="Авансы" Вид="ТабличнаяЧасть"/> <Свойство> <Код>10 <Наименование>Сумма --> Сумма <Порядок>50 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>100 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>11 <Наименование>СуммаНДС --> СуммаНДС <Порядок>150 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Группа> <Код>16 <Наименование>--> ДокументыОснования <Порядок>900 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДокументОснование"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>17 <Наименование>--> ДокументОснование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Источник.ДокументОснование; Если ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ДанныеВзаимозачета = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Значение, "Организация,КонтрагентДебитор,КонтрагентКредитор"); ОрганизацияСФ = Источник.Организация; Если ОрганизацияСФ = ДанныеВзаимозачета.Организация Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентДебитор Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентКредитор Тогда ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор"; КонецЕсли; КонецЕсли; <Значения/> <Правило> <Код>СФП_СчетФактураПолученный <Наименование>Документ: Счет-фактура полученный <Порядок>100 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); ПараметрыОбъекта.Вставить("ПризнакНового", Объект.ЭтоНовый()); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФП_СчетФактураПолученный"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураПолученный <Приемник>ДокументСсылка.СчетФактураПолученный <Свойства> <Свойство Поиск="true"> <Код>19 <Наименование>ДатаСоставления --> ДатаВходящегоДокумента <Порядок>50 <Источник Имя="ДатаСоставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство Поиск="true"> <Код>20 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>1 <Наименование>ДатаИсправления --> ДатаИсправления <Порядок>150 <Источник Имя="ДатаИсправления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаИсправления" Вид="Реквизит" Тип="Дата"/> <Свойство Поиск="true"> <Код>6 <Наименование>НомерИсправления --> НомерИсправления <Порядок>200 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсправления" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>9 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>10 <Наименование>--> Дата <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>15 <Наименование>Валюта --> ВалютаДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>Корректировочный --> ВидСчетаФактуры <Порядок>400 <Источник Имя="Корректировочный" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ВидСчетаФактуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидСчетаФактурыПолученного"/> <ПриВыгрузке>Значение = ?(Значение, "Корректировочный", "НаПоступление"); <Свойство> <Код>4 <Наименование>Исправление --> Исправление <Порядок>550 <Источник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>5 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>600 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>18 <Наименование>ПолученВЭлектронномВиде --> КодСпособаПолучения <Порядок>650 <Источник Имя="ПолученВЭлектронномВиде" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="КодСпособаПолучения" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Значение = ?(Значение, 2, 1); <Свойство> <Код>24 <Наименование>--> НеОтражатьНДСКВычету <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НеОтражатьНДСКВычету <ПередВыгрузкой>Значение = Ложь; Если ТипЗнч(ВходящиеДанные.ДокументОснование) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов") Или ТипЗнч(ВходящиеДанные.ДокументОснование) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда Если ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ВходящиеДанные.ДокументОснование, "ЗакупкаПодДеятельность") = Перечисления.ТипыНалогообложенияНДС.ПоФактическомуИспользованию Тогда Значение = Истина; КонецЕсли; КонецЕсли; <Свойство> <Код>11 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>12 <Наименование>Проведен --> Проведен <Порядок>800 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>32 <Наименование>--> ДокументОснование <Порядок>850 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПриВыгрузке>//Если Источник.Исправление // И ТипЗнч(ВходящиеДанные.ДокументОснование) <> Тип("ДокументСсылка.КорректировкаПриобретения") Тогда // // Значение = Источник.Ссылка; // ИмяПКО = "СФП_КорректировкаПоступления"; // ИсходящиеДанные = Новый Структура("Дата", ВходящиеДанные.Дата); // //Иначе ИмяПКО = ВходящиеДанные.ПКОДляДокументаОснования; //КонецЕсли; <Свойство Отключить="true"> <Код>25 <Наименование>--> СуммаДокумента <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Группа> <Код>13 <Наименование>--> ДокументыОснования <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <Свойство> <Код>14 <Наименование>--> ДокументОснование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПередВыгрузкой>//Если Источник.Исправление // И ТипЗнч(ОбъектКоллекции.ДокументОснование) <> Тип("ДокументСсылка.КорректировкаПриобретения") Тогда // // Значение = Источник.Ссылка; // ИмяПКО = "СФП_КорректировкаПоступления"; // ИсходящиеДанные = Новый Структура("Дата", ВходящиеДанные.Дата); // //Иначе ИмяПКО = ОбъектКоллекции.ПКОДляДокументаОснования; //КонецЕсли; <Свойство Отключить="true"> <Код>33 <Наименование>--> ДатаИсправленияИсходногоДокумента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Попытка Значение = Источник.ДатаИсправленияИсходногоДокумента; Исключение КонецПопытки; <Свойство> <Код>34 <Наименование>--> ДатаИсходногоДокумента <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Попытка Значение = Источник.ДатаИсходногоДокумента; Исключение КонецПопытки; <Свойство Отключить="true"> <Код>35 <Наименование>--> НомерИсправленияИсходногоДокумента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Попытка Значение = Источник.НомерИсправленияИсходногоДокумента; Исключение КонецПопытки; <Свойство> <Код>36 <Наименование>--> НомерИсходногоДокумента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Попытка Значение = Источник.НомерИсходногоДокумента; Исключение КонецПопытки; <Свойство Отключить="true"> <Код>37 <Наименование>--> УчитыватьИсправлениеИсходногоДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="УчитыватьИсправлениеИсходногоДокумента" Вид="Реквизит" Тип="Булево"/> <Значения/> <Правило> <Код>СФВ_СчетФактураПолученныйИК <Наименование>Документ: Счет-фактура выданный <Порядок>150 <ПередВыгрузкой>ВходящиеДанные.Вставить("СуммаДокумента", 0); ВходящиеДанные.Вставить("СуммаНДСДокумента", 0); Если ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") И Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Организация") Тогда Запрос = Новый Запрос( "ВЫБРАТЬ | СУММА(ДокТовары.СуммаПродажи) КАК СуммаДокумента, | СУММА(ДокТовары.СуммаПродажиНДС) КАК СуммаНДСДокумента |ИЗ | Документ.ОтчетПоКомиссииМеждуОрганизациями.Товары КАК ДокТовары |ГДЕ | ДокТовары.Ссылка = &Ссылка | И ДокТовары.ДатаСчетаФактурыКомиссионера = &Дата | И ДокТовары.Покупатель = &Покупатель | |СГРУППИРОВАТЬ ПО | ДокТовары.Покупатель"); Запрос.УстановитьПараметр("Ссылка", Источник.ДокументОснование); Запрос.УстановитьПараметр("Дата", НачалоДня(Источник.Дата)); Запрос.УстановитьПараметр("Покупатель", Источник.Покупатель); Результат = Запрос.Выполнить().Выбрать(); Если Результат.Следующий() Тогда ВходящиеДанные.СуммаДокумента = Результат.СуммаДокумента; ВходящиеДанные.СуммаНДСДокумента = Результат.СуммаНДСДокумента; КонецЕсли; КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); ПараметрыОбъекта.Вставить("ПризнакНового", Объект.ЭтоНовый()); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФВ_СчетФактураПолученныйИК"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураВыданный <Приемник>ДокументСсылка.СчетФактураПолученный <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> ДатаВходящегоДокумента <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> НомерВходящегоДокумента <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Значение, Ложь, Истина); <Свойство Поиск="true"> <Код>27 <Наименование>НомерИсправления --> НомерИсправления <Порядок>150 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсправления" Вид="Реквизит" Тип="Число"/> <Свойство Поиск="true"> <Код>28 <Наименование>Дата --> ДатаИсправления <Порядок>200 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="ДатаИсправления" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>3 <Наименование>--> Организация <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <ПередВыгрузкой>Если ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда РеквизитыДокументаОснования = ОбщегоНазначения.ЗначенияРеквизитовОбъекта( Источник.ДокументОснование, "Организация, Комиссионер"); Если Источник.Организация = РеквизитыДокументаОснования.Организация Тогда Значение = РеквизитыДокументаОснования.Комиссионер; Иначе Значение = РеквизитыДокументаОснования.Организация; КонецЕсли; Иначе Значение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "ОрганизацияПолучатель"); КонецЕсли; <Свойство> <Код>4 <Наименование>ДатаВыставления --> Дата <Порядок>300 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Значение = КонецДня(Значение); <Свойство> <Код>5 <Наименование>Валюта --> ВалютаДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>6 <Наименование>--> ВидСчетаФактуры <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчетаФактуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидСчетаФактурыПолученного"/> <ПередВыгрузкой>Значение = "НаПоступление"; <Свойство> <Код>9 <Наименование>Исправление --> Исправление <Порядок>550 <Источник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>10 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>600 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>11 <Наименование>ВыставленВЭлектронномВиде --> КодСпособаПолучения <Порядок>650 <Источник Имя="ВыставленВЭлектронномВиде" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="КодСпособаПолучения" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Значение = ?(Значение, 2, 1); <Свойство> <Код>12 <Наименование>--> НеОтражатьНДСКВычету <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НеОтражатьНДСКВычету <ПередВыгрузкой>Значение = Ложь; <Свойство> <Код>13 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>750 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>Проведен --> Проведен <Порядок>800 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>ДокументОснование --> ДокументОснование <Порядок>850 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПриВыгрузке>Если Источник.Исправление Тогда Значение = Источник.Ссылка; ИмяПКО = "СФВ_КорректировкаПоступленияИК"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; Иначе ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; КонецЕсли; КонецЕсли; <Свойство> <Код>29 <Наименование>--> СуммаДокумента <Порядок>900 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>30 <Наименование>--> СуммаНДСДокумента <Порядок>950 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДСДокумента" Вид="Реквизит" Тип="Число"/> <Группа> <Код>16 <Наименование>--> ДокументыОснования <Порядок>1000 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДокументОснование"); НоваяСтрока = КоллекцияОбъектов.Добавить(); НоваяСтрока.ДокументОснование = Источник.ДокументОснование; <Свойство> <Код>17 <Наименование>--> ДокументОснование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПриВыгрузке>Если Источник.Исправление Тогда Значение = Источник.Ссылка; ИмяПКО = "СФВ_КорректировкаПоступленияИК"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; Иначе ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; КонецЕсли; КонецЕсли; <Значения/> <Правило> <Код>СФП_КорректировкаПоступления <Наименование>Документ: Счет-фактура полученный <Порядок>200 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Основная часть реквизитов заполняется при загрузке в БП //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФП_КорректировкаПоступления"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураПолученный <Приемник>ДокументСсылка.КорректировкаПоступления <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>Проведен --> Проведен <Порядок>100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>3 <Наименование>--> ДокументПоступления <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДокументПоступления <ПередВыгрузкой>Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | СчетФактураПолученный.Ссылка |ИЗ | Документ.СчетФактураПолученный.ДокументыОснования КАК СчетФактураПолученный |ГДЕ | СчетФактураПолученный.Ссылка.Проведен = ИСТИНА | И СчетФактураПолученный.ДокументОснование = &ДокументОснование | И СчетФактураПолученный.Ссылка.Исправление = ИСТИНА | И СчетФактураПолученный.Ссылка.НомерИсправления < &НомерИсправления | И СчетФактураПолученный.Ссылка <> &Ссылка | |УПОРЯДОЧИТЬ ПО | СчетФактураПолученный.Ссылка.НомерИсправления УБЫВ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("НомерИсправления", Источник.НомерИсправления); Запрос.УстановитьПараметр("ДокументОснование", ВходящиеДанные.ДокументОснование); ВыборкаСчетовФактурСИсправлением = Запрос.Выполнить().Выбрать(); Если ВыборкаСчетовФактурСИсправлением.Следующий() Тогда Значение = ВыборкаСчетовФактурСИсправлением.Ссылка; ИмяПКО = "СФП_КорректировкаПоступления"; ИсходящиеДанные = Новый Структура("Дата", ВходящиеДанные.Дата); Иначе Значение = ВходящиеДанные.ДокументОснование; ИмяПКО = ВходящиеДанные.ПКОДляДокументаОснования; КонецЕсли; <Свойство> <Код>5 <Наименование>--> ИсправляемыйДокументПоступления <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ИсправляемыйДокументПоступления <ПриВыгрузке>Значение = ВходящиеДанные.ДокументОснование; ИмяПКО = ВходящиеДанные.ПКОДляДокументаОснования; <Свойство> <Код>4 <Наименование>НомерИсправления --> НомерИсправления <Порядок>250 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерИсправления <Значения/> <Правило> <Код>СФВ_КорректировкаПоступленияИК <Наименование>Документ: Счет-фактура выданный <Порядок>250 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Основная часть реквизитов заполняется при загрузке в БП //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФВ_КорректировкаПоступленияИК"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураВыданный <Приемник>ДокументСсылка.КорректировкаПоступления <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Дата <Порядок>50 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>Проведен --> Проведен <Порядок>100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>3 <Наименование>--> ДокументПоступления <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДокументПоступления <ПриВыгрузке>// Поиск предыдущего счета-фактуры, оформленного без регистрации корректировки // для выгрузки ссылки на него, как на корректировку реализации Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | СчетФактураВыданный.Ссылка |ИЗ | Документ.СчетФактураВыданный КАК СчетФактураВыданный |ГДЕ | СчетФактураВыданный.Проведен = ИСТИНА | И СчетФактураВыданный.ДокументОснование = &ДокументОснование | И СчетФактураВыданный.Исправление = ИСТИНА | И СчетФактураВыданный.НомерИсправления < &НомерИсправления | И СчетФактураВыданный.Ссылка <> &Ссылка | |УПОРЯДОЧИТЬ ПО | СчетФактураВыданный.НомерИсправления УБЫВ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("НомерИсправления", Источник.НомерИсправления); Запрос.УстановитьПараметр("ДокументОснование", Значение); ВыборкаСчетовФактурСИсправлением = Запрос.Выполнить().Выбрать(); Если ВыборкаСчетовФактурСИсправлением.Следующий() Тогда Значение = ВыборкаСчетовФактурСИсправлением.Ссылка; ИмяПКО = "СФВ_КорректировкаПоступленияИК"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; Иначе ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; КонецЕсли; КонецЕсли; <Свойство> <Код>5 <Наименование>--> ИсправляемыйДокументПоступления <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ИсправляемыйДокументПоступления <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПокупка"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; Иначе ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; КонецЕсли; КонецЕсли; <Свойство> <Код>4 <Наименование>НомерИсправления --> НомерИсправления <Порядок>250 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерИсправления <Значения/> <Группа> <Код>СчетФактураВыданный <Наименование>ПКО для документов "Счет-фактура выданный" <Порядок>300 <Правило> <Код>СФВА_СчетФактураВыданныйНаАванс <Наименование>Документ: Счет-фактура выданный (аванс) <Порядок>50 <ПередВыгрузкой>// Вычисляем значение реквизита "Контрагент" Если ЗначениеЗаполнено(Источник.Контрагент) Тогда Если ТипЗнч(Источник.Контрагент) = Тип("СправочникСсылка.Организации") Тогда ОрганизацияКонтрагента = Источник.Контрагент; НовыйКонтрагент = Неопределено; Выполнить(Алгоритмы.СоздатьИВыгрузитьКонтрагентаИзОрганизации); Контрагент = НовыйКонтрагент; ИначеЕсли ТипЗнч(Источник.Контрагент) = Тип("СправочникСсылка.Контрагенты") Тогда Контрагент = Источник.Контрагент; Иначе Контрагент = Справочники.Контрагенты.ПустаяСсылка(); КонецЕсли; ИначеЕсли ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.РеализацияПодарочныхСертификатов") Тогда Контрагент = Справочники.Контрагенты.РозничныйПокупатель; КонецЕсли; ВходящиеДанные.Вставить("Контрагент", Контрагент); // Вычисляем валюту документа-основания Если ЗначениеЗаполнено(Источник.ДокументОснование) Тогда ВходящиеДанные.Вставить("ВалютаДокумента", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Валюта")); Иначе ВходящиеДанные.Вставить("ВалютаДокумента", Константы.ВалютаРегламентированногоУчета.Получить()); КонецЕсли; // Определяем ПКО для документа-основания ДокументОснование = Источник.ДокументОснование; ДокументОснование_ИмяПКО = ""; Если ТипЗнч(ДокументОснование) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ДокументОснование_ИмяПКО = "ВТМО_ВозвратОтПокупателя"; ИначеЕсли ТипЗнч(ДокументОснование) = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ДанныеВзаимозачета = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(ДокументОснование, "Организация,КонтрагентДебитор,КонтрагентКредитор"); ОрганизацияСФ = Источник.Организация; Если ОрганизацияСФ = ДанныеВзаимозачета.Организация Тогда ДокументОснование_ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентДебитор Тогда ДокументОснование_ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор"; ИначеЕсли ОрганизацияСФ = ДанныеВзаимозачета.КонтрагентКредитор Тогда ДокументОснование_ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор"; КонецЕсли; ИначеЕсли ТипЗнч(ДокументОснование) = Тип("ДокументСсылка.РеализацияПодарочныхСертификатов") Тогда Запрос = Новый Запрос( "ВЫБРАТЬ ПЕРВЫЕ 1 | Док.Ссылка |ИЗ | Документ.РеализацияПодарочныхСертификатов.ОплатаПлатежнымиКартами КАК Док |ГДЕ | Док.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", ДокументОснование); Если Запрос.Выполнить().Пустой() Тогда ДокументОснование_ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_Нал"; Иначе ДокументОснование_ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_ПоКарте"; КонецЕсли; КонецЕсли; ВходящиеДанные.Вставить("ДокументОснование_ИмяПКО", ДокументОснование_ИмяПКО); <ПослеЗагрузки> Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураВыданныйАванс <Приемник>ДокументСсылка.СчетФактураВыданный <Свойства> <Свойство Поиск="true"> <Код>5 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>24 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>6 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>--> ВидСчетаФактуры <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ВидСчетаФактуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидСчетаФактурыВыставленного"/> <ПередВыгрузкой>Значение = "НаАванс"; <Свойство> <Код>2 <Наименование>Организация --> Организация <Порядок>250 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>--> ВалютаДокумента <Порядок>300 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>3 <Наименование>Сумма --> Сумма <Порядок>350 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>17 <Наименование>Сумма --> СуммаДокумента <Порядок>400 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>4 <Наименование>СуммаНДС --> СуммаНДС <Порядок>450 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>16 <Наименование>--> Контрагент <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>15 <Наименование>--> ДоговорКонтрагента <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПередВыгрузкой>Договор = Неопределено; // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", Неопределено); Значение.Вставить("ВидДоговора", "СПокупателем"); Значение.Вставить("Владелец", ВходящиеДанные.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", Неопределено); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Запрос = Новый Запрос(); Запрос.УстановитьПараметр("Ссылка", Источник.ДокументОснование); ТипЗначенияДокументаОснования = ТипЗнч(Источник.ДокументОснование); Если ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ПриходныйКассовыйОрдер") Или ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ОперацияПоПлатежнойКарте") Или ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств") Тогда Запрос.Текст = " |ВЫБРАТЬ | РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК ЗаказКлиента, | РасшифровкаПлатежа.Заказ.Партнер КАК Партнер, | РасшифровкаПлатежа.Заказ.Соглашение КАК Соглашение, | РасшифровкаПлатежа.Заказ.Сделка КАК Сделка, | РасшифровкаПлатежа.ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ." + Источник.ДокументОснование.Метаданные().Имя + ".РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Партнер |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Соглашение |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Сделка |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.ВалютаВзаиморасчетов |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); СверткаПоПартнеру = ДанныеДоговора[1].Выгрузить(); Если СверткаПоПартнеру.Количество() = 1 Тогда Значение.ПартнерУТ11 = СверткаПоПартнеру[0].Партнер; КонецЕсли; СверткаПоСоглашениям = ДанныеДоговора[2].Выгрузить(); Если СверткаПоСоглашениям.Количество() = 1 Тогда Значение.СоглашениеСКлиентомУТ11 = СверткаПоСоглашениям[0].Соглашение; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[3].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказКлиента = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказКлиента) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = ЗаказКлиента; ИначеЕсли ТипЗнч(ЗаказКлиента) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказКлиента; КонецЕсли; КонецЕсли; СверткаПоСделкам = ДанныеДоговора[4].Выгрузить(); Если СверткаПоСделкам.Количество() = 1 Тогда Значение.СделкаСКлиентомУТ11 = СверткаПоСделкам[0].Сделка; КонецЕсли; СверткаПоВалютеВзаиморасчетов = ДанныеДоговора[5].Выгрузить(); Если СверткаПоВалютеВзаиморасчетов.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = СверткаПоВалютеВзаиморасчетов[0].ВалютаВзаиморасчетов; Если ЗначениеЗаполнено(Значение.СоглашениеСКлиентомУТ11) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСКлиентомУТ11); Иначе Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВозвратТоваровОтКлиента") Тогда Запрос.Текст = "ВЫБРАТЬ | РасшифровкаПлатежа.Ссылка.Партнер КАК Партнер, | РасшифровкаПлатежа.Ссылка.Соглашение КАК Соглашение, | РасшифровкаПлатежа.Ссылка.Соглашение.Валюта КАК ВалютаСоглашения, | РасшифровкаПлатежа.Ссылка.Сделка КАК Сделка, | ВЫРАЗИТЬ(РасшифровкаПлатежа.ОбъектРасчетов.Объект КАК Документ.ЗаказКлиента) КАК Заказ, | РасшифровкаПлатежа.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ.ВозвратТоваровОтКлиента.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДоговора.Партнер КАК Партнер, | ДанныеДоговора.Соглашение КАК Соглашение, | ДанныеДоговора.Сделка КАК Сделка, | ДанныеДоговора.ВалютаВзаиморасчетов КАК ВалютаВзаиморасчетов, | ДанныеДоговора.ВалютаСоглашения КАК ВалютаСоглашения |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ КАК Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); ОсновныеРеквизиты = ДанныеДоговора[1].Выгрузить(); Если ОсновныеРеквизиты.Количество() > 0 Тогда Значение.ПартнерУТ11 = ОсновныеРеквизиты[0].Партнер; Значение.СоглашениеСКлиентомУТ11 = ОсновныеРеквизиты[0].Соглашение; Если ЗначениеЗаполнено(Значение.СоглашениеСКлиентомУТ11) Тогда Значение.ВалютаВзаиморасчетов = ОсновныеРеквизиты[0].ВалютаСоглашения; Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСКлиентомУТ11); Иначе Значение.ВалютаВзаиморасчетов = ОсновныеРеквизиты[0].ВалютаВзаиморасчетов; Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[2].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказКлиента = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказКлиента) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = ЗаказКлиента; ИначеЕсли ТипЗнч(ЗаказКлиента) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказКлиента; КонецЕсли; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВзаимозачетЗадолженности") Тогда ИмяТЧ = "ДебиторскаяЗадолженность"; ТипРасчетов = "РасчетыСКлиентом"; Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "КонтрагентКредитор") Тогда ИмяТЧ = "КредиторскаяЗадолженность"; ТипРасчетов = "РасчетыСПоставщиком"; КонецЕсли; Запрос.Текст = " |ВЫБРАТЬ | ТабДок.ОбъектРасчетов.Объект КАК ЗаказКлиента, | ТабДок.ВалютаВзаиморасчетов, | Выразить(ТабДок.ОбъектРасчетов.Объект КАК Документ.ЗаказКлиента).Соглашение КАК Соглашение, | Выразить(ТабДок.ОбъектРасчетов.Объект КАК Документ.ЗаказКлиента).Сделка КАК Сделка, | ТабДок.Партнер |ПОМЕСТИТЬ ДанныеДоговора |ИЗ | Документ.ВзаимозачетЗадолженности." + ИмяТЧ + " КАК ТабДок |ГДЕ | ТабДок.Ссылка = &Ссылка | И ТабДок.ТипРасчетов = ЗНАЧЕНИЕ(Перечисление.ТипыРасчетовСПартнерами." + ТипРасчетов + ") |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Партнер |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Соглашение |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Заказ |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.Сделка |ИЗ | ДанныеДоговора КАК ДанныеДоговора |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ДанныеДоговора.ВалютаВзаиморасчетов |ИЗ | ДанныеДоговора КАК ДанныеДоговора"; ДанныеДоговора = Запрос.ВыполнитьПакет(); СверткаПоПартнеру = ДанныеДоговора[1].Выгрузить(); Если СверткаПоПартнеру.Количество() = 1 Тогда Значение.ПартнерУТ11 = СверткаПоПартнеру[0].Партнер; КонецЕсли; СверткаПоСоглашениям = ДанныеДоговора[2].Выгрузить(); Если СверткаПоСоглашениям.Количество() = 1 Тогда Значение.СоглашениеСКлиентомУТ11 = СверткаПоСоглашениям[0].Соглашение; КонецЕсли; СверткаПоЗаказам = ДанныеДоговора[3].Выгрузить(); Если СверткаПоЗаказам.Количество() = 1 Тогда ЗаказКлиента = СверткаПоЗаказам[0].Заказ; Если ТипЗнч(ЗаказКлиента) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = ЗаказКлиента; ИначеЕсли ТипЗнч(ЗаказКлиента) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда Договор = ЗаказКлиента; КонецЕсли; КонецЕсли; СверткаПоСделкам = ДанныеДоговора[4].Выгрузить(); Если СверткаПоСделкам.Количество() = 1 Тогда Значение.СделкаСКлиентомУТ11 = СверткаПоСделкам[0].Сделка; КонецЕсли; СверткаПоВалютеВзаиморасчетов = ДанныеДоговора[5].Выгрузить(); Если СверткаПоВалютеВзаиморасчетов.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = СверткаПоВалютеВзаиморасчетов[0].ВалютаВзаиморасчетов; Если ЗначениеЗаполнено(Значение.СоглашениеСКлиентомУТ11) Тогда Значение.РасчетыВУсловныхЕдиницах = ВзаиморасчетыСервер.РасчетыВУсловныхЕдиницах(Значение.СоглашениеСКлиентомУТ11); Иначе Значение.РасчетыВУсловныхЕдиницах = ВходящиеДанные.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() И ВходящиеДанные.ВалютаДокумента <> Значение.ВалютаВзаиморасчетов; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; ИначеЕсли ТипЗначенияДокументаОснования = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда Запрос.Текст = " |ВЫБРАТЬ | Док.Партнер, | Док.Валюта |ИЗ | Документ.ВозвратТоваровМеждуОрганизациями КАК Док |ГДЕ | Док.Ссылка = &Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | РасшифровкаПлатежа.ВалютаВзаиморасчетов |ИЗ | Документ.ВозвратТоваровМеждуОрганизациями.РасшифровкаПлатежа КАК РасшифровкаПлатежа |ГДЕ | РасшифровкаПлатежа.Ссылка = &Ссылка | |УПОРЯДОЧИТЬ ПО | РасшифровкаПлатежа.НомерСтроки"; РезультатЗапроса = Запрос.ВыполнитьПакет(); ДанныеШапки = РезультатЗапроса[0].Выгрузить()[0]; ДанныеРасшифровкиПлатежа = РезультатЗапроса[1].Выгрузить(); Значение.ПартнерУТ11 = ДанныеШапки.Партнер; Если ДанныеРасшифровкиПлатежа.Количество() = 1 Тогда Значение.ВалютаВзаиморасчетов = ДанныеРасшифровкиПлатежа[0].ВалютаВзаиморасчетов; Значение.РасчетыВУсловныхЕдиницах = ДанныеШапки.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И ДанныеШапки.Валюта <> Значение.ВалютаВзаиморасчетов; Иначе Значение.ВалютаВзаиморасчетов = ДанныеШапки.Валюта; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Иначе Значение.ВалютаВзаиморасчетов = ВходящиеДанные.ВалютаДокумента; Значение.РасчетыВУсловныхЕдиницах = Ложь; КонецЕсли; Если ЗначениеЗаполнено(Договор) Тогда Значение = Договор; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>23 <Наименование>ДокументОснование --> ДокументОснование <Порядок>600 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПередВыгрузкой>ИмяПКО = ВходящиеДанные.ДокументОснование_ИмяПКО; <Свойство> <Код>26 <Наименование>ДатаПлатежноРасчетногоДокумента --> ДатаПлатежноРасчетногоДокумента <Порядок>650 <Источник Имя="ДатаПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>27 <Наименование>НомерПлатежноРасчетногоДокумента --> НомерПлатежноРасчетногоДокумента <Порядок>700 <Источник Имя="НомерПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>28 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>750 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если Не ЗначениеЗаполнено(Значение) Тогда Значение = "02"; КонецЕсли; <Свойство> <Код>29 <Наименование>ВыставленВЭлектронномВиде --> КодСпособаВыставления <Порядок>800 <Источник Имя="ВыставленВЭлектронномВиде" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="КодСпособаВыставления" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Значение = ?(Значение, 2, 1); <Свойство> <Код>30 <Наименование>ДатаВыставления --> Выставлен <Порядок>850 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Выставлен" Вид="Реквизит" Тип="Булево"/> <ПриВыгрузке>Значение = ЗначениеЗаполнено(Значение); <Свойство> <Код>31 <Наименование>ДатаВыставления --> ДатаВыставления <Порядок>900 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>33 <Наименование>Руководитель --> Руководитель <Порядок>950 <Источник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>32 <Наименование>ГлавныйБухгалтер --> ГлавныйБухгалтер <Порядок>1000 <Источник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ОтветственныеЛицаОрганизаций"/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПриВыгрузке>Значение = Значение.ФизическоеЛицо; <Свойство> <Код>1 <Наименование>Комментарий --> Комментарий <Порядок>1050 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>25 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>1100 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Группа> <Код>7 <Наименование>Авансы --> Авансы <Порядок>1150 <Источник Имя="Авансы" Вид="ТабличнаяЧасть"/> <Приемник Имя="Авансы" Вид="ТабличнаяЧасть"/> <Свойство> <Код>12 <Наименование>Номенклатура --> Номенклатура <Порядок>50 <Источник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>11 <Наименование>Содержание --> Содержание <Порядок>100 <Источник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>10 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>9 <Наименование>Сумма --> Сумма <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>8 <Наименование>СуммаНДС --> СуммаНДС <Порядок>250 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Группа> <Код>18 <Наименование>--> ДокументыОснования <Порядок>1200 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДокументОснование"); НоваяСтрока = КоллекцияОбъектов.Добавить(); <Свойство> <Код>19 <Наименование>--> ДокументОснование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Источник.ДокументОснование; ИмяПКО = ВходящиеДанные.ДокументОснование_ИмяПКО; <Группа> <Код>20 <Наименование>--> ПлатежноРасчетныеДокументы <Порядок>1250 <Источник Имя="" Вид=""/> <Приемник Имя="ПлатежноРасчетныеДокументы" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДатаПлатежноРасчетногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("НомерПлатежноРасчетногоДокумента"); Если ЗначениеЗаполнено(Источник.ДокументОснование) Тогда КоллекцияОбъектов.Добавить(); КонецЕсли; <Свойство> <Код>22 <Наименование>--> ДатаДокумента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = Источник.ДатаПлатежноРасчетногоДокумента; <Свойство> <Код>21 <Наименование>--> НомерДокумента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="НомерДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = Источник.НомерПлатежноРасчетногоДокумента; <Значения/> <Правило> <Код>СФВ_СчетФактураВыданный <Наименование>Документ: Счет фактура выданный <Порядок>100 <ПередВыгрузкой>Если Не ТолькоПолучитьУзелСсылки Тогда ВходящиеДанные = Новый Структура(); ВходящиеДанные.Вставить("ДатаИсходногоДокумента"); ВходящиеДанные.Вставить("НомерИсходногоДокумента"); ВходящиеДанные.Вставить("ДатаИсправляемогоКорректировочногоДокумента"); ВходящиеДанные.Вставить("НомерИсправляемогоКорректировочногоДокумента"); Запрос = Новый Запрос("ВЫБРАТЬ | ВЫБОР | КОГДА Док.Корректировочный | ТОГДА Док.ДокументОснование.Номер | КОГДА Док.Исправление | ТОГДА Док.СчетФактураОснование.Номер | ИНАЧЕ """" | КОНЕЦ КАК НомерИсходногоДокумента, | ВЫБОР | КОГДА Док.Корректировочный | ТОГДА Док.ДокументОснование.Дата | КОГДА Док.Исправление | ТОГДА Док.СчетФактураОснование.Дата | ИНАЧЕ 0 | КОНЕЦ КАК ДатаИсходногоДокумента, | ВЫБОР | КОГДА Док.Корректировочный | И Док.Исправление | ТОГДА Док.СчетФактураОснование.Номер | ИНАЧЕ """" | КОНЕЦ КАК НомерИсправляемогоКорректировочногоДокумента, | ВЫБОР | КОГДА Док.Корректировочный | И Док.Исправление | ТОГДА Док.СчетФактураОснование.Дата | ИНАЧЕ 0 | КОНЕЦ КАК ДатаИсправляемогоКорректировочногоДокумента |ИЗ | Документ.СчетФактураВыданный КАК Док |ГДЕ | Док.Ссылка = &Ссылка"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ВходящиеДанные, Выборка); КонецЕсли; КонецЕсли; <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФВ_СчетФактураВыданный"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураВыданный <Приемник>ДокументСсылка.СчетФактураВыданный <Свойства> <Свойство Поиск="true"> <Код>2 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <ПриВыгрузке>Если ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.ОтчетКомиссионера") Или ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") И Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Организация") Тогда Значение = НачалоДня(Значение); КонецЕсли; <Свойство Поиск="true"> <Код>3 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство Поиск="true"> <Код>30 <Наименование>НомерИсправления --> НомерИсправления <Порядок>150 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсправления" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>28 <Наименование>--> ДатаИсходногоДокумента <Порядок>350 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <ПриВыгрузке>Если Источник.Корректировочный Тогда Пусто = Истина; КонецЕсли; <Свойство> <Код>32 <Наименование>--> НомерИсходногоДокумента <Порядок>400 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) И Не Источник.Корректировочный Тогда Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Значение, Ложь, Истина); Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>36 <Наименование>--> ДатаИсправляемогоКорректировочногоДокумента <Порядок>450 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсправляемогоКорректировочногоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство Отключить="true"> <Код>37 <Наименование>--> НомерИсправляемогоКорректировочногоДокумента <Порядок>500 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсправляемогоКорректировочногоДокумента" Вид="Реквизит" Тип="Строка"/> <ПриВыгрузке>Если ЗначениеЗаполнено(Значение) Тогда Значение = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Значение, Ложь, Истина); КонецЕсли; <Свойство> <Код>8 <Наименование>Корректировочный --> ВидСчетаФактуры <Порядок>550 <Источник Имя="Корректировочный" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ВидСчетаФактуры" Вид="Реквизит" Тип="ПеречислениеСсылка.ВидСчетаФактурыВыставленного"/> <ПриВыгрузке>Значение = ?(Значение, "Корректировочный", "НаРеализацию"); <Свойство> <Код>1 <Наименование>Организация --> Организация <Порядок>600 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>29 <Наименование>Исправление --> Исправление <Порядок>650 <Источник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>16 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>7 <Наименование>Валюта --> ВалютаДокумента <Порядок>750 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>15 <Наименование>ДокументОснование --> ДокументОснование <Порядок>800 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПриВыгрузке>Если Источник.Исправление И ТипЗнч(Значение) <> Тип("ДокументСсылка.КорректировкаРеализации") Тогда Значение = Источник.Ссылка; ИмяПКО = "СФВ_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПродажа"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Организация") Тогда ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; Иначе ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; КонецЕсли; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.АктВыполненныхРабот") Тогда ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровОтКлиента") Тогда ИмяПКО = "ВТОП_ВозвратТоваровОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровПоставщику") Тогда ИмяПКО = "ВТП_ВозвратТоваровПоставщику"; Иначе ИмяПКО = "РТУ_ПродажаТоваровУслуг"; КонецЕсли; <Свойство> <Код>33 <Наименование>ДатаВыставления --> Выставлен <Порядок>850 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="Выставлен" Вид="Реквизит" Тип="Булево"/> <ПриВыгрузке>Значение = ЗначениеЗаполнено(Значение); <Свойство> <Код>17 <Наименование>ДатаВыставления --> ДатаВыставления <Порядок>900 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>18 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>950 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>19 <Наименование>ВыставленВЭлектронномВиде --> КодСпособаВыставления <Порядок>1000 <Источник Имя="ВыставленВЭлектронномВиде" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="КодСпособаВыставления" Вид="Реквизит" Тип="Число"/> <ПриВыгрузке>Значение = ?(Значение, 2, 1); <Свойство> <Код>9 <Наименование>--> Проведен <Порядок>1050 <Источник Имя="" Вид=""/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Группа> <Код>4 <Наименование>ПлатежноРасчетныеДокументы --> ПлатежноРасчетныеДокументы <Порядок>1100 <Источник Имя="ПлатежноРасчетныеДокументы" Вид="ТабличнаяЧасть"/> <Приемник Имя="ПлатежноРасчетныеДокументы" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>Если Источник.Корректировочный И Источник.ПлатежноРасчетныеДокументы.Количество() = 0 Тогда КоллекцияОбъектов = Новый ТаблицаЗначений(); КоллекцияОбъектов.Колонки.Добавить("ДатаПлатежноРасчетногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("НомерПлатежноРасчетногоДокумента"); КоллекцияОбъектов.Добавить(); КонецЕсли; <Свойство> <Код>6 <Наименование>ДатаПлатежноРасчетногоДокумента --> ДатаДокумента <Порядок>50 <Источник Имя="ДатаПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>5 <Наименование>НомерПлатежноРасчетногоДокумента --> НомерДокумента <Порядок>100 <Источник Имя="НомерПлатежноРасчетногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>40 <Наименование>--> Руководитель <Порядок>1150 <Источник Имя="" Вид=""/> <Приемник Имя="Руководитель" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПередВыгрузкой>Если ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда Руководитель = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Руководитель"); Значение = Руководитель.ФизическоеЛицо; Иначе Пусто = Истина; КонецЕсли; <Свойство> <Код>39 <Наименование>--> ГлавныйБухгалтер <Порядок>1200 <Источник Имя="" Вид=""/> <Приемник Имя="ГлавныйБухгалтер" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <ПередВыгрузкой>Если ТипЗнч(Источник.ДокументОснование) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда Руководитель = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Руководитель"); Значение = Руководитель.ФизическоеЛицо; Иначе Пусто = Истина; КонецЕсли; <Группа> <Код>10 <Наименование>--> ДокументыОснования <Порядок>1250 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <ПередОбработкойВыгрузки>КоллекцияОбъектов = Новый ТаблицаЗначений; КоллекцияОбъектов.Колонки.Добавить("ДокументОснование"); КоллекцияОбъектов.Колонки.Добавить("ДатаИсправленияИсходногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("ДатаИсходногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("НомерИсправленияИсходногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("НомерИсходногоДокумента"); КоллекцияОбъектов.Колонки.Добавить("УчитыватьИсправлениеИсходногоДокумента"); КоллекцияОбъектов.Добавить(); <Свойство> <Код>11 <Наименование>--> ДокументОснование <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <ПередВыгрузкой>Значение = Источник.ДокументОснование; Если Источник.Исправление И ТипЗнч(Значение) <> Тип("ДокументСсылка.КорректировкаРеализации") Тогда Значение = Источник.Ссылка; ИмяПКО = "СФВ_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПродажа"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Источник.ДокументОснование, "Организация") Тогда ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; Иначе ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; КонецЕсли; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.АктВыполненныхРабот") Тогда ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровОтКлиента") Тогда ИмяПКО = "ВТОП_ВозвратТоваровОтПокупателя"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровПоставщику") Тогда ИмяПКО = "ВТП_ВозвратТоваровПоставщику"; Иначе ИмяПКО = "РТУ_ПродажаТоваровУслуг"; КонецЕсли; <Свойство> <Код>41 <Наименование>--> ДатаИсправленияИсходногоДокумента <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Попытка Если Источник.Корректировочный Тогда Значение = Источник.ДатаИсправленияИсходногоДокумента; КонецЕсли; Исключение КонецПопытки; <Свойство> <Код>42 <Наименование>--> ДатаИсходногоДокумента <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Если Источник.Корректировочный Тогда Значение = ВходящиеДанные.ДатаИсходногоДокумента; КонецЕсли; <Свойство> <Код>43 <Наименование>--> НомерИсправленияИсходногоДокумента <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>Попытка Если Источник.Корректировочный Тогда Значение = Источник.НомерИсправленияИсходногоДокумента; КонецЕсли; Исключение КонецПопытки; <Свойство> <Код>44 <Наименование>--> НомерИсходногоДокумента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="НомерИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Если Источник.Корректировочный Тогда Значение = ВходящиеДанные.НомерИсходногоДокумента; КонецЕсли; <Свойство> <Код>45 <Наименование>--> УчитыватьИсправлениеИсходногоДокумента <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="УчитыватьИсправлениеИсходногоДокумента" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = ЗначениеЗаполнено(Источник.НомерИсправления); <Значения/> <Правило> <Код>СФВ_КорректировкаРеализации <Наименование>Документ: Счет-фактура выданный <Порядок>150 <ПослеЗагрузки>Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); // Основная часть реквизитов заполняется при загрузке в БП //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "СФВ_КорректировкаРеализации"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.СчетФактураВыданный <Приемник>ДокументСсылка.КорректировкаРеализации <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>Проведен --> Проведен <Порядок>100 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>3 <Наименование>ДокументОснование --> ДокументРеализации <Порядок>150 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ДокументРеализации <ПриВыгрузке>// Поиск предыдущего счета-фактуры, оформленного без регистрации корректировки // для выгрузки ссылки на него, как на корректировку реализации Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | СчетФактураВыданный.Ссылка |ИЗ | Документ.СчетФактураВыданный КАК СчетФактураВыданный |ГДЕ | СчетФактураВыданный.Проведен = ИСТИНА | И СчетФактураВыданный.ДокументОснование = &ДокументОснование | И СчетФактураВыданный.Исправление = ИСТИНА | И СчетФактураВыданный.НомерИсправления < &НомерИсправления | И СчетФактураВыданный.Ссылка <> &Ссылка | |УПОРЯДОЧИТЬ ПО | СчетФактураВыданный.НомерИсправления УБЫВ"); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.УстановитьПараметр("НомерИсправления", Источник.НомерИсправления); Запрос.УстановитьПараметр("ДокументОснование", Значение); ВыборкаСчетовФактурСИсправлением = Запрос.Выполнить().Выбрать(); Если ВыборкаСчетовФактурСИсправлением.Следующий() Тогда Значение = ВыборкаСчетовФактурСИсправлением.Ссылка; ИмяПКО = "СФВ_КорректировкаРеализации"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПродажа"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; Иначе ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; КонецЕсли; КонецЕсли; <Свойство> <Код>5 <Наименование>ДокументОснование --> ИсправляемыйДокументРеализации <Порядок>200 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ИсправляемыйДокументРеализации <ПриВыгрузке>Если ТипЗнч(Значение) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Тогда ИмяПКО = "ПДТ_ПередачаТоваровПродажа"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Тогда ИмяПКО = "ВТМО_ВозвратПоставщику"; ИначеЕсли ТипЗнч(Значение) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если Источник.Организация = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "Организация") Тогда ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах"; Иначе ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах"; КонецЕсли; КонецЕсли <Свойство> <Код>4 <Наименование>НомерИсправления --> НомерИсправления <Порядок>250 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>НомерИсправления <Значения/> <Правило> <Код>ВыданныйСчетФактура <Наименование>Документ: СчетФактураВыданный <Порядок>200 <СинхронизироватьПоИдентификатору>true <Источник>ДокументСсылка.СчетФактураВыданный <Приемник>ДокументСсылка.СчетФактураВыданный <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство> <Код>2 <Наименование>ДатаВыставления --> ДатаВыставления <Порядок>100 <Источник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВыставления" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>3 <Наименование>ДокументОснование --> ДокументОснование <Порядок>150 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <Свойство> <Код>4 <Наименование>ИдентификаторГосКонтракта --> ИдентификаторГосКонтракта <Порядок>200 <Источник Имя="ИдентификаторГосКонтракта" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ИдентификаторГосКонтракта" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>Исправление --> Исправление <Порядок>250 <Источник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="Исправление" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>6 <Наименование>КодВидаОперации --> КодВидаОперации <Порядок>300 <Источник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперации" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>КодВидаОперацииНаУменьшение --> КодВидаОперацииНаУменьшение <Порядок>350 <Источник Имя="КодВидаОперацииНаУменьшение" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КодВидаОперацииНаУменьшение" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>Контрагент --> Контрагент <Порядок>400 <Источник Имя="Контрагент" Вид="Реквизит"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Свойство> <Код>9 <Наименование>КППКонтрагента --> КППКонтрагента <Порядок>450 <Источник Имя="КППКонтрагента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КППКонтрагента" Вид="Реквизит" Тип="Строка"/> <Свойство Поиск="true"> <Код>10 <Наименование>Номер --> Номер <Порядок>500 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>11 <Наименование>НомерИсправления --> НомерИсправления <Порядок>550 <Источник Имя="НомерИсправления" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсправления" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>Организация --> Организация <Порядок>600 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>13 <Наименование>Ответственный --> Ответственный <Порядок>650 <Источник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <Приемник Имя="Ответственный" Вид="Реквизит" Тип="СправочникСсылка.Пользователи"/> <КодПравилаКонвертации>Пользователи <Свойство> <Код>14 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>700 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>15 <Наименование>Проведен --> Проведен <Порядок>750 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>16 <Наименование>СводныйКорректировочный --> СводныйКорректировочный <Порядок>800 <Источник Имя="СводныйКорректировочный" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="СводныйКорректировочный" Вид="Реквизит" Тип="Булево"/> <Группа> <Код>17 <Наименование>ДокументыОснования --> ДокументыОснования <Порядок>850 <Источник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <Приемник Имя="ДокументыОснования" Вид="ТабличнаяЧасть"/> <Свойство> <Код>18 <Наименование>ДатаИсправленияИсходногоДокумента --> ДатаИсправленияИсходногоДокумента <Порядок>50 <Источник Имя="ДатаИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>19 <Наименование>ДатаИсходногоДокумента --> ДатаИсходногоДокумента <Порядок>100 <Источник Имя="ДатаИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаИсходногоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>20 <Наименование>ДокументОснование --> ДокументОснование <Порядок>150 <Источник Имя="ДокументОснование" Вид="Реквизит"/> <Приемник Имя="ДокументОснование" Вид="Реквизит"/> <Свойство> <Код>21 <Наименование>НомерИсправленияИсходногоДокумента --> НомерИсправленияИсходногоДокумента <Порядок>200 <Источник Имя="НомерИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсправленияИсходногоДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>22 <Наименование>НомерИсходногоДокумента --> НомерИсходногоДокумента <Порядок>250 <Источник Имя="НомерИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерИсходногоДокумента" Вид="Реквизит" Тип="Строка"/> <Значения/> <Правило> <Код>АО_АвансовыйОтчетЗакупкаТоваровУслуг <Наименование>Документ: Авансовый отчет <Порядок>650 <ПередВыгрузкой>Запрос = Новый Запрос(); Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); Запрос.Текст = " |ВЫБРАТЬ | АвансовыйОтчетПрочиеРасходы.Ссылка КАК Ссылка, | АвансовыйОтчетПрочиеРасходы.СтатьяРасходов.Наименование КАК СтатьяРасходов |ИЗ | Документ.АвансовыйОтчет.ПрочиеРасходы КАК АвансовыйОтчетПрочиеРасходы |ГДЕ | АвансовыйОтчетПрочиеРасходы.Ссылка = &Ссылка"; РезультатЗапроса = Запрос.Выполнить().Выгрузить(); Если РезультатЗапроса.Количество() <> 0 Тогда ВходящиеДанные.Вставить("СтатьяРасходов", РезультатЗапроса[0].СтатьяРасходов); Иначе ВходящиеДанные.Вставить("СтатьяРасходов", ""); КонецЕсли; <ПослеЗагрузки>Для каждого стр из Объект.Прочее цикл стр.счетзатрат = ПланыСчетов.Хозрасчетный.НайтиПоКоду("44.01"); стр.счетзатратну = ПланыСчетов.Хозрасчетный.НайтиПоКоду("44.01"); конеццикла; Выполнить(Алгоритмы.ОбработатьЗаписьДокументаПослеЗагрузки); //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда //Занесем данные об объекте в таблицу отложенной обработки НоваяСтрока = Параметры.ЗагруженныеОбъекты.Добавить(); НоваяСтрока.ИмяПКО = "АО_АвансовыйОтчетЗакупкаТоваровУслуг"; НоваяСтрока.Объект = Объект; НоваяСтрока.Параметры = ПараметрыОбъекта; //КонецЕсли; <СинхронизироватьПоИдентификатору>true <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Источник>ДокументСсылка.АвансовыйОтчет <Приемник>ДокументСсылка.АвансовыйОтчет <Свойства> <Свойство Отключить="true"> <Код>33 <Наименование>--> ДатаВходящегоДокумента <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <ПередВыгрузкой>Значение = Источник.ПрочиеРасходы.ДатаВходящегоДокумента; Сообщить(Источник.ПрочиеРасходы.ДатаВходящегоДокумента); <ПриВыгрузке>Значение = Источник.ПрочиеРасходы.ДатаВходящегоДокумента; Сообщить(Источник.ПрочиеРасходы.ДатаВходящегоДокумента); <ПослеВыгрузки>Значение = Источник.ПрочиеРасходы.ДатаВходящегоДокумента; Сообщить(Источник.ПрочиеРасходы.ДатаВходящегоДокумента); <Свойство Поиск="true"> <Код>1 <Наименование>Дата --> Дата <Порядок>50 <Источник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Приемник Имя="Дата" Вид="Свойство" Тип="Дата"/> <Свойство Поиск="true"> <Код>2 <Наименование>Номер --> Номер <Порядок>100 <Источник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Номер" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>4 <Наименование>Проведен --> Проведен <Порядок>150 <Источник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Приемник Имя="Проведен" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>5 <Наименование>Организация --> Организация <Порядок>200 <Источник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <Приемник Имя="Организация" Вид="Реквизит" Тип="СправочникСсылка.Организации"/> <КодПравилаКонвертации>Организации <Свойство> <Код>15 <Наименование>ПодотчетноеЛицо --> ФизЛицо <Порядок>250 <Источник Имя="ПодотчетноеЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <Приемник Имя="ФизЛицо" Вид="Реквизит" Тип="СправочникСсылка.ФизическиеЛица"/> <КодПравилаКонвертации>ФизическиеЛица <Свойство> <Код>6 <Наименование>Валюта --> ВалютаДокумента <Порядок>350 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="ВалютаДокумента" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <КодПравилаКонвертации>Валюты <Свойство> <Код>16 <Наименование>Валюта --> КратностьДокумента <Порядок>400 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КратностьДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Кратность; <Свойство> <Код>17 <Наименование>Валюта --> КурсДокумента <Порядок>450 <Источник Имя="Валюта" Вид="Реквизит" Тип="СправочникСсылка.Валюты"/> <Приемник Имя="КурсДокумента" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>// Документ оформлен в валюте взаиморасчетов Значение = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Источник.Валюта, Источник.Дата).Курс; <Свойство> <Код>46 <Наименование>СуммаИзрасходовано --> СуммаДокумента <Порядок>500 <Источник Имя="СуммаИзрасходовано" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаДокумента" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>31 <Наименование>--> СуммаВключаетНДС <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаВключаетНДС" Вид="Реквизит" Тип="Булево"/> <ПередВыгрузкой>Значение = Истина; <Свойство> <Код>7 <Наименование>КоличествоДокументов --> КоличествоДокументов <Порядок>700 <Источник Имя="КоличествоДокументов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КоличествоДокументов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>8 <Наименование>КоличествоЛистов --> КоличествоЛистов <Порядок>750 <Источник Имя="КоличествоЛистов" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="КоличествоЛистов" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>НазначениеАванса --> НазначениеАванса <Порядок>800 <Источник Имя="НазначениеАванса" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НазначениеАванса" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>59 <Наименование>Комментарий --> Комментарий <Порядок>850 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>68 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>900 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство Отключить="true"> <Код>75 <Наименование>--> ЭтоЕНВД <Порядок>950 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>ЭтоЕНВД <Группа Отключить="true"> <Код>10 <Наименование>--> Товары <Порядок>1000 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Товары" Вид="ТабличнаяЧасть"/> <Свойство> <Код>11 <Наименование>--> Номенклатура <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство> <Код>28 <Наименование>--> Цена <Порядок>100 <Источник Имя="" Вид=""/> <Приемник Имя="Цена" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>13 <Наименование>--> Сумма <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>12 <Наименование>--> СуммаНДС <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>18 <Наименование>--> ДатаВходящегоДокумента <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>19 <Наименование>--> ДатаСФ <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>20 <Наименование>--> Количество <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Количество" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>21 <Наименование>--> НомерВходящегоДокумента <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>22 <Наименование>--> НомерГТД <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="НомерГТД" Вид="Реквизит" Тип="СправочникСсылка.НомераГТД"/> <КодПравилаКонвертации>НомераГТД <Свойство> <Код>23 <Наименование>--> НомерСФ <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="НомерСФ" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>24 <Наименование>--> Поставщик <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Поставщик" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>25 <Наименование>--> ПредъявленСФ <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="ПредъявленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>26 <Наименование>--> СтавкаНДС <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <Свойство> <Код>27 <Наименование>--> СтранаПроисхождения <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СтранаПроисхождения" Вид="Реквизит" Тип="СправочникСсылка.СтраныМира"/> <КодПравилаКонвертации>КлассификаторСтранМира <Свойство> <Код>76 <Наименование>--> СпособУчетаНДС <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство Отключить="true"> <Код>73 <Наименование>--> ОтражениеВУСН <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Группа Отключить="true"> <Код>32 <Наименование>--> Прочее <Порядок>1050 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="Прочее" Вид="ТабличнаяЧасть"/> <Свойство> <Код>34 <Наименование>--> НомерВходящегоДокумента <Порядок>100 <ПолучитьИзВходящихДанных>true <Источник Имя="" Вид=""/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = "1"; //Источник.ПрочиеРасходы.НомерВходящегоДокумента; <ПриВыгрузке>Значение = "1";//Источник.ПрочиеРасходы.НомерВходящегоДокумента; <ПослеВыгрузки>Значение = "1";//Источник.ПрочиеРасходы.НомерВходящегоДокумента; <Свойство Отключить="true"> <Код>35 <Наименование>--> Поставщик <Порядок>150 <Источник Имя="" Вид=""/> <Приемник Имя="Поставщик" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Свойство Отключить="true"> <Код>37 <Наименование>--> ПредъявленСФ <Порядок>200 <Источник Имя="" Вид=""/> <Приемник Имя="ПредъявленСФ" Вид="Реквизит" Тип="Булево"/> <Свойство Отключить="true"> <Код>38 <Наименование>--> ДатаСФ <Порядок>250 <Источник Имя="" Вид=""/> <Приемник Имя="ДатаСФ" Вид="Реквизит" Тип="Дата"/> <Свойство Отключить="true"> <Код>39 <Наименование>--> НомерСФ <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="НомерСФ" Вид="Реквизит" Тип="Строка"/> <Свойство Отключить="true"> <Код>40 <Наименование>--> Номенклатура <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="Номенклатура" Вид="Реквизит" Тип="СправочникСсылка.Номенклатура"/> <КодПравилаКонвертации>Номенклатура <Свойство Отключить="true"> <Код>41 <Наименование>--> Сумма <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>42 <Наименование>--> СтавкаНДС <Порядок>450 <Источник Имя="" Вид=""/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС <Свойство Отключить="true"> <Код>43 <Наименование>--> СуммаНДС <Порядок>500 <Источник Имя="" Вид=""/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство Отключить="true"> <Код>45 <Наименование>--> Содержание <Порядок>550 <Источник Имя="" Вид=""/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>66 <Наименование>--> СчетЗатрат <Порядок>600 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Пусто = НЕ ЗначениеЗаполнено(Значение); <Свойство> <Код>67 <Наименование>--> СчетЗатратНУ <Порядок>650 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатратНУ" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Значение = ОбъектКоллекции.КорреспондирующийСчет; Пусто = НЕ ЗначениеЗаполнено(Значение); <Свойство Отключить="true"> <Код>77 <Наименование>--> СпособУчетаНДС <Порядок>700 <Источник Имя="" Вид=""/> <Приемник Имя="СпособУчетаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыУчетаНДС"/> <Свойство> <Код>65 <Наименование>--> СтатьяРасходов <Порядок>750 <Источник Имя="" Вид=""/> <Приемник Имя="" Вид=""/> <ИмяПараметраДляПередачи>СтатьяРасходов <ПередВыгрузкой>Значение = ОбъектКоллекции.СтатьяРасходов; Если ЗначениеЗаполнено(Значение) Тогда КоррСчет = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Значение, "КорреспондирующийСчет"); Если ЗначениеЗаполнено(КоррСчет) Тогда ИмяПКО = ?(Найти(КоррСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); Иначе Пусто = Истина; КонецЕсли; Иначе Пусто = Истина; КонецЕсли; <Свойство Отключить="true"> <Код>72 <Наименование>--> ОтражениеВУСН <Порядок>800 <Источник Имя="" Вид=""/> <Приемник Имя="ОтражениеВУСН" Вид="Реквизит" Тип="ПеречислениеСсылка.ОтражениеВУСН"/> <Группа> <Код>50 <Наименование>ОплатаПоставщикам --> ОплатаПоставщикам <Порядок>1100 <Источник Имя="ОплатаПоставщикам" Вид="ТабличнаяЧасть"/> <Приемник Имя="ОплатаПоставщикам" Вид="ТабличнаяЧасть"/> <Свойство> <Код>51 <Наименование>Контрагент --> Контрагент <Порядок>50 <Источник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <Приемник Имя="Контрагент" Вид="Реквизит" Тип="СправочникСсылка.Контрагенты"/> <КодПравилаКонвертации>Контрагенты <Свойство> <Код>53 <Наименование>ОбъектРасчетов --> ДоговорКонтрагента <Порядок>100 <Источник Имя="ОбъектРасчетов" Вид="Реквизит" Тип="СправочникСсылка.ОбъектыРасчетов"/> <Приемник Имя="ДоговорКонтрагента" Вид="Реквизит" Тип="СправочникСсылка.ДоговорыКонтрагентов"/> <КодПравилаКонвертации>ДоговорыКонтрагентов <ПриВыгрузке>ДоговорКонтрагента = Неопределено; Если ТипЗнч(Значение) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ДоговорКонтрагента = Значение; Иначе Попытка ДоговорКонтрагента = Значение.Объект.Договор; Исключение КонецПопытки; КонецЕсли; Если ЗначениеЗаполнено(ДоговорКонтрагента) Тогда Значение = ДоговорКонтрагента; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", ОбъектКоллекции.Контрагент); Значение.Вставить("Организация", Источник.Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Поставщик); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); Заказ = ОбъектКоллекции.ОбъектРасчетов.Объект; Если ЗначениеЗаполнено(Заказ) Тогда // Определяем тип заказа, он может быть одним из следующих // - ДокументСсылка.ЗаказПоставщику // - ДокументСсылка.ПоступлениеТоваровУслуг // - ДокументСсылка.ОтчетКомитенту // - ДокументСсылка.ОтчетКомитентуОСписании // - ДокументСсылка.ОтчетКомиссионера ТипЗаказа = ТипЗнч(Заказ); // Соглашение может быть получено для всех вариантов операции Соглашение = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Заказ, "Соглашение"); Если ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = Соглашение; ИначеЕсли ТипЗнч(Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(Заказ, Соглашение, Неопределено); Значение.ВидДоговора = ?(ЗначениеЗаполнено(ВидДоговора), ВидДоговора, "СПоставщиком"); Если Значение.ВидДоговора = "СКомитентом" ИЛИ Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = Соглашение.ОплатаВВалюте; КонецЕсли; // Разделение по заказу идет, если в качестве заказа указан заказ поставщику Если ТипЗаказа = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = Заказ; КонецЕсли; КонецЕсли; Иначе Значение.ВидДоговора = "СПоставщиком"; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Свойство> <Код>57 <Наименование>Сумма --> Сумма <Порядок>150 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>58 <Наименование>СуммаВзаиморасчетов --> СуммаВзаиморасчетов <Порядок>200 <Источник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>52 <Наименование>Комментарий --> Содержание <Порядок>250 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>54 <Наименование>--> КратностьВзаиморасчетов <Порядок>300 <Источник Имя="" Вид=""/> <Приемник Имя="КратностьВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Кратность; <Свойство> <Код>55 <Наименование>--> КурсВзаиморасчетов <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="КурсВзаиморасчетов" Вид="Реквизит" Тип="Число"/> <ПередВыгрузкой>СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(ОбъектКоллекции.ВалютаВзаиморасчетов, Источник.Дата); Значение = СтруктураКурса.Курс; <Свойство> <Код>56 <Наименование>--> СпособПогашенияЗадолженности <Порядок>400 <Источник Имя="" Вид=""/> <Приемник Имя="СпособПогашенияЗадолженности" Вид="Реквизит" Тип="ПеречислениеСсылка.СпособыПогашенияЗадолженности"/> <ПередВыгрузкой>Значение = "Автоматически"; <Свойство> <Код>70 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>450 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>71 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>500 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Группа> <Код>78 <Наименование>ПрочиеРасходы --> Прочее <Порядок>1150 <Источник Имя="ПрочиеРасходы" Вид="ТабличнаяЧасть"/> <Приемник Имя="Прочее" Вид="ТабличнаяЧасть"/> <Свойство> <Код>79 <Наименование>ДатаВходящегоДокумента --> ДатаВходящегоДокумента <Порядок>50 <Источник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Приемник Имя="ДатаВходящегоДокумента" Вид="Реквизит" Тип="Дата"/> <Свойство> <Код>80 <Наименование>НомерВходящегоДокумента --> НомерВходящегоДокумента <Порядок>100 <Источник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="НомерВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>81 <Наименование>СтавкаНДС --> СтавкаНДС <Порядок>150 <Источник Имя="СтавкаНДС" Вид="Реквизит" Тип="СправочникСсылка.СтавкиНДС"/> <Приемник Имя="СтавкаНДС" Вид="Реквизит" Тип="ПеречислениеСсылка.СтавкиНДС"/> <КодПравилаКонвертации>СтавкиНДС_СправочникПеречисление <Свойство> <Код>82 <Наименование>Сумма --> Сумма <Порядок>200 <Источник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Приемник Имя="Сумма" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>83 <Наименование>СуммаНДС --> СуммаНДС <Порядок>250 <Источник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Приемник Имя="СуммаНДС" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>84 <Наименование>СтатьяРасходов --> Содержание <Порядок>300 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="Содержание" Вид="Реквизит" Тип="Строка"/> <ПередВыгрузкой>Значение = ВходящиеДанные.СтатьяРасходов; <Свойство Отключить="true"> <Код>85 <Наименование>--> СчетЗатрат <Порядок>350 <Источник Имя="" Вид=""/> <Приемник Имя="СчетЗатрат" Вид="Реквизит" Тип="ПланСчетовСсылка.Хозрасчетный"/> <ПередВыгрузкой>Знаяение = ПланыСчетов.Хозрасчетный.ИздержкиОбращения; <Свойство> <Код>86 <Наименование>СтатьяРасходов --> Субконто1 <Порядок>400 <Источник Имя="СтатьяРасходов" Вид="Реквизит"/> <Приемник Имя="Субконто1" Вид="Реквизит"/> <ПередВыгрузкой>Значение = ВходящиеДанные.СтатьяРасходов; <Свойство> <Код>87 <Наименование>НаименованиеВходящегоДокумента --> ВидДокВходящий <Порядок>450 <Источник Имя="НаименованиеВходящегоДокумента" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ВидДокВходящий" Вид="Реквизит" Тип="Строка"/> <Значения/> <Группа> <Код>ПланыВидовХарактеристик <Наименование>ПланыВидовХарактеристик <Порядок>250 <Правило> <Код>ВидыСубконтоХозрасчетные <Наименование>: <Порядок>50 <ГенерироватьНовыйНомерИлиКодЕслиНеУказан>true <Приемник>ПланВидовХарактеристикСсылка.ВидыСубконтоХозрасчетные <Свойства> <Свойство Поиск="true"> <Код>1 <Наименование>--> Код <Порядок>50 <Источник Имя="" Вид=""/> <Приемник Имя="Код" Вид="Свойство" Тип="Строка"/> <ПередВыгрузкой>Если Источник = "Номенклатура" Тогда Значение = "00001"; ИначеЕсли Источник = "Контрагенты" Тогда Значение = "00005"; ИначеЕсли Источник = "Договоры" Тогда Значение = "00016"; ИначеЕсли Источник = "Склады" Тогда Значение = "00027"; ИначеЕсли Источник = "Партии" Тогда Значение = "00038"; ИначеЕсли Источник = "НомераГТД" Тогда Значение = "00050"; ИначеЕсли Источник = "СтраныПроисхождения" Тогда Значение = "00051"; ИначеЕсли Источник = "БанковскиеСчета" Тогда Значение = "00008"; ИначеЕсли Источник = "ПрочиеДоходыИРасходы" Тогда Значение = "00013"; КонецЕсли; <Значения/> <Правило> <Код>ДополнительныеРеквизитыИСведения <Наименование>План видов характеристик: Дополнительные реквизиты и сведения <Порядок>50 <СинхронизироватьПоИдентификатору>true <Источник>ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения <Приемник>ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения <Свойства> <Свойство> <Код>1 <Наименование>ВладелецДополнительныхЗначений --> ВладелецДополнительныхЗначений <Порядок>50 <Источник Имя="ВладелецДополнительныхЗначений" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <Приемник Имя="ВладелецДополнительныхЗначений" Вид="Реквизит" Тип="ПланВидовХарактеристикСсылка.ДополнительныеРеквизитыИСведения"/> <КодПравилаКонвертации>ДополнительныеРеквизитыИСведения <Свойство> <Код>2 <Наименование>ДополнительныеЗначенияИспользуются --> ДополнительныеЗначенияИспользуются <Порядок>100 <Источник Имя="ДополнительныеЗначенияИспользуются" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ДополнительныеЗначенияИспользуются" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>3 <Наименование>ДополнительныеЗначенияСВесом --> ДополнительныеЗначенияСВесом <Порядок>150 <Источник Имя="ДополнительныеЗначенияСВесом" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ДополнительныеЗначенияСВесом" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>4 <Наименование>Заголовок --> Заголовок <Порядок>200 <Источник Имя="Заголовок" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Заголовок" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>5 <Наименование>ЗаголовокФормыВыбораЗначения --> ЗаголовокФормыВыбораЗначения <Порядок>250 <Источник Имя="ЗаголовокФормыВыбораЗначения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗаголовокФормыВыбораЗначения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>6 <Наименование>ЗаголовокФормыЗначения --> ЗаголовокФормыЗначения <Порядок>300 <Источник Имя="ЗаголовокФормыЗначения" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ЗаголовокФормыЗначения" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>7 <Наименование>ЗаполнятьОбязательно --> ЗаполнятьОбязательно <Порядок>350 <Источник Имя="ЗаполнятьОбязательно" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ЗаполнятьОбязательно" Вид="Реквизит" Тип="Булево"/> <Свойство> <Код>8 <Наименование>Комментарий --> Комментарий <Порядок>400 <Источник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Комментарий" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>9 <Наименование>МногострочноеПолеВвода --> МногострочноеПолеВвода <Порядок>450 <Источник Имя="МногострочноеПолеВвода" Вид="Реквизит" Тип="Число"/> <Приемник Имя="МногострочноеПолеВвода" Вид="Реквизит" Тип="Число"/> <Свойство> <Код>10 <Наименование>НаборСвойств --> НаборСвойств <Порядок>500 <Источник Имя="НаборСвойств" Вид="Реквизит" Тип="СправочникСсылка.НаборыДополнительныхРеквизитовИСведений"/> <Приемник Имя="НаборСвойств" Вид="Реквизит" Тип="СправочникСсылка.НаборыДополнительныхРеквизитовИСведений"/> <КодПравилаКонвертации>НаборыДополнительныхРеквизитовИСведений <Свойство Поиск="true"> <Код>11 <Наименование>Наименование --> Наименование <Порядок>550 <Источник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Приемник Имя="Наименование" Вид="Свойство" Тип="Строка"/> <Свойство> <Код>12 <Наименование>Подсказка --> Подсказка <Порядок>600 <Источник Имя="Подсказка" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="Подсказка" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>13 <Наименование>ПометкаУдаления --> ПометкаУдаления <Порядок>650 <Источник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Приемник Имя="ПометкаУдаления" Вид="Свойство" Тип="Булево"/> <Свойство> <Код>14 <Наименование>УдалитьСклоненияПредмета --> УдалитьСклоненияПредмета <Порядок>700 <Источник Имя="УдалитьСклоненияПредмета" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="УдалитьСклоненияПредмета" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>15 <Наименование>ФорматСвойства --> ФорматСвойства <Порядок>750 <Источник Имя="ФорматСвойства" Вид="Реквизит" Тип="Строка"/> <Приемник Имя="ФорматСвойства" Вид="Реквизит" Тип="Строка"/> <Свойство> <Код>16 <Наименование>ЭтоДополнительноеСведение --> ЭтоДополнительноеСведение <Порядок>800 <Источник Имя="ЭтоДополнительноеСведение" Вид="Реквизит" Тип="Булево"/> <Приемник Имя="ЭтоДополнительноеСведение" Вид="Реквизит" Тип="Булево"/> <Значения/> <ПравилаВыгрузкиДанных> <Группа Отключить="false"> <Код>Документы <Наименование>Документы <Порядок>50 <Группа Отключить="false"> <Код>Финансы <Наименование>ФинансовыеДокументы <Порядок>50 <Правило Отключить="false"> <Код>ПриходныйКассовыйОрдер <Наименование>ПриходныйКассовыйОрдер <Порядок>50 <КодПравилаКонвертации>ПКО_ПоступлениеДСОтКлиента <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПриходныйКассовыйОрдер <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствИзДругойОрганизации Тогда Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда ХозОперацияРКО = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДокументОснование, "ХозяйственнаяОперация"); ИмяПКО = ?(ХозОперацияРКО = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствВДругуюОрганизацию, "ПКО_ВозвратДСИзДругойОрганизации", "ПКО_ПоступлениеДСИзДругойОрганизации"); Иначе ИмяПКО = "ПКО_ПоступлениеДСИзДругойОрганизации"; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствОтПодотчетника Тогда ИмяПКО = "ПКО_ВозвратДСОтПодотчетногоЛица"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствИзКассыККМ Тогда ИмяПКО = "ПКО_ПоступлениеРозничнойВыручки"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствОтПоставщика Тогда ИмяПКО = "ПКО_ВозвратДСОтПоставщика"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствИзБанка Тогда ИмяПКО = "ПКО_ПоступлениеДСИзБанка"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеОплатыОтКлиента Тогда ИмяПКО = "ПКО_ПоступлениеДСОтКлиента"; //ПСК Тимохов//Временно убрали //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВнутренняяПередачаДенежныхСредств Тогда //ИмяПКО = "ПКО_ВнутренняяПередача"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.КонвертацияВалюты Тогда ИмяПКО = "ПКО_КонвертацияВалюты"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоКредитам Тогда ИмяПКО = "ПКО_КредитыЗаймы_ПоступлениеТранша"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоЗаймамВыданным Тогда ИмяПКО = "ПКО_ЗаймыВыданные_ОснДолг"; Если Объект.РасшифровкаПлатежа.Количество() > 0 Тогда СтатьяДДС = Объект.РасшифровкаПлатежа[0].СтатьяДвиженияДенежныхСредств; Если ЗначениеЗаполнено(СтатьяДДС) Тогда ПараметрыДоговора = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Объект.РасшифровкаПлатежа[0].ДоговорКредитаДепозита, "СтатьяДДСКомиссии, СтатьяДДСПроцентов"); Если СтатьяДДС = ПараметрыДоговора.СтатьяДДСКомиссии Или СтатьяДДС = ПараметрыДоговора.СтатьяДДСПроцентов Тогда ИмяПКО = "ПКО_ЗаймыВыданные_ПроцентыКомиссия"; КонецЕсли; КонецЕсли; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоДепозитам Тогда ИмяПКО = "ПКО_Депозиты_Закрытие"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоКредитам Тогда ИмяПКО = "ПКО_КредитыЗаймы_ПоступлениеТранша"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоЗаймамВыданным Тогда ИмяПКО = "ПКО_ЗаймыВыданные_ОснДолг"; Если Объект.РасшифровкаПлатежа.Количество() > 0 Тогда СтатьяДДС = Объект.РасшифровкаПлатежа[0].СтатьяДвиженияДенежныхСредств; Если ЗначениеЗаполнено(СтатьяДДС) Тогда ПараметрыДоговора = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Объект.РасшифровкаПлатежа[0].ДоговорКредитаДепозита, "СтатьяДДСКомиссии, СтатьяДДСПроцентов"); Если СтатьяДДС = ПараметрыДоговора.СтатьяДДСКомиссии Или СтатьяДДС = ПараметрыДоговора.СтатьяДДСПроцентов Тогда ИмяПКО = "ПКО_ЗаймыВыданные_ПроцентыКомиссия"; КонецЕсли; КонецЕсли; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоДепозитам Тогда ИмяПКО = "ПКО_Депозиты_Закрытие"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочееПоступлениеДенежныхСредств Или Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочиеДоходы Тогда Выполнить(Алгоритмы.ПКО_РеквизитыДляОбменаСБухгалтерией); Если ВходящиеДанные.ВидОперации = "РасчетыПоКредитамИЗаймам" Тогда ИмяПКО = "ПКО_РасчетыПоКредитамИЗаймам"; ИначеЕсли ВходящиеДанные.ВидОперации = "ВозвратЗаймаСотрудником" Тогда ИмяПКО = "ПКО_ВозвратЗаймаРаботником"; ИначеЕсли ВходящиеДанные.ВидОперации = "ПрочееПоступление" Тогда ИмяПКО = "ПКО_ПрочееПоступлениеНаличныхДС"; КонецЕсли; КонецЕсли; <Правило Отключить="false"> <Код>РасходныйКассовыйОрдер <Наименование>Расходный кассовый ордер <Порядок>100 <КодПравилаКонвертации>РКО_ОплатаПоставщику <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.РасходныйКассовыйОрдер <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаПоставщику Тогда ИмяПКО = "РКО_ОплатаПоставщику"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратОплатыКлиенту Тогда ИмяПКО = "РКО_ВозвратДСПокупателю"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыдачаДенежныхСредствПодотчетнику Тогда ИмяПКО = "РКО_ВыдачаДСПодотчетномуЛицу"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СдачаДенежныхСредствВБанк Тогда //ВходящиеДанные = Новый Структура; //БанковскийСчетОперации = Объект.БанковскийСчет; //Источник = Объект; //Выполнить(Алгоритмы.ПолучениеДатыИПризнакаПроведенияДокументовДБДС); //Если Найти(Объект.Комментарий, Параметры.МаркерыОпераций.ВзносНаличнымиВБанк) // И ВходящиеДанные.Проведен // И НачалоДня(Объект.Дата) = НачалоДня(ВходящиеДанные.Дата) Тогда ИмяПКО = "РКО_ВзносНаличнымиВБанк"; //ТипПриемника = "ДокументСсылка.ПоступлениеНаРасчетныйСчет"; //ТипИсточника = "ДокументСсылка.РасходныйКассовыйОрдер"; //Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеНаРасчетныйСчет", "ДокументСсылка.РасходныйКассовыйОрдер"); //Сообщить("Имя ПКО:РКО_ВзносНаличнымиВБанк"); // Иначе // ПСК Юднов //КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ИнкассацияДенежныхСредствВБанк Тогда //ПСК Юднов ИмяПКО = "РКО_Инкассация"; //Если ВходящиеДанные.Проведен Тогда // ВыгрузитьПоПравилу(Объект,, ВходящиеДанные,, "ПБДС_Инкассация"); //Иначе // ТипПриемника = "ДокументСсылка.ПоступлениеНаРасчетныйСчет"; // ТипИсточника = "ДокументСсылка.РасходныйКассовыйОрдер"; // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеНаРасчетныйСчет", "ДокументСсылка.РасходныйКассовыйОрдер"); //КонецЕсли; //КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаДенежныхСредствВДругуюОрганизацию Тогда ИмяПКО = "РКО_ВыдачаДСВДругуюОрганизацию"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствВДругуюОрганизацию Тогда ИмяПКО = "РКО_ВозвратДСВДругуюОрганизацию"; //ПСК Тимохов// Временно убрано //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВнутренняяПередачаДенежныхСредств Тогда // ИмяПКО = "РКО_ВнутренняяПередача"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.КонвертацияВалюты Тогда ИмяПКО = "РКО_КонвертацияВалюты"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаЗаработнойПлатыПоВедомостям Тогда // ИмяПКО = "РКО_ВыплатаЗППоВедомостям"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаЗаработнойПлатыРаботнику Тогда // ИмяПКО = "РКО_ВыплатаЗПРаботнику"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаПоКредитам Тогда ИмяПКО = "РКО_КредитыЗаймы_ПроцентыКомиссияОснДолг"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаПоЗаймамВыданным Тогда // ИмяПКО = "РКО_ЗаймыВыданные_ВыдачаТранша"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаПоДепозитам Тогда // ИмяПКО = "РКО_Депозиты_Размещение"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочаяВыдачаДенежныхСредств ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочиеРасходы Тогда Выполнить(Алгоритмы.РКО_РеквизитыДляОбменаСБухгалтерией); Если ВходящиеДанные.ВидОперации = "ПеречислениеДепонентов" Тогда ИмяПКО = "РКО_ВыплатаДепонированнойЗП"; ИначеЕсли ВходящиеДанные.ВидОперации = "РасчетыПоКредитамИЗаймам" Тогда ИмяПКО = "РКО_РасчетыПоКредитамИЗаймам"; ИначеЕсли ВходящиеДанные.ВидОперации = "ПрочийРасход" Тогда ИмяПКО = "РКО_ПрочийРасходДС"; ИначеЕсли ВходящиеДанные.ВидОперации = "ВыдачаЗаймаСотруднику" Тогда ИмяПКО = "РКО_ВыдачаЗаймаРаботнику"; КонецЕсли; КонецЕсли; <Правило Отключить="false"> <Код>ПоступлениеБезналичныхДенежныхСредств <Наименование>Поступление безналичных денежных средств <Порядок>150 <КодПравилаКонвертации>ПБДС_ПоступлениеОтКлиентаБезналичныхДС <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеОплатыОтКлиента Тогда ИмяПКО = "ПБДС_ПоступлениеОтКлиентаБезналичныхДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствОтПоставщика Тогда ИмяПКО = "ПБДС_ВозвратОтПоставщикаБезналичныхДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствИзДругойОрганизации Тогда //ПСК Юднов Д. + Отказ = Истина; //ПСК Юднов Д. - ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоКредитам Тогда ИмяПКО = "ПБДС_КредитыЗаймы_ПоступлениеТранша"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоЗаймамВыданным Тогда ИмяПКО = "ПБДС_ЗаймыВыданные_ОснДолг"; Если Объект.РасшифровкаПлатежа.Количество() > 0 Тогда СтатьяДДС = Объект.РасшифровкаПлатежа[0].СтатьяДвиженияДенежныхСредств; Если ЗначениеЗаполнено(СтатьяДДС) Тогда ПараметрыДоговора = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Объект.РасшифровкаПлатежа[0].ДоговорКредитаДепозита, "СтатьяДДСКомиссии, СтатьяДДСПроцентов"); Если СтатьяДДС = ПараметрыДоговора.СтатьяДДСКомиссии Или СтатьяДДС = ПараметрыДоговора.СтатьяДДСПроцентов Тогда ИмяПКО = "ПБДС_ЗаймыВыданные_ПроцентыКомиссия"; КонецЕсли; КонецЕсли; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеДенежныхСредствПоДепозитам Тогда ИмяПКО = "ПБДС_Депозиты_Закрытие"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.КонвертацияВалюты Тогда Если Объект.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Объект.ВалютаКонвертации <> Константы.ВалютаРегламентированногоУчета.Получить() Тогда ИмяПКО = "ПБДС_ПоступленияОтПродажиИностраннойВалюты"; ИначеЕсли Объект.Валюта <> Константы.ВалютаРегламентированногоУчета.Получить() И Объект.ВалютаКонвертации = Константы.ВалютаРегламентированногоУчета.Получить() Тогда ИмяПКО = "ПБДС_ПриобретениеИностраннойВалюты"; Иначе ИмяПКО = "ПБДС_КонвертацияВалютыПроч"; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочееПоступлениеДенежныхСредств ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочиеДоходы Тогда Выполнить(Алгоритмы.ПБДС_РеквизитыДляОбменаСБухгалтерией); Если ВходящиеДанные.ВидОперации = "ПрочееПоступление" Тогда ИмяПКО = "ПБДС_ПрочееПоступлениеБезналичныхДС"; ИначеЕсли ВходящиеДанные.ВидОперации = "ВозвратЗаймаСотрудником" Тогда ИмяПКО = "ПБДС_ВозвратЗаймаРаботником"; ИначеЕсли ВходящиеДанные.ВидОперации = "РасчетыПоКредитамИЗаймам" Тогда ИмяПКО = "ПБДС_РасчетыПоКредитамИЗаймам"; ИначеЕсли ВходящиеДанные.ВидОперации = "ПрочиеРасчетыСКонтрагентами" Тогда ИмяПКО = "ПБДС_ПрочиеРасчетыСКонтрагентами"; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствОтПодотчетника Тогда ИмяПКО = "ПБДС_ВозвратОтПодотчетникаБезналичныхДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПоступлениеОплатыПоПлатежнойКарте Тогда ////ПСК ААА ++ //Отказ = Истина; ////ПСК -- ИмяПКО = "ПБДС_ПоступлениеОтКлиентаБезналичныхДС"; КонецЕсли; <Правило Отключить="false"> <Код>СписаниеБезналичныхДенежныхСредств <Наименование>Списание безналичных денежных средств <Порядок>200 <КодПравилаКонвертации>СБДС_ОплатаПоставщикуБезналичныеДС <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СписаниеБезналичныхДенежныхСредств <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПеречислениеДенежныхСредствНаДругойСчет Тогда ИмяПКО = "СБДС_ПеречислениеНаДругойРСБезналичныхДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыдачаДенежныхСредствПодотчетнику Тогда ИмяПКО = "СБДС_ПеречислениеПодотчетномуЛицу"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратОплатыКлиенту Тогда ИмяПКО = "СБДС_ВозвратПокупателюБезналичныеДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПеречислениеВБюджет Тогда ИмяПКО = "СБДС_ПеречислениеНалога"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаПоставщику Тогда ИмяПКО = "СБДС_ОплатаПоставщикуБезналичныеДС"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.КонвертацияВалюты Тогда ИмяПКО = "СБДС_КонвертацияВалюты"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаПоКредитам Тогда ИмяПКО = "СБДС_КредитыЗаймы_ПроцентыКомиссияОснДолг"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаПоЗаймамВыданным Тогда // ИмяПКО = "СБДС_ЗаймыВыданные_ПеречислениеТранша"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаПоДепозитам Тогда // ИмяПКО = "СБДС_Депозиты_Размещение"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаЗарплатыПоЗарплатномуПроекту Тогда ИмяПКО = "СБДС_ПеречислениеЗП"; //ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаЗаработнойПлатыПоВедомостям Тогда // ИмяПКО = "СБДС_ПеречислениеЗП"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВыплатаЗарплатыНаЛицевыеСчета Тогда ИмяПКО = "СБДС_ПеречислениеЗПНаЛицевыеСчета"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПеречислениеТаможне Тогда ИмяПКО = "СБДС_ТаможенныйПлатеж"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочиеРасходы ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочаяВыдачаДенежныхСредств Тогда Выполнить(Алгоритмы.СБДС_РеквизитыДляОбменаСБухгалтерией); Если ВходящиеДанные.ВидОперации = "ПеречислениеДепонентов" Тогда ИмяПКО = "СБДС_ПеречислениеДепонированнойЗП"; ИначеЕсли ВходящиеДанные.ВидОперации = "ВыдачаЗаймаСотруднику" Тогда ИмяПКО = "СБДС_ВыдачаЗаймаРаботнику"; ИначеЕсли ВходящиеДанные.ВидОперации = "РасчетыПоКредитамИЗаймам" Тогда ИмяПКО = "СБДС_РасчетыПоКредитамИЗаймам"; ИначеЕсли ВходящиеДанные.ВидОперации = "ПрочиеРасчетыСКонтрагентами" Тогда ИмяПКО = "СБДС_ПрочиеРасчетыСКонтрагентами"; ИначеЕсли ВходящиеДанные.ВидОперации = "ПрочееСписание" Тогда ИмяПКО = "СБДС_ПрочееСписаниеБезналичныхДС"; КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаДенежныхСредствВДругуюОрганизацию ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствВДругуюОрганизацию ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВнутренняяПередачаДенежныхСредств Тогда //Юднов Д. //Отказ = Истина; ОрганизацияПолучатель = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.БанковскийСчетПолучатель, "Владелец"); Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьСписание = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; ВыгружатьПоступление = УзелСписокОрганизаций.НайтиПоЗначению(ОрганизацияПолучатель) <> Неопределено; Иначе ВыгружатьСписание = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация; ВыгружатьПоступление = Параметры.ВыгружатьУправленческуюОрганизацию Или ОрганизацияПолучатель <> Справочники.Организации.УправленческаяОрганизация; КонецЕсли; Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ОплатаДенежныхСредствВДругуюОрганизацию Тогда ИмяПКОСписание = "СБДС_ПеречислениеДСВДругуюОрганизацию"; ИмяПКОПоступление = "ПБДС_ПоступлениеИзДругойОрганизации"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратДенежныхСредствВДругуюОрганизацию Тогда ИмяПКОСписание = "СБДС_ВозвратДСВДругуюОрганизацию"; ИмяПКОПоступление = "ПБДС_ВозвратДСИзДругойОрганизации"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВнутренняяПередачаДенежныхСредств Тогда ИмяПКОСписание = "СБДС_ВнутренняяПередача"; ИмяПКОПоступление = "ПБДС_ВнутренняяПередача"; КонецЕсли; Если ВыгружатьСписание Тогда ВыгрузитьПоПравилу(Объект,,,, ИмяПКОСписание); Иначе ТипПриемника = "ДокументСсылка.СписаниеСРасчетногоСчета"; ТипИсточника = "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СписаниеСРасчетногоСчета", "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"); КонецЕсли; Если ВыгружатьПоступление Тогда ВыгрузитьПоПравилу(Объект,,,, ИмяПКОПоступление); Иначе ТипПриемника = "ДокументСсылка.ПоступлениеНаРасчетныйСчет"; ТипИсточника = "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеНаРасчетныйСчет", "ДокументСсылка.СписаниеБезналичныхДенежныхСредств"); КонецЕсли; КонецЕсли; <Правило Отключить="false"> <Код>АвансовыйОтчет <Наименование>Авансовый отчет <Порядок>250 <КодПравилаКонвертации>АО_АвансовыйОтчетЗакупкаТоваровУслуг <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.АвансовыйОтчет <Правило Отключить="false"> <Код>НачисленияКредитовИДепозитов <Наименование>Начисления по кредитам и депозитам <Порядок>300 <КодПравилаКонвертации>НачисленияКредитовИДепозитов_ОперацияБух <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.НачисленияКредитовИДепозитов <Правило Отключить="false"> <Код>РеализацияПодарочныхСертификатов <Наименование>Реализация подарочных сертификатов <Порядок>350 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.РеализацияПодарочныхСертификатов <ПередВыгрузкойОбъекта>ВыгружатьПКО = Ложь; ВыгружатьКорректировку = Ложь; Если Объект.ОплатаПлатежнымиКартами.Количество() > 0 Тогда ВыгружатьКорректировку = Истина; Иначе ВыгружатьПКО = Истина; КонецЕсли; Если ВыгружатьПКО Тогда ВыгрузитьПоПравилу(Объект,,,, "РПС_ПоступлениеОплатыОтКлиента_Нал"); Иначе ТипПриемника = "ДокументСсылка.ПриходныйКассовыйОрдер"; ТипИсточника = "ДокументСсылка.РеализацияПодарочныхСертификатов"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПриходныйКассовыйОрдер", "ДокументСсылка.РеализацияПодарочныхСертификатов"); КонецЕсли; Если ВыгружатьКорректировку Тогда ВыгрузитьПоПравилу(Объект,,,, "РПС_ПоступлениеОплатыОтКлиента_ПоКарте"); Иначе ТипПриемника = "ДокументСсылка.КорректировкаДолга"; ТипИсточника = "ДокументСсылка.РеализацияПодарочныхСертификатов"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.РеализацияПодарочныхСертификатов"); КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>ВозвратПодарочныхСертификатов <Наименование>Возврат подарочных сертификатов <Порядок>400 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВозвратПодарочныхСертификатов <ПередВыгрузкойОбъекта>ВыгружатьПКО = Ложь; ВыгружатьКорректировку = Ложь; Если Объект.ОплатаПлатежнымиКартами.Количество() > 0 Тогда ВыгружатьКорректировку = Истина; Иначе ВыгружатьПКО = Истина; КонецЕсли; Если ВыгружатьПКО Тогда ВыгрузитьПоПравилу(Объект,,,, "ВПС_ВозвратОплатыКлиенту_Нал"); Иначе ТипПриемника = "ДокументСсылка.РасходныйКассовыйОрдер"; ТипИсточника = "ДокументСсылка.ВозвратПодарочныхСертификатов"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.РасходныйКассовыйОрдер", "ДокументСсылка.ВозвратПодарочныхСертификатов"); КонецЕсли; Если ВыгружатьКорректировку Тогда ВыгрузитьПоПравилу(Объект,,,, "ВПС_ВозвратОплатыКлиенту_ПоКарте"); Иначе ТипПриемника = "ДокументСсылка.КорректировкаДолга"; ТипИсточника = "ДокументСсылка.ВозвратПодарочныхСертификатов"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.ВозвратПодарочныхСертификатов"); КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>АннулированиеПодарочныхСертификатов <Наименование>Аннулирование подарочных сертификатов <Порядок>450 <КодПравилаКонвертации>АПС_ОперацияБух <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.АннулированиеПодарочныхСертификатов <Группа Отключить="false"> <Код>ПокупкаПродажа <Наименование>Документы покупки/продажи товаров и услуг <Порядок>100 <Группа Отключить="false"> <Код>Покупка <Наименование>Покупка <Порядок>50 <Правило Отключить="false"> <Код>ПриобретениеТоваровУслуг <Наименование>Приобретение товаров услуг <Порядок>100 <КодПравилаКонвертации>ПТУ_ЗакупкаТоваровУслуг <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПриобретениеТоваровУслуг <ПередВыгрузкойОбъекта>Отказ = Истина; ПараметрыДокумента = Неопределено; ДокументСсылка = Объект.Ссылка; Выполнить(Алгоритмы.ПараметрыПриобретениеТоваровУслуг); Если ПараметрыДокумента.ЕстьОбычноеПоступление = Истина Тогда Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаПоИмпорту Тогда ВыгрузитьПоПравилу(Объект,,,, "ПТУ_ЗакупкаИмпорт"); ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПриемНаКомиссию Тогда ВыгрузитьПоПравилу(Объект,,,, "ПТУ_ПриемНаКомиссию"); ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда ВыгрузитьПоПравилу(Объект,,,, "АвансовыйОтчетИзПриобретенияТИУ"); Иначе ВыгрузитьПоПравилу(Объект,,,, "ПТУ_ЗакупкаТоваровУслуг"); КонецЕсли; Иначе //+Тимохов// ТипПриемника = "ДокументСсылка.ПоступлениеТоваровУслуг"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; //-Тимохов// Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеТоваровУслуг", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; Если Объект.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ПриемНаКомиссию Тогда Если ПараметрыДокумента.ЕстьДопРасходы = Истина Тогда ВыгрузитьПоПравилу(Объект,,,, "ПТУ_ПоступлениеДопРасходов"); Иначе //+Тимохов// ТипПриемника = "ДокументСсылка.ПоступлениеДопРасходов"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; //-Тимохов// Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеДопРасходов", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; КонецЕсли; Если Объект.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ПриемНаКомиссию И Объект.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ЗакупкаПоИмпорту Тогда Если ПараметрыДокумента.ЕстьНедостачиЗаСчетПоставщика = Истина Тогда СтруктураИсходящихДанных = Новый Структура("Контрагент", Объект.Контрагент); ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "ПТУ_РасхожденияВВозврат"); КонецЕсли; Если ПараметрыДокумента.ЕстьНедостачиЗаСчетСтороннейКомпании = Истина Тогда СтруктураИсходящихДанных = Новый Структура("Контрагент", Объект.КонтрагентСтороннейКомпании); ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "ПТУ_РасхожденияВВозврат"); КонецЕсли; КонецЕсли; Если ПараметрыДокумента.ЕстьНедостачиЗаСвойСчет = Истина Тогда ВыгрузитьПоПравилу(Объект,,,, "ПТУ_РасхожденияВСписание"); Иначе //+Тимохов// ТипПриемника = "ДокументСсылка.СписаниеТоваров"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; //-Тимохов// Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; Если ПараметрыДокумента.ЕстьИзлишкиКакПрочиеДоходы = Истина Тогда ВыгрузитьПоПравилу(Объект,,,, "ПТУ_РасхожденияВОприходование"); Иначе //+Тимохов// ТипПриемника = "ДокументСсылка.ОприходованиеТоваров"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; //-Тимохов// Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; //ПСК Юднов Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда ИмяПКО = "АвансовыйОтчетИзПриобретенияТИУ"; КонецЕсли; //ПСК Юднов <Правило Отключить="false"> <Код>ПриобретениеУслугПрочихАктивов <Наименование>Поступление услуг и внеоборотных активов <Порядок>150 <КодПравилаКонвертации>ПУВА_ПоступлениеУслуг <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПриобретениеУслугПрочихАктивов <ПередВыгрузкойОбъекта>Отказ = Истина; ПараметрыДокумента = Неопределено; ДокументСсылка = Объект.Ссылка; Выполнить(Алгоритмы.ПараметрыПриобретениеУслугПрочихАктивов); Если ПараметрыДокумента.ЕстьОбычноеПоступление Тогда ВыгрузитьПоПравилу(Объект,,,, "ПУВА_ПоступлениеУслуг"); Иначе ТипПриемника = "ДокументСсылка.ПоступлениеТоваровУслуг"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеТоваровУслуг", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; Если ПараметрыДокумента.ЕстьДопРасходы Тогда ВыгрузитьПоПравилу(Объект,,,, "ПУВА_ПоступлениеДопРасходов"); Иначе ТипПриемника = "ДокументСсылка.ПоступлениеДопРасходов"; ТипИсточника = "ДокументСсылка.ПриобретениеТоваровУслуг"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеДопРасходов", "ДокументСсылка.ПриобретениеТоваровУслуг"); КонецЕсли; <Правило Отключить="false"> <Код>КорректировкаПриобретения <Наименование>Корректировка приобретения <Порядок>200 <КодПравилаКонвертации>КорректировкаПриобретения_КорректировкаПоступления <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.КорректировкаПриобретения <ПередВыгрузкойОбъекта>//Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда // // //ПСК Удалить // //Запрос = Новый Запрос( // // "ВЫБРАТЬ // // | Док.Номенклатура, // // | СУММА(Док.Количество) КАК Количество, // // | СУММА(Док.СуммаСНДС - Док.СуммаНДС) КАК Сумма, // // | Док.НомерГТД, // // | ВЫБОР // // | КОГДА Док.Количество > 0 // // | ТОГДА ИСТИНА // // | ИНАЧЕ ЛОЖЬ // // | КОНЕЦ КАК Статус // // |ПОМЕСТИТЬ ТоварыКоличественныхРасхождений // // |ИЗ // // | Документ.КорректировкаПриобретения.Расхождения КАК Док // // |ГДЕ // // | Док.Ссылка = &КорректировкаПриобретения // // | И (Док.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) // // | ИЛИ Док.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) // // | И НЕ ЕСТЬNULL(ВЫРАЗИТЬ(Док.Ссылка.ДокументОснование КАК Документ.ПриобретениеТоваровУслуг).ВернутьМногооборотнуюТару, ЛОЖЬ)) // // | И Док.ВариантОтражения В (ЗНАЧЕНИЕ(Перечисление.ВариантыОтраженияКорректировокПоступлений.ОтразитьНаПрочихДоходах), ЗНАЧЕНИЕ(Перечисление.ВариантыОтраженияКорректировокПоступлений.СписатьНаРасходы)) // // | // // |СГРУППИРОВАТЬ ПО // // | Док.Номенклатура, // // | Док.НомерГТД, // // | ВЫБОР // // | КОГДА Док.Количество > 0 // // | ТОГДА ИСТИНА // // | ИНАЧЕ ЛОЖЬ // // | КОНЕЦ // // |; // // | // // |//////////////////////////////////////////////////////////////////////////////// // // |ВЫБРАТЬ // // | Товары.Номенклатура, // // | Товары.НомерГТД, // // | Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, // // | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, // // | 1 КАК Коэффициент, // // | ВЫБОР // // | КОГДА Товары.Количество = 0 // // | ТОГДА 0 // // | ИНАЧЕ Товары.Сумма / Товары.Количество // // | КОНЕЦ КАК Цена, // // | -Товары.Количество КАК Количество, // // | -Товары.Сумма КАК Сумма // // |ИЗ // // | ТоварыКоличественныхРасхождений КАК Товары // // |ГДЕ // // | Товары.Количество < 0 // // |; // // | // // |//////////////////////////////////////////////////////////////////////////////// // // |ВЫБРАТЬ // // | Товары.Номенклатура, // // | Товары.НомерГТД, // // | Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, // // | Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, // // | 1 КАК Коэффициент, // // | Товары.Количество КАК Количество, // // | Товары.Сумма КАК Себестоимость, // // | ВЫБОР // // | КОГДА Товары.Количество = 0 // // | ТОГДА 0 // // | ИНАЧЕ Товары.Сумма / Товары.Количество // // | КОНЕЦ КАК Цена // // |ИЗ // // | ТоварыКоличественныхРасхождений КАК Товары // // |ГДЕ // // | Товары.Количество > 0"); // //Запрос.УстановитьПараметр("КорректировкаПриобретения", Объект.Ссылка); // // // //РезультатыЗапроса = Запрос.ВыполнитьПакет(); // // // //ТоварыКОприходованиюВБухгалтерии = РезультатыЗапроса[1].Выгрузить(); // //ТоварыКСписаниюВБухгалтерии = РезультатыЗапроса[2].Выгрузить(); // // //Если ТоварыКОприходованиюВБухгалтерии.Количество() = 0 И ТоварыКСписаниюВБухгалтерии.Количество() = 0 Тогда // // ВыгрузитьПоПравилу(Объект,,,, "КорректировкаПриобретения_КорректировкаПоступления"); // //КонецЕсли; // // //ПСК Восстановить // //Если ТоварыКОприходованиюВБухгалтерии.Количество() > 0 Тогда // // СтруктураИсходящихДанных = Новый Структура("Товары", ТоварыКОприходованиюВБухгалтерии); // // ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "КорректировкаПоступления_ОприходованиеТоваров"); // //Иначе // // // Удаляем документ "Оприходование товаров", который мог быть выгружен ранее // // ТипПриемника = "ДокументСсылка.ОприходованиеТоваров"; // // ТипИсточника = "ДокументСсылка.КорректировкаПриобретения"; // // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.КорректировкаПриобретения"); // //КонецЕсли; // // // //Если ТоварыКСписаниюВБухгалтерии.Количество() > 0 Тогда // // СтруктураИсходящихДанных = Новый Структура("Товары", ТоварыКСписаниюВБухгалтерии); // // ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "КорректировкаПоступления_СписаниеТоваров"); // //Иначе // // // Удаляем документ "Списание товаров", который мог быть выгружен ранее // // ТипПриемника = "ДокументСсылка.СписаниеТоваров"; // // ТипИсточника = "ДокументСсылка.КорректировкаПриобретения"; // // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.КорректировкаПриобретения"); // //КонецЕсли; // //КонецЕсли; <Правило Отключить="false"> <Код>ВозвратТоваровПоставщику <Наименование>Возврат товаров поставщику <Порядок>250 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВозвратТоваровПоставщику <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратТоваровПоставщику ИЛИ НЕ ЗначениеЗаполнено(Объект.ХозяйственнаяОперация) Тогда ИмяПКО = "ВТП_ВозвратТоваровПоставщику"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратТоваровКомитенту Тогда ИмяПКО = "ВТП_ВозвратТоваровКомитенту"; КонецЕсли; <Правило Отключить="false"> <Код>ТаможеннаяДекларацияИмпорт <Наименование>Таможенная декларация на импорт <Порядок>300 <КодПравилаКонвертации>ТаможеннаяДекларацияИмпорт_ГТДИмпорт <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ТаможеннаяДекларацияИмпорт <Группа Отключить="false"> <Код>Продажа <Наименование>Продажа <Порядок>100 <Правило Отключить="false"> <Код>РеализацияТоваровУслуг <Наименование>Реализация товаров услуг <Порядок>100 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.РеализацияТоваровУслуг <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияКлиенту ИЛИ Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияКлиентуРеглУчет ИЛИ НЕ ЗначениеЗаполнено(Объект.ХозяйственнаяОперация) Тогда ИмяПКО = "РТУ_ПродажаТоваровУслуг"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПередачаНаКомиссию Тогда ИмяПКО = "РТУ_ПередачаТоваровНаКомиссию"; КонецЕсли; <Правило Отключить="false"> <Код>ВозвратТоваровОтКлиента <Наименование>Возврат товаров от клиента <Порядок>150 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВозвратТоваровОтКлиента <ПередВыгрузкойОбъекта>Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратТоваровОтКлиента ИЛИ НЕ ЗначениеЗаполнено(Объект.ХозяйственнаяОперация) Тогда ИмяПКО = "ВТОП_ВозвратТоваровОтПокупателя"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратОтРозничногоПокупателя Тогда ИмяПКО = "ВТОП_ВозвратТоваровОтРозничногоПокупателя"; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратОтКомиссионера Тогда ИмяПКО = "ВТОП_ВозвратТоваровОтКомиссионера"; КонецЕсли; <Правило Отключить="false"> <Код>ВыполнениеРабот <Наименование>Выполнение работ <Порядок>200 <КодПравилаКонвертации>ВыполнениеРабот_РеализацияТоваровУслуг <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.АктВыполненныхРабот <Правило Отключить="false"> <Код>ОтчетОРозничныхПродажах <Наименование>Отчет о розничных продажах <Порядок>250 <КодПравилаКонвертации>ОРП_ОтчетОРозничныхПродажах <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетОРозничныхПродажах <Правило Отключить="false"> <Код>РеализацияУслугПрочихАктивов <Наименование>Реализация услуг и прочих активов <Порядок>300 <КодПравилаКонвертации>РеализацияУслугПрочихАкт_РеализацияТоваровУслуг <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.РеализацияУслугПрочихАктивов <Правило Отключить="false"> <Код>КорректировкаРеализации <Наименование>Корректировка реализации <Порядок>350 <КодПравилаКонвертации>КорректировкаРеализации_КорректировкаРеализации <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.КорректировкаРеализации <ПередВыгрузкойОбъекта>//Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда // // Запрос = Новый Запрос("ВЫБРАТЬ // | Аналитика.Номенклатура, // | Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, // | ТоварыКОприходованию.НомерГТД, // | ТоварыКОприходованию.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, // | 1 КАК Коэффициент, // | ТоварыКОприходованию.Количество, // | ТоварыКОприходованию.СуммаСНДС - ТоварыКОприходованию.СуммаНДС КАК Сумма, // | ВЫБОР // | КОГДА ТоварыКОприходованию.Количество = 0 // | ТОГДА 0 // | ИНАЧЕ (ТоварыКОприходованию.СуммаСНДС - ТоварыКОприходованию.СуммаНДС) / ТоварыКОприходованию.Количество // | КОНЕЦ КАК Цена // |ИЗ // | Документ.КорректировкаРеализации.ВидыЗапасовСписание КАК ТоварыКОприходованию // | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика // | ПО ТоварыКОприходованию.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики // |ГДЕ // | ТоварыКОприходованию.Ссылка = &КорректировкаРеализации // | И ТоварыКОприходованию.НаДоходыРасходы // | И (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) // | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) // | И НЕ ЕСТЬNULL(ВЫРАЗИТЬ(ТоварыКОприходованию.Ссылка.ДокументОснование КАК Документ.РеализацияТоваровУслуг).ВернутьМногооборотнуюТару, ЛОЖЬ)) // |; // | // |//////////////////////////////////////////////////////////////////////////////// // |ВЫБРАТЬ // | Аналитика.Номенклатура, // | Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, // | 1 КАК Коэффициент, // | ТоварыКСписанию.НомерГТД, // | ТоварыКСписанию.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, // | ТоварыКСписанию.Количество, // | ТоварыКСписанию.СуммаСНДС - ТоварыКСписанию.СуммаНДС КАК Себестоимость, // | ВЫБОР // | КОГДА ТоварыКСписанию.Количество = 0 // | ТОГДА 0 // | ИНАЧЕ (ТоварыКСписанию.СуммаСНДС - ТоварыКСписанию.СуммаНДС) / ТоварыКСписанию.Количество // | КОНЕЦ КАК Цена // |ИЗ // | Документ.КорректировкаРеализации.ВидыЗапасовОприходование КАК ТоварыКСписанию // | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика // | ПО ТоварыКСписанию.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики // |ГДЕ // | ТоварыКСписанию.Ссылка = &КорректировкаРеализации // | И ТоварыКСписанию.НаДоходыРасходы // | И (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) // | ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) // | И НЕ ЕСТЬNULL(ВЫРАЗИТЬ(ТоварыКСписанию.Ссылка.ДокументОснование КАК Документ.РеализацияТоваровУслуг).ВернутьМногооборотнуюТару, ЛОЖЬ))"); // Запрос.УстановитьПараметр("КорректировкаРеализации", Объект.Ссылка); // // РезультатыЗапроса = Запрос.ВыполнитьПакет(); // ТоварыКОприходованиюВБухгалтерии = РезультатыЗапроса[0].Выгрузить(); // ТоварыКСписаниюВБухгалтерии = РезультатыЗапроса[1].Выгрузить(); // // Если ТоварыКОприходованиюВБухгалтерии.Количество() > 0 Тогда // СтруктураИсходящихДанных = Новый Структура("Товары", ТоварыКОприходованиюВБухгалтерии); // ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "КорректировкаРеализации_ОприходованиеТоваров"); // Иначе // // Удаляем документ "Оприходование товаров", который мог быть выгружен ранее // ТипПриемника = "ДокументСсылка.ОприходованиеТоваров"; // ТипИсточника = "ДокументСсылка.КорректировкаРеализации"; // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ОприходованиеТоваров", "ДокументСсылка.КорректировкаРеализации"); // КонецЕсли; // // Если ТоварыКСписаниюВБухгалтерии.Количество() > 0 Тогда // СтруктураИсходящихДанных = Новый Структура("Товары", ТоварыКСписаниюВБухгалтерии); // ВыгрузитьПоПравилу(Объект,, СтруктураИсходящихДанных,, "КорректировкаРеализации_СписаниеТоваров"); // Иначе // // Удаляем документ "Списание товаров", который мог быть выгружен ранее // ТипПриемника = "ДокументСсылка.СписаниеТоваров"; // ТипИсточника = "ДокументСсылка.КорректировкаРеализации"; // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.КорректировкаРеализации"); // КонецЕсли; // //КонецЕсли; <Группа Отключить="false"> <Код>Интеркампани <Наименование>Интеркампани <Порядок>200 <Правило Отключить="false"> <Код>ПередачаТоваровМеждуОрганизациями <Наименование>Передача товаров между организациями <Порядок>600 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПередачаТоваровМеждуОрганизациями <ПередВыгрузкойОбъекта>Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьПродажу = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; ВыгружатьПокупку = УзелСписокОрганизаций.НайтиПоЗначению(Объект.ОрганизацияПолучатель) <> Неопределено; Иначе ВыгружатьПродажу = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация; ВыгружатьПокупку = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.ОрганизацияПолучатель <> Справочники.Организации.УправленческаяОрганизация; КонецЕсли; Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияТоваровВДругуюОрганизацию Тогда Если ВыгружатьПродажу Тогда ВыгрузитьПоПравилу(Объект,,,, "ПДТ_ПередачаТоваровПродажа"); КонецЕсли; Если ВыгружатьПокупку Тогда ВыгрузитьПоПравилу(Объект,,,, "ПДТ_ПередачаТоваровПокупка"); КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПередачаНаКомиссиюВДругуюОрганизацию Тогда Если ВыгружатьПродажу Тогда ВыгрузитьПоПравилу(Объект,,,, "ПДТ_ПередачаТоваровПередачаНаКомиссию"); КонецЕсли; Если ВыгружатьПокупку Тогда ВыгрузитьПоПравилу(Объект,,,, "ПДТ_ПередачаТоваровПриемНаКомиссию"); КонецЕсли; КонецЕсли; // Удаляем документы, которые не выгружаются в этот раз, но могли быть выгружены ранее Если НЕ ВыгружатьПродажу Тогда ТипПриемника = "ДокументСсылка.РеализацияТоваровУслуг"; ТипИсточника = "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.РеализацияТоваровУслуг", "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"); КонецЕсли; Если НЕ ВыгружатьПокупку Тогда ТипПриемника = "ДокументСсылка.ПоступлениеТоваровУслуг"; ТипИсточника = "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ПоступлениеТоваровУслуг", "ДокументСсылка.ПередачаТоваровМеждуОрганизациями"); КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>ОтчетПоКомиссииМеждуОрганизациями <Наименование>Отчет по комиссии между организациями <Порядок>650 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями <ПередВыгрузкойОбъекта>Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьОтчетКомиссионера = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; ВыгружатьОтчетКомитенту = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Комиссионер) <> Неопределено; Иначе ВыгружатьОтчетКомиссионера = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация; ВыгружатьОтчетКомитенту = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Комиссионер <> Справочники.Организации.УправленческаяОрганизация; КонецЕсли; Если ВыгружатьОтчетКомиссионера Тогда ВыгрузитьПоПравилу(Объект,,,, "ОКОПМО_ОтчетКомиссионераОПродажах"); Иначе // Удаляем документ "Отчет комитенту о продажах", предполагая, что он был выгружен ранее ТипПриемника = "ДокументСсылка.ОтчетКомиссионераОПродажах"; ТипИсточника = "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ОтчетКомиссионераОПродажах", "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"); КонецЕсли; Если ВыгружатьОтчетКомитенту Тогда ВыгрузитьПоПравилу(Объект,,,, "ОКТОПМО_ОтчетКомитентуОПродажах"); Иначе // Удаляем документ "Отчет комитенту о продажах", предполагая, что он был выгружен ранее ТипПриемника = "ДокументСсылка.ОтчетКомитентуОПродажах"; ТипИсточника = "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ОтчетКомитентуОПродажах", "ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"); КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>ВозвратТоваровМеждуОрганизациями <Наименование>Возврат товаров между организациями <Порядок>700 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВозвратТоваровМеждуОрганизациями <ПередВыгрузкойОбъекта>Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьВозвратПоставщику = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; ВыгружатьВозвратОтПокупателя = УзелСписокОрганизаций.НайтиПоЗначению(Объект.ОрганизацияПолучатель) <> Неопределено; Иначе ВыгружатьВозвратПоставщику = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация; ВыгружатьВозвратОтПокупателя = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.ОрганизацияПолучатель <> Справочники.Организации.УправленческаяОрганизация; КонецЕсли; Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратТоваровМеждуОрганизациями Тогда Если ВыгружатьВозвратПоставщику Тогда ВыгрузитьПоПравилу(Объект,,,, "ВТМО_ВозвратПоставщику"); КонецЕсли; Если ВыгружатьВозвратОтПокупателя Тогда ВыгрузитьПоПравилу(Объект,,,, "ВТМО_ВозвратОтПокупателя"); КонецЕсли; ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ВозвратПоКомиссииМеждуОрганизациями Тогда Если ВыгружатьВозвратПоставщику Тогда ВыгрузитьПоПравилу(Объект,,,, "ВТМО_ВозвратКомитенту"); КонецЕсли; Если ВыгружатьВозвратОтПокупателя Тогда ВыгрузитьПоПравилу(Объект,,,, "ВТМО_ВозвратОтКомиссионера"); КонецЕсли; КонецЕсли; // Удаляем документы, которые не выгружаются в этот раз, но могли быть выгружены ранее Если НЕ ВыгружатьВозвратПоставщику Тогда ТипПриемника = "ДокументСсылка.ВозвратТоваровПоставщику"; ТипИсточника = "ДокументСсылка.ВозвратТоваровМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ВозвратТоваровПоставщику", "ДокументСсылка.ВозвратТоваровМеждуОрганизациями"); КонецЕсли; Если НЕ ВыгружатьВозвратОтПокупателя Тогда ТипПриемника = "ДокументСсылка.ВозвратТоваровОтПокупателя"; ТипИсточника = "ДокументСсылка.ВозвратТоваровМеждуОрганизациями"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.ВозвратТоваровОтПокупателя", "ДокументСсылка.ВозвратТоваровМеждуОрганизациями"); КонецЕсли; Отказ = Истина; <Группа Отключить="false"> <Код>СкладскиеОперации <Наименование>Складские документы <Порядок>250 <Правило Отключить="false"> <Код>СписаниеТоваров <Наименование>Списание товаров <Порядок>50 <КодПравилаКонвертации>СПТ_СписаниеТоваров <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СписаниеНедостачТоваров <Правило Отключить="false"> <Код>ОприходованиеТоваров <Наименование>Оприходование товаров <Порядок>100 <КодПравилаКонвертации>ОТ_ОприходованиеТоваров <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОприходованиеИзлишковТоваров <Правило Отключить="false"> <Код>ПеремещениеТоваров <Наименование>Перемещение товаров <Порядок>150 <КодПравилаКонвертации>ПеремещениеТоваров_ПеремещениеТоваров <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПеремещениеТоваров <Правило Отключить="false"> <Код>СборкаРазборкаТоваров <Наименование>Сборка товаров <Порядок>200 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СборкаТоваров <ПередВыгрузкойОбъекта>Запрос = Новый Запрос("ВЫБРАТЬ | Аналитика.Номенклатура, | Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, | 1 КАК Коэффициент, | СУММА(ВидыЗапасов.Количество) КАК Количество, | ВидыЗапасов.НомерГТД, | ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, | ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыНаСкладе"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ КАК СчетУчета, | ВидыЗапасов.Ссылка.СборкаПодДеятельность КАК СпособУчетаНДС |ИЗ | Документ.СборкаТоваров.ВидыЗапасовСписание КАК ВидыЗапасов | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика | ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики |ГДЕ | ВидыЗапасов.Ссылка = &Ссылка | |СГРУППИРОВАТЬ ПО | Аналитика.Номенклатура, | Аналитика.Номенклатура.ЕдиницаИзмерения, | ВидыЗапасов.НомерГТД, | ВидыЗапасов.НомерГТД.СтранаПроисхождения, | ВидыЗапасов.Ссылка.СборкаПодДеятельность, | ВЫБОР | КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) | ТОГДА ""ТоварыНаСкладе"" | ИНАЧЕ НЕОПРЕДЕЛЕНО | КОНЕЦ"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); ТаблицаТоваров = Запрос.Выполнить().Выгрузить(); СобственныеТовары = ТаблицаТоваров.Скопировать(Новый Структура("СчетУчета", Неопределено)); КомиссионныеТовары = ТаблицаТоваров.Скопировать(Новый Структура("СчетУчета", "ТоварыНаСкладе")); // Списанные собственных товаров Если СобственныеТовары.Количество() > 0 Тогда СтруктураПараметров = Новый Структура("Комплектующие", СобственныеТовары); Если Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.СборкаТоваров Тогда ВыгрузитьПоПравилу(Объект,, СтруктураПараметров,, "СБТ_СборкаИзКомплектующих"); ИначеЕсли Объект.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РазборкаТоваров Тогда ВыгрузитьПоПравилу(Объект,, СтруктураПараметров,, "РБТ_РазборкаНаКомплектующие"); КонецЕсли; //Иначе // // Удаляем документ списания собственных товаров, который мог быть выгружен ранее // ЗаписатьВФайлУдалениеОбъекта(Объект.Ссылка, "ДокументСсылка.КомплектацияНоменклатуры", "ДокументСсылка.СборкаТоваров"); КонецЕсли; // Списанные комиссионных товаров Если КомиссионныеТовары.Количество() > 0 Тогда СтруктураПараметров = Новый Структура("Товары", КомиссионныеТовары); ВыгрузитьПоПравилу(Объект,, СтруктураПараметров,, "СРТС_СписаниеТоваровПриСборкеРазборке"); //Иначе // // Удаляем документ списания комиссионных товаров, который мог быть выгружен ранее // ЗаписатьВФайлУдалениеОбъекта(Объект.Ссылка, "ДокументСсылка.СписаниеТоваров", "ДокументСсылка.СборкаТоваров"); КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>ВнутреннееПотребление <Наименование>Внутреннее потребление <Порядок>250 <КодПравилаКонвертации>ВПТ_ТребованиеНакладная <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВнутреннееПотребление <Правило Отключить="false"> <Код>ОтчетПроизводсваЗаСмену <Наименование>ПрочееОприходованиеТоваров <Порядок>550 <КодПравилаКонвертации>ПОТ_ОтчетПроизводстваЗаСмену <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПрочееОприходованиеТоваров <Правило Отключить="false"> <Код>ПрочееОприходованиеТоваров <Наименование>ПрочееОприходованиеТоваров <Порядок>600 <КодПравилаКонвертации>ПОТ_ВозвратМатериаловИзЭксплуатации <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ПрочееОприходованиеТоваров <Группа Отключить="false"> <Код>Взаиморасчеты <Наименование>Взаиморасчеты <Порядок>300 <Правило Отключить="false"> <Код>ВзаимозачетЗадолженности <Наименование>Взаимозачет задолженности <Порядок>450 <КодПравилаКонвертации>ВЗ_ВзаимозачетЗадолженностиНашаОрганизация <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ВзаимозачетЗадолженности <ПередВыгрузкойОбъекта>Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьРасчетыНашейОрганизации = УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; РасчетыМеждуОрганизациямиКредитор = Объект.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Объект.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; ВыгружатьРасчетыОрганизацииКредитор = РасчетыМеждуОрганизациямиКредитор И УзелСписокОрганизаций.НайтиПоЗначению(Объект.КонтрагентКредитор) <> Неопределено; РасчетыМеждуОрганизациямиДебитор = Объект.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.Клиент Или Объект.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент; ВыгружатьРасчетыОрганизацииДебитор = РасчетыМеждуОрганизациямиДебитор И УзелСписокОрганизаций.НайтиПоЗначению(Объект.КонтрагентДебитор) <> Неопределено; Иначе ВыгружатьРасчетыНашейОрганизации = Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация; РасчетыМеждуОрганизациямиКредитор = Объект.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент Или Объект.ТипКредитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияПоставщик; ВыгружатьРасчетыОрганизацииКредитор = РасчетыМеждуОрганизациямиКредитор И (Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.КонтрагентКредитор <> Справочники.Организации.УправленческаяОрганизация); РасчетыМеждуОрганизациямиДебитор = Объект.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.Клиент Или Объект.ТипДебитора = Перечисления.ТипыУчастниковВзаимозачета.ОрганизацияКлиент; ВыгружатьРасчетыОрганизацииДебитор = РасчетыМеждуОрганизациямиДебитор И (Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.КонтрагентДебитор <> Справочники.Организации.УправленческаяОрганизация); КонецЕсли; Если ВыгружатьРасчетыНашейОрганизации Тогда ВыгрузитьПоПравилу(Объект,,,, "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация"); Иначе ТипПриемника = "ДокументСсылка.КорректировкаДолга"; ТипИсточника = "ДокументСсылка.ВзаимозачетЗадолженности"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаДолга", "ДокументСсылка.ВзаимозачетЗадолженности"); КонецЕсли; //Если ВыгружатьРасчетыОрганизацииКредитор Тогда // ВыгрузитьПоПравилу(Объект,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор"); //Иначе // ВыгрузитьПоПравилу(Объект,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредиторУдал"); //КонецЕсли; //Если ВыгружатьРасчетыОрганизацииДебитор Тогда // ВыгрузитьПоПравилу(Объект,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор"); //Иначе // ВыгрузитьПоПравилу(Объект,,,, "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебиторУдал"); //КонецЕсли; Отказ = Истина; <Правило Отключить="false"> <Код>КорректировкаЗадолженности <Наименование>Корректировка задолженности <Порядок>500 <КодПравилаКонвертации>CЗ_КорректировкаЗадолженности <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.КорректировкаЗадолженностиПоФинансовымИнструментам <Группа Отключить="false"> <Код>СчетаФактуры <Наименование>Счета-фактуры <Порядок>400 <Правило Отключить="false"> <Код>СчетФактураПолученныйАванс <Наименование>Счет-фактура полученный (аванс) <Порядок>50 <КодПравилаКонвертации>СФПА_СчетФактураПолученныйАванс <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СчетФактураПолученныйАванс <Правило Отключить="false"> <Код>СчетФактураВыданныйАванс <Наименование>Счет-фактура выданный (аванс) <Порядок>100 <КодПравилаКонвертации>СФВА_СчетФактураВыданныйНаАванс <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СчетФактураВыданныйАванс <Правило Отключить="false"> <Код>СчетФактураПолученный <Наименование>Счет-фактура полученный <Порядок>150 <КодПравилаКонвертации>СФП_СчетФактураПолученный <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СчетФактураПолученный <ПередВыгрузкойОбъекта> ВходящиеДанные = Новый Структура; //ВходящиеДанные.Вставить("СуммаДокумента", 0); //ВходящиеДанные.Вставить("СуммаНДСДокумента", 0); //Запрос = Новый Запрос( //"ВЫБРАТЬ //| СУММА(ВсегоПоДокументу.СуммаСНДС) КАК СуммаДокумента, //| СУММА(ВсегоПоДокументу.СуммаНДС) КАК СуммаНДС //|ИЗ //| Документ.СчетФактураПолученный.ВсегоПоДокументу КАК ВсегоПоДокументу //|ГДЕ //| ВсегоПоДокументу.Ссылка = &Ссылка //| //|СГРУППИРОВАТЬ ПО //| ВсегоПоДокументу.Ссылка"); //Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); //Результат = Запрос.Выполнить().Выбрать(); //Если Результат.Следующий() Тогда // ВходящиеДанные.СуммаДокумента = Результат.СуммаДокумента; // ВходящиеДанные.СуммаНДСДокумента = Результат.СуммаНДС; //КонецЕсли; ВходящиеДанные.Вставить("Дата"); ВходящиеДанные.Вставить("ДокументОснование"); ВходящиеДанные.Вставить("ПКОДляДокументаОснования"); ВходящиеДанные.Вставить("ДокументыОснования"); ДокументыОснования = Новый ТаблицаЗначений; ДокументыОснования.Колонки.Добавить("ДокументОснование"); ДокументыОснования.Колонки.Добавить("ПКОДляДокументаОснования"); ДокументыОснования.Колонки.Добавить("ДатаИсправленияИсходногоДокумента"); ДокументыОснования.Колонки.Добавить("ДатаИсходногоДокумента"); ДокументыОснования.Колонки.Добавить("НомерИсправленияИсходногоДокумента"); ДокументыОснования.Колонки.Добавить("НомерИсходногоДокумента"); ДокументыОснования.Колонки.Добавить("УчитыватьИсправлениеИсходногоДокумента"); ПКОДляТиповДокументовОснований = Новый Соответствие; ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ПриобретениеТоваровУслуг"), "ПТУ_ЗакупкаТоваровУслуг"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов"), "ПУВА_ПоступлениеУслуг"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ВозвратТоваровОтКлиента"), "ВТОП_ВозвратТоваровОтПокупателя"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.КорректировкаПриобретения"), "КорректировкаПриобретения_КорректировкаПоступления"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ОтчетКомиссионера"), "ОКОП_ОтчетКомиссионераОПродажах"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ОтчетКомитенту"), "ОКТОП_ОтчетКомитентуОПродажах"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями"), "ПДТ_ПередачаТоваровПокупка"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями"), "ВТМО_ВозвратОтПокупателя"); ПКОДляТиповДокументовОснований.Вставить(Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями"), "ОКОПМО_ОтчетКомиссионераОПродажах"); ВходящиеДанные.Дата = Объект.Дата; Для Каждого Строка Из Объект.ДокументыОснования Цикл ДокументОснование = Строка.ДокументОснование; Если Не ЗначениеЗаполнено(ДокументОснование) Или Не ДокументОснование.Проведен Тогда Продолжить; КонецЕсли; ПКОДляДокументаОснования = ПКОДляТиповДокументовОснований.Получить(ТипЗнч(ДокументОснование)); Если ПКОДляДокументаОснования = Неопределено Тогда Продолжить; КонецЕсли; Если ТипЗнч(ДокументОснование) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") Тогда Если ДокументОснование.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаЧерезПодотчетноеЛицо Тогда //Запрос = Новый Запрос("ВЫБРАТЬ ПЕРВЫЕ 1 //| АвансовыйОтчет.Ссылка //|ИЗ //| Документ.АвансовыйОтчет.ЗакупкаЗаНаличныйРасчет КАК АвансовыйОтчет //|ГДЕ //| АвансовыйОтчет.ДокументПоступления = &Ссылка //| И АвансовыйОтчет.Ссылка.Проведен"); Запрос = Новый Запрос("ВЫБРАТЬ | АвансовыйОтчет.Ссылка |ИЗ | Документ.АвансовыйОтчет КАК АвансовыйОтчет |ГДЕ | АвансовыйОтчет.ДокументОснование = &Ссылка | И АвансовыйОтчет.Проведен"); Запрос.УстановитьПараметр("Ссылка", ДокументОснование); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ДокументОснование = Выборка.Ссылка; ПКОДляДокументаОснования = "АО_АвансовыйОтчетЗакупкаТоваровУслуг"; Иначе Продолжить; КонецЕсли; ИначеЕсли ДокументОснование.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ЗакупкаУПоставщика Или ДокументОснование.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПустаяСсылка() Тогда ПараметрыДокумента = Неопределено; ДокументСсылка = ДокументОснование; Выполнить(Алгоритмы.ПараметрыПриобретениеТоваровУслуг); Если ПараметрыДокумента.ЕстьДопРасходы = Истина Тогда Товары = ДоходыИРасходыСервер.РаспределениеРасходовНаСебестоимостьТоваров(ДокументОснование); Если Товары.Количество() > 0 Тогда Если ПараметрыДокумента.ЕстьОбычноеПоступление = Истина Тогда НоваяСтрока = ДокументыОснования.Добавить(); НоваяСтрока.ДокументОснование = ДокументОснование; НоваяСтрока.ПКОДляДокументаОснования = "ПТУ_ПоступлениеДопРасходов"; Иначе ПКОДляДокументаОснования = "ПТУ_ПоступлениеДопРасходов"; КонецЕсли; ИначеЕсли Не ПараметрыДокумента.ЕстьОбычноеПоступление = Истина Тогда Продолжить; КонецЕсли; КонецЕсли; КонецЕсли; ИначеЕсли ТипЗнч(ДокументОснование) = Тип("ДокументСсылка.ПриобретениеУслугПрочихАктивов") Тогда Если ДокументОснование.ХозяйственнаяОперация <> Перечисления.ХозяйственныеОперации.ЗакупкаУПоставщика Тогда Продолжить; КонецЕсли; ПараметрыДокумента = Неопределено; ДокументСсылка = ДокументОснование; Выполнить(Алгоритмы.ПараметрыПриобретениеУслугПрочихАктивов); Если ПараметрыДокумента.ЕстьДопРасходы = Истина Тогда Товары = ДоходыИРасходыСервер.РаспределениеРасходовНаСебестоимостьТоваров(ДокументОснование); Если Товары.Количество() > 0 Тогда Если ПараметрыДокумента.ЕстьОбычноеПоступление = Истина Тогда НоваяСтрока = ДокументыОснования.Добавить(); НоваяСтрока.ДокументОснование = ДокументОснование; НоваяСтрока.ПКОДляДокументаОснования = "ПУВА_ПоступлениеДопРасходов"; Иначе ПКОДляДокументаОснования = "ПУВА_ПоступлениеДопРасходов"; КонецЕсли; ИначеЕсли Не ПараметрыДокумента.ЕстьОбычноеПоступление = Истина Тогда Продолжить; КонецЕсли; КонецЕсли; КонецЕсли; Если ВходящиеДанные.Дата <= ДокументОснование.Дата Тогда ВходящиеДанные.Дата = ДокументОснование.Дата + 1; КонецЕсли; Если Не ЗначениеЗаполнено(ВходящиеДанные.ДокументОснование) Тогда ВходящиеДанные.ДокументОснование = ДокументОснование; ВходящиеДанные.ПКОДляДокументаОснования = ПКОДляДокументаОснования; КонецЕсли; НоваяСтрока = ДокументыОснования.Добавить(); НоваяСтрока.ДокументОснование = ДокументОснование; НоваяСтрока.ПКОДляДокументаОснования = ПКОДляДокументаОснования; //Если Объект.Корректировочный Тогда // НоваяСтрока.ДатаИсправленияИсходногоДокумента = Строка.ДатаИсправленияИсходногоДокумента; // НоваяСтрока.ДатаИсходногоДокумента = Строка.ДатаИсходногоДокумента; // НоваяСтрока.НомерИсправленияИсходногоДокумента = Строка.НомерИсправленияИсходногоДокумента; // НоваяСтрока.НомерИсходногоДокумента = Строка.НомерИсходногоДокумента; // НоваяСтрока.УчитыватьИсправлениеИсходногоДокумента = ЗначениеЗаполнено(Строка.НомерИсправленияИсходногоДокумента); //КонецЕсли; КонецЦикла; ВходящиеДанные.ДокументыОснования = ДокументыОснования; //Если ЗначениеЗаполнено(ВходящиеДанные.ДокументОснование) Тогда // // Если Объект.Исправление // И ТипЗнч(ВходящиеДанные.ДокументОснование) <> Тип("ДокументСсылка.КорректировкаПриобретения") Тогда // // ВыгрузитьПоПравилу(Объект,, ВходящиеДанные,, "СФП_КорректировкаПоступления"); // // КонецЕсли; // //Иначе // Отказ = Истина; // ТипПриемника = "ДокументСсылка.СчетФактураПолученный"; // ТипИсточника = "ДокументСсылка.СчетФактураПолученный"; // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СчетФактураПолученный", "ДокументСсылка.СчетФактураПолученный"); // ТипПриемника = "ДокументСсылка.КорректировкаПоступления"; // ТипИсточника = "ДокументСсылка.СчетФактураПолученный"; // Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаПоступления", "ДокументСсылка.СчетФактураПолученный"); //КонецЕсли; ИсходящиеДанные = ВходящиеДанные; <Правило Отключить="false"> <Код>СчетФактураВыданный <Наименование>Счет фактура выданный <Порядок>200 <КодПравилаКонвертации>СФВ_СчетФактураВыданный <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.СчетФактураВыданный <ПередВыгрузкойОбъекта>Если ЗначениеЗаполнено(Объект.ДокументОснование) Тогда ВыгружатьДляПродавца = Истина; ВыгружатьДляПокупателя = Ложь; Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.ПередачаТоваровМеждуОрганизациями") Или ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.ВозвратТоваровМеждуОрганизациями") Или ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.ОтчетПоКомиссииМеждуОрганизациями") Тогда РеквизитыДокументаОснования = ОбщегоНазначения.ЗначенияРеквизитовОбъекта( Объект.ДокументОснование, "РасчетыЧерезОтдельногоКонтрагента, Организация, Комиссионер"); Если Объект.Организация = РеквизитыДокументаОснования.Организация Тогда ОрганизацияПолучатель = РеквизитыДокументаОснования.Комиссионер; ВыгружатьДляПокупателя = Истина; Иначе ОрганизацияПолучатель = РеквизитыДокументаОснования.Организация; ВыгружатьДляПокупателя = Не РеквизитыДокументаОснования.РасчетыЧерезОтдельногоКонтрагента КонецЕсли; Иначе РеквизитыДокументаОснования = ОбщегоНазначения.ЗначенияРеквизитовОбъекта( Объект.ДокументОснование, "РасчетыЧерезОтдельногоКонтрагента, ОрганизацияПолучатель"); ОрганизацияПолучатель = РеквизитыДокументаОснования.ОрганизацияПолучатель; ВыгружатьДляПокупателя = Не РеквизитыДокументаОснования.РасчетыЧерезОтдельногоКонтрагента КонецЕсли; Если Параметры.УзелИспользоватьОтборПоОрганизации Тогда УзелСписокОрганизаций = Параметры.УзелСписокОрганизаций; ВыгружатьДляПродавца = ВыгружатьДляПродавца И УзелСписокОрганизаций.НайтиПоЗначению(Объект.Организация) <> Неопределено; ВыгружатьДляПокупателя = ВыгружатьДляПокупателя И УзелСписокОрганизаций.НайтиПоЗначению(ОрганизацияПолучатель) <> Неопределено; Иначе ВыгружатьДляПродавца = ВыгружатьДляПродавца И (Параметры.ВыгружатьУправленческуюОрганизацию Или Объект.Организация <> Справочники.Организации.УправленческаяОрганизация); ВыгружатьДляПокупателя = ВыгружатьДляПокупателя И (Параметры.ВыгружатьУправленческуюОрганизацию Или ОрганизацияПолучатель <> Справочники.Организации.УправленческаяОрганизация); КонецЕсли; Если Не ЗначениеЗаполнено(Объект.ДатаВыставления) Тогда ВыгружатьДляПокупателя = Ложь; КонецЕсли; КонецЕсли; Если Объект.Исправление И ТипЗнч(Объект.ДокументОснование) <> Тип("ДокументСсылка.КорректировкаРеализации") Тогда Если ВыгружатьДляПродавца Тогда ВыгрузитьПоПравилу(Объект,,,, "СФВ_КорректировкаРеализации"); КонецЕсли; Если ВыгружатьДляПокупателя Тогда ВыгрузитьПоПравилу(Объект,,,, "СФВ_КорректировкаПоступленияИК"); КонецЕсли; Иначе ТипПриемника = "ДокументСсылка.КорректировкаПоступления"; ТипИсточника = "ДокументСсылка.СчетФактураВыданный"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаПоступления", "ДокументСсылка.СчетФактураВыданный"); ТипПриемника = "ДокументСсылка.КорректировкаРеализации"; ТипИсточника = "ДокументСсылка.СчетФактураВыданный"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.КорректировкаРеализации", "ДокументСсылка.СчетФактураВыданный"); КонецЕсли; Если ВыгружатьДляПродавца Тогда ВыгрузитьПоПравилу(Объект,,,, "СФВ_СчетФактураВыданный"); КонецЕсли; Если ВыгружатьДляПокупателя Тогда ВыгрузитьПоПравилу(Объект,,,, "СФВ_СчетФактураПолученныйИК"); КонецЕсли; // Удаляем документы, которые не выгружаются в этот раз, но могли быть выгружены ранее Если Не ВыгружатьДляПродавца Тогда ТипПриемника = "ДокументСсылка.СчетФактураВыданный"; ТипИсточника = "ДокументСсылка.СчетФактураВыданный"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СчетФактураВыданный", "ДокументСсылка.СчетФактураВыданный"); КонецЕсли; Если Не ВыгружатьДляПокупателя Тогда ТипПриемника = "ДокументСсылка.СчетФактураПолученный"; ТипИсточника = "ДокументСсылка.СчетФактураВыданный"; Выполнить(Алгоритмы.ЗаписатьВФайлУдалениеОбъекта);//(Объект.Ссылка, "ДокументСсылка.СчетФактураПолученный", "ДокументСсылка.СчетФактураВыданный"); КонецЕсли; Отказ = Истина; Иначе Отказ = Истина; КонецЕсли; <Группа Отключить="false"> <Код>ОперацииЭквайринга <Наименование>Операции эквайринга <Порядок>450 <Правило Отключить="false"> <Код>ОтчетБанкаПоОперациямЭквайринга <Наименование>Отчет банка по операциям эквайринга <Порядок>50 <КодПравилаКонвертации>ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаПоступление <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетБанкаПоОперациямЭквайринга <ПередВыгрузкойОбъекта>Если Объект.СуммаДокумента < 0 Тогда ИмяПКО = "ОБОЭП_ОтчетБанкаПоОперациямЭквайрингаСписание"; КонецЕсли; <Правило Отключить="false"> <Код>ОперацияПоПлатежнойКарте <Наименование>Операция по платежной карте <Порядок>500 <КодПравилаКонвертации>ОплатаПлатежнойКартой <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОперацияПоПлатежнойКарте <Группа Отключить="false"> <Код>Комиссия <Наименование>Комиссия <Порядок>500 <Правило Отключить="false"> <Код>ОтчетКомиссионера <Наименование>ОтчетКомиссионера <Порядок>550 <КодПравилаКонвертации>ОКОП_ОтчетКомиссионераОПродажах <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетКомиссионера <Правило Отключить="false"> <Код>ОтчетКомиссионераОСписании <Наименование>ОтчетКомиссионераОСписании <Порядок>600 <КодПравилаКонвертации>ОКОС_ОтчетКомиссионераОСписании <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетКомиссионераОСписании <Правило Отключить="false"> <Код>ОтчетКомитенту <Наименование>ОтчетКомитенту <Порядок>650 <КодПравилаКонвертации>ОКТОП_ОтчетКомитентуОПродажах <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетКомитенту <Правило Отключить="false"> <Код>ОтчетКомитентуОСписании <Наименование>ОтчетКомитентуОСписании <Порядок>700 <КодПравилаКонвертации>ОКТОC_ОтчетКомитентуОСписании <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ДокументСсылка.ОтчетКомитентуОСписании <Группа Отключить="true"> <Код>Справочники <Наименование>Справочники <Порядок>100 <Группа Отключить="true"> <Код>БазовыеКлассификаторы <Наименование>Базовые классификаторы <Порядок>50 <Правило Отключить="true"> <Код>Банки <Наименование>Банки <Порядок>800 <КодПравилаКонвертации>Банки <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.КлассификаторБанков <Правило Отключить="true"> <Код>ЕдиницыИзмерения <Наименование>Единицы измерения <Порядок>850 <КодПравилаКонвертации>КлассификаторЕдиницИзмерения <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.УпаковкиЕдиницыИзмерения <Правило Отключить="true"> <Код>Валюты <Наименование>Валюты <Порядок>900 <КодПравилаКонвертации>Валюты <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Валюты <Правило Отключить="true"> <Код>СтраныМира <Наименование>Страны мира <Порядок>950 <КодПравилаКонвертации>КлассификаторСтранМира <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.СтраныМира <Правило Отключить="true"> <Код>Организации <Наименование>Организации <Порядок>100 <КодПравилаКонвертации>Организации <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Организации <Правило Отключить="true"> <Код>ФизическиеЛица <Наименование>ФизическиеЛица <Порядок>150 <КодПравилаКонвертации>ФизическиеЛица <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ФизическиеЛица <Правило Отключить="true"> <Код>Контрагенты <Наименование>Контрагенты <Порядок>200 <КодПравилаКонвертации>Контрагенты <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Контрагенты <Правило Отключить="true"> <Код>БанковскиеСчетаОрганизаций <Наименование>БанковскиеСчетаОрганизаций <Порядок>250 <КодПравилаКонвертации>БанковскиеСчетаОрганизаций <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.БанковскиеСчетаОрганизаций <Правило Отключить="true"> <Код>БанковскиеСчета <Наименование>Банковские счета получателей <Порядок>300 <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.БанковскиеСчетаКонтрагентов <ПередВыгрузкойОбъекта>Если ТипЗнч(Объект.Владелец) = Тип("СправочникСсылка.Контрагенты") Тогда ИмяПКО = "БанковскиеСчетаКонтрагентов"; ИначеЕсли ТипЗнч(Объект.Владелец) = Тип("СправочникСсылка.ФизическиеЛица") Тогда ИмяПКО = "БанковскиеСчетаФизическихЛиц"; КонецЕсли; <Правило Отключить="true"> <Код>СтатьиДвиженияДенежныхСредств <Наименование>СтатьиДвиженияДенежныхСредств <Порядок>350 <КодПравилаКонвертации>СтатьиДвиженияДенежныхСредств <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.СтатьиДвиженияДенежныхСредств <Правило Отключить="true"> <Код>ВидыЦен <Наименование>ВидыЦен <Порядок>400 <КодПравилаКонвертации>ТипыЦенНоменклатуры <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ВидыЦен <Правило Отключить="true"> <Код>Склады <Наименование>Склады <Порядок>450 <КодПравилаКонвертации>Склады <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Склады <Правило Отключить="true"> <Код>Номенклатура <Наименование>Номенклатура <Порядок>500 <КодПравилаКонвертации>Номенклатура <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Номенклатура <Правило Отключить="true"> <Код>НомераГТД <Наименование>Номера ГТД <Порядок>550 <КодПравилаКонвертации>НомераГТД <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.НомераГТД <Правило Отключить="true"> <Код>ВидыКонтактнойИнформации <Наименование>Виды контактной информации <Порядок>600 <КодПравилаКонвертации>ВидыКонтактнойИнформации <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ВидыКонтактнойИнформации <Правило Отключить="true"> <Код>СтатьиДоходов <Наименование>СтатьиДоходов <Порядок>700 <КодПравилаКонвертации>СтатьиДоходовВПрочиеДоходыИРасходы <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ПланВидовХарактеристикСсылка.СтатьиДоходов <Правило Отключить="true"> <Код>СтатьиРасходов <Наименование>СтатьиРасходов <Порядок>750 <КодПравилаКонвертации>СтатьиРасходовВПрочиеДоходыИРасходы <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>ПланВидовХарактеристикСсылка.СтатьиРасходов <ПередВыгрузкойОбъекта>ИмяПКО = ?(Найти(Объект.КорреспондирующийСчет, "91.02") > 0, "СтатьиРасходовВПрочиеДоходыИРасходы", "СтатьиРасходовВСтатьиЗатрат"); <Правило Отключить="true"> <Код>Пользователи <Наименование>Пользователи <Порядок>800 <КодПравилаКонвертации>Пользователи <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Пользователи <Правило Отключить="true"> <Код>Партнеры <Наименование>Партнеры <Порядок>850 <КодПравилаКонвертации>ПартнерыВЗначенияСвойствОбъектов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.Партнеры <ВыбиратьДанныеДляВыгрузкиОднимЗапросом>true <Правило Отключить="true"> <Код>СоглашенияСКлиентами <Наименование>Соглашения с клиентами <Порядок>900 <КодПравилаКонвертации>СоглашенияСКлиентамиВЗначенияСвойствОбъектов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.СоглашенияСКлиентами <ВыбиратьДанныеДляВыгрузкиОднимЗапросом>true <Правило Отключить="true"> <Код>СоглашенияСПоставщиками <Наименование>Соглашения с поставщиками <Порядок>950 <КодПравилаКонвертации>СоглашенияСПоставщикамиВЗначенияСвойствОбъектов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.СоглашенияСПоставщиками <ВыбиратьДанныеДляВыгрузкиОднимЗапросом>true <Правило Отключить="true"> <Код>СделкиСКлиентами <Наименование>Сделки с клиентами <Порядок>1000 <КодПравилаКонвертации>СделкиСКлиентамиВЗначенияСвойствОбъектов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.СделкиСКлиентами <ВыбиратьДанныеДляВыгрузкиОднимЗапросом>true <Правило Отключить="true"> <Код>ДоговорыКонтрагентов <Наименование>Договоры с контрагентами <Порядок>1050 <КодПравилаКонвертации>ДоговорыКонтрагентов_ДоговорыКонтрагентов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ДоговорыКонтрагентов <ПередОбработкойПравила>Запрос = Новый Запрос(" |ВЫБРАТЬ | ТаможеннаяДекларацияИмпорт.Договор |ПОМЕСТИТЬ ВыбранныеДоговора |ИЗ | Документ.ТаможеннаяДекларацияИмпорт КАК ТаможеннаяДекларацияИмпорт |ГДЕ | ТаможеннаяДекларацияИмпорт.Проведен | |ОБЪЕДИНИТЬ ВСЕ | |ВЫБРАТЬ | СписаниеБезналичныхДенежныхСредствРасшифровкаПлатежа.Заказ |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК СписаниеБезналичныхДенежныхСредствРасшифровкаПлатежа |ГДЕ | СписаниеБезналичныхДенежныхСредствРасшифровкаПлатежа.Заказ ССЫЛКА Справочник.ДоговорыКонтрагентов | И СписаниеБезналичныхДенежныхСредствРасшифровкаПлатежа.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПеречислениеТаможне) | И СписаниеБезналичныхДенежныхСредствРасшифровкаПлатежа.Ссылка.Проведен |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ РАЗЛИЧНЫЕ | ВыбранныеДоговора.Договор |ИЗ | ВыбранныеДоговора КАК ВыбранныеДоговора |ГДЕ | ВыбранныеДоговора.Договор <> ЗНАЧЕНИЕ(Справочник.ДоговорыКонтрагентов.ПустаяСсылка)"); ДоговорыСТаможеннымБрокером = Запрос.Выполнить().Выгрузить(); Параметры.Вставить("ДоговорыСТаможеннымБрокером", ДоговорыСТаможеннымБрокером); <ПередВыгрузкойОбъекта>ВходящиеДанные = Новый Структура; Если Параметры.ДоговорыСТаможеннымБрокером.Найти(Объект.Ссылка, "Договор") <> Неопределено Тогда ВходящиеДанные.Вставить("ВидДоговора", "Прочее"); КонецЕсли; <Правило Отключить="true"> <Код>ДоговорыКредитовИДепозитов <Наименование>Договоры кредитов и депозитов <Порядок>1100 <КодПравилаКонвертации>ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ДоговорыКредитовИДепозитов <Правило Отключить="true"> <Код>ЛицензииПоставщиковАлкогольнойПродукции <Наименование>Лицензии поставщиков на алкогольную и спиртосодержащую продукцию <Порядок>1250 <КодПравилаКонвертации>ЛицензииПоставщиковАлкогольнойПродукции <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ЛицензииПоставщиковАлкогольнойПродукции <ВыбиратьДанныеДляВыгрузкиОднимЗапросом>true <ПередВыгрузкойОбъекта>ИсточникДанных = Объект; ЭтоУдаление = Ложь; Выполнить(Алгоритмы.ВыгрузитьЛицензиюПоставщикаАлкогольнойПродукции); Отказ = Истина; <Правило Отключить="true"> <Код>РегистрацииВНалоговомОргане <Наименование>Регистрации в налоговом органе <Порядок>1300 <КодПравилаКонвертации>РегистрацииВНалоговомОргане <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.РегистрацииВНалоговомОргане <Правило Отключить="true"> <Код>ЭквайринговыеТерминалы <Наименование>Эквайринговые терминалы <Порядок>1350 <КодПравилаКонвертации>ВидыОплатОрганизаций <СпособОтбораДанных>СтандартнаяВыборка <ОбъектВыборки>СправочникСсылка.ЭквайринговыеТерминалы <ПравилаОчисткиДанных/> <Алгоритмы> <Группа Имя="Выгрузка"> <Группа Имя="_ОтветсвенныеИУполномоченныеЛица"> <Алгоритм Имя="ВыгрузитьОтветственныхЛиц" ИспользуетсяПриЗагрузке="false"> <Текст>//Создать группировку по двум ключам, Отв. лицо и Владелец. Дата и Физлица идут в строки набора; ТаблицаНаборов = Параметры.ТаблицаВыгружаемыхОтветственныхЛиц; ТаблицаНаборов.Свернуть("Организация, ОтветственноеЛицо, ПравоПодписиПоДоверенности"); МенеджерВТ = Новый МенеджерВременныхТаблиц; Запрос = Новый Запрос; Запрос.МенеджерВременныхТаблиц = МенеджерВТ; Запрос.УстановитьПараметр("ТаблицаОтборов",ТаблицаНаборов); //+Тимохов// Запрос.УстановитьПараметр("ДатаНачала", ДатаНачала);//Параметры.УзелДатаНачалаВыгрузкиДокументов); //-Тимохов// Запрос.Текст = "ВЫБРАТЬ | ТаблицаОтборов.Организация, | ТаблицаОтборов.ОтветственноеЛицо, | ТаблицаОтборов.ПравоПодписиПоДоверенности |ПОМЕСТИТЬ Отборы |ИЗ | &ТаблицаОтборов КАК ТаблицаОтборов | |ИНДЕКСИРОВАТЬ ПО | ТаблицаОтборов.Организация, | ТаблицаОтборов.ОтветственноеЛицо |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОтветственныеЛицаОрганизаций.Владелец КАК Владелец, | ОтветственныеЛицаОрганизаций.ОтветственноеЛицо КАК ОтветственноеЛицо, | МАКСИМУМ(ВЫБОР | КОГДА ОтветственныеЛицаОрганизаций.ДатаОкончания = ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) | ТОГДА ДАТАВРЕМЯ(2800, 1, 1, 0, 0, 0) | ИНАЧЕ ОтветственныеЛицаОрганизаций.ДатаОкончания | КОНЕЦ) КАК ДатаОкончания |ПОМЕСТИТЬ МаксДаты |ИЗ | Справочник.ОтветственныеЛицаОрганизаций КАК ОтветственныеЛицаОрганизаций | |СГРУППИРОВАТЬ ПО | ОтветственныеЛицаОрганизаций.Владелец, | ОтветственныеЛицаОрганизаций.ОтветственноеЛицо | |ИНДЕКСИРОВАТЬ ПО | Владелец, | ОтветственноеЛицо, | ДатаОкончания |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОтветственныеЛицаОрганизаций.ФизическоеЛицо, | ОтветственныеЛицаОрганизаций.ОснованиеПраваПодписи, | ОтветственныеЛицаОрганизаций.ДатаНачала, | ОтветственныеЛицаОрганизаций.ДатаОкончания, | ОтветственныеЛицаОрганизаций.Владелец КАК Владелец, | ОтветственныеЛицаОрганизаций.ОтветственноеЛицо КАК ОтвЛицо, | ТаблицаОтборов.ОтветственноеЛицо КАК ОтветственноеЛицо, | ТаблицаОтборов.Организация КАК Организация, | ТаблицаОтборов.ПравоПодписиПоДоверенности |ИЗ | Отборы КАК ТаблицаОтборов | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.ОтветственныеЛицаОрганизаций КАК ОтветственныеЛицаОрганизаций | ПО ТаблицаОтборов.Организация = ОтветственныеЛицаОрганизаций.Владелец | И ТаблицаОтборов.ОтветственноеЛицо = ОтветственныеЛицаОрганизаций.ОтветственноеЛицо | И ТаблицаОтборов.ПравоПодписиПоДоверенности = ОтветственныеЛицаОрганизаций.ПравоПодписиПоДоверенности |ГДЕ | (ОтветственныеЛицаОрганизаций.ДатаНачала >= &ДатаНачала | ИЛИ ОтветственныеЛицаОрганизаций.ДатаНачала <= &ДатаНачала | И (ОтветственныеЛицаОрганизаций.ДатаОкончания >= &ДатаНачала | ИЛИ ОтветственныеЛицаОрганизаций.ДатаОкончания = ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0))) | И ТаблицаОтборов.ПравоПодписиПоДоверенности = ЛОЖЬ |ИТОГИ ПО | Владелец, | ОтвЛицо |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | ОтветственныеЛицаОрганизаций.Владелец КАК Владелец, | ОтветственныеЛицаОрганизаций.ОтветственноеЛицо КАК ОтвЛицо, | ОтветственныеЛицаОрганизаций.ОснованиеПраваПодписи, | МАКСИМУМ(ОтветственныеЛицаОрганизаций.ФизическоеЛицо) КАК ФизическоеЛицо |ИЗ | Справочник.ОтветственныеЛицаОрганизаций КАК ОтветственныеЛицаОрганизаций | ВНУТРЕННЕЕ СОЕДИНЕНИЕ МаксДаты КАК МаксДаты | ПО ОтветственныеЛицаОрганизаций.Владелец = МаксДаты.Владелец | И ОтветственныеЛицаОрганизаций.ОтветственноеЛицо = МаксДаты.ОтветственноеЛицо | И (ВЫБОР | КОГДА ОтветственныеЛицаОрганизаций.ДатаОкончания = ДАТАВРЕМЯ(1, 1, 1, 0, 0, 0) | ТОГДА ДАТАВРЕМЯ(2800, 1, 1, 0, 0, 0) | ИНАЧЕ ОтветственныеЛицаОрганизаций.ДатаОкончания | КОНЕЦ = МаксДаты.ДатаОкончания) | ВНУТРЕННЕЕ СОЕДИНЕНИЕ Отборы КАК Отборы | ПО ОтветственныеЛицаОрганизаций.Владелец = Отборы.Организация | И ОтветственныеЛицаОрганизаций.ОтветственноеЛицо = Отборы.ОтветственноеЛицо | И ОтветственныеЛицаОрганизаций.ПравоПодписиПоДоверенности = Отборы.ПравоПодписиПоДоверенности |ГДЕ | Отборы.ПравоПодписиПоДоверенности = ИСТИНА | |СГРУППИРОВАТЬ ПО | ОтветственныеЛицаОрганизаций.Владелец, | ОтветственныеЛицаОрганизаций.ОтветственноеЛицо, | ОтветственныеЛицаОрганизаций.ОснованиеПраваПодписи |ИТОГИ ПО | Владелец, | ОтвЛицо"; Результат = Запрос.ВыполнитьПакет(); //Выгружаем отвественных лиц организации РезультатПакетаОтвЛиц = Результат[2]; Если Не РезультатПакетаОтвЛиц.Пустой() Тогда ВыборкаОрганизаций = РезультатПакетаОтвЛиц.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОрганизаций.Следующий() Цикл ВыборкаОтвЛиц = ВыборкаОрганизаций.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОтвЛиц.Следующий() Цикл // Создание пустого набора записей Отбор = Новый ТаблицаЗначений; Отбор.Колонки.Добавить("Имя"); Отбор.Колонки.Добавить("Значение"); Отбор.Колонки.Добавить("Использование"); СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "ОтветственноеЛицо"; СтрокаОтбора.Значение = ВыборкаОтвЛиц.ОтвЛицо; СтрокаОтбора.Использование = Истина; СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "СтруктурнаяЕдиница"; СтрокаОтбора.Значение = ВыборкаОрганизаций.Владелец; СтрокаОтбора.Использование = Истина; Строки = Новый ТаблицаЗначений; Строки.Колонки.Добавить("Ссылка"); Строки.Колонки.Добавить("ОтветственноеЛицо"); Строки.Колонки.Добавить("ФизическоеЛицо"); Строки.Колонки.Добавить("СтруктурнаяЕдиница"); Строки.Колонки.Добавить("Период"); ВыборкаДетальныеЗаписи = ВыборкаОтвЛиц.Выбрать(); Пока ВыборкаДетальныеЗаписи.Следующий() Цикл НоваяСтрока = Строки.Добавить(); НоваяСтрока.ОтветственноеЛицо = ВыборкаОтвЛиц.ОтвЛицо; НоваяСтрока.СтруктурнаяЕдиница = ВыборкаОрганизаций.Владелец; НоваяСтрока.ФизическоеЛицо = ВыборкаДетальныеЗаписи.ФизическоеЛицо; НоваяСтрока.Период = ВыборкаДетальныеЗаписи.ДатаНачала; КонецЦикла; // Выгрузка набора записей // создаем виртуальный набор записей НаборЗаписей = Новый Структура("Отбор, Строки"); НаборЗаписей.Отбор = Отбор; НаборЗаписей.Строки = Строки; //+Тимохов// //ВыгрузитьРегистр(НаборЗаписей, , , Истина, "ОтветственныеЛицаОрганизаций"); ВыгрузитьПоПравилу(НаборЗаписей, , , Истина, "ОтветственныеЛицаОрганизаций"); //-Тимохов// КонецЦикла; КонецЦикла; КонецЕсли; //Выгружаем уполномоченных лиц организации РезультатПакетаУполЛиц = Результат[3]; Если Не РезультатПакетаУполЛиц.Пустой() Тогда ВыборкаОрганизаций = РезультатПакетаУполЛиц.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОрганизаций.Следующий() Цикл ВыборкаОтвЛиц = ВыборкаОрганизаций.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОтвЛиц.Следующий() Цикл // Создание пустого набора записей Отбор = Новый ТаблицаЗначений; Отбор.Колонки.Добавить("Имя"); Отбор.Колонки.Добавить("Значение"); Отбор.Колонки.Добавить("Использование"); СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "ЗаКогоПодписывает"; СтрокаОтбора.Значение = ВыборкаОтвЛиц.ОтвЛицо; СтрокаОтбора.Использование = Истина; СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "Организация"; СтрокаОтбора.Значение = ВыборкаОрганизаций.Владелец; СтрокаОтбора.Использование = Истина; Строки = Новый ТаблицаЗначений; Строки.Колонки.Добавить("Ссылка"); Строки.Колонки.Добавить("ЗаКогоПодписывает"); Строки.Колонки.Добавить("УполномоченноеЛицо"); Строки.Колонки.Добавить("Организация"); Строки.Колонки.Добавить("НомерДатаПриказа"); ВыборкаДетальныеЗаписи = ВыборкаОтвЛиц.Выбрать(); Если ВыборкаДетальныеЗаписи.Следующий() Тогда НоваяСтрока = Строки.Добавить(); НоваяСтрока.ЗаКогоПодписывает = ВыборкаОтвЛиц.ОтвЛицо; НоваяСтрока.Организация = ВыборкаОрганизаций.Владелец; НоваяСтрока.УполномоченноеЛицо = ВыборкаДетальныеЗаписи.ФизическоеЛицо; НоваяСтрока.НомерДатаПриказа = ВыборкаДетальныеЗаписи.ОснованиеПраваПодписи; КонецЕсли;; // Выгрузка набора записей // создаем виртуальный набор записей НаборЗаписей = Новый Структура("Отбор, Строки"); НаборЗаписей.Отбор = Отбор; НаборЗаписей.Строки = Строки; //+Тимохов// //ВыгрузитьРегистр(НаборЗаписей, , , Истина, "УполномоченныеЛицаОрганизаций"); ВыгрузитьПоПравилу(НаборЗаписей, , , Истина, "УполномоченныеЛицаОрганизаций"); //-Тимохов// КонецЦикла; КонецЦикла; КонецЕсли; <Группа Имя="_ПриобретениеТоваровУслуг"> <Алгоритм Имя="ПараметрыПриобретениеТоваровУслуг" ИспользуетсяПриЗагрузке="false"> <Текст> ПараметрыДокумента = Новый Структура; ПараметрыДокумента.Вставить("ЕстьДопРасходы", Ложь); ПараметрыДокумента.Вставить("ЕстьОбычноеПоступление", Ложь); ПараметрыДокумента.Вставить("ЕстьНедостачиЗаСчетПоставщика", Ложь); ПараметрыДокумента.Вставить("ЕстьНедостачиЗаСчетСтороннейКомпании", Ложь); ПараметрыДокумента.Вставить("ЕстьНедостачиЗаСвойСчет", Ложь); ПараметрыДокумента.Вставить("ЕстьИзлишкиКакПрочиеДоходы", Ложь); //ПСК- Сазанский А. > -- Странный запрос.. //Запрос = Новый Запрос( // "ВЫБРАТЬ // | МАКСИМУМ(ВложенныйЗапрос.ЕстьДопРасходы) КАК ЕстьДопРасходы, // | МАКСИМУМ(ВложенныйЗапрос.ЕстьОбычноеПоступление) КАК ЕстьОбычноеПоступление, // | МАКСИМУМ(ВложенныйЗапрос.ЕстьНедостачиЗаСчетПоставщика) КАК ЕстьНедостачиЗаСчетПоставщика, // | МАКСИМУМ(ВложенныйЗапрос.ЕстьНедостачиЗаСчетСтороннейКомпании) КАК ЕстьНедостачиЗаСчетСтороннейКомпании, // | МАКСИМУМ(ВложенныйЗапрос.ЕстьНедостачиЗаСвойСчет) КАК ЕстьНедостачиЗаСвойСчет, // | МАКСИМУМ(ВложенныйЗапрос.ЕстьИзлишкиКакПрочиеДоходы) КАК ЕстьИзлишкиКакПрочиеДоходы // |ИЗ // | (ВЫБРАТЬ // | ВЫБОР // | КОГДА Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) // | И Товары.СтатьяРасходов.ВариантРаспределенияРасходовУпр = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) // | ТОГДА ИСТИНА // | ИНАЧЕ ЛОЖЬ // | КОНЕЦ КАК ЕстьДопРасходы, // | ВЫБОР // | КОГДА Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) // | И Товары.СтатьяРасходов.ВариантРаспределенияРасходовУпр = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) // | ТОГДА ЛОЖЬ // | ИНАЧЕ ИСТИНА // | КОНЕЦ КАК ЕстьОбычноеПоступление, // | ЛОЖЬ КАК ЕстьНедостачиЗаСчетПоставщика, // | ЛОЖЬ КАК ЕстьНедостачиЗаСчетСтороннейКомпании, // | ЛОЖЬ КАК ЕстьНедостачиЗаСвойСчет, // | ЛОЖЬ КАК ЕстьИзлишкиКакПрочиеДоходы, // | Товары.Ссылка КАК Ссылка // | ИЗ // | Документ.ПриобретениеТоваровУслуг.Товары КАК Товары // | ГДЕ // | Товары.Ссылка = &Ссылка // | И Товары.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ЗакупкаПоИмпорту) // | И (Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) // | ИЛИ Товары.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа))) КАК ВложенныйЗапрос"); //Запрос.УстановитьПараметр("Ссылка", ДокументСсылка); //Выборка = Запрос.Выполнить().Выбрать(); //Если Выборка.Следующий() Тогда // ЗаполнитьЗначенияСвойств(ПараметрыДокумента, Выборка); //КонецЕсли; //ПСК- Сазанский А. < //ПСК+ Сазанский А. > //Если ДокументСсылка.Товары.Количество() > 0 Тогда // ПараметрыДокумента.Вставить("ЕстьОбычноеПоступление", Истина); //КонецЕсли; Для каждого Стр Из ДокументСсылка.Товары Цикл Если Стр.Номенклатура.ТипНоменклатуры = Перечисления.ТипыНоменклатуры.Услуга И Стр.СтатьяРасходов.ВариантРаспределенияРасходовУпр = Перечисления.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров Тогда ПараметрыДокумента.Вставить("ЕстьДопРасходы", Истина); Иначе ПараметрыДокумента.Вставить("ЕстьОбычноеПоступление", Истина); КонецЕсли; КонецЦикла; //ПСК+ Сазанский А. < <Параметры>ПараметрыДокумента, ДокументСсылка <Группа Имя="_ПриобретениеУслугПрочихАктивов"> <Алгоритм Имя="ПараметрыПриобретениеУслугПрочихАктивов" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - ПараметрыДокумента // - ДокументСсылка ПараметрыДокумента = Новый Структура; ПараметрыДокумента.Вставить("ЕстьДопРасходы", Ложь); ПараметрыДокумента.Вставить("ЕстьОбычноеПоступление", Ложь); Запрос = Новый Запрос("ВЫБРАТЬ | МАКСИМУМ(ВЫБОР | КОГДА РасходыПриобретения.СтатьяРасходов.ВариантРаспределенияРасходовУпр = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | ТОГДА ИСТИНА | ИНАЧЕ ЛОЖЬ | КОНЕЦ) КАК ЕстьДопРасходы, | МАКСИМУМ(ВЫБОР | КОГДА РасходыПриобретения.СтатьяРасходов.ВариантРаспределенияРасходовУпр = ЗНАЧЕНИЕ(Перечисление.ВариантыРаспределенияРасходов.НаСебестоимостьТоваров) | ТОГДА ЛОЖЬ | ИНАЧЕ ИСТИНА | КОНЕЦ) КАК ЕстьОбычноеПоступление |ИЗ | Документ.ПриобретениеУслугПрочихАктивов.Расходы КАК РасходыПриобретения |ГДЕ | РасходыПриобретения.Ссылка = &Ссылка | |СГРУППИРОВАТЬ ПО | РасходыПриобретения.Ссылка"); Запрос.УстановитьПараметр("Ссылка", ДокументСсылка); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда ЗаполнитьЗначенияСвойств(ПараметрыДокумента, Выборка); КонецЕсли; <Параметры>ПараметрыДокумента, ДокументСсылка <Группа Имя="АлгоритмыПВД"> <Алгоритм Имя="ПБДС_РеквизитыДляОбменаСБухгалтерией" ИспользуетсяПриЗагрузке="false"> <Текст>Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация, | ДанныеДокумента.БанковскийСчет.ВалютаДенежныхСредств КАК ВалютаБанковскогоСчета |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """" |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДоходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.СтатьяДоходов КАК СтатьяДоходов |ИЗ | Документ.ПоступлениеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПрочиеДоходы) | И ДанныеДокумента.СтатьяДоходов.КорреспондирующийСчет <> """" | |УПОРЯДОЧИТЬ ПО | ДанныеДокумента.НомерСтроки"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); МассивРезультатов = Запрос.ВыполнитьПакет(); Выборка = МассивРезультатов[0].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; ХозяйственнаяОперация = Выборка.ХозяйственнаяОперация; ВалютаБанковскогоСчета = Выборка.ВалютаБанковскогоСчета; Иначе КорреспондирующийСчет = ""; ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПустаяСсылка(); ВалютаБанковскогоСчета = Неопределено; КонецЕсли; Выборка = МассивРезультатов[1].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; СтатьяДоходов = Выборка.СтатьяДоходов; Иначе СтатьяДоходов = Неопределено; КонецЕсли; ВидОперации = "ПрочееПоступление"; Если ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочееПоступлениеДенежныхСредств Тогда Если Найти(КорреспондирующийСчет, "57.02") <> 0 И ВалютаБанковскогоСчета <> Константы.ВалютаРегламентированногоУчета.Получить() Тогда ВидОперации = "ПриобретениеИностраннойВалюты"; ИначеЕсли Найти(КорреспондирующийСчет, "57.22") <> 0 И ВалютаБанковскогоСчета = Константы.ВалютаРегламентированногоУчета.Получить() Тогда ВидОперации = "ПоступленияОтПродажиИностраннойВалюты"; ИначеЕсли Найти(КорреспондирующийСчет, "66") <> 0 Или Найти(КорреспондирующийСчет, "67") <> 0 Тогда ВидОперации = "РасчетыПоКредитамИЗаймам"; ИначеЕсли Найти(КорреспондирующийСчет, "73.01") <> 0 Тогда ВидОперации = "ВозвратЗаймаСотрудником"; ИначеЕсли Найти(КорреспондирующийСчет, "76") <> 0 Или Найти(КорреспондирующийСчет, "60") <> 0 Или Найти(КорреспондирующийСчет, "62") <> 0 Тогда ВидОперации = "ПрочиеРасчетыСКонтрагентами"; КонецЕсли; КонецЕсли; ВходящиеДанные = Новый Структура("ВидОперации, Счет, СтатьяДоходов", ВидОперации, КорреспондирующийСчет, СтатьяДоходов); <Параметры>Объект, ВходящиеДанные <Алгоритм Имя="ПКО_РеквизитыДляОбменаСБухгалтерией" ИспользуетсяПриЗагрузке="false"> <Текст>Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация |ИЗ | Документ.ПриходныйКассовыйОрдер КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """" |; |///////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДоходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.СтатьяДоходов КАК СтатьяДоходов |ИЗ | Документ.ПриходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПрочиеДоходы) | И ДанныеДокумента.СтатьяДоходов.КорреспондирующийСчет <> """" | |УПОРЯДОЧИТЬ ПО | ДанныеДокумента.НомерСтроки |"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); МассивРезультатов = Запрос.ВыполнитьПакет(); Выборка = МассивРезультатов[0].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; ХозяйственнаяОперация = Выборка.ХозяйственнаяОперация; Иначе КорреспондирующийСчет = ""; ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПустаяСсылка(); КонецЕсли; Выборка = МассивРезультатов[1].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; СтатьяДоходов = Выборка.СтатьяДоходов; Иначе СтатьяДоходов = Неопределено; КонецЕсли; ВидОперации = "ПрочееПоступление"; Если ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочееПоступлениеДенежныхСредств Тогда Если Найти(КорреспондирующийСчет, "66") <> 0 Или Найти(КорреспондирующийСчет, "67") <> 0 Тогда ВидОперации = "РасчетыПоКредитамИЗаймам"; ИначеЕсли Найти(КорреспондирующийСчет, "73.01") <> 0 Тогда ВидОперации = "ВозвратЗаймаСотрудником"; КонецЕсли; КонецЕсли; ВходящиеДанные = Новый Структура("ВидОперации, Счет, СтатьяДоходов", ВидОперации, КорреспондирующийСчет, СтатьяДоходов); <Параметры>Объект, ВходящиеДанные <Алгоритм Имя="РКО_РеквизитыДляОбменаСБухгалтерией" ИспользуетсяПриЗагрузке="false"> <Текст>Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация |ИЗ | Документ.РасходныйКассовыйОрдер КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """" |; |///////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.СтатьяРасходов КАК СтатьяРасходов |ИЗ | Документ.РасходныйКассовыйОрдер.РасшифровкаПлатежа КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПрочиеРасходы) | И ДанныеДокумента.СтатьяРасходов.КорреспондирующийСчет <> """" | |УПОРЯДОЧИТЬ ПО | ДанныеДокумента.НомерСтроки |"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); МассивРезультатов = Запрос.ВыполнитьПакет(); Выборка = МассивРезультатов[0].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; ХозяйственнаяОперация = Выборка.ХозяйственнаяОперация; Иначе КорреспондирующийСчет = ""; ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПустаяСсылка(); КонецЕсли; Выборка = МассивРезультатов[1].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; СтатьяРасходов = Выборка.СтатьяРасходов; Иначе СтатьяРасходов = Неопределено; КонецЕсли; ВидОперации = "ПрочийРасход"; Если ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочаяВыдачаДенежныхСредств Тогда Если Найти(КорреспондирующийСчет, "66") <> 0 Или Найти(КорреспондирующийСчет, "67") <> 0 Тогда ВидОперации = "РасчетыПоКредитамИЗаймам"; ИначеЕсли Найти(КорреспондирующийСчет, "76.04") <> 0 Тогда ВидОперации = "ПеречислениеДепонентов"; ИначеЕсли Найти(КорреспондирующийСчет, "73.01") <> 0 Тогда ВидОперации = "ВыдачаЗаймаСотруднику"; КонецЕсли; КонецЕсли; ВходящиеДанные = Новый Структура("ВидОперации, Счет, СтатьяРасходов", ВидОперации, КорреспондирующийСчет, СтатьяРасходов); <Параметры>Объект, ВходящиеДанные <Алгоритм Имя="СБДС_РеквизитыДляОбменаСБухгалтерией" ИспользуетсяПриЗагрузке="false"> <Текст>Запрос = Новый Запрос(" |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.ХозяйственнаяОперация КАК ХозяйственнаяОперация |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяДвиженияДенежныхСредств.КорреспондирующийСчет <> """" |; |///////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ ПЕРВЫЕ 1 | ДанныеДокумента.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, | ДанныеДокумента.СтатьяРасходов КАК СтатьяРасходов |ИЗ | Документ.СписаниеБезналичныхДенежныхСредств.РасшифровкаПлатежа КАК ДанныеДокумента |ГДЕ | ДанныеДокумента.Ссылка = &Ссылка | И ДанныеДокумента.СтатьяРасходов.КорреспондирующийСчет <> """" | И ДанныеДокумента.Ссылка.ХозяйственнаяОперация = | ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.ПрочиеРасходы) |УПОРЯДОЧИТЬ ПО | ДанныеДокумента.НомерСтроки |"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); МассивРезультатов = Запрос.ВыполнитьПакет(); Выборка = МассивРезультатов[0].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; ХозяйственнаяОперация = Выборка.ХозяйственнаяОперация; Иначе КорреспондирующийСчет = ""; ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПустаяСсылка(); КонецЕсли; Выборка = МассивРезультатов[1].Выбрать(); Если Выборка.Следующий() Тогда КорреспондирующийСчет = Выборка.КорреспондирующийСчет; СтатьяРасходов = Выборка.СтатьяРасходов; Иначе СтатьяРасходов = Неопределено; КонецЕсли; ВидОперации = "ПрочееСписание"; Если ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПрочаяВыдачаДенежныхСредств Тогда Если Найти(КорреспондирующийСчет, "66") <> 0 Или Найти(КорреспондирующийСчет, "67") <> 0 Тогда ВидОперации = "РасчетыПоКредитамИЗаймам"; ИначеЕсли Найти(КорреспондирующийСчет, "76.04") <> 0 Тогда ВидОперации = "ПеречислениеДепонентов"; ИначеЕсли Найти(КорреспондирующийСчет, "73.01") <> 0 Тогда ВидОперации = "ВыдачаЗаймаСотруднику"; ИначеЕсли Найти(КорреспондирующийСчет, "76") <> 0 Или Найти(КорреспондирующийСчет, "60") <> 0 Или Найти(КорреспондирующийСчет, "62") <> 0 Тогда ВидОперации = "ПрочиеРасчетыСКонтрагентами"; КонецЕсли; КонецЕсли; ВходящиеДанные = Новый Структура("ВидОперации, Счет, СтатьяРасходов", ВидОперации, КорреспондирующийСчет, СтатьяРасходов); <Параметры>Объект, ВходящиеДанные <Группа Имя="АлгоритмыПКС"> <Алгоритм Имя="БанковскиеСчета_Банк" ИспользуетсяПриЗагрузке="false"> <Текст>Если Источник.РучноеИзменениеРеквизитовБанка Тогда ИмяПКО = "Создаваемые_Банки"; Значение = Новый Структура; // Реквизиты банка Значение.Вставить("Ссылка"); Значение.Вставить("Код", Источник.БИКБанка); Значение.Вставить("Наименование", Источник.НаименованиеБанка); Значение.Вставить("ЭтоГруппа", Ложь); Значение.Вставить("Адрес", Источник.АдресБанка); Значение.Вставить("Город", Источник.ГородБанка); Значение.Вставить("КоррСчет", Источник.КоррСчетБанка); Значение.Вставить("Телефоны", Источник.ТелефоныБанка); ВыгрузитьОбъект = Истина; Иначе ИмяПКО = "Банки"; КонецЕсли; <Параметры>Значение, ИмяПКО, Источник <Алгоритм Имя="БанковскиеСчета_БанкДляРасчетов" ИспользуетсяПриЗагрузке="false"> <Текст>Если Источник.РучноеИзменениеРеквизитовБанкаДляРасчетов Тогда ИмяПКО = "Создаваемые_Банки"; Значение = Новый Структура; // Реквизиты банка Значение.Вставить("Ссылка"); Значение.Вставить("Код", Источник.БИКБанкаДляРасчетов); Значение.Вставить("Наименование", Источник.НаименованиеБанкаДляРасчетов); Значение.Вставить("ЭтоГруппа", Ложь); Значение.Вставить("Адрес", Источник.АдресБанкаДляРасчетов); Значение.Вставить("Город", Источник.ГородБанкаДляРасчетов); Значение.Вставить("КоррСчет", Источник.КоррСчетБанкаДляРасчетов); Значение.Вставить("Телефоны", Источник.ТелефоныБанкаДляРасчетов); ВыгрузитьОбъект = Истина; Иначе ИмяПКО = "Банки"; КонецЕсли; <Параметры>Значение, ИмяПКО, Источник <Алгоритм Имя="НачисленияКредитовИДепозитов_ОперацияБух_Субконто" ИспользуетсяПриЗагрузке="false"> <Текст>ИмяПКОВидСубконто = "ВидыСубконтоХозрасчетные"; ВидСубконто = КлючИЗначение.Ключ; Субконто = КлючИЗначение.Значение; Если ВидСубконто = "Контрагенты" Тогда ИмяПКО = "Контрагенты"; ИначеЕсли ВидСубконто = "Договоры" Тогда ИмяПКО = "ДоговорыКредитовИДепозитов_ДоговорыКонтрагентов"; ИначеЕсли ВидСубконто = "БанковскиеСчета" Тогда Если ЗначениеЗаполнено(Субконто) Тогда ВходящиеДанные.Вставить("Организация", Источник.Организация); ВходящиеДанные.Вставить("БанковскийСчетКонтрагента", Субконто); Выполнить(Алгоритмы.СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента); Субконто = ВходящиеДанные.БанковскийСчетОрганизации; КонецЕсли; ИначеЕсли ВидСубконто = "ПрочиеДоходыИРасходы" Тогда Если ТипЗнч(Субконто) = Тип("ПланВидовХарактеристикСсылка.СтатьиРасходов") Тогда ИмяПКО = "СтатьиРасходовВПрочиеДоходыИРасходы"; ИначеЕсли ТипЗнч(Субконто) = Тип("ПланВидовХарактеристикСсылка.СтатьиДоходов") Тогда ИмяПКО = "СтатьиДоходовВПрочиеДоходыИРасходы"; КонецЕсли; КонецЕсли; <Параметры>КлючИЗначение, ИмяПКО, ИмяПКОВидСубконто, Источник, ВходящиеДанные <Алгоритм Имя="ВыгрузитьДоговорПлатежногоДокумента" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - Значение // - Источник // - ОбъектКоллекции // - ОбъектРасчетов // - Контрагент // - Организация ДоговорКонтрагента = Неопределено; ДанныеОбъектаРасчетов = Новый Структура("Соглашение,Сделка,Договор"); Если ЗначениеЗаполнено(ОбъектРасчетов) Тогда ЗаполнитьЗначенияСвойств(ДанныеОбъектаРасчетов, ОбъектРасчетов); КонецЕсли; Если ЗначениеЗаполнено(ОбъектРасчетов) Тогда Если ТипЗнч(ОбъектРасчетов) = Тип("СправочникСсылка.ДоговорыКонтрагентов") Тогда ДоговорКонтрагента = ОбъектРасчетов; Иначе Попытка ДоговорКонтрагента = ДанныеОбъектаРасчетов.Договор; Исключение КонецПопытки; КонецЕсли; КонецЕсли; Если ЗначениеЗаполнено(ДоговорКонтрагента) Тогда Значение = ДоговорКонтрагента; ИмяПКО = "ДоговорыКонтрагентов_ДоговорыКонтрагентов"; Иначе // Инициализируем структуру договора Значение = Новый Структура; // Реквизиты договора Значение.Вставить("Ссылка"); Значение.Вставить("ВалютаВзаиморасчетов", ОбъектКоллекции.ВалютаВзаиморасчетов); Значение.Вставить("ВидДоговора", Неопределено); Значение.Вставить("Владелец", Контрагент); Значение.Вставить("Организация", Организация); Значение.Вставить("РасчетыВУсловныхЕдиницах", Неопределено); // Дополнительные свойства договора Значение.Вставить("ПартнерУТ11", ОбъектКоллекции.Партнер); Значение.Вставить("СоглашениеСКлиентомУТ11", Неопределено); Значение.Вставить("СоглашениеСПоставщикомУТ11", Неопределено); Значение.Вставить("СделкаСКлиентомУТ11", Неопределено); Значение.Вставить("ЗаказКлиентаУТ11", Неопределено); Значение.Вставить("ЗаказПоставщикуУТ11", Неопределено); ОбъектРасчетов = ОбъектКоллекции.УдалитьЗаказ; Если ТипЗнч(ДанныеОбъектаРасчетов.Соглашение) = Тип("СправочникСсылка.СоглашенияСКлиентами") Тогда Значение.СоглашениеСКлиентомУТ11 = ДанныеОбъектаРасчетов.Соглашение; ИначеЕсли ТипЗнч(ДанныеОбъектаРасчетов.Соглашение) = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда Значение.СоглашениеСПоставщикомУТ11 = ДанныеОбъектаРасчетов.Соглашение; КонецЕсли; // Для продолжения анализа операции, необходимо определить вид договора Если Источник.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.ПеречислениеТаможне Тогда Значение.ВидДоговора = "Прочее"; Иначе Значение.ВидДоговора = ВзаиморасчетыСервер.ВидДоговораКонтрагента(ОбъектРасчетов, ДанныеОбъектаРасчетов.Соглашение, Источник.ХозяйственнаяОперация); КонецЕсли; Если Значение.ВидДоговора = "СКомитентом" Или Значение.ВидДоговора = "СКомиссионером" Тогда // Договора по комиссии выгружаются без разделения по сделкам и заказам и всегда не в у.е. Значение.РасчетыВУсловныхЕдиницах = Ложь; Иначе Если ЗначениеЗаполнено(ДанныеОбъектаРасчетов.Соглашение) Тогда Значение.РасчетыВУсловныхЕдиницах = ДанныеОбъектаРасчетов.Соглашение.ОплатаВВалюте; КонецЕсли; Значение.СделкаСКлиентомУТ11 = ДанныеОбъектаРасчетов.Сделка; Если ТипЗнч(ОбъектРасчетов) = Тип("ДокументСсылка.ЗаказКлиента") Тогда Значение.ЗаказКлиентаУТ11 = ОбъектРасчетов; ИначеЕсли ТипЗнч(ОбъектРасчетов) = Тип("ДокументСсылка.ЗаказПоставщику") Тогда Значение.ЗаказПоставщикуУТ11 = ОбъектРасчетов; КонецЕсли; КонецЕсли; Если Значение.РасчетыВУсловныхЕдиницах = Неопределено Тогда Значение.РасчетыВУсловныхЕдиницах = Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() И Источник.Валюта <> ОбъектКоллекции.ВалютаВзаиморасчетов; КонецЕсли; ВыгрузитьОбъект = Истина; КонецЕсли; <Параметры>Значение, Источник, ОбъектКоллекции, ОбъектРасчетов, Контрагент, Организация, ИмяПКО <Алгоритм Имя="ВыгрузитьЛицензиюПоставщикаАлкогольнойПродукции" ИспользуетсяПриЗагрузке="false"> <Текст>Если ИсточникДанных = Тип("СправочникСсылка.ЛицензииПоставщиковАлкогольнойПродукции") Тогда РеквизитыЛицензии = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(ИсточникДанных, "Владелец, ВидЛицензии, ДатаНачала |ДатаОкончания, КемВыдана, Наименование"); Иначе РеквизитыЛицензии = ИсточникДанных; КонецЕсли; Если Не ЗначениеЗаполнено(РеквизитыЛицензии.ДатаНачала) Тогда РеквизитыЛицензии.ДатаНачала = Дата(1980, 1, 1); КонецЕсли; // Создание пустого набора записей Отбор = Новый ТаблицаЗначений; Отбор.Колонки.Добавить("Имя"); Отбор.Колонки.Добавить("Значение"); Отбор.Колонки.Добавить("Использование"); СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "Поставщик"; СтрокаОтбора.Значение = РеквизитыЛицензии.Владелец; СтрокаОтбора.Использование = Истина; СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "ВидЛицензии"; СтрокаОтбора.Значение = РеквизитыЛицензии.ВидЛицензии; СтрокаОтбора.Использование = Истина; СтрокаОтбора = Отбор.Добавить(); СтрокаОтбора.Имя = "Период"; СтрокаОтбора.Значение = РеквизитыЛицензии.ДатаНачала; СтрокаОтбора.Использование = Истина; Если Не ЗначениеЗаполнено(СтрокаОтбора.Значение) Тогда Значение = Дата(1980, 1, 1); КонецЕсли; Строки = Новый ТаблицаЗначений; Строки.Колонки.Добавить("Ссылка"); Строки.Колонки.Добавить("Поставщик"); Строки.Колонки.Добавить("ВидЛицензии"); Строки.Колонки.Добавить("Период"); Строки.Колонки.Добавить("ДатаОкончания"); Строки.Колонки.Добавить("КемВыдана"); Строки.Колонки.Добавить("СерияНомер"); Если Не ЭтоУдаление Тогда Строка = Строки.Добавить(); ЗаполнитьЗначенияСвойств(Строка, РеквизитыЛицензии); Строка.Поставщик = РеквизитыЛицензии.Владелец; Строка.Период = РеквизитыЛицензии.ДатаНачала; Строка.СерияНомер = РеквизитыЛицензии.Наименование; КонецЕсли; // Выгрузка набора записей // создаем виртуальный набор записей НаборЗаписей = Новый Структура("Отбор, Строки"); НаборЗаписей.Отбор = Отбор; НаборЗаписей.Строки = Строки; ВыгрузитьРегистр(НаборЗаписей, , , Истина, "ЛицензииПоставщиковАлкогольнойПродукции"); <Параметры>ИсточникДанных, ЭтоУдаление <Алгоритм Имя="ВыполнитьСверткуСкладаПриНеобходимости" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - Значение Если ЗначениеЗаполнено(Значение) И ТипЗнч(Значение) = Тип("СправочникСсылка.Склады") //+Тимохов //И (Значение.ВыборГруппы = Перечисления.ВыборГруппыСкладов.РазрешитьВЗаказахИНакладных //ИЛИ Параметры.СворачиватьПоСкладу) Тогда И Параметры.СворачиватьПоСкладу Тогда //-Тимохов// // Относим хозоперацию на склад по умолчанию Значение = Параметры.ОбобщенныйСклад; КонецЕсли; <Параметры>Значение <Алгоритм Имя="ЗаполнитьСчетБанк" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - Источник Если Источник.Валюта = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Значение = "51"; Иначе Значение = "52"; КонецЕсли; <Параметры>Источник <Алгоритм Имя="ПодготовитьДанныеРасшифровкиПлатежаНДС" ИспользуетсяПриЗагрузке="false"> <Текст>ВходящиеДанные.Вставить("СтавкаНДС"); МассивДокументов = Источник.РасшифровкаПлатежа.Выгрузить(,"УдалитьЗаказ").ВыгрузитьКолонку("УдалитьЗаказ"); Если ТипЗнч(Источник.Ссылка) = Тип("ДокументСсылка.ПриходныйКассовыйОрдер") Или ТипЗнч(Источник.Ссылка) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда МассивДокументов.Добавить(Источник.ДокументОснование); КонецЕсли; РасшифровкаПлатежаНДС = ДенежныеСредстваСервер.РасшифровкаПлатежаНДС( Источник.Организация, Источник.Дата, Источник.Валюта, МассивДокументов, Истина); Если РасшифровкаПлатежаНДС.Количество() > 0 Тогда РасшифровкаПлатежаНДС.Сортировать("СуммаСНДС Убыв"); ВходящиеДанные.СтавкаНДС = РасшифровкаПлатежаНДС[0].СтавкаНДС; КонецЕсли; <Параметры>Источник, ВходящиеДанные <Алгоритм Имя="ПолучениеДатыИПризнакаПроведенияДокументовДБДС" ИспользуетсяПриЗагрузке="false"> <Текст>ВходящиеДанные.Вставить("Дата", Источник.Дата); ВходящиеДанные.Вставить("Проведен", Ложь); //ПСК Если ТипЗнч(Источник) = Тип("ДокументСсылка.СписаниеБезналичныхДенежныхСредств") Или ТипЗнч(Источник) = Тип("ДокументСсылка.ПоступлениеБезналичныхДенежныхСредств") Тогда Если Источник.ПроведеноБанком Тогда ВходящиеДанные.Дата = Источник.ДатаПроведенияБанком; КонецЕсли; КонецЕсли; ВходящиеДанные.Проведен = Источник.Проведен; //Запрос = Новый Запрос( //"ВЫБРАТЬ ПЕРВЫЕ 1 //| Движения.Период КАК Дата, //| Движения.Остаток //|ИЗ //| (ВЫБРАТЬ //| ДенежныеСредстваКПоступлениюБезналичныеОстаткиИОбороты.Период КАК Период, //| ДенежныеСредстваКПоступлениюБезналичныеОстаткиИОбороты.СуммаКонечныйОстаток КАК Остаток //| ИЗ //| РегистрНакопления.ДенежныеСредстваКПоступлениюБезналичные.ОстаткиИОбороты( //| , //| , //| Секунда, //| Движения, //| Документ = &Ссылка //| И БанковскийСчет = &БанковскийСчет) КАК ДенежныеСредстваКПоступлениюБезналичныеОстаткиИОбороты //| //| ОБЪЕДИНИТЬ ВСЕ //| //| ВЫБРАТЬ //| ДенежныеСредстваКСписаниюБезналичныеОстаткиИОбороты.Период, //| ДенежныеСредстваКСписаниюБезналичныеОстаткиИОбороты.СуммаКонечныйОстаток * -1 //| ИЗ //| РегистрНакопления.ДенежныеСредстваКСписаниюБезналичные.ОстаткиИОбороты( //| , //| , //| Секунда, //| Движения, //| Документ = &Ссылка //| И БанковскийСчет = &БанковскийСчет) КАК ДенежныеСредстваКСписаниюБезналичныеОстаткиИОбороты) КАК Движения //| //|УПОРЯДОЧИТЬ ПО //| Движения.Период УБЫВ"); //Запрос.УстановитьПараметр("Ссылка", Источник.Ссылка); //Запрос.УстановитьПараметр("БанковскийСчет", БанковскийСчетОперации); //Выборка = Запрос.Выполнить().Выбрать(); //Если Выборка.Следующий() Тогда // Если Выборка.Остаток <= 0 Тогда // ВходящиеДанные.Проведен = Истина; // ВходящиеДанные.Дата = Выборка.Дата; // КонецЕсли; //КонецЕсли; <Параметры>ВходящиеДанные, БанковскийСчетОперации, Источник <Алгоритм Имя="РаспределитьПравуюТаблицуВЛевой" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - ЛеваяТаблица // - ПолучаемыеКолонки // - КолонкиСопоставления // - ПраваяТаблица // - КолонкаРаспределения Результат = ЛеваяТаблица.СкопироватьКолонки(); // Определяем массив получаемых из правой таблицы колонок МассивПолучаемыхКолонок = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(ПолучаемыеКолонки, ",", Истина); // Определяем массив колонок сопоставления МассивКолонокСопоставления = СтроковыеФункцииКлиентСервер.РазложитьСтрокуВМассивПодстрок(КолонкиСопоставления, ",", Истина); Для Каждого Колонка Из МассивПолучаемыхКолонок Цикл Результат.Колонки.Добавить(Колонка); КонецЦикла; Для Каждого Строка Из ЛеваяТаблица Цикл ОсталосьРаспределить = Строка[КолонкаРаспределения]; СтруктураПоиска = Новый Структура; Для Каждого Колонка Из МассивКолонокСопоставления Цикл СтруктураПоиска.Вставить(Колонка, Строка[Колонка]); КонецЦикла; Пока ОсталосьРаспределить > 0 Цикл НайденныеСтрокиПравойТаблицы = ПраваяТаблица.НайтиСтроки(СтруктураПоиска); Если НайденныеСтрокиПравойТаблицы.Количество() > 0 Тогда НайденнаяСтрока = НайденныеСтрокиПравойТаблицы[0]; Распределено = Мин(ОсталосьРаспределить, НайденнаяСтрока[КолонкаРаспределения]); НоваяСтрока = Результат.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка); ЗаполнитьЗначенияСвойств(НоваяСтрока, НайденнаяСтрока, ПолучаемыеКолонки); НоваяСтрока[КолонкаРаспределения] = Распределено; ОсталосьРаспределить = ОсталосьРаспределить - Распределено; Если НайденнаяСтрока[КолонкаРаспределения] = Распределено Тогда ПраваяТаблица.Удалить(НайденнаяСтрока); Иначе НайденнаяСтрока[КолонкаРаспределения] = НайденнаяСтрока[КолонкаРаспределения] - Распределено; КонецЕсли; Иначе НоваяСтрока = Результат.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока, Строка); Прервать; КонецЕсли; КонецЦикла; КонецЦикла; ЛеваяТаблица = Результат; <Параметры>ЛеваяТаблица, ПолучаемыеКолонки, КолонкиСопоставления, ПраваяТаблица, КолонкаРаспределения <Алгоритм Имя="СоздатьИВыгрузитьБанковскийСчет" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - БанковскийСчет // - НовыйВладелецБанковскогоСчета Если ЗначениеЗаполнено(БанковскийСчет) Тогда // Проверим, есть ли в базе банковский счет, созданный по банковскому счету организации, если нет, то создадим его и выгрузим Запрос = Новый Запрос("ВЫБРАТЬ | БанковскиеСчетаКонтрагентов.Ссылка |ИЗ | Справочник.БанковскиеСчетаКонтрагентов КАК БанковскиеСчетаКонтрагентов |ГДЕ | БанковскиеСчетаКонтрагентов.Владелец = &Владелец | И БанковскиеСчетаКонтрагентов.НомерСчета = &НомерСчета"); Запрос.УстановитьПараметр("Владелец", НовыйВладелецБанковскогоСчета); Запрос.УстановитьПараметр("НомерСчета", БанковскийСчет.НомерСчета); РезультатЗапроса = Запрос.Выполнить(); Если РезультатЗапроса.Пустой() Тогда НовыйБанковскийСчет = Справочники.БанковскиеСчетаКонтрагентов.СоздатьЭлемент(); ЗаполнитьЗначенияСвойств(НовыйБанковскийСчет, БанковскийСчет,, "Владелец,Родитель,ЭтоГруппа"); НовыйБанковскийСчет.Владелец = НовыйВладелецБанковскогоСчета; НовыйБанковскийСчет.Записать(); //+Тимохов// //ЗарегистрироватьОбъектСозданныйПриВыгрузке(НовыйБанковскийСчет.Ссылка); //-Тимохов// НовыйБанковскийСчет = НовыйБанковскийСчет.Ссылка; ВыгрузитьПоПравилу(НовыйБанковскийСчет,,,, "БанковскиеСчетаКонтрагентов"); Иначе ВыборкаРезультатаЗапроса = РезультатЗапроса.Выбрать(); ВыборкаРезультатаЗапроса.Следующий(); НовыйБанковскийСчет = ВыборкаРезультатаЗапроса.Ссылка; КонецЕсли; КонецЕсли; <Параметры>БанковскийСчет, НовыйВладелецБанковскогоСчета, НовыйБанковскийСчет <Алгоритм Имя="СоздатьИВыгрузитьБанковскийСчОргИзСчКонтрагента" ИспользуетсяПриЗагрузке="false"> <Текст>Организация = ВходящиеДанные.Организация; БанковскийСчетКонтрагента = ВходящиеДанные.БанковскийСчетКонтрагента; ВходящиеДанные.Вставить("БанковскийСчетОрганизации"); Если ЗначениеЗаполнено(БанковскийСчетКонтрагента) Тогда СоответствующийСчетОрганизации = Справочники.БанковскиеСчетаОрганизаций.НайтиПоРеквизиту("НомерСчета", ОбщегоНазначения.ЗначениеРеквизитаОбъекта(БанковскийСчетКонтрагента, "НомерСчета")); Если ЗначениеЗаполнено(СоответствующийСчетОрганизации) Тогда ВходящиеДанные.БанковскийСчетОрганизации = СоответствующийСчетОрганизации; Иначе НовыйСчет = Справочники.БанковскиеСчетаОрганизаций.СоздатьЭлемент(); ЗаполнитьЗначенияСвойств(НовыйСчет, БанковскийСчетКонтрагента,, "Родитель,ЭтоГруппа"); НовыйСчет.Владелец = ВходящиеДанные.Организация; НовыйСчет.Записать(); //+Тимохов// //ЗарегистрироватьОбъектСозданныйПриВыгрузке(НовыйСчет.Ссылка); //-Тимохов// ВыгрузитьПоПравилу(НовыйСчет,,,, "БанковскиеСчетаОрганизаций"); ВходящиеДанные.БанковскийСчетОрганизации = НовыйСчет.Ссылка; КонецЕсли; Иначе ВходящиеДанные.БанковскийСчетОрганизации = Справочники.БанковскиеСчетаОрганизаций.ПустаяСсылка(); КонецЕсли; <Параметры>ВходящиеДанные <Алгоритм Имя="СоздатьИВыгрузитьКонтрагентаИзОрганизации" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - ОрганизацияКонтрагента Если ЗначениеЗаполнено(ОрганизацияКонтрагента) Тогда // Проверим, есть ли в базе контрагент, созданный по организации, если нету, то создадим его и выгрузим СсылкаНаКонтрагента = Справочники.Контрагенты.ПолучитьСсылку(ОрганизацияКонтрагента.УникальныйИдентификатор()); Если НЕ ОбщегоНазначения.СсылкаСуществует(СсылкаНаКонтрагента) Тогда НовыйКонтрагент = Справочники.Контрагенты.СоздатьЭлемент(); НовыйКонтрагент.ПометкаУдаления = ОрганизацияКонтрагента.ПометкаУдаления; НовыйКонтрагент.ИНН = ОрганизацияКонтрагента.ИНН; НовыйКонтрагент.КодПоОКПО = ОрганизацияКонтрагента.КодПоОКПО; НовыйКонтрагент.КПП = ОрганизацияКонтрагента.КПП; НовыйКонтрагент.НаименованиеПолное = ОрганизацияКонтрагента.НаименованиеПолное; НовыйКонтрагент.ЮрФизЛицо = ОрганизацияКонтрагента.ЮрФизЛицо; НовыйКонтрагент.Наименование = ОрганизацияКонтрагента.Наименование; НовыйКонтрагент.Партнер = Справочники.Партнеры.НеизвестныйПартнер; НовыйКонтрагент.УстановитьСсылкуНового(СсылкаНаКонтрагента); НовыйКонтрагент.Записать(); //+Тимохов// //ЗарегистрироватьОбъектСозданныйПриВыгрузке(НовыйКонтрагент.Ссылка); //-Тимохов// ВыгрузитьПоПравилу(НовыйКонтрагент,,,, "Контрагенты"); КонецЕсли; НовыйКонтрагент = СсылкаНаКонтрагента; КонецЕсли; <Параметры>ОрганизацияКонтрагента, НовыйКонтрагент <Алгоритм Имя="СоздатьИВыгрузитьКонтрагентаИзФизЛица" ИспользуетсяПриЗагрузке="false"> <Текст>// Параметры: // - ФизЛицо Если ЗначениеЗаполнено(ФизЛицо) Тогда // Проверим, есть ли в базе контрагент, созданный по физлицу, если нету, то создадим его и выгрузим СсылкаНаКонтрагента = Справочники.Контрагенты.ПолучитьСсылку(ФизЛицо.УникальныйИдентификатор()); Если НЕ ОбщегоНазначения.СсылкаСуществует(СсылкаНаКонтрагента) Тогда НовыйКонтрагент = Справочники.Контрагенты.СоздатьЭлемент(); НовыйКонтрагент.НаименованиеПолное = ФизЛицо.Наименование; НовыйКонтрагент.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ФизЛицо; НовыйКонтрагент.Наименование = ФизЛицо.Наименование; НовыйКонтрагент.Партнер = Справочники.Партнеры.НеизвестныйПартнер; НовыйКонтрагент.УстановитьСсылкуНового(СсылкаНаКонтрагента); НовыйКонтрагент.Записать(); //+Тимохов// //ЗарегистрироватьОбъектСозданныйПриВыгрузке(НовыйКонтрагент.Ссылка); //-Тимохов// ВыгрузитьПоПравилу(НовыйКонтрагент,,,, "Контрагенты"); КонецЕсли; НовыйКонтрагент = СсылкаНаКонтрагента; КонецЕсли; <Параметры>ФизЛицо, НовыйКонтрагент <Группа Имя="Загрузка"> <Группа Имя="_ЗаполнениеДокументовБазовое"> <Алгоритм Имя="ЗагрузитьДанныеРасшифровкиПлатежаНДС" ИспользуетсяПриЗагрузке="true"> <Текст>Если ПараметрыОбъекта <> Неопределено Тогда НовРасшифровкаПлатежа = ПараметрыОбъекта.Получить("РасшифровкаПлатежаТабличнаяЧасть"); Для Каждого СтрокаПлатеж Из Объект.РасшифровкаПлатежа Цикл ТекСтавкаНДС = СтрокаПлатеж.СтавкаНДС; ТекСуммаНДС = СтрокаПлатеж.СуммаНДС; Попытка НовСтавкаНДС = НовРасшифровкаПлатежа[СтрокаПлатеж.НомерСтроки - 1].СтавкаНДС; НовСуммаНДС = НовРасшифровкаПлатежа[СтрокаПлатеж.НомерСтроки - 1].СуммаНДС; Исключение НовСтавкаНДС = Неопределено; НовСуммаНДС = Неопределено; КонецПопытки; Если ЗначениеЗаполнено(НовСтавкаНДС) Тогда ТекСтавкаНДС = НовСтавкаНДС; ТекСуммаНДС = НовСуммаНДС; ИначеЕсли Не ЗначениеЗаполнено(ТекСтавкаНДС) Тогда МетаданныеДокумента = Объект.Метаданные(); Если ЗначениеЗаполнено(Объект.Организация) И (МетаданныеДокумента.Имя = "ПриходныйКассовыйОрдер" ИЛИ МетаданныеДокумента.Имя = "ПоступлениеНаРасчетныйСчет") Тогда ПлательщикНДС = УчетнаяПолитика.ПлательщикНДС(Объект.Организация, Объект.Дата); ТекСтавкаНДС = ?(НЕ ПлательщикНДС, Перечисления.СтавкиНДС.БезНДС, Перечисления.СтавкиНДС.НДС20); Иначе ТекСтавкаНДС = Перечисления.СтавкиНДС.НДС20; КонецЕсли; ЗначениеСтавкиНДС = УчетНДСВызовСервераПовтИсп.ПолучитьСтавкуНДС(ТекСтавкаНДС); ТекСуммаНДС = СтрокаПлатеж.СуммаПлатежа * ЗначениеСтавкиНДС / (100 + ЗначениеСтавкиНДС); КонецЕсли; СтрокаПлатеж.СтавкаНДС = ТекСтавкаНДС; СтрокаПлатеж.СуммаНДС = ТекСуммаНДС; КонецЦикла; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ПодобратьПлатежнуюВедомость" ИспользуетсяПриЗагрузке="true"> <Текст>Если ПараметрыОбъекта <> Неопределено Тогда Если ПолучитьФункциональнуюОпцию("ИспользоватьНачислениеЗарплаты") Тогда Если ТипЗнч(Объект) = Тип("ДокументОбъект.РасходныйКассовыйОрдер") Тогда ТипДокумента = "ВедомостьНаВыплатуЗарплатыВКассу"; Иначе ТипДокумента = "ВедомостьНаВыплатуЗарплатыВБанк"; КонецЕсли; Иначе ТипДокумента = "ВедомостьНаВыплатуЗарплаты"; КонецЕсли; Если ЗначениеЗаполнено(ПараметрыОбъекта.Получить("СсылкаНаЗаявку")) Тогда ПлатежнаяВедомость = Документы[ТипДокумента].ПолучитьСсылку(Новый УникальныйИдентификатор(ПараметрыОбъекта.Получить("СсылкаНаЗаявку"))); КонецЕсли; Если НЕ ПлатежнаяВедомость = Неопределено И ОбщегоНазначения.СсылкаСуществует(ПлатежнаяВедомость) Тогда ПодобраннаяПлатежнаяВедомость = ПлатежнаяВедомость; Иначе Запрос = Новый Запрос (" |ВЫБРАТЬ | ПлатежнаяВедомость.Ссылка КАК Ссылка, | ПлатежнаяВедомость.Дата, | ПлатежнаяВедомость.Номер |ИЗ | Документ.[ТипДокумента] КАК ПлатежнаяВедомость |ГДЕ | ПлатежнаяВедомость.Дата >= &ДатаН | И ПлатежнаяВедомость.Дата <= &ДатаК | И ПлатежнаяВедомость.Номер = &Номер"); Если ПараметрыОбъекта.Получить("ДатаВедомостиНаВыплатуЗарплаты") = Неопределено Тогда Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: Не заполнена дата ведомости на зарплату. |Последствия: документ списания денежных средств загрузился непроведенным. |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе.'")); ПодобраннаяПлатежнаяВедомость = Документы[ТипДокумента].ПустаяСсылка(); Иначе Запрос.УстановитьПараметр("ДатаН",НачалоДня(ПараметрыОбъекта.Получить("ДатаВедомостиНаВыплатуЗарплаты"))); Запрос.УстановитьПараметр("ДатаК",КонецДня(ПараметрыОбъекта.Получить("ДатаВедомостиНаВыплатуЗарплаты"))); Запрос.УстановитьПараметр("Номер",ПараметрыОбъекта.Получить("НомерВедомостиНаВыплатуЗарплаты")); Запрос.Текст = СтрЗаменить(Запрос.Текст,"[ТипДокумента]",ТипДокумента); Выборка = Запрос.Выполнить().Выбрать(); Если Выборка.Следующий() Тогда Если Выборка.Количество() > 1 Тогда // формируем текст сообщения для информирования пользователя Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: существует более одного документа платежная ведомость с одинаковым номером и датой. |Последствия: документ списания денежных средств загрузился непроведенным. |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе.'")); //ЗарегистрироватьПредупреждение(ТекстСообщения); ПодобраннаяПлатежнаяВедомость = Документы[ТипДокумента].ПустаяСсылка(); Иначе ПодобраннаяПлатежнаяВедомость = Выборка[0].Ссылка; КонецЕсли; Иначе Сообщить(НСтр("ru = 'Загрузка документа выполнена с предупреждением |Причина: платежная ведомость не найдена. |Последствия: документ списания денежных средств загрузился непроведенным. |Рекомендация: рекомендуется проконтролировать результат отражения операции в текущей базе.'")); //ЗарегистрироватьПредупреждение(ТекстСообщения); ПодобраннаяПлатежнаяВедомость = Документы[ТипДокумента].ПустаяСсылка(); КонецЕсли; КонецЕсли; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта, ПодобраннаяПлатежнаяВедомость <Алгоритм Имя="ПривестиСубконтоВСоответствиеСчетуУчета" ИспользуетсяПриЗагрузке="true"> <Текст>ЭлементыСубконто = Новый Структура("Субконто1,Субконто2,Субконто3", Объект.Субконто1, Объект.Субконто2, Объект.Субконто3); ЧислоАктивныхСубконто = ?(ЗначениеЗаполнено(СчетУчета), СчетУчета.ВидыСубконто.Количество(), 0); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СчетУчета.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(ЭлементыСубконто["Субконто" + Сч]) <> ЭлементыСубконто["Субконто" + Сч] Тогда ЭлементыСубконто["Субконто" + Сч] = ТипСубк.ПривестиЗначение(ЭлементыСубконто["Субконто" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не ЭлементыСубконто["Субконто" + Сч] = Неопределено Тогда ЭлементыСубконто["Субконто" + Сч] = Неопределено; КонецЕсли; КонецЦикла; <Параметры>Объект, СчетУчета <Алгоритм Имя="ТипизироватьСубконтоВШапкеПлатежногоДокумента" ИспользуетсяПриЗагрузке="true"> <Текст>ИмяРеквизитаСубконто = ""; СчетУчета = Объект.СчетУчетаРасчетовСКонтрагентом; МетаданныеДокумента = Объект.Метаданные(); Если ОбщегоНазначенияБП.ЕстьРеквизитДокумента("СубконтоДт", МетаданныеДокумента) Тогда ИмяРеквизитаСубконто = "СубконтоДт"; ИначеЕсли ОбщегоНазначенияБП.ЕстьРеквизитДокумента("СубконтоКт", МетаданныеДокумента) Тогда ИмяРеквизитаСубконто = "СубконтоКт"; КонецЕсли; Если ИмяРеквизитаСубконто <> "" Тогда ЧислоАктивныхСубконто = ?(ЗначениеЗаполнено(СчетУчета), СчетУчета.Количество(), 0); Для Сч = 1 По 3 Цикл Если Сч <= ЧислоАктивныхСубконто Тогда ТипСубк = СчетУчета.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(Объект[ИмяРеквизитаСубконто + Сч]) <> Объект[ИмяРеквизитаСубконто + Сч] Тогда Объект[ИмяРеквизитаСубконто + Сч] = ТипСубк.ПривестиЗначение(Объект[ИмяРеквизитаСубконто + Сч]); КонецЕсли; Иначе Если Не Объект[ИмяРеквизитаСубконто + Сч] = Неопределено Тогда Объект[ИмяРеквизитаСубконто + Сч] = Неопределено; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; <Параметры>Объект <Группа Имя="_ЗаполнениеДокументовОтложенное"> <Группа Имя="_АвансовыйОтчет"> <Алгоритм Имя="ОбработатьАвансовыйОтчет" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; КонецЦикла; Для Каждого СтрокаТаблицы Из Объект.Прочее Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатрат) Тогда СтрокаТаблицы.СчетЗатрат = СчетаУчета.СчетУчета; СтрокаТаблицы.Субконто1 = СчетаУчета.Субконто1; СтрокаТаблицы.Субконто2 = СчетаУчета.Субконто2; СтрокаТаблицы.Субконто3 = СчетаУчета.Субконто3; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатратНУ) Тогда СтрокаТаблицы.СчетЗатратНУ = СчетаУчета.СчетУчета; СтрокаТаблицы.СубконтоНУ1 = СчетаУчета.Субконто1; СтрокаТаблицы.СубконтоНУ2 = СчетаУчета.Субконто2; СтрокаТаблицы.СубконтоНУ3 = СчетаУчета.Субконто3; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) И СтрокаТаблицы.СтавкаНДС <> Перечисления.СтавкиНДС.БезНДС Тогда СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; КонецЦикла; Если ПараметрыОбъекта <> Неопределено Тогда Для Каждого СтрокаТаблицы Из Объект.ОплатаПоставщикам Цикл РеквизитыДоговораКонтрагента = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(СтрокаТаблицы.ДоговорКонтрагента, "Владелец,ВалютаВзаиморасчетов"); Если ЗначениеЗаполнено(СтрокаТаблицы.ДоговорКонтрагента) И Не ЗначениеЗаполнено(СтрокаТаблицы.Контрагент) Тогда СтрокаТаблицы.Контрагент = РеквизитыДоговораКонтрагента.Владелец; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТаблицы.Контрагент, СтрокаТаблицы.ДоговорКонтрагента); СтрокаТаблицы.СпособПогашенияЗадолженности = Перечисления.СпособыПогашенияЗадолженности.Автоматически; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовПоАвансам) Тогда СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом) Тогда Если СтрокаТаблицы.ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовСКомитентом; Иначе СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Сделка) Тогда СтрокаТаблицы.Сделка = Неопределено; КонецЕсли; КонецЦикла; ТаблицаСтатейРасходов = ПараметрыОбъекта.Получить("ПрочееТабличнаяЧасть"); Для Каждого СтрокаТаблицы Из Объект.Прочее Цикл СчетЗатрат = СтрокаТаблицы.СчетЗатрат; СчетЗатратНУ = СтрокаТаблицы.СчетЗатратНУ; СтатьяРасходов = ТаблицаСтатейРасходов[СтрокаТаблицы.НомерСтроки - 1].СтатьяРасходов; Если ЗначениеЗаполнено(СчетЗатрат) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТаблицы["Субконто" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; Если ЗначениеЗаполнено(СчетЗатратНУ) Тогда Для Каждого СтрокаВидаСубконто Из СчетЗатрат.ВидыСубконто Цикл ТипСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипСубконто.СодержитТип(ТипЗнч(СтатьяРасходов)) Тогда СтрокаТаблицы["СубконтоНУ" + СтрокаВидаСубконто.НомерСтроки] = СтатьяРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ТабличнаяЧасть = Объект.Прочее; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Вводостатков"> <Алгоритм Имя="ОбработатьТабличнуюЧастьДокументВводОстатков" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - ТабличнаяЧасть // - Объект // - ПараметрыОбъекта УчетнаяПолитикаНеЗадана = Ложь; УчетнаяПолитикаНеЗадана = УчетнаяПолитика.Существует(Объект.Организация, Объект.Дата, Истина, Объект.Ссылка); Если НЕ УчетнаяПолитикаНеЗадана Тогда ВариантОтраженияУСН = ?(УчетнаяПолитика.ПрименяетсяУСН(Объект.Организация, Объект.Дата) И УчетнаяПолитика.ПрименяетсяУСНДоходыМинусРасходы(Объект.Организация, Объект.Дата), Перечисления.ОтражениеВУСН.Принимаются, Перечисления.ОтражениеВУСН.ПустаяСсылка()); // Заполняем отражение в УСН для ТЧ Для Каждого СтрокаТЧ Из ТабличнаяЧасть Цикл Если НЕ ЗначениеЗаполнено(СтрокаТЧ.ОтражениеВУСН) ИЛИ ВариантОтраженияУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка() Тогда СтрокаТЧ.ОтражениеВУСН = ВариантОтраженияУСН; КонецЕсли; КонецЦикла; КонецЕсли; <Параметры>ТабличнаяЧасть, Объект, ПараметрыОбъекта <Группа Имя="_ВнутреннееПотреблениеТоваров"> <Алгоритм Имя="ОбработатьОтчетПроизводстваЗаСмену" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // Заполняем подразделение затрат по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.ПодразделениеЗатрат) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.ПодразделениеЗатрат = ПодразделениеОрганизации; КонецЕсли; Для Каждого СтрокаТаблицы Из Объект.Продукция Цикл // Заполняем счета учета значениями по умолчанию Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.Счет) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры(Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.Счет = СчетаУчета.СчетУчета; КонецЕсли; // Заполняем номенклатурную группу значением по умолчанию Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.НоменклатурнаяГруппа) Тогда СтрокаТаблицы.НоменклатурнаяГруппа = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.НоменклатурнаяГруппа) Тогда СтрокаТаблицы.НоменклатурнаяГруппа = Параметры.НоменклатурнаяГруппаПоУмолчанию; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьПередачаМатериаловВЭксплуатацию" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // Заполняем местонахождение по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.Местонахождение) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.Местонахождение = ПодразделениеОрганизации; КонецЕсли; // Заполняем табличные части по тому же алгоритму, как если бы вводили документ на основании документа "Поступление товаров и услуг" Счет10_09 = ПланыСчетов.Хозрасчетный.ИнвентарьИХозяйственныеПринадлежности; Счет10_11_2 = ПланыСчетов.Хозрасчетный.СпецоснасткаВЭксплуатации; Товары = ПараметрыОбъекта.Получить("СпецодеждаТабличнаяЧасть"); Объект.ИнвентарьИХозяйственныеПринадлежности.Очистить(); Объект.Спецоснастка.Очистить(); Объект.Спецодежда.Очистить(); Если Товары <> Неопределено И Товары.Количество()>0 Тогда Для Каждого СтрокаТаблицы Из Товары Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры(Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если СчетаУчета.СчетУчета = Счет10_09 Тогда НоваяСтрока = Объект.ИнвентарьИХозяйственныеПринадлежности.Добавить(); НоваяСтрока.ФизЛицо = СтрокаТаблицы.ФизическоеЛицо; НоваяСтрока.СпособОтраженияРасходов = СтрокаТаблицы.СпособОтраженияРасходов; ИначеЕсли ЗначениеЗаполнено(СчетаУчета.СчетПередачи) И (СчетаУчета.СчетПередачи = Счет10_11_2 ИЛИ СчетаУчета.СчетПередачи.ПринадлежитЭлементу(Счет10_11_2)) Тогда НоваяСтрока = Объект.Спецоснастка.Добавить(); НоваяСтрока.СчетПередачи = СчетаУчета.СчетПередачи; НоваяСтрока.НазначениеИспользования = СтрокаТаблицы.НазначениеИспользования; Иначе НоваяСтрока = Объект.Спецодежда.Добавить(); НоваяСтрока.СчетПередачи = СчетаУчета.СчетПередачи; НоваяСтрока.ФизЛицо = СтрокаТаблицы.ФизическоеЛицо; НоваяСтрока.НазначениеИспользования = СтрокаТаблицы.НазначениеИспользования; КонецЕсли; НоваяСтрока.Количество = СтрокаТаблицы.Количество; НоваяСтрока.Номенклатура = СтрокаТаблицы.Номенклатура; НоваяСтрока.СчетУчета = СчетаУчета.СчетУчета; КонецЦикла; ТабличнаяЧасть = Объект.Спецодежда; ПараметрыОбъекта = Неопределено; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ТабличнаяЧасть = Объект.Спецоснастка; ПараметрыОбъекта = Неопределено; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ТабличнаяЧасть = Объект.ИнвентарьИХозяйственныеПринадлежности; ПараметрыОбъекта = Неопределено; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьТребованиеНакладная" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // Определяем подразделение затрат по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); ТабличнаяЧасть = Объект.Материалы; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); Для Каждого СтрокаТаблицы Из Объект.Материалы Цикл // Заполняем номенклатурную группу значением по умолчанию Если Не ЗначениеЗаполнено(СтрокаТаблицы.НоменклатурнаяГруппа) Тогда СтрокаТаблицы.НоменклатурнаяГруппа = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.НоменклатурнаяГруппа) Тогда СтрокаТаблицы.НоменклатурнаяГруппа = Параметры.НоменклатурнаяГруппаПоУмолчанию; КонецЕсли; // Заполняем подразделение затрат значением по умолчанию Если Не ЗначениеЗаполнено(СтрокаТаблицы.ПодразделениеЗатрат) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда СтрокаТаблицы.ПодразделениеЗатрат = ПодразделениеОрганизации; КонецЕсли; Если Не ЗначениеЗаполнено (СтрокаТаблицы.Счет) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры(Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.Счет = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Возвраты"> <Алгоритм Имя="ОбработатьВозвратТоваровПоставщику" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта РеквизитыДоговора = БухгалтерскийУчетПереопределяемый.ПолучитьРеквизитыДоговораКонтрагента(Объект.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(Объект.СтатьяДоходовИРасходов) Тогда Объект.СтатьяДоходовИРасходов = Справочники.ПрочиеДоходыИРасходы.РазницыСтоимостиВозвратаИФактическойСтоимостиТоваров; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоПретензиям) Тогда Объект.СчетУчетаРасчетовПоПретензиям = СчетаУчета.СчетРасчетовПоПретензиям; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоТаре) Тогда Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТары; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаДоходов) Тогда Объект.СчетУчетаДоходов = СчетаУчета.СчетУчетаДоходовПоТаре; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасходов) Тогда Объект.СчетУчетаРасходов = СчетаУчета.СчетУчетаРасходовПоТаре; КонецЕсли; ТабСчетовДоЗаполнения = Объект.Товары.Выгрузить(,"СчетУчета,СчетУчетаНДС"); СчетУчета = Неопределено; Если РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда СчетУчета = ПланыСчетов.Хозрасчетный.ТоварыНаСкладе; ИначеЕсли РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентомНаЗакупку Тогда СчетУчета = ПланыСчетов.Хозрасчетный.ТМЦпринятыеНаОтветственноеХранение; Иначе Документы.ВозвратТоваровПоставщику.ЗаполнитьСчетаУчетаВТабличнойЧасти(Объект, "Товары"); КонецЕсли; Для Каждого СтрокаТаблицы Из Объект.Товары Цикл СтрокаДоЗаполнения = ТабСчетовДоЗаполнения[СтрокаТаблицы.НомерСтроки - 1]; Если ЗначениеЗаполнено(СтрокаДоЗаполнения.СчетУчета) Тогда ЗаполнитьЗначенияСвойств(СтрокаТаблицы, СтрокаДоЗаполнения); Иначе Если ЗначениеЗаполнено(СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетУчета; КонецЕсли; КонецЕсли; КонецЦикла; //Заполняем параметры, зависящие от режима налогообложения Выполнить(Алгоритмы.ЗаполнениеОтражениеНДСВСтоимости); Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьВозвратыПокупателей" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоТаре) Тогда Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТарыПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаНДС) Тогда Объект.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ; КонецЕсли; Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.ПереданныеСчетУчета) Тогда СтрокаТаблицы.ПереданныеСчетУчета = СчетаУчета.СчетПередачи; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СтрокаТаблицы.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетРасходов) Тогда СтрокаТаблицы.СчетРасходов = СчетаУчета.СчетРасходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДСПоРеализации) Тогда СтрокаТаблицы.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СвойстваСчетаДоходов = БухгалтерскийУчетВызовСервераПовтИсп.ПолучитьСвойстваСчета(СтрокаТаблицы.СчетДоходов); Если СвойстваСчетаДоходов.КоличествоСубконто > 0 Тогда СтрокаТаблицы.Субконто = СвойстваСчетаДоходов.ВидСубконто1ТипЗначения.ПривестиЗначение(СтрокаТаблицы.Субконто); Если ТипЗнч(СтрокаТаблицы.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") Тогда СтрокаТаблицы.Субконто = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(СтрокаТаблицы.Номенклатура, "НоменклатурнаяГруппа"); КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; КонецЦикла; Если УчетнаяПолитика.Существует(Объект.Организация, Объект.Дата, Истина, Объект.Ссылка) И Не ЗначениеЗаполнено(Объект.Сделка) Тогда Если ПараметрыОбъекта = Неопределено Тогда ВариантОтраженияУСН = ?(УчетнаяПолитика.ПрименяетсяУСНДоходыМинусРасходы(Объект.Организация, Объект.Дата), Перечисления.ОтражениеВУСН.Принимаются, Перечисления.ОтражениеВУСН.ПустаяСсылка()); Иначе Если УчетнаяПолитика.ПрименяетсяУСНДоходыМинусРасходы(Объект.Организация, Объект.Дата) Тогда ВариантОтраженияУСН = ?(ПараметрыОбъекта["ЭтоЕНВД"], Перечисления.ОтражениеВУСН.НеПринимаются, Перечисления.ОтражениеВУСН.Принимаются); Иначе ВариантОтраженияУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка(); КонецЕсли; КонецЕсли; // Заполняем отражение в УСН для ТЧ Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.ОтражениеВУСН) Или ВариантОтраженияУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка() Тогда СтрокаТаблицы.ОтражениеВУСН = ВариантОтраженияУСН; КонецЕсли; КонецЦикла; КонецЕсли; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_ДвижениеДенежныхсредств"> <Алгоритм Имя="ОбработатьДокументыБДДС" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.РасшифровкаПлатежа Цикл Если ЗначениеЗаполнено(СтрокаТаблицы.ДоговорКонтрагента) Тогда Реквизиты = БухгалтерскийУчетПереопределяемый.ПолучитьРеквизитыДоговораКонтрагента( СтрокаТаблицы.ДоговорКонтрагента); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТаблицы.ДоговорКонтрагента.Владелец, СтрокаТаблицы.ДоговорКонтрагента); Если Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком ИЛИ Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом) Тогда СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовПоАвансам) Тогда СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; Иначе Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом) Тогда СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовПоАвансам) Тогда СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьДокументыНДДС" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.РасшифровкаПлатежа Цикл Если ЗначениеЗаполнено(СтрокаТаблицы.ДоговорКонтрагента) Тогда Реквизиты = БухгалтерскийУчетПереопределяемый.ПолучитьРеквизитыДоговораКонтрагента(СтрокаТаблицы.ДоговорКонтрагента); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТаблицы.ДоговорКонтрагента.Владелец, СтрокаТаблицы.ДоговорКонтрагента); Если Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком ИЛИ Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом) Тогда СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовПоАвансам) Тогда СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; Иначе Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом) Тогда СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = ?(ПараметрыОбъекта.Получить("Аванс") = Неопределено, СчетаУчета.СчетРасчетовПокупателя, СчетаУчета.СчетАвансовПокупателя); КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетовПоАвансам) Тогда СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Комиссия"> <Алгоритм Имя="ОтчетКомиссионераОПродажах" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнениеОтражениеНДСВСтоимости); Документы.ОтчетКомиссионераОПродажах.ЗаполнитьСчетаУчетаРасчетов(,Ложь,Объект); ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаНоменклатурыОтчетКомиссионера); Если Не ЗначениеЗаполнено(Объект.СчетУчетаЗатрат) Тогда Объект.СчетУчетаЗатрат = ПланыСчетов.Хозрасчетный.ИздержкиОбращения; СчетУчета = Объект.СчетУчетаЗатрат; Выполнить(Алгоритмы.ПривестиСубконтоВСоответствиеСчетуУчета); КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОтчетКомитентуОПродажах" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Если Объект.УдержатьВознаграждение Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетРасчетовСКомитентом; Иначе Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, Объект.УслугаПоВознаграждению); Если Не ЗначениеЗаполнено(Объект.СчетУчетаНДСПоРеализации) Тогда Объект.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетДоходов) Тогда Объект.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Объект.СчетДоходов.ВидыСубконто.Количество() > 0 Тогда Если Объект.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.СодержитТип(ТипЗнч(Объект.Субконто)) Тогда //Не надо менять, значение подходит Иначе Объект.Субконто = Новый(Объект.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]) КонецЕсли; Иначе Объект.Субконто = Неопределено; КонецЕсли; Если ТипЗнч(Объект.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") И ЗначениеЗаполнено(Объект.УслугаПоВознаграждению) И ЗначениеЗаполнено(Объект.УслугаПоВознаграждению.НоменклатурнаяГруппа) Тогда Объект.Субконто = Объект.УслугаПоВознаграждению.НоменклатурнаяГруппа; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Комплектация"> <Алгоритм Имя="ОбработатьВозвратМатериаловИзЭксплуатации" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // Заполняем подразделение организации по умолчанию Организация = Объект.Организация; ПодразделениеОрганизации = Неопределено; Выполнить(Алгоритмы.ПолучитьПодразделениеОрганизацииПоУмолчанию); Если НЕ ЗначениеЗаполнено(Объект.ПодразделениеОрганизации) И ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Объект.ПодразделениеОрганизации = ПодразделениеОрганизации; КонецЕсли; // Заполняем табличные части по тому же алгоритму, как если бы вводили документ на основании документа "Поступление товаров и услуг" Счет10_09 = ПланыСчетов.Хозрасчетный.ИнвентарьИХозяйственныеПринадлежности; Счет10_11_2 = ПланыСчетов.Хозрасчетный.СпецоснасткаВЭксплуатации; Товары = ПараметрыОбъекта.Получить("СпецодеждаТабличнаяЧасть"); Объект.Спецоснастка.Очистить(); Объект.Спецодежда.Очистить(); Если Товары <> Неопределено И Товары.Количество()>0 Тогда Для Каждого СтрокаТаблицы Из Товары Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры(Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если ЗначениеЗаполнено(СчетаУчета.СчетПередачи) И (СчетаУчета.СчетПередачи = Счет10_11_2 ИЛИ СчетаУчета.СчетПередачи.ПринадлежитЭлементу(Счет10_11_2)) Тогда НоваяСтрока = Объект.Спецоснастка.Добавить(); НоваяСтрока.СчетПередачи = СчетаУчета.СчетПередачи; Иначе НоваяСтрока = Объект.Спецодежда.Добавить(); НоваяСтрока.СчетПередачи = СчетаУчета.СчетПередачи; НоваяСтрока.ФизЛицо = СтрокаТаблицы.ФизическоеЛицо; КонецЕсли; НоваяСтрока.Количество = СтрокаТаблицы.Количество; НоваяСтрока.Номенклатура = СтрокаТаблицы.Номенклатура; НоваяСтрока.ПартияМатериаловВЭксплуатации = СтрокаТаблицы.ПартияМатериаловВЭксплуатации; НоваяСтрока.СчетУчета = СчетаУчета.СчетУчета; КонецЦикла; ТабличнаяЧасть = Объект.Спецодежда; ПараметрыОбъекта = Неопределено; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ТабличнаяЧасть = Объект.Спецоснастка; ПараметрыОбъекта = Неопределено; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьКомплектацияНоменклатуры" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Если Не ЗначениеЗаполнено (Объект.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, Объект.Номенклатура, Объект.Склад); Объект.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; СкладЕНВД = УчетнаяПолитика.ПлательщикЕНВД(Объект.Организация, Объект.Дата) И (Объект.Склад.ТипСклада = Перечисления.ТипыСкладов.НеавтоматизированнаяТорговаяТочка ИЛИ Объект.Склад.ТипСклада = Перечисления.ТипыСкладов.РозничныйМагазин); Если Не ЗначениеЗаполнено (Объект.СчетСписанияНДС) Тогда Объект.СчетСписанияНДС = ПланыСчетов.Хозрасчетный.ИздержкиОбращения; КонецЕсли; Если СкладЕНВД Тогда Если Не ЗначениеЗаполнено (Объект.СубконтоСписанияНДС1) Тогда Объект.СубконтоСписанияНДС1 = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходыЕНВД; КонецЕсли; Иначе Если Не ЗначениеЗаполнено (Объект.СубконтоСписанияНДС1) Тогда Объект.СубконтоСписанияНДС1 = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходы; КонецЕсли; КонецЕсли; ПоляОбъекта = Новый Структура( "СубконтоСписанияНДС1", "СубконтоСписанияНДС2", "СубконтоСписанияНДС3", Объект.Организация, Справочники.ПодразделенияОрганизаций.ПустаяСсылка()); БухгалтерскийУчетКлиентСервер.ПриИзмененииСчета(Объект.СчетСписанияНДС, Объект, ПоляОбъекта); Для Каждого СтрокаТаблицы Из Объект.Комплектующие Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_КорректирующиеДокументы"> <Алгоритм Имя="ОбработатьДокументКорректировкаДолга" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта ДоговорКонтрагента = Неопределено; Если ЗначениеЗаполнено(Объект.КонтрагентДебитор) И Не ЗначениеЗаполнено(Объект.КонтрагентКредитор) Тогда Владелец = Объект.СубконтоДт1; ДоговорКонтрагента = Объект.СубконтоДт2; ИначеЕсли ЗначениеЗаполнено(Объект.КонтрагентКредитор) И Не ЗначениеЗаполнено(Объект.КонтрагентДебитор) Тогда Владелец = Объект.СубконтоКт1; ДоговорКонтрагента = Объект.СубконтоКт2; КонецЕсли; РеквизитыДоговора = БухгалтерскийУчетПереопределяемый.ПолучитьРеквизитыДоговораКонтрагента(ДоговорКонтрагента); Если РеквизитыДоговора.ВидДоговора <> Перечисления.ВидыДоговоровКонтрагентов.ПустаяСсылка() Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Владелец, ДоговорКонтрагента); Если РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком Тогда Если Не ЗначениеЗаполнено(Объект.СчетДт) И ЗначениеЗаполнено(Объект.КонтрагентДебитор) Тогда Объект.СчетДт = СчетаУчета.СчетРасчетов; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетКт) И ЗначениеЗаполнено(Объект.КонтрагентКредитор) Тогда Объект.СчетКт = СчетаУчета.СчетАвансов; КонецЕсли; ИначеЕсли РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем Или РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Тогда Если Не ЗначениеЗаполнено(Объект.СчетДт) И ЗначениеЗаполнено(Объект.КонтрагентДебитор) Тогда Объект.СчетДт = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетКт) И ЗначениеЗаполнено(Объект.КонтрагентКредитор) Тогда Объект.СчетКт = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; ИначеЕсли РеквизитыДоговора.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Если Не ЗначениеЗаполнено(Объект.СчетДт) И ЗначениеЗаполнено(Объект.КонтрагентДебитор) Тогда Объект.СчетДт = СчетаУчета.СчетРасчетовСКомитентом; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетКт) И ЗначениеЗаполнено(Объект.КонтрагентКредитор) Тогда Объект.СчетКт = СчетаУчета.СчетРасчетовСКомитентом; КонецЕсли; КонецЕсли; КонецЕсли; ТабличнаяЧасть = Неопределено; Если Объект.ДебиторскаяЗадолженность.Количество()>0 Тогда ТабличнаяЧасть = Объект.ДебиторскаяЗадолженность; Выполнить(Алгоритмы.ОбработатьТабличнуюЧастьДокументКорректировкаДолга); КонецЕсли; Если Объект.КредиторскаяЗадолженность.Количество()>0 Тогда ТабличнаяЧасть = Объект.КредиторскаяЗадолженность; Выполнить(Алгоритмы.ОбработатьТабличнуюЧастьДокументКорректировкаДолга); КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьДокументОприходование" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьДокументыСписания" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта ТабличнаяЧасть = Объект.Товары; ТабСчетовДоЗаполнения = Объект.Товары.Выгрузить(,"СчетУчета"); Документы.СписаниеТоваров.ЗаполнитьСчетаУчетаВТабличнойЧасти(Объект, "Товары"); Для Каждого СтрокаТаблицы Из Объект.Товары Цикл СтрокаДоЗаполнения = ТабСчетовДоЗаполнения[СтрокаТаблицы.НомерСтроки - 1]; Если ЗначениеЗаполнено(СтрокаДоЗаполнения.СчетУчета) Тогда ЗаполнитьЗначенияСвойств(СтрокаТаблицы, СтрокаДоЗаполнения); КонецЕсли; КонецЦикла; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьТабличнуюЧастьДокументКорректировкаДолга" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта // - ТабличнаяЧасть Для Каждого СтрокаТаблицы Из ТабличнаяЧасть Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетов) И ЗначениеЗаполнено(СтрокаТаблицы.ДоговорКонтрагента) Тогда Реквизиты = БухгалтерскийУчетПереопределяемый.ПолучитьРеквизитыДоговораКонтрагента(СтрокаТаблицы.ДоговорКонтрагента); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТаблицы.ДоговорКонтрагента.Владелец, СтрокаТаблицы.ДоговорКонтрагента); Если Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком Или Реквизиты.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Если ЗначениеЗаполнено(ПараметрыОбъекта) И ПараметрыОбъекта.Получить("Аванс") <> Неопределено Тогда СтрокаТаблицы.СчетУчетаРасчетов = СчетаУчета.СчетАвансовПокупателя; Иначе СтрокаТаблицы.СчетУчетаРасчетов = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Иначе СтрокаТаблицы.СчетУчетаРасчетов = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта, ТабличнаяЧасть <Группа Имя="_ОбработчикиЗаполненияСчетов"> <Алгоритм Имя="ЗаполнитьСтатьюДоходовРасходовВПлатежномДокументе" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта Если ПараметрыОбъекта <> Неопределено Тогда СтатьяДоходовРасходов = ПараметрыОбъекта.Получить("СтатьяДоходовРасходов"); Если ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда ТипЗначенияОбъекта = ТипЗнч(Объект); Если ТипЗначенияОбъекта = Тип("ДокументОбъект.ПоступлениеНаРасчетныйСчет") ИЛИ ТипЗначенияОбъекта = Тип("ДокументОбъект.ПриходныйКассовыйОрдер") Тогда ИмяРеквизитаСубконто = "СубконтоКт"; ИначеЕсли ТипЗначенияОбъекта = Тип("ДокументОбъект.СписаниеСРасчетногоСчета") ИЛИ ТипЗначенияОбъекта = Тип("ДокументОбъект.РасходныйКассовыйОрдер") Тогда ИмяРеквизитаСубконто = "СубконтоДт"; КонецЕсли; Для Каждого СтрокаВидаСубконто Из Объект.СчетУчетаРасчетовСКонтрагентом.ВидыСубконто Цикл ТипЗначенияСубконто = СтрокаВидаСубконто.ВидСубконто.ТипЗначения; Если ТипЗначенияСубконто.СодержитТип(ТипЗнч(СтатьяДоходовРасходов)) Тогда Объект[ИмяРеквизитаСубконто + СтрокаВидаСубконто.НомерСтроки] = СтатьяДоходовРасходов; КонецЕсли; КонецЦикла; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ЗаполнитьСчетаУчетаВозвратнойТары" ИспользуетсяПриЗагрузке="true"> <Текст>Для Каждого СтрокаТаблицы Из Объект.ВозвратнаяТара Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; <Параметры>Объект <Алгоритм Имя="ЗаполнитьСчетаУчетаНоменклатурыОтчетКомиссионера" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта // - ТабличнаяЧасть Для Каждого СтрокаТаблицы Из ТабличнаяЧасть Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры(Объект.Организация, СтрокаТаблицы.Номенклатура); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетПередачи; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СтрокаТаблицы.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетРасходов) Тогда СтрокаТаблицы.СчетРасходов = СчетаУчета.СчетРасходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДСПоРеализации) Тогда СтрокаТаблицы.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если СтрокаТаблицы.СчетДоходов.ВидыСубконто.Количество() > 0 Тогда СтрокаТаблицы.Субконто = Новый(СтрокаТаблицы.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]); Если ТипЗнч(СтрокаТаблицы.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") Тогда СтрокаТаблицы.Субконто = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта, ТабличнаяЧасть <Алгоритм Имя="ЗаполнитьСчетаУчетаНоменклатурыПродажа" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // - ТабличнаяЧасть // - ЭтоУслуги // - ЕстьКомиссия Для Каждого СтрокаТаблицы Из ТабличнаяЧасть Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЭтоУслуги И Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; Если ЕстьКомиссия Тогда СтрокаТаблицы.ПереданныеСчетУчета = СчетаУчета.СчетПередачи; КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СтрокаТаблицы.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетРасходов) Тогда СтрокаТаблицы.СчетРасходов = СчетаУчета.СчетРасходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДСПоРеализации) Тогда СтрокаТаблицы.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если СтрокаТаблицы.СчетДоходов.ВидыСубконто.Количество() > 0 Тогда СтрокаТаблицы.Субконто = Новый(СтрокаТаблицы.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]); Если ТипЗнч(СтрокаТаблицы.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") Тогда СтрокаТаблицы.Субконто = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта, ТабличнаяЧасть, ЭтоУслуги, ЕстьКомиссия <Алгоритм Имя="ЗаполнитьСчетИнкассации" ИспользуетсяПриЗагрузке="true"> <Текст>МассивСчетовОтбора = Новый Массив; МассивСчетовОтбора.Добавить(ПланыСчетов.Хозрасчетный.ПереводыВПути_); МассивСчетовИсключений = Новый Массив; МассивСчетовИсключений.Добавить(ПланыСчетов.Хозрасчетный.ПриобретениеИностраннойВалюты); МассивСчетовИсключений.Добавить(ПланыСчетов.Хозрасчетный.РеализацияИностраннойВалюты); МассивСчетовИсключений.Добавить(ПланыСчетов.Хозрасчетный.ПродажиПоПлатежнымКартам); Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда СчетОтбораПоПризнакуВалютный = Объект.СчетКасса; Иначе СчетОтбораПоПризнакуВалютный = Объект.СчетБанк; КонецЕсли; Запрос = Новый Запрос; Запрос.УстановитьПараметр("МассивСчетовОтбора", МассивСчетовОтбора); Запрос.УстановитьПараметр("МассивСчетовИсключений", МассивСчетовИсключений); Запрос.УстановитьПараметр("ОтбиратьПоПризнакуВалютный", Истина); Если ТипЗнч(СчетОтбораПоПризнакуВалютный) = Тип("ПланСчетовСсылка.Хозрасчетный") Тогда Запрос.УстановитьПараметр("Валютный", СчетОтбораПоПризнакуВалютный.Валютный); Иначе Запрос.УстановитьПараметр("Валютный", Ложь); КонецЕсли; Запрос.Текст = "ВЫБРАТЬ | Хозрасчетный.Ссылка КАК Счет, | Хозрасчетный.Код КАК Код, | Хозрасчетный.Наименование КАК Наименование |ИЗ | ПланСчетов.Хозрасчетный КАК Хозрасчетный |ГДЕ | Хозрасчетный.Ссылка В ИЕРАРХИИ (&МассивСчетовОтбора) | И (НЕ Хозрасчетный.ЗапретитьИспользоватьВПроводках) | И (НЕ &ОтбиратьПоПризнакуВалютный | ИЛИ Хозрасчетный.Валютный = &Валютный) | И Хозрасчетный.Ссылка Не В (&МассивСчетовИсключений) | |УПОРЯДОЧИТЬ ПО | Код"; Результат = Запрос.Выполнить().Выбрать(); Если Результат.Следующий() Тогда Объект.СчетУчетаРасчетовСКонтрагентом = Результат.Счет; Если Объект.РасшифровкаПлатежа.Количество() > 0 Тогда Объект.РасшифровкаПлатежа[0].СчетУчетаРасчетовСКонтрагентом = Результат.Счет; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ЗаполнитьСчетНаличныхДенежныхСредствПоУмолчанию" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта Если НЕ ЗначениеЗаполнено(Объект.ВалютаДокумента) Или Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Объект.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизации; Иначе Объект.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизацииВал; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ЗаполнитьСчетУчетаБанка" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта // - СчУчета Если Не ЗначениеЗаполнено(Объект.ВалютаДокумента) Или Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Если СчУчета = Неопределено Тогда Если Не ЗначениеЗаполнено(Объект.СчетБанк) Тогда Объект.СчетБанк = ПланыСчетов.Хозрасчетный.РасчетныеСчета; КонецЕсли; Иначе Если Не ЗначениеЗаполнено(Объект[СчУчета]) Тогда Объект[СчУчета] = ПланыСчетов.Хозрасчетный.РасчетныеСчета; КонецЕсли; КонецЕсли; Иначе Если СчУчета = Неопределено Тогда Если Не ЗначениеЗаполнено(Объект.СчетБанк) Тогда Объект.СчетБанк = ПланыСчетов.Хозрасчетный.ВалютныеСчета; КонецЕсли; Иначе Если Не ЗначениеЗаполнено(Объект[СчУчета]) Тогда Объект[СчУчета] = ПланыСчетов.Хозрасчетный.ВалютныеСчета; КонецЕсли; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта, СчУчета <Алгоритм Имя="ЗаполнитьСчетУчетаКассы" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Если Не ЗначениеЗаполнено(Объект.СчетКасса) Тогда Если Не ЗначениеЗаполнено(Объект.ВалютаДокумента) ИЛИ Объект.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить() Тогда Объект.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизации; Иначе Объект.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизацииВал; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Перемещение"> <Алгоритм Имя="ОбработатьПеремещениеТоваров" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта ЕстьЕНВД = УчетнаяПолитика.ПлательщикЕНВД(Объект.Организация, Объект.Дата) И УчетнаяПолитика.РозничнаяТорговляОблагаетсяЕНВД(Объект.Организация, Объект.Дата); Если (Объект.СкладПолучатель.ТипСклада = Перечисления.ТипыСкладов.НеавтоматизированнаяТорговаяТочка Или Объект.СкладПолучатель.ТипСклада = Перечисления.ТипыСкладов.РозничныйМагазин) И ЕстьЕНВД Тогда СтатьяЗатратПоУмолчанию = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходыЕНВД; Иначе СтатьяЗатратПоУмолчанию = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходы; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетСписанияНДС) Тогда Объект.СчетСписанияНДС = ПланыСчетов.Хозрасчетный.ИздержкиОбращения; КонецЕсли; СубконтоСтатьяЗатрат = Объект.СчетСписанияНДС.ВидыСубконто.Найти(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.СтатьиЗатрат); Если СубконтоСтатьяЗатрат <> Неопределено Тогда Если Не ЗначениеЗаполнено(Объект["СубконтоСписанияНДС" + СубконтоСтатьяЗатрат.НомерСтроки]) Тогда Объект["СубконтоСписанияНДС" + СубконтоСтатьяЗатрат.НомерСтроки] = СтатьяЗатратПоУмолчанию; КонецЕсли; КонецЕсли; Для Каждого СтрокаТаблицы Из Объект.Товары Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.СкладОтправитель); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.СкладПолучатель); Если Не ЗначениеЗаполнено(СтрокаТаблицы.НовыйСчетУчета) Тогда СтрокаТаблицы.НовыйСчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; Для Каждого СтрокаТаблицы Из Объект.ТоварыНаКомиссии Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.СкладОтправитель); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.СкладПолучатель); Если Не ЗначениеЗаполнено(СтрокаТаблицы.НовыйСчетУчета) Тогда СтрокаТаблицы.НовыйСчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_ПоступлениеТоваров"> <Алгоритм Имя="ОбработатьЗагруженныеГТДИмпорт" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Или ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНУ) Тогда Склад = Неопределено; Если ЗначениеЗаполнено(СтрокаТаблицы.ДокументПартии) Тогда Склад = СтрокаТаблицы.ДокументПартии.Склад; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Склад); Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетНДСТаможни; КонецЕсли; Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНУ) Тогда СтрокаТаблицы.СчетУчетаНУ = СчетаУчета.СчетУчета; КонецЕсли; КонецЕсли; КонецЦикла; Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагентаРегл); Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если НЕ ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентомВал) И ЗначениеЗаполнено(Объект.ДоговорКонтрагента) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Объект.СчетУчетаРасчетовСКонтрагентомВал = СчетаУчета.СчетРасчетов; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьКорректировкиПоступления" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Если Объект.Товары.Количество()>0 Тогда ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; Если Объект.Услуги.Количество()>0 Тогда ТабличнаяЧасть = Объект.Услуги; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; КонецЦикла; Для Каждого СтрокаТаблицы Из Объект.Услуги Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Если ЗначениеЗаполнено(СтрокаТаблицы.СуммаНДС) И Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымУслугам; КонецЕсли; Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатрат) Тогда СтрокаТаблицы.СчетЗатрат = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто1) Тогда СтрокаТаблицы.Субконто1 = СчетаУчета.Субконто1; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто2) Тогда СтрокаТаблицы.Субконто2 = СчетаУчета.Субконто2; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто3) Тогда СтрокаТаблицы.Субконто3 = СчетаУчета.Субконто3; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатратНУ) Тогда СтрокаТаблицы.СчетЗатратНУ = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ1) Тогда СтрокаТаблицы.СубконтоНУ1 = СчетаУчета.Субконто1; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ2) Тогда СтрокаТаблицы.СубконтоНУ2 = СчетаУчета.Субконто2; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ3) Тогда СтрокаТаблицы.СубконтоНУ3 = СчетаУчета.Субконто3; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; // Установка типа у субконто БУ ЧислоАктивныхСубконто = СтрокаТаблицы.СчетЗатрат.ВидыСубконто.Количество(); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СтрокаТаблицы.СчетЗатрат.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]) <> СтрокаТаблицы["Субконто" + Сч] Тогда СтрокаТаблицы["Субконто" + Сч] = ТипСубк.ПривестиЗначение(СтрокаТаблицы["Субконто" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не СтрокаТаблицы["Субконто" + Сч] = Неопределено Тогда СтрокаТаблицы["Субконто" + Сч] = Неопределено; КонецЕсли; КонецЦикла; // Установка типа у субконто НУ ЧислоАктивныхСубконто = СтрокаТаблицы.СчетЗатратНУ.ВидыСубконто.Количество(); Для Сч = 1 По ЧислоАктивныхСубконто Цикл ТипСубк = СтрокаТаблицы.СчетЗатратНУ.ВидыСубконто[Сч - 1].ВидСубконто.ТипЗначения; Если ТипСубк.ПривестиЗначение(СтрокаТаблицы["СубконтоНУ" + Сч]) <> СтрокаТаблицы["СубконтоНУ" + Сч] Тогда СтрокаТаблицы["СубконтоНУ" + Сч] = ТипСубк.ПривестиЗначение(СтрокаТаблицы["СубконтоНУ" + Сч]); КонецЕсли; КонецЦикла; Для Сч = (ЧислоАктивныхСубконто + 1) По 3 Цикл Если Не СтрокаТаблицы["СубконтоНУ" + Сч] = Неопределено Тогда СтрокаТаблицы["СубконтоНУ" + Сч] = Неопределено; КонецЕсли; КонецЦикла; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьКорректировкуПоступленияСФ" ИспользуетсяПриЗагрузке="true"> <Текст>ДокументПоступления = ПараметрыОбъекта["ДокументПоступления"]; Если ОбщегоНазначения.СсылкаСуществует(ДокументПоступления) Тогда Если Объект.Метаданные().ВводитсяНаОсновании.Содержит(ДокументПоступления.Метаданные()) Тогда Объект.Заполнить(ДокументПоступления); Иначе // Заполняем только документ реализации и документ-основание, чтобы сохранить структуру подчиненности Объект.ДокументПоступления = ПараметрыОбъекта["ДокументПоступления"]; Объект.ИсправляемыйДокументПоступления = ПараметрыОбъекта["ИсправляемыйДокументПоступления"]; КонецЕсли; Объект.КорректироватьБУиНУ = Ложь; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьПоступлениеДопРасходов" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; Если Объект.Товары.Количество()>0 Тогда ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; //Заполним табличную часть "Товары" Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.ОтражениеВУСН) Тогда СтрокаТаблицы.ОтражениеВУСН = Перечисления.ОтражениеВУСН.Принимаются; КонецЕсли; // Заполнение счетов учета номенклатуры Склад = Неопределено; Если ЗначениеЗаполнено(СтрокаТаблицы.ДокументПартии) И ОбщегоНазначенияБПВызовСервера.ЕстьРеквизитДокумента("Склад", СтрокаТаблицы.ДокументПартии.Метаданные()) Тогда Склад = СтрокаТаблицы.ДокументПартии.Склад; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымУслугам; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНУ) Тогда СтрокаТаблицы.СчетУчетаНУ = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; Если ПараметрыОбъекта <> Неопределено Тогда Если Не Объект.НДСВключенВСтоимость И ПараметрыОбъекта["ЭтоЕНВД"] Тогда Объект.НДСВключенВСтоимость = Истина; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьПоступлениеТоваров" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); ВидДоговораКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора"); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовСКомитентом; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Если Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку Или ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоТаре) Тогда Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТары; КонецЕсли; //Заполним табличную часть "Товары" Для Каждого СтрокаТаблицы Из Объект.Товары Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ПокупкаКомиссия И ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора") = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда Если СчетаУчета.СчетУчетаЯвляетсяЗабалансовым Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; Иначе СтрокаТаблицы.СчетУчета = ПланыСчетов.Хозрасчетный.ТоварыНаСкладе; КонецЕсли; КонецЕсли; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку Тогда Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчетаДавСырья; КонецЕсли; Иначе Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда Если СчетаУчета.СчетУчетаЯвляетсяЗабалансовым <> Истина Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; Иначе СтрокаТаблицы.СчетУчета = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); КонецЕсли; СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; КонецЕсли; КонецЦикла; Если Объект.Товары.Количество()>0 Тогда ТабличнаяЧасть = Объект.Товары; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; //Заполним табличную часть "Услуги" Для Каждого СтрокаТаблицы Из Объект.Услуги Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.Номенклатура) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатрат) Тогда СтрокаТаблицы.СчетЗатрат = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДС) Тогда СтрокаТаблицы.СчетУчетаНДС = СчетаУчета.СчетУчетаНДС; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто1) Тогда СтрокаТаблицы.Субконто1 = СчетаУчета.Субконто1; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто2) Тогда СтрокаТаблицы.Субконто2 = СчетаУчета.Субконто2; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.Субконто3) Тогда СтрокаТаблицы.Субконто3 = СчетаУчета.Субконто3; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетЗатратНУ) Тогда СтрокаТаблицы.СчетЗатратНУ = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ1) Тогда СтрокаТаблицы.СубконтоНУ1 = СчетаУчета.Субконто1; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ2) Тогда СтрокаТаблицы.СубконтоНУ2 = СчетаУчета.Субконто2; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СубконтоНУ3) Тогда СтрокаТаблицы.СубконтоНУ3 = СчетаУчета.Субконто3; КонецЕсли; КонецЦикла; Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком И Объект.ВозвратнаяТара.Количество() = 0 Тогда Если Объект.Товары.Количество() > 0 И Объект.Услуги.Количество() = 0 Тогда Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.Товары; ИначеЕсли Объект.Товары.Количество() = 0 И Объект.Услуги.Количество() > 0 Тогда Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.Услуги; КонецЕсли; КонецЕсли; Если Объект.Услуги.Количество()>0 Тогда ТабличнаяЧасть = Объект.Услуги; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); КонецЕсли; Если ПараметрыОбъекта <> Неопределено Тогда Если Не Объект.НДСВключенВСтоимость И ПараметрыОбъекта["ЭтоЕНВД"] Тогда Объект.НДСВключенВСтоимость = Истина; КонецЕсли; КонецЕсли; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьСчетаФактурыПолученныеПереопределяемый" ИспользуетсяПриЗагрузке="true"> <Текст>Если ПараметрыОбъекта["ПризнакНового"] И Не ПараметрыОбъекта["НеОтражатьНДСКВычету"] Тогда СтруктураПараметров = Новый Структура("Дата, Организация, ВидСчетаФактуры, ДокументОснование, Исправление"); ЗаполнитьЗначенияСвойств(СтруктураПараметров, Объект); Объект.НДСПредъявленКВычету = Документы.СчетФактураПолученный.ПолучитьПорядокОтраженияВычетаПоУмолчанию(СтруктураПараметров); КонецЕсли; Если ЗначениеЗаполнено(Объект.ДокументОснование) И ОбщегоНазначения.СсылкаСуществует(Объект.ДокументОснование) Тогда ПараметрыСФ = УчетНДСПереопределяемый.ПолучитьПараметрыСчетаФактуры(Объект.Ссылка); ЗаполнитьЗначенияСвойств(Объект, ПараметрыСФ, "Контрагент, |СуммаУвеличение, |СуммаУменьшение, |СуммаНДСУвеличение, |СуммаНДСУменьшение, |СчетФактураБезНДС"); Объект.ДоговорКонтрагента = ПараметрыСФ.Договор; Если Не ЗначениеЗаполнено(Объект.СуммаДокумента) Тогда ЗаполнитьЗначенияСвойств(Объект, ПараметрыСФ, "СуммаДокумента, |СуммаНДСДокумента"); КонецЕсли; Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.КорректировкаПоступления") Тогда ИсправляемыйДокументПоступления = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДокументОснование, "ИсправляемыйДокументПоступления"); РезультатПоискаИсправляемыйСчетФактура = УчетНДСПереопределяемый.НайтиПодчиненныйСчетФактуруПолученный(ИсправляемыйДокументПоступления); Если РезультатПоискаИсправляемыйСчетФактура = Неопределено Тогда РезультатПоискаИсправляемыйСчетФактура = Документы.СчетФактураВыданный.ПустаяСсылка(); КонецЕсли; Иначе РезультатПоискаИсправляемыйСчетФактура = Документы.СчетФактураПолученный.ПустаяСсылка(); КонецЕсли; Если Объект.ИсправляемыйСчетФактура <> РезультатПоискаИсправляемыйСчетФактура Тогда Объект.ИсправляемыйСчетФактура = РезультатПоискаИсправляемыйСчетФактура; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Группа Имя="_Реализация"> <Алгоритм Имя="ОбработатьЗагруженныеОтчетыОРозничныхПродажах" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Если ЗначениеЗаполнено(ПараметрыОбъекта["СтатьяДвиженияДенежныхСредств"]) Тогда Объект.СтатьяДвиженияДенежныхСредств = ПараметрыОбъекта["СтатьяДвиженияДенежныхСредств"]; КонецЕсли; Выполнить(Алгоритмы.ЗаполнитьСчетУчетаКассы); ТабличнаяЧасть = Объект.Товары; ЭтоУслуги = Ложь; ЕстьКомиссия = Ложь; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаНоменклатурыПродажа); Для Каждого СтрокаТаблицы Из Объект.Оплата Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТаблицы.Контрагент, СтрокаТаблицы.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаРасчетов) Тогда Если Не ЗначениеЗаполнено(СтрокаТаблицы.ВидОплаты.СчетУчетаРасчетов) Тогда СтрокаТаблицы.СчетУчетаРасчетов = СчетаУчета.СчетРасчетов; Иначе СтрокаТаблицы.СчетУчетаРасчетов = СтрокаТаблицы.ВидОплаты.СчетУчетаРасчетов; КонецЕсли; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьКорректировкиРеализации" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Объект // - ПараметрыОбъекта Для Каждого СтрокаТаблицы Из Объект.Товары Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СтрокаТаблицы.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетРасходов) Тогда СтрокаТаблицы.СчетРасходов = СчетаУчета.СчетРасходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДСПоРеализации) Тогда СтрокаТаблицы.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если СтрокаТаблицы.СчетДоходов.ВидыСубконто.Количество() > 0 Тогда СтрокаТаблицы.Субконто = Новый(СтрокаТаблицы.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]); Если ТипЗнч(СтрокаТаблицы.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") Тогда СтрокаТаблицы.Субконто = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; КонецЦикла; Для Каждого СтрокаТаблицы Из Объект.Услуги Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетДоходов) Тогда СтрокаТаблицы.СчетДоходов = СчетаУчета.СчетДоходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетРасходов) Тогда СтрокаТаблицы.СчетРасходов = СчетаУчета.СчетРасходов; КонецЕсли; Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчетаНДСПоРеализации) Тогда СтрокаТаблицы.СчетУчетаНДСПоРеализации = СчетаУчета.СчетУчетаНДСПродажи; КонецЕсли; Если СтрокаТаблицы.СчетДоходов.ВидыСубконто.Количество() > 0 Тогда СтрокаТаблицы.Субконто = Новый(СтрокаТаблицы.СчетДоходов.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]); Если ТипЗнч(СтрокаТаблицы.Субконто) = Тип("СправочникСсылка.НоменклатурныеГруппы") Тогда СтрокаТаблицы.Субконто = СтрокаТаблицы.Номенклатура.НоменклатурнаяГруппа; КонецЕсли; Иначе СтрокаТаблицы.Субконто = Неопределено; КонецЕсли; КонецЦикла; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьКорректировкуРеализацииСФ" ИспользуетсяПриЗагрузке="true"> <Текст> ДокументРеализации = ПараметрыОбъекта["ДокументРеализации"]; Если ОбщегоНазначения.СсылкаСуществует(ДокументРеализации) Тогда Если Объект.Метаданные().ВводитсяНаОсновании.Содержит(ДокументРеализации.Метаданные()) Тогда Объект.Заполнить(ДокументРеализации); Иначе // Заполняем только документ реализации и документ-основание, чтобы сохранить структуру подчиненности Объект.ДокументРеализации = ПараметрыОбъекта["ДокументРеализации"]; Объект.ИсправляемыйДокументРеализации = ПараметрыОбъекта["ИсправляемыйДокументРеализации"]; КонецЕсли; Объект.КорректироватьБУиНУ = Ложь; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьРеализацияТоваров" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); ВидДоговораКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора"); Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Или Объект.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.ОтгрузкаБезПереходаПраваСобственности Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если (Объект.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.Автоматически) Или (Объект.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.ПоДокументу) Тогда Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; Иначе Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); КонецЕсли; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоТаре) Тогда Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТарыПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасходовПоТаре) Тогда Объект.СчетУчетаРасходовПоТаре = СчетаУчета.СчетУчетаРасходовПоТаре; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаДоходовПоТаре) Тогда Объект.СчетУчетаДоходовПоТаре = СчетаУчета.СчетУчетаДоходовПоТаре; КонецЕсли; ТабличнаяЧасть = Объект.Товары; ЭтоУслуги = Ложь; ЕстьКомиссия = Истина; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаНоменклатурыПродажа); ТабличнаяЧасть = Объект.Услуги; ЭтоУслуги = Истина; ЕстьКомиссия = Ложь; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаНоменклатурыПродажа); Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем И Объект.ВозвратнаяТара.Количество() = 0 Тогда Если Объект.Товары.Количество() > 0 И Объект.Услуги.Количество() = 0 Тогда Объект.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.Товары; ИначеЕсли Объект.Товары.Количество() = 0 И Объект.Услуги.Количество() > 0 Тогда Объект.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.Услуги; КонецЕсли; КонецЕсли; Выполнить(Алгоритмы.ЗаполнитьСчетаУчетаВозвратнойТары); <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьСчетаФактурыВыданныеПереопределяемый" ИспользуетсяПриЗагрузке="true"> <Текст>Если ЗначениеЗаполнено(Объект.ДокументОснование) И ОбщегоНазначения.СсылкаСуществует(Объект.ДокументОснование) Тогда ПараметрыСФ = УчетНДСПереопределяемый.ПолучитьПараметрыСчетаФактуры(Объект.Ссылка); ЗаполнитьЗначенияСвойств(Объект, ПараметрыСФ, "Контрагент, |СуммаДокумента, |СуммаУвеличение, |СуммаУменьшение, |СуммаНДСУвеличение, |СуммаНДСУменьшение, |СуммаНДСДокумента, |СчетФактураБезНДС"); Объект.ДоговорКонтрагента = ПараметрыСФ.Договор; Если ТипЗнч(Объект.ДокументОснование) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИсправляемыйДокументРеализации = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДокументОснование, "ИсправляемыйДокументРеализации"); РезультатПоискаИсправляемыйСчетФактура = УчетНДСПереопределяемый.НайтиПодчиненныйСчетФактуруВыданныйНаРеализацию(ИсправляемыйДокументРеализации); Если РезультатПоискаИсправляемыйСчетФактура = Неопределено Тогда РезультатПоискаИсправляемыйСчетФактура = Документы.СчетФактураВыданный.ПустаяСсылка(); КонецЕсли; Иначе РезультатПоискаИсправляемыйСчетФактура = Документы.СчетФактураПолученный.ПустаяСсылка(); КонецЕсли; Если Объект.ИсправляемыйСчетФактура <> РезультатПоискаИсправляемыйСчетФактура Тогда Объект.ИсправляемыйСчетФактура = РезультатПоискаИсправляемыйСчетФактура; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ЗаполнениеОтражениеВУСН" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта // - ТабличнаяЧасть Если УчетнаяПолитика.Существует(Объект.Организация, Объект.Дата, Истина, Объект.Ссылка) Тогда Если ПараметрыОбъекта = Неопределено Тогда ВариантОтраженияУСН = ?(УчетнаяПолитика.ПрименяетсяУСН(Объект.Организация, Объект.Дата) И УчетнаяПолитика.ПрименяетсяУСНДоходыМинусРасходы(Объект.Организация, Объект.Дата), Перечисления.ОтражениеВУСН.Принимаются, Перечисления.ОтражениеВУСН.ПустаяСсылка()); Иначе ПрименяетсяУСН = УчетнаяПолитика.ПрименяетсяУСН(Объект.Организация, Объект.Дата); Если ПрименяетсяУСН И УчетнаяПолитика.ОбъектНалогообложенияУСН(Объект.Организация, Объект.Дата) = Перечисления.ОбъектыНалогообложенияПоУСН.ДоходыМинусРасходы Тогда ВариантОтраженияУСН = ?(ПараметрыОбъекта["ЭтоЕНВД"], Перечисления.ОтражениеВУСН.НеПринимаются, Перечисления.ОтражениеВУСН.Принимаются); Иначе ВариантОтраженияУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка(); КонецЕсли; Если ПрименяетсяУСН Или ПараметрыОбъекта["ЭтоЕНВД"] Тогда Объект.НДСВключенВСтоимость = Истина; КонецЕсли; КонецЕсли; // Заполняем отражение в УСН для ТЧ Для Каждого СтрокаТаблицы Из ТабличнаяЧасть Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.ОтражениеВУСН) Или ВариантОтраженияУСН = Перечисления.ОтражениеВУСН.ПустаяСсылка() Тогда СтрокаТаблицы.ОтражениеВУСН = ВариантОтраженияУСН; КонецЕсли; КонецЦикла; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта, ТабличнаяЧасть <Алгоритм Имя="ЗаполнениеОтражениеНДСВСтоимости" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта Если УчетнаяПолитика.Существует(Объект.Организация, Объект.Дата, Истина, Объект.Ссылка) Тогда Если УчетнаяПолитика.ПрименяетсяУСН(Объект.Организация,Объект.Дата) Тогда Объект.НДСВключенВСтоимость = Истина; КонецЕсли; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ПолучитьПодразделениеОрганизацииПоУмолчанию" ИспользуетсяПриЗагрузке="true"> <Текст> // Параметры: // - Организация ТекПользователь = Пользователи.ТекущийПользователь(); Если ЗначениеЗаполнено(Организация) Тогда ПодразделениеОрганизации = ОбщегоНазначенияБПВызовСервера.ПолучитьЗначениеПоУмолчанию("ОсновноеПодразделениеОрганизации",ТекПользователь); Если ЗначениеЗаполнено(ПодразделениеОрганизации) Тогда Запрос = Новый Запрос(); Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ | ПодразделенияОрганизаций.Владелец КАК ОрганизацияВладелец |ИЗ | Справочник.ПодразделенияОрганизаций КАК ПодразделенияОрганизаций |ГДЕ | ПодразделенияОрганизаций.Ссылка = &Ссылка | И ПодразделенияОрганизаций.Владелец = &Владелец"; Запрос.УстановитьПараметр("Ссылка", ПодразделениеОрганизации); Запрос.УстановитьПараметр("Владелец", Организация); Если Запрос.Выполнить().Пустой() Тогда ПодразделениеОрганизации = Неопределено; КонецЕсли; КонецЕсли; КонецЕсли; <Параметры>Организация <Группа Имя="_ОбработкаОбъектовПослеЗагрузкиДанных"> <Алгоритм Имя="ЗаполнениеДокументовОтложенное" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ИмяПКО // - ПараметрыОбъекта Попытка Если ИмяПКО = "ВНО_ВводНачальныхОстатковТоваров" Тогда ТабличнаяЧасть = Объект.НоменклатураНаСкладе; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ИначеЕсли ИмяПКО = "ВНО_ОстаткиТоваровПереданныхНаКомиссию" Тогда ТабличнаяЧасть = Объект.МПЗОтгруженные; Выполнить(Алгоритмы.ЗаполнениеОтражениеВУСН); ИначеЕсли ИмяПКО = "CЗ_СписаниеЗадолженности" Тогда Если Объект.ДебиторскаяЗадолженность.Количество()>0 Тогда ТабличнаяЧасть = Объект.ДебиторскаяЗадолженность; Выполнить(Алгоритмы.ОбработатьТабличнуюЧастьДокументКорректировкаДолга); КонецЕсли; Если Объект.КредиторскаяЗадолженность.Количество()>0 Тогда ТабличнаяЧасть = Объект.КредиторскаяЗадолженность; Выполнить(Алгоритмы.ОбработатьТабличнуюЧастьДокументКорректировкаДолга); КонецЕсли; ИначеЕсли ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиНашаОрганизация" ИЛИ ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияКредитор" ИЛИ ИмяПКО = "ВЗ_ВзаимозачетЗадолженностиОрганизацияДебитор" ИЛИ ИмяПКО = "ОППК_ОперацияПоПлатежнойКартеПоступление" ИЛИ ИмяПКО = "ОППВ_ОперацияПоПлатежнойКартеВозврат" ИЛИ ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_ПоКарте" ИЛИ ИмяПКО = "ВПС_ВозвратОплатыКлиенту_ПоКарте" Тогда Выполнить(Алгоритмы.ОбработатьДокументКорректировкаДолга); ИначеЕсли ИмяПКО = "ПБДС_ПоступлениеИзДругойОрганизации" ИЛИ ИмяПКО = "ПБДС_ВозвратДСИзДругойОрганизации" ИЛИ ИмяПКО = "ПБДС_ПоступлениеОтКлиентаБезналичныхДС" ИЛИ ИмяПКО = "ПБДС_ВозвратОтПоставщикаБезналичныхДС" ИЛИ ИмяПКО = "ПБДС_ПрочиеРасчетыСКонтрагентами" ИЛИ ИмяПКО = "ПБДС_ПоступленияОтПродажиИностраннойВалюты" ИЛИ ИмяПКО = "ПБДС_ПриобретениеИностраннойВалюты" ИЛИ ИмяПКО = "ПБДС_РасчетыПоКредитамИЗаймам" ИЛИ ИмяПКО = "СБДС_ПеречислениеДСВДругуюОрганизацию" ИЛИ ИмяПКО = "СБДС_ВозвратДСВДругуюОрганизацию" ИЛИ ИмяПКО = "СБДС_ОплатаПоставщикуБезналичныеДС" ИЛИ ИмяПКО = "СБДС_ВозвратПокупателюБезналичныеДС" ИЛИ ИмяПКО = "СБДС_ПрочиеРасчетыСКонтрагентами" ИЛИ ИмяПКО = "СБДС_ПеречислениеНаДругойРСБезналичныхДС" ИЛИ ИмяПКО = "СБДС_ПеречислениеПодотчетномуЛицу" ИЛИ ИмяПКО = "ОБОЭ_ОтчетБанкаПоОперациямЭквайринга" ИЛИ ИмяПКО = "СБДС_РасчетыПоКредитамИЗаймам" ИЛИ ИмяПКО = "СБДС_ТаможенныйПлатеж" Тогда Выполнить(Алгоритмы.ОбработатьДокументыБДДС); ИначеЕсли ИмяПКО = "ПКО_ПоступлениеДСИзДругойОрганизации" ИЛИ ИмяПКО = "ПКО_ВозвратДСИзДругойОрганизации" ИЛИ ИмяПКО = "ПКО_ПоступлениеДСОтКлиента" ИЛИ ИмяПКО = "ПКО_ВозвратДСОтПоставщика" ИЛИ ИмяПКО = "ПКО_РасчетыПоКредитамИЗаймам" ИЛИ ИмяПКО = "РКО_ВыдачаДСВДругуюОрганизацию" ИЛИ ИмяПКО = "РКО_ВозвратДСВДругуюОрганизацию" ИЛИ ИмяПКО = "РКО_ОплатаПоставщику" ИЛИ ИмяПКО = "РКО_ВозвратДСПокупателю" ИЛИ ИмяПКО = "РКО_РасчетыПоКредитамИЗаймам" ИЛИ ИмяПКО = "РПС_ПоступлениеОплатыОтКлиента_Нал" ИЛИ ИмяПКО = "ВПС_ВозвратОплатыКлиенту_Нал" Тогда Выполнить(Алгоритмы.ОбработатьДокументыНДДС); ИначеЕсли ИмяПКО = "ПКО_ПоступлениеРозничнойВыручки" Тогда Объект.ВыручкаСНТТ = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.Контрагент, "ТипСклада") = Перечисления.ТипыСкладов.НеавтоматизированнаяТорговаяТочка; Выполнить(Алгоритмы.ОбработатьДокументыНДДС); ИначеЕсли ИмяПКО = "ОКОП_ОтчетКомиссионераОПродажах" ИЛИ ИмяПКО = "ОКОПМО_ОтчетКомиссионераОПродажах" ИЛИ ИмяПКО = "ОКОС_ОтчетКомиссионераОСписании" Тогда Выполнить(Алгоритмы.ОтчетКомиссионераОПродажах); ИначеЕсли ИмяПКО = "ОКТОП_ОтчетКомитентуОПродажах" ИЛИ ИмяПКО = "ОКТОПМО_ОтчетКомитентуОПродажах" ИЛИ ИмяПКО = "ОКТОC_ОтчетКомитентуОСписании" Тогда Выполнить(Алгоритмы.ОтчетКомитентуОПродажах); ИначеЕсли ИмяПКО = "ПТУ_РасхожденияВВозврат" ИЛИ ИмяПКО = "ВТП_ВозвратТоваровКомитенту" ИЛИ ИмяПКО = "ВТМО_ВозвратПоставщику" ИЛИ ИмяПКО = "ВТМО_ВозвратКомитенту" ИЛИ ИмяПКО = "ВТП_ВозвратТоваровПоставщику" Тогда Выполнить(Алгоритмы.ОбработатьВозвратТоваровПоставщику); ИначеЕсли ИмяПКО = "ПТУ_РасхожденияВСписание" ИЛИ ИмяПКО = "КорректировкаПоступления_СписаниеТоваров" ИЛИ ИмяПКО = "КорректировкаРеализации_СписаниеТоваров" ИЛИ ИмяПКО = "СРТС_СписаниеТоваровПриСборкеРазборке" ИЛИ ИмяПКО = "ПорчаТоваровВСписаниеТоваров" ИЛИ ИмяПКО = "ВПТ_СписаниеТоваровПриПередачеВПроизводство" ИЛИ ИмяПКО = "СПТ_СписаниеТоваров" ИЛИ ИмяПКО = "ПТ_ПересортицаТоваровСписание" Тогда Выполнить(Алгоритмы.ОбработатьДокументыСписания); ИначеЕсли ИмяПКО = "ПТУ_ЗакупкаТоваровУслуг" ИЛИ ИмяПКО = "ПУВА_ПоступлениеУслуг" ИЛИ ИмяПКО = "ПДТ_ПередачаТоваровПокупка" ИЛИ ИмяПКО = "ПТУ_ЗакупкаИмпорт" ИЛИ ИмяПКО = "ПТУ_ПриемНаКомиссию" ИЛИ ИмяПКО = "ПДТ_ПередачаТоваровПриемНаКомиссию" Тогда Выполнить(Алгоритмы.ОбработатьПоступлениеТоваров); ИначеЕсли ИмяПКО = "ПТУ_ПоступлениеДопРасходов" ИЛИ ИмяПКО = "ПУВА_ПоступлениеДопРасходов" Тогда Выполнить(Алгоритмы.ОбработатьПоступлениеДопРасходов); ИначеЕсли ИмяПКО = "КорректировкаПриобретения_КорректировкаПоступления" Тогда Выполнить(Алгоритмы.ОбработатьКорректировкиПоступления); ИначеЕсли ИмяПКО = "КорректировкаПоступления_ОприходованиеТоваров" ИЛИ ИмяПКО = "ПорчаТоваровВОприходованиеТоваров" ИЛИ ИмяПКО = "ПТ_ПересортицаТоваровОприходование" ИЛИ ИмяПКО = "ОТ_ОприходованиеТоваров" ИЛИ ИмяПКО = "ПТУ_РасхожденияВОприходование" ИЛИ ИмяПКО = "КорректировкаРеализации_ОприходованиеТоваров" Тогда Выполнить(Алгоритмы.ОбработатьДокументОприходование); ИначеЕсли ИмяПКО = "ТаможеннаяДекларацияИмпорт_ГТДИмпорт" Тогда Выполнить(Алгоритмы.ОбработатьЗагруженныеГТДИмпорт); ИначеЕсли ИмяПКО = "ОРП_ОтчетОРозничныхПродажах" Тогда Выполнить(Алгоритмы.ОбработатьЗагруженныеОтчетыОРозничныхПродажах); ИначеЕсли ИмяПКО = "РТУ_ПродажаТоваровУслуг" ИЛИ ИмяПКО = "ВыполнениеРабот_РеализацияТоваровУслуг" ИЛИ ИмяПКО = "РеализацияУслугПрочихАкт_РеализацияТоваровУслуг" ИЛИ ИмяПКО = "ПДТ_ПередачаТоваровПродажа" ИЛИ ИмяПКО = "ПДТ_ПередачаТоваровПередачаНаКомиссию" ИЛИ ИмяПКО = "РТУ_ПередачаТоваровНаКомиссию" Тогда Выполнить(Алгоритмы.ОбработатьРеализацияТоваров); ИначеЕсли ИмяПКО = "КорректировкаРеализации_КорректировкаРеализации" Тогда Выполнить(Алгоритмы.ОбработатьКорректировкиРеализации); ИначеЕсли ИмяПКО = "ВТОП_ВозвратТоваровОтРозничногоПокупателя" ИЛИ ИмяПКО = "ВТОП_ВозвратТоваровОтКомиссионера" ИЛИ ИмяПКО = "ВТМО_ВозвратОтПокупателя" ИЛИ ИмяПКО = "ВТОП_ВозвратТоваровОтПокупателя" ИЛИ ИмяПКО = "ВТМО_ВозвратОтКомиссионера" Тогда Выполнить(Алгоритмы.ОбработатьВозвратыПокупателей); ИначеЕсли ИмяПКО = "СФП_СчетФактураПолученный" ИЛИ ИмяПКО = "СФВ_СчетФактураПолученныйИК" Тогда Выполнить(Алгоритмы.ОбработатьСчетаФактурыПолученныеПереопределяемый); ИначеЕсли ИмяПКО = "СФВ_СчетФактураВыданный" Тогда Выполнить(Алгоритмы.ОбработатьСчетаФактурыВыданныеПереопределяемый); ИначеЕсли ИмяПКО = "СБТ_СборкаИзКомплектующих" ИЛИ ИмяПКО = "РБТ_РазборкаНаКомплектующие" Тогда Выполнить(Алгоритмы.ОбработатьКомплектацияНоменклатуры); ИначеЕсли ИмяПКО = "ВПТ_ТребованиеНакладная" Тогда Выполнить(Алгоритмы.ОбработатьТребованиеНакладная); ИначеЕсли ИмяПКО = "ВПТ_ПередачаМатериаловВЭксплуатацию" Тогда Выполнить(Алгоритмы.ОбработатьПередачаМатериаловВЭксплуатацию); ИначеЕсли ИмяПКО = "ПОТ_ВозвратМатериаловИзЭксплуатации" Тогда Выполнить(Алгоритмы.ОбработатьВозвратМатериаловИзЭксплуатации); ИначеЕсли ИмяПКО = "ПОТ_ОтчетПроизводстваЗаСмену" Тогда Выполнить(Алгоритмы.ОбработатьОтчетПроизводстваЗаСмену); ИначеЕсли ИмяПКО = "ПеремещениеТоваров_ПеремещениеТоваров" Тогда Выполнить(Алгоритмы.ОбработатьПеремещениеТоваров); ИначеЕсли ИмяПКО = "АО_АвансовыйОтчетЗакупкаТоваровУслуг" Тогда Выполнить(Алгоритмы.ОбработатьАвансовыйОтчет); ИначеЕсли ИмяПКО = "СФВ_КорректировкаРеализации" Тогда Выполнить(Алгоритмы.ОбработатьКорректировкуРеализацииСФ); ИначеЕсли ИмяПКО = "СФВ_КорректировкаПоступленияИК" ИЛИ ИмяПКО = "СФП_КорректировкаПоступления" Тогда Выполнить(Алгоритмы.ОбработатьКорректировкуПоступленияСФ); КонецЕсли; Исключение Сообщить(НСтр("ru = 'Ошибка при выполнении отложенного заполнения. Правила конвертации: '")+ИмяПКО); КонецПопытки <Параметры>Объект, ИмяПКО, ПараметрыОбъекта <Алгоритм Имя="ОбновитьНаборыДополнительныхРеквизитовИСведений" ИспользуетсяПриЗагрузке="true"> <Текст>ЗагруженныеСвойства = Параметры.ЗагруженныеСвойства; ЗагруженныеСвойства.Свернуть("СвойствоСсылка"); Запрос = Новый Запрос( "ВЫБРАТЬ | СоставТребуемый.СвойствоСсылка КАК Ссылка |ПОМЕСТИТЬ СоставТребуемый |ИЗ | &СоставТребуемый КАК СоставТребуемый | |ИНДЕКСИРОВАТЬ ПО | Ссылка |; | |//////////////////////////////////////////////////////////////////////////////// |ВЫБРАТЬ | СоставТребуемый.Ссылка |ИЗ | СоставТребуемый КАК СоставТребуемый | ЛЕВОЕ СОЕДИНЕНИЕ Справочник.НаборыДополнительныхРеквизитовИСведений.ДополнительныеСведения КАК СоставТекущий | ПО СоставТребуемый.Ссылка = СоставТекущий.Свойство | И (СоставТребуемый.Ссылка = ЗНАЧЕНИЕ(Справочник.НаборыДополнительныхРеквизитовИСведений.Справочник_ДоговорыКонтрагентов)) |ГДЕ | СоставТекущий.Ссылка ЕСТЬ NULL"); Запрос.УстановитьПараметр("СоставТребуемый", ЗагруженныеСвойства); РезультатЗапроса = Запрос.Выполнить(); Если Не РезультатЗапроса.Пустой() Тогда НаборСведенийОбъект = Справочники.НаборыДополнительныхРеквизитовИСведений.Справочник_ДоговорыКонтрагентов.ПолучитьОбъект(); ТабДополнительныеСведения = НаборСведенийОбъект.ДополнительныеСведения; ВыборкаСвойств = РезультатЗапроса.Выбрать(); Пока ВыборкаСвойств.Следующий() Цикл НоваяСтрока = ТабДополнительныеСведения.Добавить(); НоваяСтрока.Свойство = ВыборкаСвойств.Ссылка; КонецЦикла; НаборСведенийОбъект.ОбменДанными.Загрузка = Истина; НаборСведенийОбъект.Записать(); КонецЕсли; <Алгоритм Имя="ОбновлениеОтветственныхЛицОрганизации" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПараметрыОбъекта // Обновляем значение периодического реквизита "Руководитель" и его должность Запрос = Новый Запрос("ВЫБРАТЬ | ОтветственныеЛицаОрганизацийСрезПоследних.ФизическоеЛицо, | ОтветственныеЛицаОрганизацийСрезПоследних.Должность, | ОтветственныеЛицаОрганизацийСрезПоследних.Период |ИЗ | РегистрСведений.ОтветственныеЛицаОрганизаций.СрезПоследних( | , | СтруктурнаяЕдиница = &Ссылка | И ОтветственноеЛицо = ЗНАЧЕНИЕ(Перечисление.ОтветственныеЛицаОрганизаций.Руководитель)) КАК ОтветственныеЛицаОрганизацийСрезПоследних"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда ПериодЗаписи = '19800101'; СтароеЗначениеРуководителя = Справочники.ФизическиеЛица.ПустаяСсылка(); СтараяДолжностьРуководителя = Справочники.Должности.ПустаяСсылка(); Иначе ВыборкаРезультата = Результат.Выбрать(); ВыборкаРезультата.Следующий(); ПериодЗаписи = ВыборкаРезультата.Период; СтароеЗначениеРуководителя = ВыборкаРезультата.ФизическоеЛицо; СтараяДолжностьРуководителя = ВыборкаРезультата.Должность; КонецЕсли; НовоеЗначениеРуководителя = ПараметрыОбъекта["Руководитель"]; НовоеЗначениеРуководителя = ?(ЗначениеЗаполнено(НовоеЗначениеРуководителя), НовоеЗначениеРуководителя, Справочники.ФизическиеЛица.ПустаяСсылка()); НоваяДолжностьРуководителя = ПараметрыОбъекта.Получить("ДолжностьРуководителя"); НоваяДолжностьРуководителя = ?(ЗначениеЗаполнено(НоваяДолжностьРуководителя), НоваяДолжностьРуководителя, Справочники.Должности.ПустаяСсылка()); Если НовоеЗначениеРуководителя <> СтароеЗначениеРуководителя ИЛИ НоваяДолжностьРуководителя <> СтараяДолжностьРуководителя Тогда ЗаписьРегистра = РегистрыСведений.ОтветственныеЛицаОрганизаций.СоздатьМенеджерЗаписи(); ЗаписьРегистра.Период = ПериодЗаписи; ЗаписьРегистра.СтруктурнаяЕдиница = Объект.Ссылка; ЗаписьРегистра.ОтветственноеЛицо = Перечисления.ОтветственныеЛицаОрганизаций.Руководитель; ЗаписьРегистра.ФизическоеЛицо = НовоеЗначениеРуководителя; ЗаписьРегистра.Должность = НоваяДолжностьРуководителя; ЗаписьРегистра.Записать(); КонецЕсли; // Обновляем значение периодического реквизита "Главный бухгалтер" Запрос = Новый Запрос("ВЫБРАТЬ | ОтветственныеЛицаОрганизацийСрезПоследних.ФизическоеЛицо, | ОтветственныеЛицаОрганизацийСрезПоследних.Должность, | ОтветственныеЛицаОрганизацийСрезПоследних.Период |ИЗ | РегистрСведений.ОтветственныеЛицаОрганизаций.СрезПоследних( | , | СтруктурнаяЕдиница = &Ссылка | И ОтветственноеЛицо = ЗНАЧЕНИЕ(Перечисление.ОтветственныеЛицаОрганизаций.ГлавныйБухгалтер)) КАК ОтветственныеЛицаОрганизацийСрезПоследних"); Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда ПериодЗаписи = '19800101'; СтароеЗначениеГлавногоБухгалтера = Справочники.ФизическиеЛица.ПустаяСсылка(); СтараяДолжностьГлавногоБухгалтера = Справочники.Должности.ПустаяСсылка(); Иначе ВыборкаРезультата = Результат.Выбрать(); ВыборкаРезультата.Следующий(); ПериодЗаписи = ВыборкаРезультата.Период; СтароеЗначениеГлавногоБухгалтера = ВыборкаРезультата.ФизическоеЛицо; СтараяДолжностьГлавногоБухгалтера = ВыборкаРезультата.Должность; КонецЕсли; НовоеЗначениеГлавногоБухгалтера = ПараметрыОбъекта["ГлавныйБухгалтер"]; НовоеЗначениеГлавногоБухгалтера = ?(ЗначениеЗаполнено(НовоеЗначениеРуководителя), НовоеЗначениеГлавногоБухгалтера, Справочники.ФизическиеЛица.ПустаяСсылка()); Если СтароеЗначениеГлавногоБухгалтера <> НовоеЗначениеГлавногоБухгалтера Тогда ЗаписьРегистра = РегистрыСведений.ОтветственныеЛицаОрганизаций.СоздатьМенеджерЗаписи(); ЗаписьРегистра.Период = ПериодЗаписи; ЗаписьРегистра.СтруктурнаяЕдиница = Объект.Ссылка; ЗаписьРегистра.ОтветственноеЛицо = Перечисления.ОтветственныеЛицаОрганизаций.ГлавныйБухгалтер; ЗаписьРегистра.ФизическоеЛицо = НовоеЗначениеГлавногоБухгалтера; ЗаписьРегистра.Должность = СтараяДолжностьГлавногоБухгалтера; ЗаписьРегистра.Записать(); КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Алгоритм Имя="ОбработатьЗаписьДокументаПослеЗагрузки" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект ПроведенОбъект = Объект.Проведен; // Если установлена опция не проводить документы загружаем все документы как непроведенные Если Объект.ЭтоНовый() Тогда Объект.Проведен = Объект.Проведен И Параметры.РазрешитьПроведениеДокументовПриЗагрузке; Иначе ПроведенСсылка = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.Ссылка, "Проведен"); Объект.Проведен = ПроведенОбъект И (Параметры.РазрешитьПроведениеДокументовПриЗагрузке ИЛИ ПроведенСсылка); КонецЕсли; Если ОбщегоНазначенияБП.ЕстьРеквизитДокумента("Комментарий", Объект.Метаданные()) Тогда //Найдем наш старый комментарий, и вырежем его. КомментарийОбъекта = Объект.Комментарий; Если Найти(Объект.Комментарий,"#Загружен новый") > 0 Тогда Объект.Комментарий = СокрЛП(СтрЗаменить(КомментарийОбъекта,"#Загружен новый","")); ИначеЕсли Найти(Объект.Комментарий,"#Изменен") > 0 Тогда Объект.Комментарий = СокрЛП(СтрЗаменить(КомментарийОбъекта, "#Изменен","")); ИначеЕсли Найти(Объект.Комментарий,"#Отменено проведение") > 0 Тогда Объект.Комментарий = СокрЛП(СтрЗаменить(КомментарийОбъекта, "#Отменено проведение","")); ИначеЕсли Найти(Объект.Комментарий,"#Проведен") > 0 Тогда Объект.Комментарий = СокрЛП(СтрЗаменить(КомментарийОбъекта, "#Проведен","")); КонецЕсли; //Сформируем новый комментарий объекта. Если Объект.ЭтоНовый() Тогда Объект.Комментарий = НСтр("ru = '#Загружен новый '") + Объект.Комментарий; Иначе Если ПроведенОбъект = ПроведенСсылка Тогда Объект.Комментарий = НСтр("ru = '#Изменен '") + Объект.Комментарий; ИначеЕсли ПроведенСсылка Тогда Объект.Комментарий = НСтр("ru = '#Отменено проведение '") + Объект.Комментарий; Иначе Объект.Комментарий = НСтр("ru = '#Проведен '") + Объект.Комментарий; КонецЕсли; КонецЕсли; КонецЕсли; <Параметры>Объект <Алгоритм Имя="ОбработкаПлановВидовХарактеристикОтложенная" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ИмяПКО // - ОбъектМодифицирован Если ИмяПКО = "СвойстваОбъектов" Тогда //Если РежимЗагрузкиДанныхВИнформационнуюБазу() Тогда ЗагруженныеСвойстваДоговоров = Параметры.ЗагруженныеСвойства; НоваяСтрока = ЗагруженныеСвойстваДоговоров.Добавить(); НоваяСтрока.СвойствоСсылка = Объект.Ссылка; ОбъектМодифицирован = Ложь; //КонецЕсли; КонецЕсли; <Параметры>Объект, ИмяПКО, ОбъектМодифицирован <Алгоритм Имя="ОбновитьПериодическийРеквизит" ИспользуетсяПриЗагрузке="true"> <Текст>// Параметры: // - Объект // - ПустоеЗначениеРеквизита // - ИмяИзмерения // - ИмяРесурса // - ПараметрыОбъекта // - ИмяРеквизита // - ИмяРегистра //+Тимохов// //НовоеЗначениеРеквизита = ?(ЗначениеЗаполнено(ПараметрыОбъекта[ИмяРеквизита]), ПараметрыОбъекта[ИмяРеквизита], ПустоеЗначениеРеквизита); //Запрос = Новый Запрос("ВЫБРАТЬ // | ДанныеРеквизита.Период, // | ДанныеРеквизита." + ИмяРесурса + " // |ИЗ // | РегистрСведений." + ИмяРегистра + ".СрезПоследних(, " + ИмяИзмерения + " = &Ссылка) КАК ДанныеРеквизита"); //Запрос.УстановитьПараметр("Ссылка", Объект.Ссылка); //Результат = Запрос.Выполнить(); //Если Результат.Пустой() Тогда // // ПериодЗаписи = '19800101'; // СтароеЗначениеРеквизита = ПустоеЗначениеРеквизита; // //Иначе // // ВыборкаРезультата = Результат.Выбрать(); // ВыборкаРезультата.Следующий(); // // ПериодЗаписи = ВыборкаРезультата.Период; // СтароеЗначениеРеквизита = ВыборкаРезультата[ИмяРесурса]; // //КонецЕсли; //Если НовоеЗначениеРеквизита <> СтароеЗначениеРеквизита Тогда // НаборЗаписей = РегистрыСведений[ИмяРегистра].СоздатьНаборЗаписей(); // НаборЗаписей.Отбор.Период.Установить(ПериодЗаписи); // НаборЗаписей.Отбор[ИмяИзмерения].Установить(Объект.Ссылка); // // ЗаписьРегистра = НаборЗаписей.Добавить(); // // ЗаписьРегистра.Период = ПериодЗаписи; // ЗаписьРегистра[ИмяИзмерения] = Объект.Ссылка; // ЗаписьРегистра[ИмяРесурса] = НовоеЗначениеРеквизита; // // УстановитьОбменДаннымиЗагрузка(НаборЗаписей); // // НаборЗаписей.Записать(); // //КонецЕсли; <Параметры>Объект, ПустоеЗначениеРеквизита, ИмяИзмерения, ИмяРесурса, ПараметрыОбъекта, ИмяРеквизита, ИмяРегистра <Группа Имя="ПСК"> <Алгоритм Имя="ВыгрузкаПоФильтрамПСК" ИспользуетсяПриЗагрузке="false"> <Текст> МетаданныеОбъекта = Объект.Метаданные(); //Не грузим объекты помеченные на удаление //Сообщить(ОбщегоНазначенияБП.ЕстьРеквизитДокумента("ПометкаУдаления", МетаданныеОбъекта)); Если (Не Отказ) Тогда// И ОбщегоНазначенияБП.ЕстьРеквизитДокумента("ПометкаУдаления", МетаданныеОбъекта) Тогдаm Если Объект.ПометкаУдаления = Истина Тогда Отказ = Истина; КонецЕсли; КонецЕсли; //Фильтр по организации Если (НЕ Отказ) И Параметры.Свойство("Организация") И ОбщегоНазначенияБП.ЕстьРеквизитДокумента("Организация", МетаданныеОбъекта) Тогда Если Параметры.Организация <> Объект.Организация Тогда Отказ = Истина; КонецЕсли; КонецЕсли; <Параметры>Объект, Отказ <Алгоритм Имя="ЗаписатьВФайлУдалениеОбъекта" ИспользуетсяПриЗагрузке="false"> <Текст> Отказ = Истина; //Приемник = СоздатьУзел("УдалениеОбъекта"); //УстановитьАтрибут(Приемник, "ТипПриемника", ТипПриемника); //УстановитьАтрибут(Приемник, "ТипИсточника", ТипИсточника); //УстановитьАтрибут(Приемник, "УникальныйИдентификатор", Объект.Ссылка.УникальныйИдентификатор()); //Приемник.ЗаписатьКонецЭлемента(); //Если ТипЗнч(Приемник) <> Тип("Строка") Тогда // ИнформацияДляЗаписиВФайл = Приемник.Закрыть(); //Иначе // ИнформацияДляЗаписиВФайл = Приемник; //КонецЕсли; //ФайлОбмена.ЗаписатьСтроку(ИнформацияДляЗаписиВФайл) <Параметры>Объект, ТипПриемника, ТипИсточника <Алгоритм Имя="ЗаполнитьСтавкуНДСТабличнойЧасти" ИспользуетсяПриЗагрузке="false"> <Текст>// Алгоритм предназначен для заполнения ставки НДС в типовой табличной части // Вызывается в обработчике "перед выгрузкой" ПКС Если ОбъектКоллекции.СтавкаНДС.ПеречислениеСтавкаНДС = Перечисления.СтавкиНДС.БезНДС Тогда Выражение = "Перечисления.СтавкиНДС.БезНДС"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 18 И НЕ ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС18"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 18 И ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС18_118"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 10 И НЕ ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС10"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 10 И ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС10_110"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 0 Тогда Выражение = "Перечисления.СтавкиНДС.НДС0"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 20 И НЕ ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС20"; ИначеЕсли ОбъектКоллекции.СтавкаНДС.Ставка = 20 И ОбъектКоллекции.СтавкаНДС.РасчетнаяСтавка Тогда Выражение = "Перечисления.СтавкиНДС.НДС20_120"; Иначе Выражение = "Перечисления.СтавкиНДС.НДС18"; КонецЕсли; <Алгоритм Имя="ОграничениеВыгрузкиПоДополнительнымСвойствам" ИспользуетсяПриЗагрузке="false"> <Текст> СвойствоОграниченияВыгрузки = Неопределено; Если (ТипЗнч(Источник) = Тип("ДокументСсылка.ПриобретениеТоваровУслуг") ИЛИ ТипЗнч(Источник) = Тип("ДокументСсылка.ВозвратТоваровПоставщику")) И Параметры.Свойство("СвойствоОграниченияВыгрузкиПоступлений") Тогда СвойствоОграниченияВыгрузки = Параметры.СвойствоОграниченияВыгрузкиПоступлений; ИначеЕсли Параметры.Свойство("СвойствоОграниченияВыгрузки") Тогда СвойствоОграниченияВыгрузки = Параметры.СвойствоОграниченияВыгрузки; КонецЕсли; Если СвойствоОграниченияВыгрузки <> Неопределено Тогда НайденнаяСтрока = Неопределено; Если ТипЗнч(Источник) = Тип("ДокументСсылка.ВозвратТоваровПоставщику") Тогда Если ЗначениеЗаполнено(Источник.ДокументПоступления) Тогда НайденнаяСтрока = Источник.ДокументПоступления.ДополнительныеРеквизиты.Найти(СвойствоОграниченияВыгрузки, "Свойство"); КонецЕсли; Иначе НайденнаяСтрока = Источник.ДополнительныеРеквизиты.Найти(СвойствоОграниченияВыгрузки, "Свойство"); КонецЕсли; Если НайденнаяСтрока <> Неопределено Тогда Если НайденнаяСтрока.Значение = Истина Тогда Отказ = Истина; КонецЕсли; КонецЕсли; КонецЕсли; <Параметры>Источник, Отказ <Алгоритм Имя="ПодставитьДоговорЭквайринга" ИспользуетсяПриЗагрузке="true"> <Текст>//Подставляем первый найденый договор с типом Просее Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ ПЕРВЫЕ 1 | ДоговорыКонтрагентов.Ссылка КАК Ссылка |ИЗ | Справочник.ДоговорыКонтрагентов КАК ДоговорыКонтрагентов |ГДЕ | ДоговорыКонтрагентов.Владелец = &Контрагент | И ДоговорыКонтрагентов.Организация = &Организация | И ДоговорыКонтрагентов.ВидДоговора = ЗНАЧЕНИЕ(Перечисление.ВидыДоговоровКонтрагентов.Прочее) | И ДоговорыКонтрагентов.ПометкаУдаления = ЛОЖЬ"; Запрос.УстановитьПараметр("Контрагент", Объект.Контрагент); Запрос.УстановитьПараметр("Организация", Объект.Организация); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл СтрокаРасшифровки.ДоговорКонтрагента = Выборка.Ссылка; СтруктураКурса = РаботаСКурсамиВалют.ПолучитьКурсВалюты(Выборка.Ссылка.ВалютаВзаиморасчетов, Объект.Дата); СтрокаРасшифровки.КратностьВзаиморасчетов = СтруктураКурса.Кратность; СтрокаРасшифровки.КурсВзаиморасчетов = СтруктураКурса.Курс; КонецЦикла; <Параметры>Объект, СтрокаРасшифровки <Алгоритм Имя="ПСКПостОбработка" ИспользуетсяПриЗагрузке="true"> <Текст>//Постобработка документов //Сообщить(Объект); //Приходный кассовый ордер, расходный кассовый ордер, поступление на расчётный счёт, списание с расчётного счёта Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПриходныйКассовыйОрдер") Или ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Или ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПоступлениеНаРасчетныйСчет") Или ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.СписаниеСРасчетногоСчета") Тогда Для Каждого Строка Из Объект.РасшифровкаПлатежа Цикл Если ЗначениеЗаполнено(Строка.СчетУчетаРасчетовСКонтрагентом) Тогда Продолжить; КонецЕсли; СтруктураСчетов = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Строка.ДоговорКонтрагента); //Приходный кассовый ордер Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПриходныйКассовыйОрдер") Тогда Если Объект.ВидОперации = Перечисления.ВидыОперацийПКО.ВозвратОтПоставщика Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетов; Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансов; Иначе Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовПокупателя; Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; //Расходный кассовый ордер Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.РасходныйКассовыйОрдер") Тогда Если Объект.ВидОперации = Перечисления.ВидыОперацийРКО.ОплатаПоставщику Тогда Если Объект.ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовСКомитентом; Иначе Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетов; КонецЕсли; Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансов; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийРКО.ВозвратПокупателю Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовПокупателя; Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; //Поступление на расчётный счёт Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПоступлениеНаРасчетныйСчет") Тогда Если Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ОплатаПокупателя Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовПокупателя; // Обычно 62.01 Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансовПокупателя; // Обычно 62.02 ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ВозвратОтПоставщика Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетов; // Обычно 60.01 Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансов; // Обычно 60.02 ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ПрочиеРасчетыСКонтрагентами Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовПокупателя; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ПриобретениеИностраннойВалюты Тогда Если Объект.ОтражатьРазницуВКурсеВСоставеОперационныхРасходов Тогда Строка.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПриобретениеИностраннойВалюты; Иначе Строка.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПрочиеРасчетыСРазнымиДебиторамиИКредиторами; КонецЕсли; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ПоступленияОтПродажиИностраннойВалюты Тогда Строка.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.РеализацияИностраннойВалюты; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеДенежныхСредств.ПоступленияОтПродажПоПлатежнымКартамИБанковскимКредитам Тогда Строка.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПродажиПоПлатежнымКартам; КонецЕсли; КонецЕсли; //Списание с расчётного счёта Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.СписаниеСРасчетногоСчета") Тогда Если Объект.ВидОперации <> Перечисления.ВидыОперацийСписаниеДенежныхСредств.РасчетыПоКредитамИЗаймам Тогда //СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( //Организация, Контрагент, СтрокаПлатеж.ДоговорКонтрагента); ЭтоАванс = (Строка.СпособПогашенияЗадолженности = Перечисления.СпособыПогашенияЗадолженности.НеПогашать); Если Объект.ВидОперации = Перечисления.ВидыОперацийСписаниеДенежныхСредств.ВозвратПокупателю тогда Строка.СчетУчетаРасчетовСКонтрагентом = ?(ЭтоАванс, Неопределено, СтруктураСчетов.СчетРасчетовПокупателя); Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансовПокупателя; Иначе Строка.СчетУчетаРасчетовСКонтрагентом = ?(ЭтоАванс, Неопределено, СтруктураСчетов.СчетРасчетов); Строка.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансов; КонецЕсли; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; //Поступление доп. расходов Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПоступлениеДопРасходов") Тогда СтруктураСчетов = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Объект.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетов; Объект.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансов; ДанныеОбъекта = Новый Структура("Организация, Дата, СуммаВключаетНДС, СтавкаНДС"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); Для Каждого Строка Из Объект.Товары Цикл СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Документы.ПоступлениеДопРасходов.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, Строка, "Товары", СведенияОНоменклатуре); КонецЦикла; КонецЕсли; //Авансовый отчёт Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.АвансовыйОтчет") Тогда //Табличная часть Товары Для Каждого Строка Из Объект.Товары Цикл ДанныеСтрокиТаблицы = Новый Структура( "Номенклатура, Количество, |Цена, Сумма, СтавкаНДС, СуммаНДС, ПредъявленСФ, |НомерГТД, СтранаПроисхождения, СпособУчетаНДС, |СчетУчета, СчетУчетаНДС, ОтражениеВУСН, Всего"); ЗаполнитьЗначенияСвойств(ДанныеСтрокиТаблицы, Строка); ДанныеОбъекта = Новый Структура( "Дата, Организация, Склад, ТипЦен, СуммаВключаетНДС, |ВалютаДокумента, КурсДокумента, КратностьДокумента"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); Если Не ЗначениеЗаполнено(ДанныеОбъекта.ТипЦен) Тогда ДанныеОбъекта.Вставить("СпособЗаполненияЦены", Перечисления.СпособыЗаполненияЦен.ПоПродажнымЦенам); КонецЕсли; СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Если СведенияОНоменклатуре = Неопределено Тогда Продолжить; КонецЕсли; Строка.НомерГТД = СведенияОНоменклатуре.НомерГТД; Строка.СтранаПроисхождения = СведенияОНоменклатуре.СтранаПроисхождения; Документы.АвансовыйОтчет.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, Строка, "Товары", СведенияОНоменклатуре); КонецЦикла; //Табличная часть ВозвратнаяТара Для Каждого Строка Из Объект.ВозвратнаяТара Цикл ДанныеСтрокиТаблицы = Новый Структура("Номенклатура, Количество, Цена, Сумма, СчетУчета"); ЗаполнитьЗначенияСвойств(ДанныеСтрокиТаблицы, Строка); ДанныеОбъекта = Новый Структура( "Дата, Организация, Склад, ТипЦен, СуммаВключаетНДС, |ВалютаДокумента, КурсДокумента, КратностьДокумента, Склад"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.СуммаВключаетНДС = Истина; Если Не ЗначениеЗаполнено(ДанныеОбъекта.ТипЦен) Тогда ДанныеОбъекта.Вставить("СпособЗаполненияЦены", Перечисления.СпособыЗаполненияЦен.ПоПродажнымЦенам); КонецЕсли; СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Если СведенияОНоменклатуре = Неопределено Тогда Продолжить; КонецЕсли; Документы.АвансовыйОтчет.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, Строка, "ВозвратнаяТара", СведенияОНоменклатуре); КонецЦикла; //Табличная часть ОплатаПоставщикам Для Каждого Строка Из Объект.ОплатаПоставщикам Цикл Если НЕ ЗначениеЗаполнено(Строка.ДоговорКонтрагента) Тогда Продолжить; КонецЕсли; СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Строка.Контрагент, Строка.ДоговорКонтрагента); Строка.СпособПогашенияЗадолженности = Перечисления.СпособыПогашенияЗадолженности.Автоматически; Строка.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; ВидДоговора = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Строка.ДоговорКонтрагента, "ВидДоговора"); Если ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом ИЛИ ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентомНаЗакупку Тогда Строка.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовСКомитентом; Иначе Строка.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; КонецЦикла; КонецЕсли; //Возврат товаров поставщику Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ВозвратТоваровПоставщику") Тогда Если ЗначениеЗаполнено(Объект.ДоговорКонтрагента) Тогда ЭтоКомиссия = Объект.ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом; Иначе ЭтоКомиссия = Ложь; КонецЕсли; //Документы.ВозвратТоваровПоставщику.ЗаполнитьСчетаУчетаРасчетов(Объект); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; Объект.СчетУчетаРасчетовПоПретензиям = СчетаУчета.СчетРасчетовПоПретензиям; Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТары; //Если Не ЗначениеЗаполнено(Объект.СчетУчетаДоходов) Тогда // Объект.СчетУчетаДоходов = СчетаУчета.СчетУчетаДоходовПоТаре; //КонецЕсли; // //Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасходов) Тогда // Объект.СчетУчетаРасходов = СчетаУчета.СчетУчетаРасходовПоТаре; //КонецЕсли; ДанныеОбъекта = Новый Структура( "Дата, ВидОперации, Организация, Склад, ТипЦен, СуммаВключаетНДС, |ВалютаДокумента, КурсВзаиморасчетов, КратностьВзаиморасчетов, |РассчитыватьСуммаВРознице, ЗаполнятьСтавкуНДСВРознице, ЭтоКомиссия"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.ЭтоКомиссия = Ложь; Если Не ЗначениеЗаполнено(ДанныеОбъекта.ТипЦен) Тогда ДанныеОбъекта.Вставить("СпособЗаполненияЦены", Перечисления.СпособыЗаполненияЦен.ПоЗакупочнымЦенам); КонецЕсли; Для Каждого Строка Из Объект.Товары Цикл СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Документы.ВозвратТоваровПоставщику.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, Строка, "Товары", СведенияОНоменклатуре); КонецЦикла; КонецЕсли; //Списание товаров Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.СписаниеТоваров") Тогда ТабличнаяЧасть = Объект.Товары; ДанныеОбъекта = Новый Структура("Дата, Организация, Склад"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); СоответствиеСчетовУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаСпискаНоменклатуры( ДанныеОбъекта.Организация, ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть, "Номенклатура", Истина), ДанныеОбъекта.Склад, ДанныеОбъекта.Дата); Для каждого Строка Из ТабличнаяЧасть Цикл СчетаУчета = СоответствиеСчетовУчета.Получить(Строка.Номенклатура); СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Если СведенияОНоменклатуре = Неопределено Тогда Продолжить; КонецЕсли; Если СведенияОНоменклатуре.Свойство("СчетаУчета") Тогда // СведенияОНоменклатуре - структура сведений номенклатуры СчетаУчета = СведенияОНоменклатуре.СчетаУчета; ИначеЕсли СведенияОНоменклатуре.Свойство("СчетУчета") Тогда // СведенияОНоменклатуре - структура счетов учета номенклатуры СчетаУчета = СведенияОНоменклатуре; Иначе Продолжить; КонецЕсли; Если ЗначениеЗаполнено(СчетаУчета.СчетУчета) Тогда Строка.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; КонецЕсли; //Оприходование товаров Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ОприходованиеТоваров") Тогда ТабличнаяЧасть = Объект.Товары; ДанныеОбъекта = Новый Структура("Дата, Организация, Склад"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); СоответствиеСчетовУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаСпискаНоменклатуры( ДанныеОбъекта.Организация, ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть, "Номенклатура", Истина), ДанныеОбъекта.Склад, ДанныеОбъекта.Дата); Для каждого Строка Из ТабличнаяЧасть Цикл СчетаУчета = СоответствиеСчетовУчета.Получить(Строка.Номенклатура); СведенияОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОНоменклатуре(Строка.Номенклатура, ДанныеОбъекта); Если СведенияОНоменклатуре = Неопределено Тогда Продолжить; КонецЕсли; Если Не ЗначениеЗаполнено(Строка.ОтражениеВУСН) Тогда // устанавливаем значение реквизита "Расходы (НУ)" по умолчанию - Не принимаются Строка.ОтражениеВУСН = Перечисления.ОтражениеВУСН.НеПринимаются; КонецЕсли; Если СведенияОНоменклатуре.Свойство("СчетаУчета") Тогда // СведенияОНоменклатуре - структура сведений номенклатуры СчетаУчета = СведенияОНоменклатуре.СчетаУчета; ИначеЕсли СведенияОНоменклатуре.Свойство("СчетУчета") Тогда // СведенияОНоменклатуре - структура счетов учета номенклатуры СчетаУчета = СведенияОНоменклатуре; Иначе Продолжить; КонецЕсли; Если ЗначениеЗаполнено(СчетаУчета.СчетУчета) Тогда Строка.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; КонецЕсли; //Поступление товаров и услуг Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПоступлениеТоваровУслуг") Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); ВидДоговораКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора"); Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовСКомитентом; ИначеЕсли Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетов; КонецЕсли; Если Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ВПереработку ИЛИ ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом Тогда Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансов; КонецЕсли; Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТары; ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.Товары, "Товары"); ИменаТабличныхЧастей.Добавить(Объект.Услуги, "Услуги"); ИменаТабличныхЧастей.Добавить(Объект.Оборудование, "Оборудование"); ИменаТабличныхЧастей.Добавить(Объект.ОбъектыСтроительства, "ОбъектыСтроительства"); ИменаТабличныхЧастей.Добавить(Объект.ВозвратнаяТара, "ВозвратнаяТара"); ИменаТабличныхЧастей.Добавить(Объект.АгентскиеУслуги, "АгентскиеУслуги"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл //ТабличнаяЧасть = Объект[ИмяТабличнойЧасти]; ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; ДанныеОбъекта = Новый Структура("Дата, ВидОперации, Организация, ПодразделениеОрганизации, ЭтоКомиссия"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.Вставить("Склад", Объект.Склад); Если ИмяТабличнойЧасти <> "ОбъектыСтроительства" Тогда ДанныеОбъекта.Вставить("ЭтоКомиссия", (Объект.ВидОперации = Перечисления.ВидыОперацийПоступлениеТоваровУслуг.ПокупкаКомиссия) И (ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора") = Перечисления.ВидыДоговоровКонтрагентов.СКомитентом)); КонецЕсли; ИмяНоменклатуры = ?(ИмяТабличнойЧасти = "ОбъектыСтроительства", "ОбъектСтроительства", "Номенклатура"); СоответствиеСчетовУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаСпискаНоменклатуры( ДанныеОбъекта.Организация, ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, ИмяНоменклатуры, Истина), ДанныеОбъекта.Склад, ДанныеОбъекта.Дата); Для каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть.Значение Цикл СчетаУчета = СоответствиеСчетовУчета.Получить(СтрокаТабличнойЧасти[ИмяНоменклатуры]); Документы.ПоступлениеТоваровУслуг.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СчетаУчета); КонецЦикла; КонецЦикла; КонецЕсли; //Реализация товаров услуг Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.Товары, "Товары"); ИменаТабличныхЧастей.Добавить(Объект.Услуги, "Услуги"); ИменаТабличныхЧастей.Добавить(Объект.ВозвратнаяТара, "ВозвратнаяТара"); ИменаТабличныхЧастей.Добавить(Объект.АгентскиеУслуги, "АгентскиеУслуги"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; ДанныеОбъекта = Новый Структура("Дата, Организация, ДеятельностьНаПатенте, Склад, ЭтоКомиссия, Реализация"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.Реализация = Истина; ДанныеОбъекта.ЭтоКомиссия = (ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора") = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером); СоответствиеСведенийОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОСпискеНоменклатуры( ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, "Номенклатура", Истина), ДанныеОбъекта); Для каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть.Значение Цикл СведенияОНоменклатуре = СоответствиеСведенийОНоменклатуре.Получить(СтрокаТабличнойЧасти.Номенклатура); Документы.РеализацияТоваровУслуг.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СведенияОНоменклатуре); //СчетаУчетаВДокументах.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти); КонецЦикла; КонецЦикла; //Документы.РеализацияТоваровУслуг.ЗаполнитьСчетаУчетаРасчетов(Объект); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); ВидДоговораКонтрагента = ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора"); Если ВидДоговораКонтрагента = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером Или Объект.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.ОтгрузкаБезПереходаПраваСобственности Тогда Объект.СчетУчетаРасчетовСКонтрагентом = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); Иначе Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если (Объект.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.Автоматически) Или (Объект.СпособЗачетаАвансов = Перечисления.СпособыЗачетаАвансов.ПоДокументу) Тогда Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; Иначе Объект.СчетУчетаРасчетовПоАвансам = ПланыСчетов.Хозрасчетный.ПустаяСсылка(); КонецЕсли; КонецЕсли; КонецЕсли; //Возврат от покупателя Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ВозвратТоваровОтПокупателя") Тогда //Документы.ВозвратТоваровОтПокупателя.ЗаполнитьСчетаУчетаРасчетов(Объект); СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовСКонтрагентом) Тогда Объект.СчетУчетаРасчетовСКонтрагентом = СчетаУчета.СчетРасчетовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоАвансам) Тогда Объект.СчетУчетаРасчетовПоАвансам = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаРасчетовПоТаре) Тогда Объект.СчетУчетаРасчетовПоТаре = СчетаУчета.СчетУчетаТарыПокупателя; КонецЕсли; Если Не ЗначениеЗаполнено(Объект.СчетУчетаНДС) Тогда Объект.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ; КонецЕсли; Если Объект.Дата < НачалоДня(Дата(2012, 04, 01)) Тогда Объект.СчетУчетаНДС = ПланыСчетов.Хозрасчетный.НДСпоПриобретеннымМПЗ; КонецЕсли; ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.Товары, "Товары"); ИменаТабличныхЧастей.Добавить(Объект.ВозвратнаяТара, "ВозвратнаяТара"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; //ТабличнаяЧасть = Объект[ИмяТабличнойЧасти]; ДанныеОбъекта = Новый Структура("Дата, Организация, Склад, ДеятельностьНаПатенте, Реализация"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.Реализация = Истина; СоответствиеСведенийОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОСпискеНоменклатуры( ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, "Номенклатура", Истина), ДанныеОбъекта); Для каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть.Значение Цикл СведенияОНоменклатуре = СоответствиеСведенийОНоменклатуре.Получить(СтрокаТабличнойЧасти.Номенклатура); Документы.ВозвратТоваровОтПокупателя.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СведенияОНоменклатуре); КонецЦикла; КонецЦикла; КонецЕсли; //Оприходование товаров Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ОприходованиеТоваров") Тогда Объект.СтатьяПрочихДоходовРасходов = Справочники.ПрочиеДоходыИРасходы.НайтиПоНаименованию("Оприходование товаров (Управление торговлей)"); КонецЕсли; //Отчёт о розничных продажах Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ОтчетОРозничныхПродажах") Тогда Объект.СчетКасса = ПланыСчетов.Хозрасчетный.КассаОрганизации; ТабличнаяЧасть = Объект.Товары; ИмяТабличнойЧасти = "Товары"; ДанныеОбъекта = Новый Структура( "Дата, ВидОперации, Организация, ДеятельностьНаПатенте, Склад, Реализация, АТТПоПродажнойСтоимости"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.Реализация = Истина; ДанныеОбъекта.АТТПоПродажнойСтоимости = ДанныеОбъекта.ВидОперации = Перечисления.ВидыОперацийОтчетОРозничныхПродажах.ОтчетККМОПродажах И (УчетнаяПолитика.СпособОценкиТоваровВРознице(ДанныеОбъекта.Организация, ДанныеОбъекта.Дата) = Перечисления.СпособыОценкиТоваровВРознице.ПоПродажнойСтоимости) И НЕ ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДанныеОбъекта.Склад, "ТипСклада") = Перечисления.ТипыСкладов.ОптовыйСклад; СоответствиеСведенийОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОСпискеНоменклатуры( ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть, "Номенклатура", Истина), ДанныеОбъекта); Для Каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть Цикл СведенияОНоменклатуре = СоответствиеСведенийОНоменклатуре.Получить(СтрокаТабличнойЧасти.Номенклатура); Документы.ОтчетОРозничныхПродажах.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(ДанныеОбъекта, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СведенияОНоменклатуре); КонецЦикла; Для Каждого СтрокаТабличнойЧасти Из Объект.АгентскиеУслуги Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, СтрокаТабличнойЧасти.Контрагент, СтрокаТабличнойЧасти.ДоговорКонтрагента); СтрокаТабличнойЧасти.СчетРасчетов = СчетаУчета.СчетРасчетовСКомитентом; КонецЦикла; //ОбщегоНазначения.ЗначенияРеквизитовОбъекта(СтрокаТаблицы.ВидОплаты,"Контрагент,ДоговорКонтрагента,СчетУчетаРасчетов") Для Каждого СтрокатабличнойЧасти Из Объект.Оплата Цикл Если ЗначениеЗаполнено(СтрокатабличнойЧасти.ВидОплаты) Тогда ЗаполнитьЗначенияСвойств(СтрокатабличнойЧасти, ОбщегоНазначения.ЗначенияРеквизитовОбъекта(СтрокатабличнойЧасти.ВидОплаты,"Контрагент,ДоговорКонтрагента,СчетУчетаРасчетов")); КонецЕсли; КонецЦикла; КонецЕсли; //Корректировка Реализации Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.КорректировкаРеализации") Тогда ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.Товары, "Товары"); ИменаТабличныхЧастей.Добавить(Объект.АгентскиеУслуги, "АгентскиеУслуги"); ИменаТабличныхЧастей.Добавить(Объект.Услуги, "Услуги"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; ДанныеОбъекта = Новый Структура("Дата, Организация, Склад, ЭтоКомиссия, Реализация"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.ЭтоКомиссия = (ОбщегоНазначения.ЗначениеРеквизитаОбъекта(Объект.ДоговорКонтрагента, "ВидДоговора") = Перечисления.ВидыДоговоровКонтрагентов.СКомиссионером); ДанныеОбъекта.Реализация = Истина; МассивСсылок = ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, "Номенклатура", Истина); Колво = МассивСсылок.Количество(); Для н=1 По Колво Цикл Если ТипЗнч(МассивСсылок[Колво-н]) <> Тип("СправочникСсылка.Номенклатура") Тогда МассивСсылок.Удалить(Колво-н); КонецЕсли; КонецЦикла; Если МассивСсылок.Количество() = 0 Тогда Продолжить; КонецЕсли; СоответствиеСведенийОНоменклатуре = БухгалтерскийУчетПереопределяемый.ПолучитьСведенияОСпискеНоменклатуры(МассивСсылок, ДанныеОбъекта); Для каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть.Значение Цикл СведенияОНоменклатуре = СоответствиеСведенийОНоменклатуре.Получить(СтрокаТабличнойЧасти.Номенклатура); Документы.КорректировкаРеализации.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СведенияОНоменклатуре); КонецЦикла; КонецЦикла; КонецЕсли; //Перемещение товаров Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ПеремещениеТоваров") Тогда ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.Товары, "Товары"); ИменаТабличныхЧастей.Добавить(Объект.ТоварыНаКомиссии, "ТоварыНаКомиссии"); ИменаТабличныхЧастей.Добавить(Объект.ВозвратнаяТара, "ВозвратнаяТара"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; ДанныеОбъекта = Новый Структура("Дата, Организация, Склад"); ЗаполнитьЗначенияСвойств(ДанныеОбъекта, Объект); ДанныеОбъекта.Склад = Объект.СкладОтправитель; СоответствиеСчетовУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаСпискаНоменклатуры( ДанныеОбъекта.Организация, ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, "Номенклатура", Истина), ДанныеОбъекта.Склад, ДанныеОбъекта.Дата); ДанныеОбъекта.Склад = Объект.СкладПолучатель; СоответствиеНовыхСчетовУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаСпискаНоменклатуры( ДанныеОбъекта.Организация, ОбщегоНазначения.ВыгрузитьКолонку(ТабличнаяЧасть.Значение, "Номенклатура", Истина), ДанныеОбъекта.Склад, ДанныеОбъекта.Дата); Для каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть.Значение Цикл СчетаУчета = СоответствиеСчетовУчета.Получить(СтрокаТабличнойЧасти.Номенклатура); НовыеСчетаУчета = СоответствиеНовыхСчетовУчета.Получить(СтрокаТабличнойЧасти.Номенклатура); Документы.ПеремещениеТоваров.ЗаполнитьСчетаУчетаВСтрокеТабличнойЧасти(Объект.Ссылка, СтрокаТабличнойЧасти, ИмяТабличнойЧасти, СчетаУчета, НовыеСчетаУчета); КонецЦикла; КонецЦикла; КонецЕсли; //Корректировка долга Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.КорректировкаДолга") Тогда ИменаТабличныхЧастей = Новый СписокЗначений; ИменаТабличныхЧастей.Добавить(Объект.ДебиторскаяЗадолженность, "ДебиторскаяЗадолженность"); ИменаТабличныхЧастей.Добавить(Объект.КредиторскаяЗадолженность, "КредиторскаяЗадолженность"); Для Каждого ТабличнаяЧасть Из ИменаТабличныхЧастей Цикл ИмяТабличнойЧасти = ТабличнаяЧасть.Представление; Если ИмяТабличнойЧасти = "ДебиторскаяЗадолженность" Тогда Контрагент = Объект.КонтрагентДебитор; Иначе Контрагент = Объект.КонтрагентКредитор; КонецЕсли; Для Каждого СтрокаТабличнойЧасти из ТабличнаяЧасть.Значение Цикл СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом(Объект.Организация, Контрагент, СтрокаТабличнойЧасти.ДоговорКонтрагента); Если СтрокаТабличнойЧасти.ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПоставщиком Тогда Если ИмяТабличнойЧасти = "ДебиторскаяЗадолженность" Тогда СтрокаТабличнойЧасти.СчетУчетаРасчетов = СчетаУчета.СчетАвансов; Иначе СтрокаТабличнойЧасти.СчетУчетаРасчетов = СчетаУчета.СчетРасчетов; КонецЕсли; ИначеЕсли СтрокаТабличнойЧасти.ДоговорКонтрагента.ВидДоговора = Перечисления.ВидыДоговоровКонтрагентов.СПокупателем Тогда Если ИмяТабличнойЧасти = "ДебиторскаяЗадолженность" Тогда СтрокаТабличнойЧасти.СчетУчетаРасчетов = СчетаУчета.СчетРасчетовПокупателя; Иначе СтрокаТабличнойЧасти.СчетУчетаРасчетов = СчетаУчета.СчетАвансовПокупателя; КонецЕсли; КонецЕсли; КонецЦикла; КонецЦикла КонецЕсли; //Комплектация номенклатуры Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.КомплектацияНоменклатуры") Тогда Если Не ЗначениеЗаполнено (Объект.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, Объект.Номенклатура, Объект.Склад); Объект.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; СкладЕНВД = УчетнаяПолитика.ПлательщикЕНВД(Объект.Организация, Объект.Дата) И (Объект.Склад.ТипСклада = Перечисления.ТипыСкладов.НеавтоматизированнаяТорговаяТочка ИЛИ Объект.Склад.ТипСклада = Перечисления.ТипыСкладов.РозничныйМагазин); Если Не ЗначениеЗаполнено (Объект.СчетСписанияНДС) Тогда Объект.СчетСписанияНДС = ПланыСчетов.Хозрасчетный.ИздержкиОбращения; КонецЕсли; Если СкладЕНВД Тогда Если Не ЗначениеЗаполнено (Объект.СубконтоСписанияНДС1) Тогда Объект.СубконтоСписанияНДС1 = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходыЕНВД; КонецЕсли; Иначе Если Не ЗначениеЗаполнено (Объект.СубконтоСписанияНДС1) Тогда Объект.СубконтоСписанияНДС1 = Справочники.СтатьиЗатрат.СписаниеНДСНаРасходы; КонецЕсли; КонецЕсли; ПоляОбъекта = Новый Структура( "СубконтоСписанияНДС1", "СубконтоСписанияНДС2", "СубконтоСписанияНДС3", Объект.Организация, Справочники.ПодразделенияОрганизаций.ПустаяСсылка()); БухгалтерскийУчетКлиентСервер.ПриИзмененииСчета(Объект.СчетСписанияНДС, Объект, ПоляОбъекта); Для Каждого СтрокаТаблицы Из Объект.Комплектующие Цикл Если Не ЗначениеЗаполнено(СтрокаТаблицы.СчетУчета) Тогда СчетаУчета = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаУчетаНоменклатуры( Объект.Организация, СтрокаТаблицы.Номенклатура, Объект.Склад); СтрокаТаблицы.СчетУчета = СчетаУчета.СчетУчета; КонецЕсли; КонецЦикла; КонецЕсли; //Оплата платежными картами Если ТипЗнч(Объект.Ссылка) = Тип("ДокументСсылка.ОплатаПлатежнойКартой") Тогда Если ЗначениеЗаполнено(Объект.ВидОплаты) Тогда СтруктураРеквизитов = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Объект.ВидОплаты, "Контрагент, ДоговорКонтрагента, СчетУчетаРасчетов"); Объект.СчетКасса = СтруктураРеквизитов.СчетУчетаРасчетов; Объект.Эквайер = СтруктураРеквизитов.Контрагент; Объект.ДоговорЭквайринга = СтруктураРеквизитов.ДоговорКонтрагента; КонецЕсли; СтруктураСчетов = БухгалтерскийУчетПереопределяемый.ПолучитьСчетаРасчетовСКонтрагентом( Объект.Организация, Объект.Контрагент, Объект.ДоговорКонтрагента); Для Каждого СтрокаТаблицы Из Объект.РасшифровкаПлатежа Цикл СтрокаТаблицы.СчетУчетаРасчетовСКонтрагентом = СтруктураСчетов.СчетРасчетовПокупателя; СтрокаТаблицы.СчетУчетаРасчетовПоАвансам = СтруктураСчетов.СчетАвансовПокупателя; КонецЦикла; КонецЕсли; <Параметры>Объект, ПараметрыОбъекта <Запросы> <Группа Имя="ТоварыИзВидовЗапасов"> <Запрос Имя="ТоварыИзВидовЗапасовДляВнутреннегоПотребления" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВнутреннееПотреблениеТоваровВидыЗапасов.Количество КАК Количество, ВнутреннееПотреблениеТоваровВидыЗапасов.НомерГТД КАК НомерГТД, ВнутреннееПотреблениеТоваровВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВнутреннееПотреблениеТоваровВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВнутреннееПотреблениеТоваровВидыЗапасов.СтатьяРасходов КАК СтатьяРасходов, ВнутреннееПотреблениеТоваровВидыЗапасов.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, ВнутреннееПотреблениеТоваровВидыЗапасов.Ссылка.ПотреблениеДляДеятельности КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВнутреннееПотреблениеТоваров.ВидыЗапасов КАК ВнутреннееПотреблениеТоваровВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО (ВнутреннееПотреблениеТоваровВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики) ГДЕ ВнутреннееПотреблениеТоваровВидыЗапасов.Ссылка = &Ссылка И Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Коэффициент КАК Коэффициент, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки КАК НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, ВидыЗапасов.СтатьяРасходов КАК СтатьяРасходов, ВидыЗапасов.КорреспондирующийСчет КАК КорреспондирующийСчет, ВидыЗапасов.СпособУчетаНДС КАК СпособУчетаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.СписаниеНедостачТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО (ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура) СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.СтатьяРасходов, ВидыЗапасов.КорреспондирующийСчет, ВидыЗапасов.СпособУчетаНДС УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляВозвратаКомитенту" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ ВозвратТоваровПоставщикуТовары.Номенклатура КАК Номенклатура, МАКСИМУМ(ВозвратТоваровПоставщикуТовары.НомерСтроки) КАК НомерСтроки ПОМЕСТИТЬ ТаблицаТовары ИЗ Документ.ВозвратТоваровПоставщику.Товары КАК ВозвратТоваровПоставщикуТовары ГДЕ ВозвратТоваровПоставщикуТовары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО ВозвратТоваровПоставщикуТовары.Номенклатура, ВозвратТоваровПоставщикуТовары.Характеристика ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВидыЗапасов.Ссылка.ВозвратПринятойМногооборотнойТары, ВидыЗапасов.СуммаСНДС, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВозвратТоваровПоставщику.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара)) ИНДЕКСИРОВАТЬ ПО Аналитика.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ВозвратПринятойМногооборотнойТары, ТаблицаТовары.НомерСтроки КАК НомерСтроки, ВидыЗапасов.Цена КАК Цена, СУММА(ВидыЗапасов.Количество) КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаСНДС) КАК СуммаСНДС ПОМЕСТИТЬ ТоварыДокумента ИЗ ТаблицаТовары КАК ТаблицаТовары ЛЕВОЕ СОЕДИНЕНИЕ ВидыЗапасов КАК ВидыЗапасов ПО (ВидыЗапасов.Номенклатура = ТаблицаТовары.Номенклатура) СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ВозвратПринятойМногооборотнойТары, ТаблицаТовары.НомерСтроки, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.НомерСтроки КАК НомерСтроки, ТоварыДокумента.Номенклатура, ТоварыДокумента.ЕдиницаИзмерения, ТоварыДокумента.Коэффициент, ТоварыДокумента.НомерГТД, ТоварыДокумента.СтранаПроисхождения, ТоварыДокумента.Количество, ТоварыДокумента.Цена, ТоварыДокумента.Сумма, ТоварыДокумента.СтавкаНДС, ТоварыДокумента.СуммаНДС, ТоварыДокумента.СуммаСНДС ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТоварыДокумента.ВозвратПринятойМногооборотнойТары) УПОРЯДОЧИТЬ ПО НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.НомерСтроки, ТоварыДокумента.Номенклатура, ТоварыДокумента.Количество, ТоварыДокумента.Цена, ТоварыДокумента.Сумма ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТоварыДокумента.ВозвратПринятойМногооборотнойТары УПОРЯДОЧИТЬ ПО ТоварыДокумента.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляВозвратаОтКлиента" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ ВЫБОР КОГДА ВидыЗапасов.НоменклатураОприходование = ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) ТОГДА Аналитика.Номенклатура ИНАЧЕ ВидыЗапасов.НоменклатураОприходование КОНЕЦ КАК Номенклатура, ВидыЗапасов.Количество, ВидыЗапасов.Ссылка.ДокументРеализации КАК ДокументРеализации, ВидыЗапасов.Ссылка.ВозвратПорчи КАК ВозвратПорчи, ВидыЗапасов.Ссылка.ЦенаВключаетНДС КАК ЦенаВключаетНДС, ВидыЗапасов.СуммаСНДС, ВидыЗапасов.СуммаНДС, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.ВидЗапасов.ТипЗапасов КАК ТипЗапасов, ВидыЗапасов.Ссылка.ВозвратПереданнойМногооборотнойТары, ВидыЗапасов.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВозвратТоваровОтКлиента.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО ВЫБОР КОГДА ВидыЗапасов.НоменклатураОприходование = ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) ТОГДА Аналитика.Номенклатура ИНАЧЕ ВидыЗапасов.НоменклатураОприходование КОНЕЦ ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.ВозвратПорчи ИЛИ ВидыЗапасов.ДокументРеализации = НЕОПРЕДЕЛЕНО ТОГДА ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС ИНАЧЕ 0 КОНЕЦ КАК Себестоимость, ВЫБОР КОГДА ВидыЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыПереданныеНаКомиссию" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК ПереданныеСчетУчета, ВидыЗапасов.ВозвратПереданнойМногооборотнойТары, ВидыЗапасов.СпособУчетаНДС ПОМЕСТИТЬ ТаблицаТоваров ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ ВЫБОР КОГДА ВозвратТоваровОтКлиентаТовары.Порча ТОГДА ВозвратТоваровОтКлиентаТовары.НоменклатураОприходование ИНАЧЕ ВозвратТоваровОтКлиентаТовары.Номенклатура КОНЕЦ КАК Номенклатура, МАКСИМУМ(ВозвратТоваровОтКлиентаТовары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ВозвратТоваровОтКлиента.Товары КАК ВозвратТоваровОтКлиентаТовары ГДЕ ВозвратТоваровОтКлиентаТовары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО ВЫБОР КОГДА ВозвратТоваровОтКлиентаТовары.Порча ТОГДА ВозвратТоваровОтКлиентаТовары.НоменклатураОприходование ИНАЧЕ ВозвратТоваровОтКлиентаТовары.Номенклатура КОНЕЦ) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, ТаблицаТоваров.СтавкаНДС, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.ПереданныеСчетУчета, ТаблицаТоваров.СпособУчетаНДС, СУММА(ТаблицаТоваров.Количество) КАК Количество, СУММА(ТаблицаТоваров.Сумма) КАК Сумма, СУММА(ТаблицаТоваров.Себестоимость) КАК Себестоимость, СУММА(ТаблицаТоваров.СуммаНДС) КАК СуммаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ (ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТаблицаТоваров.ВозвратПереданнойМногооборотнойТары) СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, ТаблицаТоваров.СтавкаНДС, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.ПереданныеСчетУчета, ТаблицаТоваров.СпособУчетаНДС, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, СУММА(ТаблицаТоваров.Количество) КАК Количество, СУММА(ТаблицаТоваров.Сумма) КАК Сумма ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТаблицаТоваров.ВозвратПереданнойМногооборотнойТары СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляВозвратаОтКомиссионера" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ ВЫБОР КОГДА ВидыЗапасов.НоменклатураОприходование = ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) ТОГДА Аналитика.Номенклатура ИНАЧЕ ВидыЗапасов.НоменклатураОприходование КОНЕЦ КАК Номенклатура, ВидыЗапасов.Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыПереданныеНаКомиссию" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК ПереданныеСчетУчета, ВидыЗапасов.Ссылка.ВозвратПереданнойМногооборотнойТары, ВидыЗапасов.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВозвратТоваровОтКлиента.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО ВЫБОР КОГДА ВидыЗапасов.НоменклатураОприходование = ЗНАЧЕНИЕ(Справочник.Номенклатура.ПустаяСсылка) ТОГДА Аналитика.Номенклатура ИНАЧЕ ВидыЗапасов.НоменклатураОприходование КОНЕЦ ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ВидыЗапасов.ПереданныеСчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.ВозвратПереданнойМногооборотнойТары, ВидыЗапасов.СпособУчетаНДС ПОМЕСТИТЬ ТаблицаТоваров ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ ВЫБОР КОГДА Товары.Порча ТОГДА Товары.НоменклатураОприходование ИНАЧЕ Товары.Номенклатура КОНЕЦ КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ВозвратТоваровОтКлиента.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО ВЫБОР КОГДА Товары.Порча ТОГДА Товары.НоменклатураОприходование ИНАЧЕ Товары.Номенклатура КОНЕЦ) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.ПереданныеСчетУчета, ТаблицаТоваров.НомерСтроки, "НеПринимаются" КАК ОтражениеВУСН, ТаблицаТоваров.СпособУчетаНДС, СУММА(ТаблицаТоваров.Количество) КАК Количество ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ (ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТаблицаТоваров.ВозвратПереданнойМногооборотнойТары) СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.ПереданныеСчетУчета, ТаблицаТоваров.СпособУчетаНДС, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, СУММА(ТаблицаТоваров.Количество) КАК Количество ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТаблицаТоваров.ВозвратПереданнойМногооборотнойТары СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляВозвратаПоставщику" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, 1 КАК Коэффициент, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВидыЗапасов.СуммаНДС, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.Ссылка.ВозвратПринятойМногооборотнойТары ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВозвратТоваровПоставщику.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И (Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара)) ИНДЕКСИРОВАТЬ ПО Аналитика.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.Сумма, ВидыЗапасов.СуммаНДС, ВидыЗапасов.Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.ВозвратПринятойМногооборотнойТары ПОМЕСТИТЬ ТаблицаТоваров ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ВозвратТоваровПоставщику.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.СтавкаНДС, ТаблицаТоваров.Цена, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.НомерСтроки, СУММА(ТаблицаТоваров.Количество) КАК Количество, СУММА(ТаблицаТоваров.Сумма) КАК Сумма, СУММА(ТаблицаТоваров.СуммаНДС) КАК СуммаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ (ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТаблицаТоваров.ВозвратПринятойМногооборотнойТары) СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.СтавкаНДС, ТаблицаТоваров.Цена, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, ТаблицаТоваров.НомерСтроки, СУММА(ТаблицаТоваров.Количество) КАК Количество, СУММА(ТаблицаТоваров.Сумма) КАК Сумма ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТаблицаТоваров.ВозвратПринятойМногооборотнойТары СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.Цена, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляОтчетаОРозничныхПродажах" ИспользуетсяПриЗагрузке="false"> <Текст> ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, Товары.Количество КАК Количество, Товары.Цена КАК Цена, Товары.Сумма КАК Сумма, Товары.СтавкаНДС КАК СтавкаНДС, Товары.СуммаНДС КАК СуммаНДС, Товары.НомерСтроки КАК НомерСтроки, Товары.Номенклатура.ТипНоменклатуры КАК ТипНоменклатуры ПОМЕСТИТЬ ТаблицаТовары ИЗ Документ.ОтчетОРозничныхПродажах.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, СУММА(ВидыЗапасов.Количество) КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, СУММА(ВидыЗапасов.СуммаСНДС) КАК СуммаСНДС, ВидыЗапасов.Ссылка.ЦенаВключаетНДС КАК ЦенаВключаетНДС ПОМЕСТИТЬ ВидыЗапасовБезЦены ИЗ Документ.ОтчетОРозничныхПродажах.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Аналитика.Номенклатура, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ, ВидыЗапасов.Ссылка.ЦенаВключаетНДС ИМЕЮЩИЕ СУММА(ВидыЗапасов.Количество) <> 0 ОБЪЕДИНИТЬ ВСЕ ВЫБРАТЬ Аналитика.Номенклатура, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, СУММА(ВидыЗапасов.СуммаНДС), ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ, СУММА(ВидыЗапасов.СуммаСНДС), ВидыЗапасов.Ссылка.ЦенаВключаетНДС ИЗ (ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, СУММА(ВидыЗапасов.Количество) КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, СУММА(ВидыЗапасов.СуммаСНДС) КАК СуммаСНДС ИЗ Документ.ОтчетОРозничныхПродажах.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Аналитика.Номенклатура, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД ИМЕЮЩИЕ СУММА(ВидыЗапасов.Количество) = 0 И СУММА(ВидыЗапасов.СуммаСНДС) <> 0) КАК ТаблицаПустоеКоличество ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.ОтчетОРозничныхПродажах.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ПО ТаблицаПустоеКоличество.Номенклатура = ВидыЗапасов.АналитикаУчетаНоменклатуры.Номенклатура И ТаблицаПустоеКоличество.СтавкаНДС = ВидыЗапасов.СтавкаНДС И ТаблицаПустоеКоличество.НомерГТД = ВидыЗапасов.НомерГТД ГДЕ ВидыЗапасов.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Аналитика.Номенклатура, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ, ВидыЗапасов.Ссылка.ЦенаВключаетНДС, ВидыЗапасов.Количество ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма ПОМЕСТИТЬ ВидыЗапасов ИЗ ВидыЗапасовБезЦены КАК ВидыЗапасов ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.Цена КАК Цена, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки КАК НомерСтроки, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.Сумма КАК Сумма, ВидыЗапасов.СуммаНДС КАК СуммаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ МАКСИМУМ(ТаблицаТовары.НомерСтроки) КАК НомерСтроки, ТаблицаТовары.Номенклатура КАК Номенклатура ИЗ ТаблицаТовары КАК ТаблицаТовары СГРУППИРОВАТЬ ПО ТаблицаТовары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура ОБЪЕДИНИТЬ ВСЕ ВЫБРАТЬ ТаблицаТовары.Номенклатура, ТаблицаТовары.Цена, ТаблицаТовары.СтавкаНДС, NULL, NULL, NULL, ТаблицаТовары.НомерСтроки, ТаблицаТовары.Количество, ТаблицаТовары.Сумма, ТаблицаТовары.СуммаНДС ИЗ ТаблицаТовары КАК ТаблицаТовары ГДЕ (ТаблицаТовары.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) ИЛИ ТаблицаТовары.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа)) <Запрос Имя="ТоварыИзВидовЗапасовДляПересортицыСписание" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПересортицаТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ПересортицаТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляПорчиТоваровПриходСебест" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ АналитикаОприходования.Номенклатура КАК Номенклатура, АналитикаОприходования.Характеристика КАК Характеристика, АналитикаСписания.Номенклатура КАК НоменклатураСписание, АналитикаСписания.Характеристика КАК ХарактеристикаСписание, АналитикаОприходования.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПорчаТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК АналитикаСписания ПО (ВидыЗапасов.АналитикаУчетаНоменклатуры = АналитикаСписания.КлючАналитики) ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК АналитикаОприходования ПО (ВидыЗапасов.АналитикаУчетаНоменклатурыОприходование = АналитикаОприходования.КлючАналитики) ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.Характеристика КАК Характеристика, ВидыЗапасов.НоменклатураСписание КАК НоменклатураСписание, ВидыЗапасов.ХарактеристикаСписание КАК ХарактеристикаСписание, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Коэффициент КАК Коэффициент, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки КАК НомерСтроки, ВидыЗапасов.Количество КАК Количество ПОМЕСТИТЬ ТаблицаТоваров ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.НоменклатураОприходование КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ПорчаТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.НоменклатураОприходование) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВЫБОР КОГДА &РегВалюта <> &УпрВалюта ТОГДА ВЫБОР КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) ИНАЧЕ 0 КОНЕЦ ИНАЧЕ 1 КОНЕЦ КАК Курс ПОМЕСТИТЬ КурсПересчета ИЗ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &УпрВалюта) КАК КурсыВалютыЦены ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты ПО (ИСТИНА) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура КАК Номенклатура, ТаблицаТоваров.НомерГТД КАК НомерГТД, ТаблицаТоваров.СтранаПроисхождения КАК СтранаПроисхождения, ТаблицаТоваров.СчетУчета КАК СчетУчета, ЦеныНоменклатурыСрезПоследних.Цена * КурсПересчета.Курс КАК Цена, ТаблицаТоваров.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент КАК Коэффициент, ТаблицаТоваров.Количество КАК Количество, ТаблицаТоваров.НомерСтроки КАК НомерСтроки ПОМЕСТИТЬ ТоварыСЦенами ИЗ ТаблицаТоваров КАК ТаблицаТоваров ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних( &Дата, ВидЦены = &ВидЦен И (Номенклатура, Характеристика) В (ВЫБРАТЬ ТаблицаТоваров.НоменклатураСписание, ТаблицаТоваров.ХарактеристикаСписание ИЗ ТаблицаТоваров КАК ТаблицаТоваров)) КАК ЦеныНоменклатурыСрезПоследних ПО ТаблицаТоваров.НоменклатураСписание = ЦеныНоменклатурыСрезПоследних.Номенклатура И ТаблицаТоваров.ХарактеристикаСписание = ЦеныНоменклатурыСрезПоследних.Характеристика ЛЕВОЕ СОЕДИНЕНИЕ КурсПересчета КАК КурсПересчета ПО (ИСТИНА) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыСЦенами.Номенклатура КАК Номенклатура, ТоварыСЦенами.НомерГТД КАК НомерГТД, ТоварыСЦенами.СтранаПроисхождения КАК СтранаПроисхождения, ТоварыСЦенами.СчетУчета КАК СчетУчета, ТоварыСЦенами.Цена КАК Цена, СУММА(ТоварыСЦенами.Цена * ТоварыСЦенами.Количество) КАК Сумма, ТоварыСЦенами.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ТоварыСЦенами.Коэффициент КАК Коэффициент, СУММА(ТоварыСЦенами.Количество) КАК Количество ИЗ ТоварыСЦенами КАК ТоварыСЦенами СГРУППИРОВАТЬ ПО ТоварыСЦенами.Номенклатура, ТоварыСЦенами.НомерГТД, ТоварыСЦенами.СтранаПроисхождения, ТоварыСЦенами.СчетУчета, ТоварыСЦенами.Цена, ТоварыСЦенами.ЕдиницаИзмерения, ТоварыСЦенами.Коэффициент, ТоварыСЦенами.НомерСтроки УПОРЯДОЧИТЬ ПО ТоварыСЦенами.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляПорчиТоваровПриходЦены" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ АналитикаОприходования.Номенклатура КАК Номенклатура, АналитикаОприходования.Характеристика КАК Характеристика, АналитикаОприходования.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПорчаТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК АналитикаОприходования ПО (ВидыЗапасов.АналитикаУчетаНоменклатурыОприходование = АналитикаОприходования.КлючАналитики) ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Коэффициент КАК Коэффициент, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ВидыЗапасов.Количество КАК Количество, ПорядокСтрокИЦеныТаблицыТовары.НомерСтроки КАК НомерСтроки, ПорядокСтрокИЦеныТаблицыТовары.Цена КАК Цена, ВидыЗапасов.Количество * ПорядокСтрокИЦеныТаблицыТовары.Цена КАК Сумма ПОМЕСТИТЬ ТаблицаТоваров ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.НоменклатураОприходование КАК Номенклатура, Товары.ХарактеристикаОприходование КАК Характеристика, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки, МАКСИМУМ(Товары.Цена) КАК Цена ИЗ Документ.ПорчаТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.НоменклатураОприходование, Товары.ХарактеристикаОприходование) КАК ПорядокСтрокИЦеныТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокИЦеныТаблицыТовары.Номенклатура И ВидыЗапасов.Характеристика = ПорядокСтрокИЦеныТаблицыТовары.Характеристика ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВЫБОР КОГДА &РегВалюта <> &УпрВалюта ТОГДА ВЫБОР КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) ИНАЧЕ 0 КОНЕЦ ИНАЧЕ 1 КОНЕЦ КАК Курс ПОМЕСТИТЬ КурсПересчета ИЗ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &УпрВалюта) КАК КурсыВалютыЦены ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &РегВалюта) КАК КурсыВалюты ПО (ИСТИНА) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура КАК Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент КАК Коэффициент, ТаблицаТоваров.НомерГТД КАК НомерГТД, ТаблицаТоваров.СтранаПроисхождения КАК СтранаПроисхождения, ТаблицаТоваров.СчетУчета КАК СчетУчета, СУММА(ТаблицаТоваров.Количество) КАК Количество, ТаблицаТоваров.Цена * КурсПересчета.Курс КАК Цена, СУММА(ТаблицаТоваров.Сумма * КурсПересчета.Курс) КАК Сумма ИЗ ТаблицаТоваров КАК ТаблицаТоваров ЛЕВОЕ СОЕДИНЕНИЕ КурсПересчета КАК КурсПересчета ПО (ИСТИНА) СГРУППИРОВАТЬ ПО ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.НомерГТД, ТаблицаТоваров.СтранаПроисхождения, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.Цена * КурсПересчета.Курс, ТаблицаТоваров.НомерСтроки УПОРЯДОЧИТЬ ПО ТаблицаТоваров.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляПорчиТоваровСписание" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПорчаТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ПорчаТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляРеализацииТУКомиссия" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, 1 КАК Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыПереданныеНаКомиссию" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК ПереданныеСчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВидыЗапасов.Ссылка.ВернутьМногооборотнуюТару ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.РеализацияТоваровУслуг.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И Аналитика.Номенклатура.ТипНоменклатуры <> ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) ИНДЕКСИРОВАТЬ ПО Аналитика.Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ПереданныеСчетУчета, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.ВернутьМногооборотнуюТару ПОМЕСТИТЬ ТоварыДокумента ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки, Товары.Номенклатура КАК Номенклатура ИЗ Документ.РеализацияТоваровУслуг.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ПереданныеСчетУчета, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.ВернутьМногооборотнуюТару ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.Номенклатура, ТоварыДокумента.ЕдиницаИзмерения, ТоварыДокумента.Коэффициент, ТоварыДокумента.СтавкаНДС, ТоварыДокумента.Цена, ТоварыДокумента.НомерГТД, ТоварыДокумента.СтранаПроисхождения, ТоварыДокумента.ПереданныеСчетУчета, ТоварыДокумента.СчетУчета, ТоварыДокумента.Количество, ТоварыДокумента.Сумма, ТоварыДокумента.СуммаНДС, ТоварыДокумента.ВернутьМногооборотнуюТару ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТоварыДокумента.ВернутьМногооборотнуюТару) УПОРЯДОЧИТЬ ПО ТоварыДокумента.НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.Номенклатура, ТоварыДокумента.Количество, ТоварыДокумента.Цена, ТоварыДокумента.Сумма ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТоварыДокумента.ВернутьМногооборотнуюТару УПОРЯДОЧИТЬ ПО ТоварыДокумента.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляРеализацииТУПродажа" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, Товары.Номенклатура.Наименование, Товары.Количество, Товары.Цена, Товары.Сумма, Товары.СтавкаНДС, Товары.СуммаНДС, Товары.Номенклатура.ТипНоменклатуры, Товары.НомерСтроки ПОМЕСТИТЬ ТаблицаТовары ИЗ Документ.РеализацияТоваровУслуг.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВидыЗапасов.Ссылка.ВернутьМногооборотнуюТару ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.РеализацияТоваровУслуг.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И Аналитика.Номенклатура.ТипНоменклатуры <> ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) И Аналитика.Номенклатура.ТипНоменклатуры <> ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТовары.Номенклатура, ТаблицаТовары.НоменклатураНаименование КАК Содержание, ТаблицаТовары.Количество, ТаблицаТовары.Цена, ТаблицаТовары.СтавкаНДС, ТаблицаТовары.Сумма, ТаблицаТовары.СуммаНДС ИЗ ТаблицаТовары КАК ТаблицаТовары ГДЕ ТаблицаТовары.НоменклатураТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) ИЛИ ТаблицаТовары.НоменклатураТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.ВернутьМногооборотнуюТару ПОМЕСТИТЬ ТоварыДокумента ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ ТаблицаТовары.Номенклатура КАК Номенклатура, МАКСИМУМ(ТаблицаТовары.НомерСтроки) КАК НомерСтроки ИЗ ТаблицаТовары КАК ТаблицаТовары СГРУППИРОВАТЬ ПО ТаблицаТовары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.Цена, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.ВернутьМногооборотнуюТару ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.Номенклатура, ТоварыДокумента.ЕдиницаИзмерения, ТоварыДокумента.Коэффициент, ТоварыДокумента.СтавкаНДС, ТоварыДокумента.Цена, ТоварыДокумента.НомерГТД, ТоварыДокумента.СтранаПроисхождения, ТоварыДокумента.СчетУчета, ТоварыДокумента.НомерСтроки КАК НомерСтроки, ТоварыДокумента.Количество, ТоварыДокумента.Сумма, ТоварыДокумента.СуммаНДС ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ (ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИЛИ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И НЕ ТоварыДокумента.ВернутьМногооборотнуюТару) УПОРЯДОЧИТЬ ПО НомерСтроки ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТоварыДокумента.Номенклатура, ТоварыДокумента.Количество, ТоварыДокумента.Цена, ТоварыДокумента.Сумма ИЗ ТоварыДокумента КАК ТоварыДокумента ГДЕ ТоварыДокумента.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.МногооборотнаяТара) И ТоварыДокумента.ВернутьМногооборотнуюТару УПОРЯДОЧИТЬ ПО ТоварыДокумента.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовДляСписания" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.СписаниеНедостачТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.СписаниеНедостачТоваров.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовИКВозвратОтКомиссионера" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасовПолучателя.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасовПолучателя.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыПереданныеНаКомиссию" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК ПереданныеСчетУчета, ВидыЗапасов.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ВозвратТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ВидыЗапасов.ПереданныеСчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, "НеПринимаются" КАК ОтражениеВУСН, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.СпособУчетаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки, Товары.Номенклатура КАК Номенклатура ИЗ Документ.ВозвратТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ВидыЗапасов.ПереданныеСчетУчета, ВидыЗапасов.СпособУчетаНДС, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовИКВозвратОтПокупателя" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, СУММА(ВидыЗапасов.Количество) КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасовПолучателя.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВидыЗапасов.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС, СУММА(ВидыЗапасов.СуммаСНДС) КАК СуммаСНДС, ВидыЗапасов.Ссылка.ЦенаВключаетНДС КАК ЦенаВключаетНДС, СУММА(ВидыЗапасов.КоличествоУпаковок) КАК КоличествоУпаковок, ВидыЗапасов.Ссылка КАК Ссылка ПОМЕСТИТЬ ВидыЗапасовНачало ИЗ Документ.ВозвратТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО (ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики) ГДЕ ВидыЗапасов.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасовПолучателя.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ, ВидыЗапасов.Ссылка.НалогообложениеНДС, ВидыЗапасов.Ссылка.ЦенаВключаетНДС, ВидыЗапасов.Ссылка ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Количество = 0 ТОГДА ВЫБОР КОГДА ВидыЗапасов.КоличествоУпаковок = 0 ТОГДА ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ ИНАЧЕ ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.КоличествоУпаковок ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.КоличествоУпаковок КОНЕЦ КОНЕЦ ИНАЧЕ ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ОбъектРасчетов.Объект = ЗНАЧЕНИЕ(Документ.ПередачаТоваровМеждуОрганизациями.ПустаяСсылка) ТОГДА ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС ИНАЧЕ 0 КОНЕЦ КАК Себестоимость, ВидыЗапасов.СчетУчета КАК СчетУчета, ВидыЗапасов.Ссылка.НалогообложениеНДС КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ ВидыЗапасовНачало КАК ВидыЗапасов ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Коэффициент КАК Коэффициент, ВидыЗапасов.Цена КАК Цена, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СчетУчета КАК СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки КАК НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС, СУММА(ВидыЗапасов.Себестоимость) КАК Себестоимость, ВидыЗапасов.СпособУчетаНДС КАК СпособУчетаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки, Товары.Номенклатура КАК Номенклатура ИЗ Документ.ВозвратТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО (ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура) СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ВидыЗапасов.СпособУчетаНДС, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовИКВозвратПоставщику" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма ПОМЕСТИТЬ ВидыЗапасов ИЗ (ВЫБРАТЬ ВЫБОР КОГДА ВидыЗапасов.Количество = 0 ТОГДА ВЫБОР КОГДА ВидыЗапасов.КоличествоУпаковок = 0 ТОГДА 1 ИНАЧЕ ВидыЗапасов.КоличествоУпаковок КОНЕЦ ИНАЧЕ ВидыЗапасов.Количество КОНЕЦ КАК Количество, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, ВидыЗапасов.СуммаСНДС КАК СуммаСНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.Ссылка.ЦенаВключаетНДС КАК ЦенаВключаетНДС, ВидыЗапасов.АналитикаУчетаНоменклатуры КАК АналитикаУчетаНоменклатуры ИЗ Документ.ВозвратТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ГДЕ ВидыЗапасов.Ссылка = &Ссылка) КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО (Аналитика.КлючАналитики = ВидыЗапасов.АналитикаУчетаНоменклатуры) ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура КАК Номенклатура, ВидыЗапасов.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Коэффициент КАК Коэффициент, ВидыЗапасов.Цена КАК Цена, ВидыЗапасов.СтавкаНДС КАК СтавкаНДС, ВидыЗапасов.НомерГТД КАК НомерГТД, ВидыЗапасов.СтранаПроисхождения КАК СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки КАК НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки, Товары.Номенклатура КАК Номенклатура ИЗ Документ.ВозвратТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовИКПередачаКомиссионеру" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС КАК СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыПереданныеНаКомиссию" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК ПереданныеСчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПередачаТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ПереданныеСчетУчета, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, МАКСИМУМ(Товары.НомерСтроки) КАК НомерСтроки ИЗ Документ.ПередачаТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка СГРУППИРОВАТЬ ПО Товары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.ПереданныеСчетУчета, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИзВидовЗапасовПеремещения" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, 1 КАК Коэффициент, ВидыЗапасов.Количество, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК НовыйСчетУчета, ВидыЗапасов.Ссылка.ПеремещениеПодДеятельность КАК СпособУчетаНДС ПОМЕСТИТЬ ТаблицаТоваров ИЗ Документ.ПеремещениеТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.Количество, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.НовыйСчетУчета, 0 КАК ЦенаВРознице, 0 КАК СуммаВРознице, НЕОПРЕДЕЛЕНО КАК СтавкаНДСВРознице, ТаблицаТоваров.СпособУчетаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.СчетУчета = НЕОПРЕДЕЛЕНО ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.Количество, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.НовыйСчетУчета, ТаблицаТоваров.СпособУчетаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.СчетУчета = "ТоварыНаСкладе" <Запрос Имя="ТоварыИзВидовЗапасовПеремещенияСЦенамиДляРозницы" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Характеристика КАК Характеристика, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК НовыйСчетУчета, ВидыЗапасов.Ссылка.ПеремещениеПодДеятельность КАК СпособУчетаНДС ПОМЕСТИТЬ ТаблицаТоваров ИЗ Документ.ПеремещениеТоваров.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура, Характеристика ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.Количество, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.НовыйСчетУчета, ЦеныНоменклатурыСрезПоследних.Цена / ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Упаковка.Знаменатель / ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Упаковка.Числитель, 1), 1) * ВЫБОР КОГДА &Валюта <> ЦеныНоменклатурыСрезПоследних.Валюта ТОГДА ВЫБОР КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) ИНАЧЕ 0 КОНЕЦ ИНАЧЕ 1 КОНЕЦ КАК ЦенаВРознице, ЦеныНоменклатурыСрезПоследних.Цена / ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Упаковка.Знаменатель / ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Упаковка.Числитель, 1), 1) * ВЫБОР КОГДА &Валюта <> ЦеныНоменклатурыСрезПоследних.Валюта ТОГДА ВЫБОР КОГДА ЕСТЬNULL(КурсыВалютыЦены.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалютыЦены.Курс, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Кратность, 0) > 0 И ЕСТЬNULL(КурсыВалюты.Курс, 0) > 0 ТОГДА КурсыВалютыЦены.Курс * КурсыВалюты.Кратность / (КурсыВалюты.Курс * КурсыВалютыЦены.Кратность) ИНАЧЕ 0 КОНЕЦ ИНАЧЕ 1 КОНЕЦ * ТаблицаТоваров.Количество КАК СуммаВРознице, ТаблицаТоваров.Номенклатура.СтавкаНДС КАК СтавкаНДСВРознице, ТаблицаТоваров.СпособУчетаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних( &Дата, ВидЦены = &ВидЦен И Номенклатура В (ВЫБРАТЬ ТаблицаТоваров.Номенклатура ИЗ ТаблицаТоваров КАК ТаблицаТоваров) И Характеристика В (ВЫБРАТЬ ТаблицаТоваров.Характеристика ИЗ ТаблицаТоваров КАК ТаблицаТоваров)) КАК ЦеныНоменклатурыСрезПоследних ПО ТаблицаТоваров.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура И ТаблицаТоваров.Характеристика = ЦеныНоменклатурыСрезПоследних.Характеристика ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, ) КАК КурсыВалютыЦены ПО (ЦеныНоменклатурыСрезПоследних.Валюта = КурсыВалютыЦены.Валюта) ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют.СрезПоследних(&Дата, Валюта = &Валюта) КАК КурсыВалюты ПО (ИСТИНА) ГДЕ ТаблицаТоваров.СчетУчета = НЕОПРЕДЕЛЕНО ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТоваров.Номенклатура, ТаблицаТоваров.ЕдиницаИзмерения, ТаблицаТоваров.Количество, ТаблицаТоваров.Коэффициент, ТаблицаТоваров.СчетУчета, ТаблицаТоваров.НовыйСчетУчета, ТаблицаТоваров.СпособУчетаНДС ИЗ ТаблицаТоваров КАК ТаблицаТоваров ГДЕ ТаблицаТоваров.СчетУчета = "ТоварыНаСкладе" <Запрос Имя="ТоварыИУслугиИзВидовЗапасовИКПокупка" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Товары.НомерСтроки, Товары.Номенклатура, Товары.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, Товары.Номенклатура.ТипНоменклатуры КАК ТипНоменклатуры, Товары.Количество КАК Количество, Товары.Цена, Товары.Сумма, Товары.СтавкаНДС, Товары.СуммаНДС, Товары.НомерГТД, Товары.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, Товары.СтатьяРасходов, Товары.СтатьяРасходов.КорреспондирующийСчет КАК КорреспондирующийСчет, 1 КАК Коэффициент, Товары.СуммаСНДС, ВЫБОР КОГДА Товары.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.РеализацияТоваровВДругуюОрганизацию) ТОГДА Товары.Ссылка.ПередачаПодДеятельность ИНАЧЕ Товары.Ссылка.НалогообложениеНДС КОНЕЦ КАК СпособУчетаНДС ПОМЕСТИТЬ ВременнаяТаблицаТовары ИЗ Документ.ПередачаТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВременнаяТаблицаТовары.Номенклатура, ВременнаяТаблицаТовары.ЕдиницаИзмерения, ВременнаяТаблицаТовары.ТипНоменклатуры, ВременнаяТаблицаТовары.Количество, ВременнаяТаблицаТовары.Цена, ВременнаяТаблицаТовары.Сумма, ВременнаяТаблицаТовары.СтавкаНДС, ВременнаяТаблицаТовары.СуммаНДС, ВременнаяТаблицаТовары.НомерГТД, ВременнаяТаблицаТовары.СтранаПроисхождения, ВременнаяТаблицаТовары.СтатьяРасходов, ВременнаяТаблицаТовары.КорреспондирующийСчет, ВременнаяТаблицаТовары.Коэффициент, ВременнаяТаблицаТовары.СуммаСНДС, ВременнаяТаблицаТовары.СпособУчетаНДС ИЗ ВременнаяТаблицаТовары КАК ВременнаяТаблицаТовары ГДЕ ВременнаяТаблицаТовары.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) ИЛИ ВременнаяТаблицаТовары.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ХозяйственнаяОперация = ЗНАЧЕНИЕ(Перечисление.ХозяйственныеОперации.РеализацияТоваровВДругуюОрганизацию) ТОГДА ВидыЗапасов.Ссылка.ПередачаПодДеятельность ИНАЧЕ ВидыЗапасов.Ссылка.НалогообложениеНДС КОНЕЦ КАК СпособУчетаНДС ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПередачаТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки, ВидыЗапасов.СпособУчетаНДС, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ ТаблицаТовары.Номенклатура КАК Номенклатура, МАКСИМУМ(ТаблицаТовары.НомерСтроки) КАК НомерСтроки ИЗ ВременнаяТаблицаТовары КАК ТаблицаТовары СГРУППИРОВАТЬ ПО ТаблицаТовары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СпособУчетаНДС, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки <Запрос Имя="ТоварыИУслугиИзВидовЗапасовИКПродажа" ИспользуетсяПриЗагрузке="false"> <Текст>ВЫБРАТЬ Товары.Номенклатура КАК Номенклатура, Товары.Номенклатура.Наименование, Товары.Количество, Товары.Цена, Товары.Сумма, Товары.СтавкаНДС, Товары.СуммаНДС, Товары.Номенклатура.ТипНоменклатуры, Товары.НомерСтроки ПОМЕСТИТЬ ТаблицаТовары ИЗ Документ.ПередачаТоваровМеждуОрганизациями.Товары КАК Товары ГДЕ Товары.Ссылка = &Ссылка ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ТаблицаТовары.Номенклатура, ТаблицаТовары.НоменклатураНаименование КАК Содержание, ТаблицаТовары.Количество, ТаблицаТовары.Цена, ТаблицаТовары.СтавкаНДС, ТаблицаТовары.Сумма, ТаблицаТовары.СуммаНДС ИЗ ТаблицаТовары КАК ТаблицаТовары ГДЕ ТаблицаТовары.НоменклатураТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Услуга) ИЛИ ТаблицаТовары.НоменклатураТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Работа) ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ Аналитика.Номенклатура КАК Номенклатура, Аналитика.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения, ВидыЗапасов.Количество КАК Количество, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.СуммаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.НомерГТД.СтранаПроисхождения КАК СтранаПроисхождения, 1 КАК Коэффициент, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС / ВидыЗапасов.Количество ИНАЧЕ (ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС) / ВидыЗапасов.Количество КОНЕЦ КАК Цена, ВЫБОР КОГДА ВидыЗапасов.Ссылка.ЦенаВключаетНДС ТОГДА ВидыЗапасов.СуммаСНДС ИНАЧЕ ВидыЗапасов.СуммаСНДС - ВидыЗапасов.СуммаНДС КОНЕЦ КАК Сумма, ВЫБОР КОГДА ВидыЗапасов.ВидЗапасов.ТипЗапасов = ЗНАЧЕНИЕ(Перечисление.ТипыЗапасов.КомиссионныйТовар) ТОГДА "ТоварыНаСкладе" ИНАЧЕ НЕОПРЕДЕЛЕНО КОНЕЦ КАК СчетУчета ПОМЕСТИТЬ ВидыЗапасов ИЗ Документ.ПередачаТоваровМеждуОрганизациями.ВидыЗапасов КАК ВидыЗапасов ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.АналитикаУчетаНоменклатуры КАК Аналитика ПО ВидыЗапасов.АналитикаУчетаНоменклатуры = Аналитика.КлючАналитики ГДЕ ВидыЗапасов.Ссылка = &Ссылка И Аналитика.Номенклатура.ТипНоменклатуры = ЗНАЧЕНИЕ(Перечисление.ТипыНоменклатуры.Товар) ИНДЕКСИРОВАТЬ ПО Номенклатура ; //////////////////////////////////////////////////////////////////////////////// ВЫБРАТЬ ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СтранаПроисхождения, ВидыЗапасов.СчетУчета, ПорядокСтрокТаблицыТовары.НомерСтроки, СУММА(ВидыЗапасов.Количество) КАК Количество, СУММА(ВидыЗапасов.Сумма) КАК Сумма, СУММА(ВидыЗапасов.СуммаНДС) КАК СуммаНДС ИЗ ВидыЗапасов КАК ВидыЗапасов ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ ТаблицаТовары.Номенклатура КАК Номенклатура, МАКСИМУМ(ТаблицаТовары.НомерСтроки) КАК НомерСтроки ИЗ ТаблицаТовары КАК ТаблицаТовары СГРУППИРОВАТЬ ПО ТаблицаТовары.Номенклатура) КАК ПорядокСтрокТаблицыТовары ПО ВидыЗапасов.Номенклатура = ПорядокСтрокТаблицыТовары.Номенклатура СГРУППИРОВАТЬ ПО ВидыЗапасов.Номенклатура, ВидыЗапасов.ЕдиницаИзмерения, ВидыЗапасов.Коэффициент, ВидыЗапасов.Цена, ВидыЗапасов.СтавкаНДС, ВидыЗапасов.НомерГТД, ВидыЗапасов.СчетУчета, ВидыЗапасов.СтранаПроисхождения, ПорядокСтрокТаблицыТовары.НомерСтроки УПОРЯДОЧИТЬ ПО ПорядокСтрокТаблицыТовары.НомерСтроки