Исправление документов интеркампани

22.04.22

Задачи пользователя - Корректировка данных

При загрузке в бухгалтерию передач товаров между организациями в БП формируются документы реализации по одной компании и документы поступления по второй. Если у вас практикуется исправление реализаций после загрузки, и ответственный сотрудник "забывает" исправить документ поступления, тогда данные по отгрузке и поступлению между организациями разойдутся. Эта обработка покажет все реализации, сумма которых отличается от суммы поступления, и перезаполнит поступления. Если по обрабатываемой реализации вводились корректировки, тогда в корректировках будет перезаполнена информация по исходным данным документа. Поиск документов идет по одинаковому номеру в пределах 1 дня.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование SM По подписке [?] Купить один файл
Внешняя обработка для исправления документов
.epf 12,62Kb
4
4
1 SM
Скачать Купить за 1 850 руб.

Файл подключается как внешняя обработка.

Протестирован на конфигурации Бухгалтерия предприятия КОРП, редакция 3.0 (3.0.108.36).

Версия платформы 1С 8.3.20.1674.

На форме обработки выбираем период анализа, организацию (от которой продали), контрагента (соответствующего организации покупателю), автора изменений.

Автор изменений нужен если у вас включено сохранение версий документов. При выборе автора будет показана информация сколько раз и когда в последний раз изменял пользователь документ.

После нажатия на кнопку "Проверить" будет выведена таблица с отличающимися по суммам документами.

Внизу формы кнопка "Исправить". При нажатии на кнопку перезаполняются поступления и корректировки реализации по строкам отмеченным в таблице.

Если парное поступление к реализации отсутствует, тогда обработка создаст новый документ.

Запрос для заполнения таблицы на форме:

  

  Запрос.Текст = 
    "ВЫБРАТЬ
    |    ВЫБОР
    |        КОГДА ЕСТЬNULL(ПоступлениеТоваровУслуг.Ссылка, ИСТИНА) = ИСТИНА
    |            ТОГДА ЛОЖЬ
    |        ИНАЧЕ ИСТИНА
    |    КОНЕЦ КАК Пометка,
    |    РеализацияТоваровУслуг.Ссылка КАК Реализация,
    |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ВерсииОбъектов.НомерВерсии) КАК КоличествоВерсий,
    |    МАКСИМУМ(ВерсииОбъектов.ДатаВерсии) КАК ДатаПоследнейВерсии,
    |    РеализацияТоваровУслуг.Проведен КАК Проведен,
    |    РеализацияТоваровУслуг.ПометкаУдаления КАК ПометкаУдаления,
    |    РеализацияТоваровУслуг.СуммаДокумента КАК СуммаДокумента,
    |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ КорректировкаРеализации.Ссылка) КАК Корректировки,
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.Ссылка, ""Отсутствует"") КАК Поступление,
    |    МАКСИМУМ(ВерсииОбъектов1.ДатаВерсии) КАК ДатаПоследнейВерсии1,
    |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ВерсииОбъектов1.НомерВерсии) КАК КоличествоВерсий1,
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.Проведен, ""-"") КАК Проведен1,
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.ПометкаУдаления, ""-"") КАК ПометкаУдаления1,
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.СуммаДокумента, 0) КАК СуммаДокумента1
    |ИЗ
    |    Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
    |        ЛЕВОЕ СОЕДИНЕНИЕ Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
    |        ПО РеализацияТоваровУслуг.Номер = ПоступлениеТоваровУслуг.Номер
    |            И (НАЧАЛОПЕРИОДА(РеализацияТоваровУслуг.Дата, ДЕНЬ) = НАЧАЛОПЕРИОДА(ПоступлениеТоваровУслуг.Дата, ДЕНЬ))
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ВерсииОбъектов КАК ВерсииОбъектов
    |        ПО (ВерсииОбъектов.Объект = РеализацияТоваровУслуг.Ссылка)
    |            И (ВерсииОбъектов.АвторВерсии = &АвторВерсии)
    |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ВерсииОбъектов КАК ВерсииОбъектов1
    |        ПО (ВерсииОбъектов.Объект = ПоступлениеТоваровУслуг.Ссылка)
    |            И (ВерсииОбъектов.АвторВерсии = &АвторВерсии)
    |        ЛЕВОЕ СОЕДИНЕНИЕ Документ.КорректировкаРеализации КАК КорректировкаРеализации
    |        ПО РеализацияТоваровУслуг.Ссылка = КорректировкаРеализации.ИсходныйДокументРеализации
    |            И (КорректировкаРеализации.Проведен)
    |ГДЕ
    |    РеализацияТоваровУслуг.Дата МЕЖДУ &ДатаНачало И &ДатаОкончания
    |    И РеализацияТоваровУслуг.Организация = &Организация
    |    И РеализацияТоваровУслуг.Контрагент = &Контрагент
    |    И РеализацияТоваровУслуг.СуммаДокумента <> ПоступлениеТоваровУслуг.СуммаДокумента
    |
    |СГРУППИРОВАТЬ ПО
    |    РеализацияТоваровУслуг.Ссылка,
    |    РеализацияТоваровУслуг.Проведен,
    |    РеализацияТоваровУслуг.ПометкаУдаления,
    |    РеализацияТоваровУслуг.СуммаДокумента,
    |    ВЫБОР
    |        КОГДА ЕСТЬNULL(ПоступлениеТоваровУслуг.Ссылка, ИСТИНА) = ИСТИНА
    |            ТОГДА ЛОЖЬ
    |        ИНАЧЕ ИСТИНА
    |    КОНЕЦ,
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.Ссылка, ""Отсутствует""),
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.Проведен, ""-""),
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.ПометкаУдаления, ""-""),
    |    ЕСТЬNULL(ПоступлениеТоваровУслуг.СуммаДокумента, 0)
    |
    |УПОРЯДОЧИТЬ ПО
    |    РеализацияТоваровУслуг.Дата";

 

