Автоматизация налогового учета

Автор работы: Пользователь скрыл имя, 01 Апреля 2012 в 13:26, курсовая работа

Описание

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

Содержание

ВВЕДЕНИЕ 33
1. ПРИНЦИПЫ ПОСТРОЕНИЯ СИСТЕМЫ АВТОМАТИЗАЦИИ НАЛОГОВОГО УЧЕТА 4
1.1. Характеристика предприятия 4
1.2. Причины внедрения системы налогового учета 4
1.3. Основные методы и методики ведения налогового учета 66
1.4. Задачи автоматизации налогового учета 9
1.5. Выбор средства разработки системы автоматизации. 10
1.5.1. Характеристика системы "1С:Предприятие". 11
2. РЕАЛИЗАЦИЯ СИСТЕМЫ АВТОМАТИЗАЦИИ НАЛОГОВОГО УЧЕТА ООО «Летан» 16
2.1. Внереализованные расходы 16
2.2. Внереализованные доходы Ошибка! Закладка не определена.17
2.3. Построение налоговых регистров 18
Модуль регистра «учет внереализационных расходов». 20
Модуль регистра «учет внереализационных доходов». 24
ЗАКЛЮЧЕНИЕ 28

Скачать (42.73 Кб) Сколько стоит заказать работу?

Работа состоит из 1 файл

Курсовая по Кожедуб!!!!.doc

— 145.50 Кб (Скачать документ)

ВидыРасхода.ДобавитьЗначение(Перечисление.ВнереализационныеРасходы.УбытокОтУступкиПраваТребования);

ВидыРасхода.ДобавитьЗначение(Перечисление.ВнереализационныеРасходы.НДС_ПоСписаннойКредиторскойЗадолженности);

ВидыРасхода.ДобавитьЗначение(Перечисление.ВнереализационныеРасходы.ОперацииСФинансовымиИнструментами);

ВидыРасхода.ДобавитьЗначение(Перечисление.ВнереализационныеРасходы.ОтрицательнаяРазницаОтПереоценкиИмущества);

ВидыРасхода.ДобавитьЗначение(Перечисление.ВнереализационныеРасходы.ПрочиеВнереализационныеРасходы);

КонецПроцедуры //ПриОткрытии()

Модуль регистра «учет внереализационных доходов».

//*******************************************

Процедура Сформировать()

Т=СоздатьОбъект("ТаблицаЗначений");

Т.НоваяКолонка("Дата");

Т.НоваяКолонка("Документ");

Т.НоваяКолонка("ВидДохода");

Т.НоваяКолонка("Объект");

Т.НоваяКолонка("Количество");

Т.НоваяКолонка("Сумма");

Т.НоваяКолонка("Прим");

Т.НоваяКолонка("Опер");

Док=СоздатьОбъект("Документ");

БИ=СоздатьОбъект("БухгалтерскиеИтоги");

БИ.Опции(1);

Если ВидДохода.Выбран()=1 Тогда

БИ.ИспользоватьСубконто(ВидыСубконто.ВнереализационныеДоходы,ВидДохода,2)

КонецЕсли;

Опер=СоздатьОбъект("Операция");

БИ.ВыполнитьЗапрос(НачДата,КонДата,"Н08",,,,"Проводка");

БИ.ВыбратьПериоды();

Пока БИ.ПолучитьПериод()=1 Цикл

Если БИ.КО()<>0 Тогда

Если БИ.Операция.Кредит.Субконто(1)=Перечисление.ВнереализационныеДоходы.НеПринимаемыеДоходы Тогда

Продолжить;

КонецЕсли;

Т.НоваяСтрока();

Т.Дата=БИ.начДата;

Т.ВидДохода=БИ.Операция.Кредит.Субконто(1);

Т.Сумма=БИ.КО();

Док=БИ.Операция.Документ;

Т.Опер=Док;

Если Док.Вид()="ОперацииОказанияУслугКД" Тогда

Док.ПолучитьСтрокуПОНомеру(БИ.Операция.НомерПроводки());

Т.Документ=Док.Основание;

Т.Объект=Док.Наименование;

Попытка

Т.Прим=Т.Документ.КОнтрагент;

Исключение

Т.Прим="";

Конецпопытки;

ИначеЕсли Док.Вид()="ПрочиеДоходыРасходыКД" Тогда

Док.ПолучитьСтрокуПОНомеру(БИ.Операция.НомерПроводки());

Т.Документ=Док.Основание;

Т.Объект=Док.Наименование;

Т.Прим=Док.Содержание;

ИначеЕсли Док.Вид()="ОперацииПриобретенияИмуществаКД" Тогда

Опер.НайтиОперацию(Док);

НомПроводки=БИ.Операция.НомерПроводки()-1;

Опер.ПолучитьПроводкуПоНомеру(НомПроводки);

Т.Объект=Опер.Дебет.Субконто(1);

Т.Документ=Опер.СодержаниеПроводки;

Т.Количество=Опер.Количество;

Иначе

Т.Прим=Опер.СодержаниеПроводки;

КонецЕсли;

КонецЦикла;

Таб=СоздатьОбъект("Таблица");

Т.ВыбратьСТроки();

Таб.ВывестиСекцию("Шапка");

Пока Т.ПолучитьСтроку()=1 Цикл

Если Пустоезначение(Т.Документ)=1 Тогда

Док="";

Иначе

Попытка

Док=СокрЛП(Т.Документ.ПредставлениеВида())+" № "+СокрЛП(Т.Документ.НомерДок);

Исключение

Док=СокрЛП(Т.Документ);

КонецПопытки;

КонецЕсли;

Если ТипЗначенияСтр(Док)="Строка" Тогда

Докум=Т.Опер;

Иначе

Докум=Док;

КонецЕсли;

Таб.ВывестиСекцию("Строка");

КонецЦикла;

Таб.ВывестиСекцию("Подвал");

Таб.Опции(0,0,0,0,"ОП РУОВИРУ");

Таб.ТолькоПросмотр(1);

Таб.Показать("Регистр учета внереализационных доходов");

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

Процедура ПриОткрытии() //предопределенная

НачДата = НачГода(РабочаяДата());

КонДата = КонКвартала(РабочаяДата());

КонецПроцедуры //ПриОткрытии()

Выводы

Заключение

Ведение бухгалтерского учета с применением компьютера в настоящее время стало нормой работы на многих предприятиях. Использование в работе бухгалтерской программы дает широкие возможности для автоматического отражения любых документов и хозяйственных операций в бухгалтерском учете посредством бухгалтерских проводок, а также исключения арифметических ошибок. На компьютере легко формируются все первичные и отчетные документы.

ППП «1С:Бухгалтерия» предназначен для учета наличия и движения средств предприятия. Он может использоваться как автономно, так и совместно с другими компонентами системы «1С:Предприятие». ППП «1С:Бухгалтерия» позволяет автоматизировать выполнение практически полного состава задач бухгалтерского учета. Гибкость и настраиваемость «1С:Бухгалтерия» проявляется в том, что это готовое решение, позволяющее вести учет без дополнительных доработок и настроек. Кроме того, пакет может быть адаптирован к любым особенностям учета на конкретном предприятии.

Информация о работе Автоматизация налогового учета