Заполнение Приложения 2 Налоговой декларации на прибыль в Бухгалтерии 3.0 из ЗУП 2.5

24.02.16

Учетные задачи - Регламентированный учет и отчетность

Заполнение осуществляется через dbf файл.

Скачать файл

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

Наименование По подписке [?] Купить один файл
Выгрузка в dbf файл данных по дивидендам из ЗУП 2.5
.epf 9,43Kb
9
9 Скачать (1 SM) Купить за 1 850 руб.

Из ЗУП 2.5.99.2 в Бухгалтерия 3.0.43.123

1. Выгрузка

Выбираем период начисления Дивидендов и имя файла выгрузки.

База и налог берутся из документов "НачислениеДивидендовОрганизаций".

Также выгружаются Ф.И.О., паспортные данные и адрес для информирования ФизЛица.

2. Загрузка

Редактируем Конфигурацию:
Отчеты -> "РегламентированныйОтчетПрибыль" -> Формы -> "ФормаОтчета2015Кв1"

    В Форме: - Добавляем в Реквизиты таблицу значений "ТаблицаИзЗУП25"

                    - Добавляем Команду  "ЗаполнитьИзDBF" и кидаем её на форму.

Действие команды "ЗаполнитьИзDBF":

&НаКлиенте
Процедура ЗаполнитьИзDBF(Команда)
Сообщить("Начало: "+Формат(ТекущаяДата(), "ДЛФ=T"));
ЭтаФорма.ТаблицаИзЗУП25.Очистить();
ТЗСправки = ЭтаФорма.ТаблицаИзЗУП25;

// Получение данных из DBF
ПутьКФайлу = "C:\docs\ndfl2.dbf";
БазаДивидендов = 0;
НалогСДивидендов = 0;
КолСправок = 0;

ФайлDBF = Новый XBase; // создаем новый объект
ФайлDBF.ОткрытьФайл(ПутьКФайлу,,Истина); // открытие файла
ФайлDBF.Первая(); // устанавливает курсор на первую запись
Пока НЕ ФайлDBF.ВКонце() Цикл
СтрокаТЗСправки = ТЗСправки.Добавить();
СтрокаТЗСправки.НомПП = ФайлDBF.A;
СтрокаТЗСправки.Сотрудник = ФайлDBF.B;
СтрокаТЗСправки.Фамилия = ФайлDBF.C;
СтрокаТЗСправки.Имя = ФайлDBF.D;
СтрокаТЗСправки.Отчество = ФайлDBF.E;
СтрокаТЗСправки.Результат = ФайлDBF.F;
СтрокаТЗСправки.НДФЛ = ФайлDBF.G;
СтрокаТЗСправки.ВидДокумента = ФайлDBF.H;
СтрокаТЗСправки.СерияДокумента = ФайлDBF.I;
СтрокаТЗСправки.НомерДокумента = ФайлDBF.J;
СтрокаТЗСправки.ДатаРождения = ФайлDBF.K;
СтрокаТЗСправки.ИНН = ФайлDBF.L;
СтрокаТЗСправки.АдресПредставление = ФайлDBF.M;
СтрокаТЗСправки.Поле1 = ФайлDBF.P1; // Индекс
СтрокаТЗСправки.Поле2 = ФайлDBF.P2; // Татарстан Респ
СтрокаТЗСправки.Поле3 = ФайлDBF.P3; // Район
СтрокаТЗСправки.Поле4 = ФайлDBF.P4; // Город
СтрокаТЗСправки.Поле5 = ФайлDBF.P5; // Населен пункт (деревня, село)
СтрокаТЗСправки.Поле6 = ФайлDBF.P6; // улица
СтрокаТЗСправки.Поле7 = ФайлDBF.P7; // дом
СтрокаТЗСправки.Поле8 = ФайлDBF.P8; // корпус
СтрокаТЗСправки.Поле9 = ФайлDBF.P9; // квартира
СтрокаТЗСправки.Поле10 = ФайлDBF.P10;
БазаДивидендов = БазаДивидендов + СтрокаТЗСправки.Результат;
НалогСДивидендов = НалогСДивидендов + СтрокаТЗСправки.ндфл;
КолСправок = КолСправок + 1;

