:: Вопросы по 1С
Данные по НДФЛ
AlexandrIT
Автор

Сообщений: 11
Дата регистрации: 30.04.2011
Доброго утра!
Закидываю (все еще) сведения о сотрудниках нашей конторы в БД 1С:Предприятие 8.2 ЗиК
Заполнил справочники Организации, Подразделения Организаций, Подразделения, Физические Лица;
регистры сведений ФИОФизЛиц, ГражданствоФизЛиц, ПаспортныеДанныеФизЛиц, КонтактнаяИнформация.

Сейчас вливаю данные в НДФЛСтандартныеВычетыФизлиц, НДФЛСтандартныеВычетыНаДетей, НДФЛПрименениеВычетов.
И что-то не срастается.
После всех танцев с бубнами в конфе вижу, что правильно заполнены НДФЛСтандартныеВычетыНаДетей и НДФЛПрименениеВычетов.
А правО на личный вычет (как я понял - НДФЛСтандартныеВычетыФизлиц) выглядит криво: Дата указана, в столбце КОД вместо 'применять' и '103' стоит ненужное 'НЕ ПРИМЕНЯТЬ'

Пытался так:
*********
БазаОле.НачатьТранзакцию()
ФизЛица = БазаОле.Справочники.ФизическиеЛица
Вычеты = БазаОле.Справочники.ВычетыНДФЛ

НаборЗаписейВычетыСтандартные = БазаОле.РегистрыСведений.НДФЛСтандартныеВычетыФизлиц.СоздатьНаборЗаписей()
НаборЗаписейВычетыНаДетей = БазаОле.РегистрыСведений.НДФЛСтандартныеВычетыНаДетей.СоздатьНаборЗаписей()
НаборЗаписейПрименениеВычетов = БазаОле.РегистрыСведений.НДФЛПрименениеВычетов.СоздатьНаборЗаписей()

ЭлементФизЛицоСсылка = ФизЛица.НайтиПоКОДУ(КодФизЛица)
IF ЭлементФизЛицоСсылка <> БазаОле.Справочники.ФизическиеЛица.ПустаяСсылка()
GUIDЭлементФизЛица = ФизЛица.ПолучитьСсылку(ЭлементФизЛицоСсылка.УникальныйИдентификатор())
ELSE
* пустой идентификатор - нет такого человека
БазаОле.ОтменитьТранзакцию()
RETURN
ENDIF

ЭлементВычетыСсылка = Вычеты.НайтиПоКОДУ(pcНомерВычета)
IF ЭлементВычетыСсылка <> БазаОле.Справочники.ВычетыНДФЛ.ПустаяСсылка()
GUIDЭлементВычеты = Вычеты.ПолучитьСсылку(ЭлементВычетыСсылка.УникальныйИдентификатор())
ELSE
* пустой идентификатор - нет такого Вычета
БазаОле.ОтменитьТранзакцию()
RETURN
ENDIF

НоваяЗаписьВычетыСтандартные = НаборЗаписейВычетыСтандартные.Добавить()
НоваяЗаписьВычетыСтандартные.КодВычетаЛичный = GUIDЭлементВычеты
НоваяЗаписьВычетыСтандартные.Период=МояТабличка.period_beg
НоваяЗаписьВычетыСтандартные.ФизЛицо = GUIDЭлементФизЛица

НоваяЗаписьПрименениеВычетов = НаборЗаписейПрименениеВычетов.Добавить()
НоваяЗаписьПрименениеВычетов.ФизЛицо = GUIDЭлементФизЛица
НоваяЗаписьПрименениеВычетов.Период = МояТабличка.period_beg
НоваяЗаписьПрименениеВычетов.Организация = GUIDЭлементОрганизация

НоваяЗаписьВычетыНаДетей = НаборЗаписейВычетыНаДетей.Добавить()
НоваяЗаписьВычетыНаДетей.КодВычета = GUIDЭлементВычеты
НоваяЗаписьВычетыНаДетей.КоличествоДетей = МояТабличка.КоличествоДетей
НоваяЗаписьВычетыНаДетей.Период = МояТабличка.period_beg
НоваяЗаписьВычетыНаДетей.ПериодЗавершения = МояТабличка.period_end

НаборЗаписейВычетыСтандартные.Записать()
НаборЗаписейВычетыНаДетей.Записать()
НаборЗаписейПрименениеВычетов.Записать()

БазаОле.ЗафиксироватьТранзакцию

Чего же этой шайтан-машине не хватает ?
Ratings: 0 negative/0 positive
Re: Данные по НДФЛ
AlexandrIT
Автор

Сообщений: 11
Дата регистрации: 30.04.2011
Ответ слишком тривиален или никто не сталкивался?
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 1 (Гостей: 1)

© 2000-2024 Fox Club 
Яндекс.Метрика