Измение налогового вычета
29.01.2009
10:08
#1
Помогите исправить в програме 1.С 7.7(упрощенка)стандартный налоговый вычет на ребенка в сумме 1000 руб на 2009 г.
29.01.2009
11:59
#2
На эту тему на форуме уже все пальцы обсосаны. По данной конфигурации жди обновления. Если нужно прям сейчас рассчитать январь, воспользуйся калькулятором.
29.01.2009
16:50
#3
"можно попробовать в конфигураторе, справочники - сотрудники - модуль
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога, Флаг)
добавить 2 строки
ВычетыНаРебенка.ДобавитьЗначение(1000);
ВычетыНаРебенка.ДобавитьЗначение(2000);
но обязательно сделайте резервную копию
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога, Флаг)
Если (ЭлементДиалога = "СчетЗатрат") Тогда
СписокКорректныхПроводок = СоздатьОбъект("СписокЗначений");
СписокКорректныхПроводок.Установить("Счет", Сч70);
глЗначениеОтбора = СписокКорректныхПроводок;
ИначеЕсли ЭлементДиалога = "РазмерВычетаНаРебенка" Тогда
ВычетыНаРебенка = СоздатьОбъект("СписокЗначений");
Если ДатаГод(ИспользоватьДату()) < 2005 Тогда
ВычетыНаРебенка.ДобавитьЗначение(300);
ВычетыНаРебенка.ДобавитьЗначение(600);
Иначе
ВычетыНаРебенка.ДобавитьЗначение(600);
ВычетыНаРебенка.ДобавитьЗначение(1200);
ВычетыНаРебенка.ДобавитьЗначение(1000);
ВычетыНаРебенка.ДобавитьЗначение(2000);
КонецЕсли;
ВычетыНаРебенка.ВыбратьЗначение(РазмерВычетаНаРебенка,,,, 2);
Флаг = 0;
ИначеЕсли ЭлементДиалога = "РазмерВычетаНаРебенкаИнвалида" Тогда
ВычетыНаРебенка = СоздатьОбъект("СписокЗначений");
ВычетыНаРебенка.ДобавитьЗначение(1200);
ВычетыНаРебенка.ДобавитьЗначение(2400);
ВычетыНаРебенка.ВыбратьЗначение(РазмерВычетаНаРебенкаИнвалида,,,, 2);
Флаг = 0;
ИначеЕсли ЭлементДиалога = "ХарактерРаботы" Тогда
СписокХарактеровРаботы.ВыбратьЗначение(ХарактерРаботы,,,, 2);
Флаг = 0;
КонецЕсли;
КонецПроцедуры // ПриНачалеВыбораЗначения()
"
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога, Флаг)
добавить 2 строки
ВычетыНаРебенка.ДобавитьЗначение(1000);
ВычетыНаРебенка.ДобавитьЗначение(2000);
но обязательно сделайте резервную копию
Процедура ПриНачалеВыбораЗначения(ЭлементДиалога, Флаг)
Если (ЭлементДиалога = "СчетЗатрат") Тогда
СписокКорректныхПроводок = СоздатьОбъект("СписокЗначений");
СписокКорректныхПроводок.Установить("Счет", Сч70);
глЗначениеОтбора = СписокКорректныхПроводок;
ИначеЕсли ЭлементДиалога = "РазмерВычетаНаРебенка" Тогда
ВычетыНаРебенка = СоздатьОбъект("СписокЗначений");
Если ДатаГод(ИспользоватьДату()) < 2005 Тогда
ВычетыНаРебенка.ДобавитьЗначение(300);
ВычетыНаРебенка.ДобавитьЗначение(600);
Иначе
ВычетыНаРебенка.ДобавитьЗначение(600);
ВычетыНаРебенка.ДобавитьЗначение(1200);
ВычетыНаРебенка.ДобавитьЗначение(1000);
ВычетыНаРебенка.ДобавитьЗначение(2000);
КонецЕсли;
ВычетыНаРебенка.ВыбратьЗначение(РазмерВычетаНаРебенка,,,, 2);
Флаг = 0;
ИначеЕсли ЭлементДиалога = "РазмерВычетаНаРебенкаИнвалида" Тогда
ВычетыНаРебенка = СоздатьОбъект("СписокЗначений");
ВычетыНаРебенка.ДобавитьЗначение(1200);
ВычетыНаРебенка.ДобавитьЗначение(2400);
ВычетыНаРебенка.ВыбратьЗначение(РазмерВычетаНаРебенкаИнвалида,,,, 2);
Флаг = 0;
ИначеЕсли ЭлементДиалога = "ХарактерРаботы" Тогда
СписокХарактеровРаботы.ВыбратьЗначение(ХарактерРаботы,,,, 2);
Флаг = 0;
КонецЕсли;
КонецПроцедуры // ПриНачалеВыбораЗначения()
"
Читают тему
(гостей: 1)