ФайлDBF.Следующая(); //передвигаем курсор далее
КонецЦикла;
ФайлDBF.ЗакрытьФайл();
Сообщить("В DBF файле: "); 
Сообщить("Кол-во= "+КолСправок); 
Сообщить("База= "+БазаДивидендов); 
Сообщить("НДФЛ= "+НалогСДивидендов);

// загрузка в 1С 
БазаДивидендов = 0;
НалогСДивидендов = 0;
КолСправок = 0;
Для Каждого ТекущаяСтрокаТЗСправки Из ТЗСправки Цикл 
//если ТекущаяСтрокаТЗСправки.НомПП < 3 тогда
ВставитьДополнительнуюСтраницуНаСервере("Приложение2");
обл = ТабличныйДокумент.Области;
Обл.П000020000101.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.НомПП);
Обл.П000020000102.Значение = ЭтаФорма.ДатаПодписи; // Дата составления
Обл.П000020000103.Значение = "00"; // Тип ????
Обл.П000020000201.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.ИНН); // Инн 
Обл.П000020000301.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Фамилия); // Фамилия
Обл.П000020000302.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Имя); // Имя
Обл.П000020000303.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Отчество); // Отчество
Обл.П000020000401.Значение = 1; // Статус налогоплдательщика
Обл.П000020000402.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.ДатаРождения); // Дата рождения
Обл.П000020000403.Значение = 643;// Гражданство
Обл.П000020000404.Значение = 21;// Код вида документа
// Серия и номер документа
Обл.П000020000405.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.СерияДокумента)+" "+СокрЛП(ТекущаяСтрокаТЗСправки.НомерДокумента);
//// Адрес
Обл.П000020000501.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле1); // Почтовый индекс
Обл.П000020000502.Значение = 16; //СокрЛП(ТекущаяСтрокаТЗСправки.Поле2); // Код региона
Обл.П000020000503.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле3); // Район
Обл.П000020000504.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле4); // Город
Обл.П000020000505.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле5); // Населенный пункт
Обл.П000020000506.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле6); // Улица
Обл.П000020000507.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле7); // Номер дома
Обл.П000020000508.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле8); // Номер корпуса строения
Обл.П000020000509.Значение = СокрЛП(ТекущаяСтрокаТЗСправки.Поле9); // номер квартиры

//// Общие суммы налога\дохода по итогам налогового периода 
Обл.П000020001003.Значение = 13; // Налоговая ставка

Обл.П000020004001_1.Значение = "1010"; // Код дохода 1
Обл.П000020004101_1.Значение = ТекущаяСтрокаТЗСправки.Результат; // Сумма дохода 1
Обл.П000020002003.Значение = ТекущаяСтрокаТЗСправки.Результат; // Общая сумма доходв
Обл.П000020002203.Значение = ТекущаяСтрокаТЗСправки.Результат; // Налоговая база
Обл.П000020003003.Значение = ТекущаяСтрокаТЗСправки.ндфл; // Сумма налога исчисленная
Обл.П000020003103.Значение = ТекущаяСтрокаТЗСправки.ндфл; // Сумма налога удержанная
Обл.П000020003203.Значение = ТекущаяСтрокаТЗСправки.ндфл; // Сумма налога уплаченная
БазаДивидендов = БазаДивидендов + ТекущаяСтрокаТЗСправки.Результат;
НалогСДивидендов = НалогСДивидендов + ТекущаяСтрокаТЗСправки.ндфл;
КолСправок = КолСправок + 1;
//конецесли;
КонецЦикла;
Сообщить("Загружено в 1С: "); 
Сообщить("Кол-во= "+КолСправок); 
Сообщить("База= "+БазаДивидендов); 
Сообщить("НДФЛ= "+НалогСДивидендов);
Сообщить("Завершено: "+Формат(ТекущаяДата(), "ДЛФ=T"));

