Перов Александр

70
Рейтинг

astrius
Александр Перов



  •   Регистрация: 18.08.2009 (14 лет назад)

  •   Был(а) на сайте: 21.03.2024

Друзья
  • Эльвира Юлдашева
Подписчики 3

Группы

Профессиональный разработчик

Рейтинг 70

Выгрузка данных о сотрудниках для ПФР

Инструменты и обработки Бухгалтер Расчет 7.7 1С:Зарплата и кадры 7.7 Россия Бухгалтерский учет Windows ФОМС, ЕФС Абонемент ($m) Внешняя обработка (ert,epf) Регламентированный учет и отчетность Файловый обмен (TXT, XML, DBF), FTP Внешние источники данных Кадровый учет

Обработка для выгрузки данных из ЗиК (проверялось на 257) в программу подготовки документов Персонифицированного учёта "Spu_orb"", Версия 1.35 (ссылка на программу: http://www.pfrf.ru/ot_orenb/soft/), ну и дальнейшей отправки данных в ПФР за 1 период 2010 года. Делалось в спешке, предназначена для себя, по принципу "Работает и ладно", если кому-то сгодится за основу собственной обработки, буду рад :)

10 стартмани

02.07.2010    19236    401    astrius    21       

28

Комментарии

Admin8.3.10. Высота списка поля выбора#19 14.03.18 13:05
(12)
Спасибо!
AdminУстановка программной лицензии для файловой 1С на терминальном сервере#0 01.02.12 12:33
Как установить программную лицензию для файловой 1С на терминальном сервере (проверялось на ViTerminal)
DevЗаполнение лицевых счетов табельными номерами (для банка Уралсиб, например)#2 26.07.11 13:24
Цитата
artbear пишет:

Назначение напиши - для чего может пригодиться подобная замена.

Например, для обменов с некоторыми банками.

ИМХО Сбербанк вроде как не поддерживает подобную замену.

Верное замечание, спасибо )
Обработка делалась для обмена с Уралсибом.
DevЗаполнение лицевых счетов табельными номерами (для банка Уралсиб, например)#0 26.07.11 9:56
Элементарная обработка, позволяет заполнить лицевые счета по всем сотрудникам их табельными номерами.
По табельным номерам ведется обмен с банком Уралсиб, например.
DevЗаполнение лицевых счетов табельными номерами (для банка Уралсиб, например)#0 26.07.11 9:56
Элементарная обработка, позволяет заполнить лицевые счета по всем сотрудникам их табельными номерами.
По табельным номерам ведется обмен с банком Уралсиб, например.
ОбменЭкспорт проводок из ЗУП 8.2 в Бухгалтерию 7.7#0 23.05.11 9:18
Обработка для 1С v8.2 ЗУП 2.5 формирования проводок для Бухгалтерии 7.7 через OLE - соединение.
ОбменЭкспорт проводок из ЗУП 8.2 в Бухгалтерию 7.7#0 23.05.11 9:18
Обработка для 1С v8.2 ЗУП 2.5 формирования проводок для Бухгалтерии 7.7 через OLE - соединение.
БУВыгрузка данных о сотрудниках для ПФР#15 22.07.10 10:17
В выгрузке учитываются не все виды расчетов, например ОплатаПоОкладу, ПремияРазовая, Простой...
Да, не все, только те что у нас на предприятии были ) Необходимые вам виды расчетов нужно добавить вручную.
Здесь:
//***2 Здесь задаются виды расчета для вычисления суммы начислений по сотруднику НАЧ за период
//***Для ПФР с 2010***
Если (Строка(Жрасч.ВидРасч.Код) = "ОплатаПоТарифу")
или (Строка(Жрасч.ВидРасч.Код) = "ОплатаПоТабелю")
или (Строка(Жрасч.ВидРасч.Код) = "ДоплатаЗаВредность")
...
или (Строка(Жрасч.ВидРасч.Код) = "РайонныйКоэффициент")
Тогда
НАЧ = НАЧ + Жрасч.Результат;
КонецЕсли;
БУВыгрузка данных о сотрудниках для ПФР#13 21.07.10 6:40
Да нет, всё-таки 257 релиз, но скорее всего и на остальных будет работать )
По поводу ошибки:
Начало выгрузки:23:16:54
ТекстДок.Открыть(ФС.ТекКаталог()+"\"+ИмяФайлаШаблонаXML);
{D:\1С_БАЗЫ\ZARP\EXTFORMS\ВЫГРУЗКАВПФР.ERT(207)}: Неверное имя файла!
Конец выгрузки:23:16:54
Извлеките все файлы в один каталог и запускайте через Открыть, а не используя историю открытых файлов.
Я выгружал данные последний раз в версию 1.37, так же как и в 1.35 всё было нормально, сейчас посмотрю как будет в версии 1.38.
БУВыгрузка данных о сотрудниках для ПФР#4 14.07.10 8:17
Внимание! Обнаружена ошибка: если человек был нетрудоспособен а затем работал 1 день, после чего увольнялся, то этот один день в стаж не войдет, способ исправления:
в процедуре Процедура ВыгрузкаПериодовВXML(ТекстДок, сотрудник, ТЗ, ТЗ1)
заменить в блоке
Если ДатаСравнение(ДатаДоб,ТЗ1.Дата2)=-1 Тогда
ТЗВрем.НоваяСтрока();
ТЗВрем.Дата1 = ДатаДоб;
ТЗВрем.Дата2 = ТЗ1.Дата2;
ТЗВрем.Содержание = "Работа";
КонецЕсли;

условие Если ДатаСравнение(ДатаДоб,ТЗ1.Дата2)=-1 Тогда
на Если ДатаСравнение(ДатаДоб,ТЗ1.Дата2)<=0 Тогда