#Область Документ_ОтчетОРозничныхПродажах_Отправка
Процедура ДобавитьПКО_Документ_ОтчетОРозничныхПродажах_Отправка(ПравилаКонвертации)
ПравилоКонвертации = ОбменДаннымиXDTOСервер.ИнициализироватьПравилоКонвертацииОбъекта(ПравилаКонвертации);
ПравилоКонвертации.ИмяПКО = "Документ_ОтчетОРозничныхПродажах_Отправка";
ПравилоКонвертации.ОбъектДанных = Метаданные.Документы.ОтчетОРозничныхПродажах;
ПравилоКонвертации.ОбъектФормата = "Документ.ОтчетОРозничныхПродажах";
ПравилоКонвертации.ПриОтправкеДанных = "ПКО_Документ_ОтчетОРозничныхПродажах_Отправка_ПриОтправкеДанных";
СвойстваШапки = ПравилоКонвертации.Свойства;
ДобавитьПКС(СвойстваШапки, "ВалютаДокумента", "Валюта", , "Справочник_Валюты");
ДобавитьПКС(СвойстваШапки, "ВидЦен", "ТипЦен", , "Справочник_ТипыЦен");
ДобавитьПКС(СвойстваШапки, "Дата", "Дата");
ДобавитьПКС(СвойстваШапки, "КассоваяСмена", "КассоваяСмена", , "Документ_КассоваяСменаОткрытие_Отправка");
ДобавитьПКС(СвойстваШапки, "Комментарий", "Комментарий");
ДобавитьПКС(СвойстваШапки, "НалогообложениеНДС", "Налогообложение", , "Перечисления_ТипыНалогообложенияНДС_Отправка");
ДобавитьПКС(СвойстваШапки, "Номер", "Номер");
ДобавитьПКС(СвойстваШапки, "Организация", "Организация", , "Справочник_Организации_Отправка");
ДобавитьПКС(СвойстваШапки, "Подразделение", "Подразделение", , "Справочник_Подразделения_Отправка");
ДобавитьПКС(СвойстваШапки, "Статья", "СтатьяДДС", , "Справочник_СтатьиДДС");
ДобавитьПКС(СвойстваШапки, "СуммаВключаетНДС", "СуммаВключаетНДС");
ДобавитьПКС(СвойстваШапки, "СуммаДокумента", "Сумма");
ДобавитьПКС(СвойстваШапки, "", "", 1);
ДобавитьПКС(СвойстваШапки, "", "КассаККМ", 1, "Справочник_КассыККМ_Отправка");
ДобавитьПКС(СвойстваШапки, "", "Патент", 1, "Справочник_Патенты_Отправка");
ДобавитьПКС(СвойстваШапки, "СтруктурнаяЕдиница", "Склад", 1, "Справочник_Склады_Отправка");
....................................................
Процедура ПКО_Документ_ОтчетОРозничныхПродажах_Отправка_ПриОтправкеДанных(ДанныеИБ, ДанныеXDTO, КомпонентыОбмена, СтекВыгрузки)
Если СтекВыгрузки.Количество() > 1 Тогда
Возврат;
КонецЕсли;
Если ВерсияФорматаЧислом(КомпонентыОбмена.ВерсияФорматаОбмена) >= ВерсияФорматаЧислом("1.6") Тогда
ДанныеXDTO.Вставить("КассаККМ", ДанныеИБ.КассаККМ);
КонецЕсли;
Если КомпонентыОбмена.ПараметрыКонвертации.ИспользуютсяСкладыВТабличныхЧастях Тогда
Склад = КомпонентыОбмена.ПараметрыКонвертации.ОбобщенныйСклад;
Иначе
Склад = ДанныеИБ.СтруктурнаяЕдиница;
КонецЕсли;
ДанныеXDTO.Вставить("Склад", Склад);
....................................................
|