КонецПроцедуры

 

После загрузки удалить первую пустую справку.

С управляемыми формами раньше не работал, поэтому, может, написал неграмотно, но работает.

Правда, 1600 человек грузило 4 часа. А на копии на локальной машине всего 1 час.

Может, кому пригодится.

Приложение 2 налоговой декларации на прибыль

См. также

SALE! 20%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен и синхронизацию в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

26280 22338 руб.

12.06.2017    141454    798    297    

419

SALE! 10%

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

Перенос документов, начальных остатков и справочной информации из УПП 1.3 в ERP 2 | из УПП 1.3 в УТ 11 | из УПП в КА 2 | Правила конвертации (КД 2) | Более 360 предприятий выполнили переход с использованием этого продукта! | Сэкономьте время - используйте готовое решение для перехода! | Позволяет перенести из УПП 1.3 в ERP / УТ 11 / КА 2 всю возможную информацию | В переносе есть фильтр по организации и множество других опциональных параметров выгрузки | Есть несколько алгоритмов выгрузки остатков на выбор

55778 50200 руб.

04.08.2015    166416    332    277    

373

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.234.x) и БП 3.0 (3.0.161.x). Правила подходят для версии ПРОФ и КОРП.

35000 31500 руб.

15.12.2021    23981    169    51    

127

Зарплата Регламентированный учет и отчетность Кадровый учет Обновление 1С Бухгалтер Платформа 1С v8.3 Сложные периодические расчеты 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Зарплата и Управление Персоналом 2.5 Бухгалтерский учет Налоговый учет Управленческий учет Акцизы ЕНВД ЕСН Земельный налог ИП, ПБОЮЛ, КФХ Налог на имущество Налог на прибыль НДС НДФЛ ФОМС, ЕФС Транспортный налог УСН ПСН (патентная система налогообложения) Платные (руб)

Обновления для конфигураций: КА 1.1; ЗУП 2.5; БУХ 2.0; КА 1.1 Комплексная автоматизация торговли алкогольной продукцией; КА 1.1 Комплексный учет сельскохозяйственного предприятия

27900 руб.

01.04.2020    147088    649    360    

235

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.88.x) и УТ 11.5 (11.5.19.x).

35000 31500 руб.

23.07.2020    51172    228    69    

184

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Программист Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

53111 47800 руб.

03.12.2020    36564    94    66    

89

SALE! 10%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена | Можно выполнить переход с УПП на БП 3 или запускать выгрузку данных за выбранный период времени | Переносятся документы, начальные остатки и вся справочная информация | Есть фильтр по организации и множество других параметров выгрузки | Поддерживается несколько сценариев работы: как первичный полный перенос, так и перенос только новых документов | Перенос данных возможен в "1С: Бухгалтерия 3.0" версии ПРОФ, КОРП или базовую | Переход с "1С: УПП1.3" / "1С:КА 1.1" на "1С:БП3.0" с помощью правил конвертации будет максимально комфортным! | Можно бесплатно проверить перенос на вашем сервере!

48278 43450 руб.

25.02.2015    171151    303    257    

378

SALE! 15%

Перенос данных 1C Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 Платформа 1C v8.2 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Управление производственным предприятием Россия Платные (руб)

Регулярный обмен, выгрузка, перенос из КА 1.1, УПП 1.3, УТ 10.3 для обмена с любыми конфигурациями, поддерживающими обмен в формате EnterpriseData (КД3) - БП 3.0, ERP, КА 2, УТ 11, Розница 2, УНФ 1.6 и другими. Правила для старых и доработанных конфигураций не требуют синхронного обновления и совместимы с новыми и будущими конфигурациями. Обмен по расписанию, через папку, FTP, почту.

15300 13005 руб.

18.02.2016    186850    589    509    

526
Оставьте свое сообщение