Счета-фактура (СФ) и универсальный передаточный документ (УПД) (в редакции от 19.08.2017 № 981) для конфигурации ТиС 7.7 и КК 7.7
Внешняя печатная форма счета-фактуры (СФ) и универсального передаточного документа (УПД), (в редакции Постановления Правительства РФ от 19.08.2017 № 981) с тремя периодами - до 01.07.2017, с 01.07.2017 по 01.10.2017 и с 01.10.2017 для конфигурации ТиС 7.7 и Комплексная конфигурация 7.7
Комментарии
Избранное
Подписка
Сортировка:
Древо
Добрый день. Спасибо пользуюсь.
Хочу показать вам ошибочку. Если распределяется по партиям вторая строка документа - то косяк.
Вот это я исправил:
Так:
Перед циклом:
Потом так:
Хочу показать вам ошибочку. Если распределяется по партиям вторая строка документа - то косяк.
Вот это я исправил:
МнЧ.Номенклатура = МнЧ.ПолучитьЗначение(1,"Номенклатура");
МнЧ.ТоварКод = МнЧ.ПолучитьЗначение(1,"ТоварКод");
МнЧ.Цена = МнЧ.ПолучитьЗначение(1,"Цена");
МнЧ.СтавкаНДС = МнЧ.ПолучитьЗначение(1,"СтавкаНДС");
МнЧ.Единица = МнЧ.ПолучитьЗначение(1,"Единица");
МнЧ.ЕдиницаКод = МнЧ.ПолучитьЗначение(1,"ЕдиницаКод");
МнЧ.АкцизЦена = МнЧ.ПолучитьЗначение(1,"АкцизЦена"); Так:
Перед циклом:
НомерОсновнойСтроки = 0;Потом так:
Если РаспредГТД.НомерСтроки = 1 Тогда
НомерОсновнойСтроки = МнЧ.НомерСтроки;
Иначе
МнЧ.НоваяСтрока();
МнЧ.Номенклатура = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"Номенклатура");
МнЧ.ТоварКод = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"ТоварКод");
МнЧ.Цена = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"Цена");
МнЧ.СтавкаНДС = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"СтавкаНДС");
МнЧ.Единица = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"Единица");
МнЧ.ЕдиницаКод = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"ЕдиницаКод");
МнЧ.АкцизЦена = МнЧ.ПолучитьЗначение(НомерОсновнойСтроки,"АкцизЦена");
КонецЕсли; Показать
Легло на 941 релиз почти без доработки. Пришлось изменить строки начиная с 414 так:
В остальном все ОК
//Если глЕстьРеквизитШапки("КодОперации", ВидОсн) = 1 Тогда
// БратьСуммыИзУчета = глБратьСуммыИзУчета(Докум.ДатаДок, Докум.КодОперации);
//Иначе
// БратьСуммыИзУчета = глБратьСуммыИзУчета(Докум.ДатаДок);
//КонецЕсли;
БратьСуммыИзУчета = 0;В остальном все ОК
Новые вопросы с вознаграждением
Автор темы объявил вознаграждение за найденный ответ, его получит тот, кто первый поможет автору.
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
|
Перенос данных КА 1.1 => ERP 2 (ЕРП) (обработка переноса документов, остатков и справочной информации из "1С:Комплексная автоматизация, ред. 1.1" в "1С:ERP Управление предприятием, ред 2")
|
Перенос данных КА 1.1 => ERP 2 (ЕРП) (обработка переноса документов, остатков и справочной информации из "1С:Комплексная автоматизация, ред. 1.1" в "1С:ERP Управление предприятием, ред 2")
Открыть