В таблице на форме присутствуют все поля запроса, добавляются на форму автоматически. 

При заполнении поступления организация и контрагент из реализации меняются местами, ищем аналогичные элементы справочников по ИНН и КПП.

Договор - основной договор поставки из карточки контрагента.

           

 ДокОб.Организация =  Справочники.Организации.НайтиОрганизацию(СсылкаРеализация.Контрагент.ИНН, СсылкаРеализация.Контрагент.КПП, Ложь);   
            
            ДанныеЗаполнения = Новый Структура;
            ДанныеЗаполнения.Вставить("ИНН",СсылкаРеализация.Организация.ИНН);
            ДанныеЗаполнения.Вставить("КПП",СсылкаРеализация.Организация.КПП);
            ДокОб.Контрагент = РаботаСКонтрагентамиБП.НайтиКонтрагентаПоИНН_КПП(ДанныеЗаполнения);
            
            ДокОб.ДоговорКонтрагента = РаботаСДоговорамиКонтрагентовБП.ДоговорКонтрагентаИзОбъекта(ДокОб);

 

В корректировке реализации меняем только табличную часть. Перезаполняем по реализации, а потом вносим сохраненные в отдельной таблице изменения.

  

  ТабДоКорректировки = ВыборкаКорректировок.Ссылка.Товары.Выгрузить(,"Количество, Цена, СтавкаНДС, Сумма, СуммаНДС, ИдентификаторСтроки");
                    ОбъектКоректировка = ВыборкаКорректировок.Ссылка.ПолучитьОбъект();
                    
                    Документы.КорректировкаРеализации.ЗаполнитьПоДокументу(ОбъектКоректировка);
                    
                    Для Каждого СтрКР Из ОбъектКоректировка.Товары Цикл
                        
                        СтруктурОтбора = Новый Структура;
                        СтруктурОтбора.Вставить("ИдентификаторСтроки",СтрКР.ИдентификаторСтроки);
                        НашиСтроки = ТабДоКорректировки.НайтиСтроки(СтруктурОтбора);
                        
                        СтрКР.Количество = НашиСтроки[0].Количество;
                        СтрКР.Цена       = НашиСтроки[0].Цена;
                        СтрКР.СтавкаНДС  = НашиСтроки[0].СтавкаНДС;
                        СтрКР.Сумма      = НашиСтроки[0].Сумма;
                        СтрКР.СуммаНДС   = НашиСтроки[0].СуммаНДС;
                        
                    КонецЦикла;

                 
                  

Интеркампани реализация и поступление исправление документов.

См. также

Корректировка данных Системный администратор Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Платные (руб)

Незаменимая обработка для сопровождения конфигураций: ERP, УТ, КА. Позволяет вычистить многие ошибки в ключах аналитики, в ключевых справочниках конфигурации.

3600 руб.

10.02.2017    108695    650    173    

690

Закрытие периода Инструменты администратора БД Корректировка данных Бухгалтер Пользователь Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Расширение «Оперативное проведение» в 4 раза уменьшает время проведения документов и закрытия месяца. Является комплексным решением проблем 62 и 60 счетов. Оптимизирует проведение при включенной функциональной опции «Раздельный учет НДС». Используется в более 10 организациях уже 2 года. Совместимо с конфигурацией Бухгалтерия 3.0 (+КОРП).

14400 руб.

29.04.2020    30021    88    151    

63

Корректировка данных Программист Пользователь Платформа 1С v8.3 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Управленческий учет Платные (руб)

Представьте, что есть система QR - кодирования, которая НЕ ТРЕБУЕТ изменения конфигурации, НЕ ТРЕБУЕТ изменения ни одной печатной формы для добавления QR-кода, включая внешние, НЕ ХРАНИТ данные штрихкодов и их связь, от чего база не "пухнет", ИМЕЕТ возможность закодировать в QR-коде произвольные данные параметров для последующей обработки полученных данных, УМЕЕТ прикреплять сканы, УМЕЕТ обработать считанный QR-код как ВЫ захотите. А также ХРАНИТ историю операций в обход базы для каждого пользователя в отдельности и УМЕЕТ работать с 2D - сканерами. А также автоматически распознавать отсканированные печатные формы (картинки или pdf-файлы) и выполнять заданные произвольные алгоритмы, в том числе прикрепление их к документам! Обновление 3.2 от 09.06.2024!

19200 руб.

26.08.2018    51355    14    61    

54

Корректировка данных Зарплата Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры бюджетного учреждения 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет НДФЛ Платные (руб)

Обработка исправляет технические ошибки по НДФЛ, взаиморасчетам с сотрудниками в 1С:ЗУП (1С:ЗКГУ) на начало года. Фактически все ошибки, которые проявляются в ведомостях на выплату, расчетных листках, при заполнении ведомостей на выплату и отчетах 6-НДФЛ и т.д. нужно начинать исправлять с начала расчетного года. Это позволит быть уверенными, что после завершения расчетов предыдущего года, начали работать с «чистого листа» без ошибочных остатков.

4800 руб.

06.10.2023    3501    34    17    

42

Корректировка данных Зарплата Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Внешняя обработка предназначена для исправления самых различных ошибок, возникших по самым разным причинам. Общее проявление этих ошибок видно в различии данных между: проводками и различными отчетами по НДФЛ, заполнении ведомостей на выдачу зарплаты, неверным расчетом НДФЛ при начислении ЗП и т.д.

3600 руб.

09.02.2024    1303    8    5    

11

Закрытие периода Корректировка данных Бухгалтер Пользователь Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 11 Управленческий учет Платные (руб)

Закрытие месяца - важный процесс в современных конфигурациях, таких как УТ 11.4, УТ 11.5, КА 2.4, КА 2.5 ERP 2.4,ERP 2.5, КА 2 Казахстан, УТ 3 Казахстан регламентные операции влияют на расчет себестоимости, и ошибки в данном расчете не дают картины деятельности организации.

2400 руб.

27.10.2021    23445    304    35    

77
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Pira 149 22.04.22 13:09 Сейчас в теме
Для отображения отсутствующих поступлений строку запроса
| И РеализацияТоваровУслуг.СуммаДокумента <> ПоступлениеТоваровУслуг.СуммаДокумента

Нужно поменять на

| И РеализацияТоваровУслуг.СуммаДокумента <> ЕСТЬNULL(ПоступлениеТоваровУслуг.СуммаДокумента, 0)

Файл в публикации поменял.
Оставьте свое сообщение