Обзор и анализ бухгалтерских технологий
Существующие бухгалтерские технологии и их сравнительный анализ. Учет доходов и расходов предприятия через "1С: Предприятие". Описание возможностей "1С: Предприятие 8.2". Соответствие функциональных требований и классов-сущностей. Статический вид системы.
| Рубрика | Бухгалтерский учет и аудит |
| Вид | дипломная работа |
| Язык | русский |
| Дата добавления | 10.04.2013 |
| Размер файла | 5,6 M |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
где - время, затраченное при работе на ЭВМ в день;
- стоимость часа машинного времени.
= 8 (часов);
= 140 (тенге);
= 8 22 140 = 24640 (тенге).
Годовой фонд заработной платы сотрудника, будет определяться следующим образом:
= 50000 1 12 + 50000 1 12 0.11 = =666000 (тенге),
= + = 24640 + 666000 = 690640 (тенге).
4.2.10 Расчет экономии затрат от внедрения разработанного приложения
Экономия затрат от внедрения вычисляется, тенге /год:
,
где Затр - затраты до внедрения приложения;
затраты после внедрения приложения.
= 1065600 - 690640 = 374960 (тенге).
Срок окупаемости приложения:
где С - затраты на разработку и внедрение приложения (тенге);
Э - экономия затрат от внедрения приложения (тенге/год).
Ток = С / Э = 269930/ 374960 = 0.72 (года).
Годовой экономический эффект составил:
Эфгод = Э - Ен С
где Ен - нормативный коэффициент эффективности капитальных вложений (0,32);
Э - годовая экономия затрат (тенге/год).
Эфгод = Э - Ен С =374960 - 0.72 269930 = 180340.4 (тенге).
Разработка программного обеспечения для учета и анализа финансовой деятельности предприятия позволяет сократить расходы, обеспечивает годовой экономический эффект в размере 180340.4 тенге. Следовательно, разработка и внедрение данного программного обеспечения является экономически целесообразным.
Заключение
В данном дипломной работе был представлен процесс создания приложения, которое бы автоматизировало, сокращало время и не допускало бы ошибок, связанных с человеческим фактором при сборе сведений и заполнении отчетов.
Учитывая трудности, с которыми сталкивались работники, проводившие все эти операции вручную без должной автоматизации, можно сказать, что программа будет являться главной ступенью в повышении эффективности данных работ, а также улучшения качества формирования отчетности.
Список использованной литературы
1. Гончаров Д.И. Технологии интеграции 1С: Предприятия. - М.: Питер, 2010.
2. Радченко М.Г. 1С: Предприятие 8.1. Практическое пособие разработчика. - М.: Учет и управление, 2010.
3. Харитонов С.А. 1С: Бухгалтерия 8 для начинающих. - М.: Наука, 2002.
4. Пятов М.Л. Базовые принципы бухгалтерского учета. - М.: Питер, 2009.
5. Хабаров М.Т. 1С: Предприятие 8.2 Конвертация данных: обмен данными между прикладными решениями.- СПб.: ПРОМТ, 2007.
6. Донской М.А. Пользовательский интерфейс. - СПб.: БХВ-Петербург, 1999.
7. Фаулер М.П. Основы Uml. - СПб.: Питер, 2007.
8. Хавронская А.М. Оценка технико-экономической эффективности программных средств // Методические указания по выполнению экономического раздела дипломных проектов и работ (для студентов специальности 050602). - А.: КазНТУ, 2000.
9. О введении в действие трудового кодекса Республики Казахстан: Закон Республики Казахстан от 15 мая 2007 г. № 252-III. ? Алматы: Мунайгазэкономика, 2007.
Приложение А
Текст программы
// ПРОЦЕДУРЫ ЗАПОЛНЕНИЯ ДОКУМЕНТА
// Процедура заполнения документа на основании приходной накладной.
// Параметры:
// Документ Основание - Документ Ссылка. Приходная Накладная - приходная накладная
// Данные Заполнения - Структура - Данные заполнения документа
Процедура ЗаполнитьПоПриходнаяНакладная(ДанныеЗаполнения, Операция = "")
// Заполнение шапки документа.
Если Операция = "Продажа" Тогда
Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Поступление От Поставщика
ИЛИ Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Прием На Комиссию Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю;
Иначе
Текст Исключения = НСтр("ru = 'Невозможен ввод операции ""Продажа покупателю"" на основании операции - ""%ВидОперации""!'");
Текст Исключения = Стр Заменить (Текст Исключения, "%Вид Операции", Данные Заполнения. Вид Операции);
Вызвать Исключение Текст Исключения;
Конец Если;
Иначе Если Операция = "Возврат" Тогда
Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Поступление От Поставщика Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Поставщику;
Иначе Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Прием На Комиссию Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Комитенту;
Иначе Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Прием В Переработку Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Из Переработки;
Иначе Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Приходная Накладная. Прием На Ответхранение Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат С Ответхранения;
Иначе
Текст Исключения = НСтр("ru = 'Невозможен ввод операции ""Возврат"" на основании операции - ""%ВидОперации""!'");
Текст Исключения = Стр Заменить (Текст Исключения, "%Вид Операции", Данные Заполнения. Вид Операции);
Вызвать Исключение Текст Исключения;
Конец Если;
Конец Если;
Если Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить ()
И Константы. Функциональная Опция Заказ При Поступлении В Шапке. Получить () Тогда
Заказ = Данные Заполнения. Заказ;
Иначе
Заказ = Неопределено;
Конец Если;
Этот Объект. Документ Основание = Данные Заполнения. Ссылка;
Организация = Данные Заполнения. Организация;
Если Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Поставщику
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Комитенту
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Из Переработки
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная .Возврат С Ответхранения Тогда
Контрагент = Данные Заполнения. Контрагент;
Договор = Данные Заполнения. Договор;
Налогообложение НДС = Данные Заполнения. Налогообложение НДС;
Иначе
Налогообложение НДС = Управление Небольшой Фирмой Сервер. Налогообложение НДС (Организация, Дата);
Конец Если;
Структурная Единица = Данные Заполнения. Структурная Единица;
Ячейка = Данные Заполнения. Ячейка;
Валюта Документа = Данные Заполнения. Валюта Документа;
Сумма Включает НДС = Данные Заполнения. Сумма Включает НДС;
НДС Включать В Стоимость = Данные Заполнения. НДС Включать В Стоимость;
Если Валюта Документа = Справочники. Валюты. Национальная Валюта Тогда
Курс = Данные Заполнения. Курс;
Кратность = Данные Заполнения. Кратность;
Иначе
Структура По Валюте = Регистры Сведений. Курсы Валют. Получить Последнее (Дата, Новый Структура ("Валюта", Договор. Валюта Расчетов));
Курс = Структура По Валюте. Курс;
Кратность = Структура По Валюте. Кратность;
Конец Если;
// Заполнение табличной части документа.
Запасы. Очистить();
Для каждого Строка Табличной Части Из Данные Заполнения. Запасы Цикл
Новая Строка = Запасы. Добавить();
Если Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю Тогда
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части, "Цена, Сумма, Сумма НДС, Всего");
Иначе
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части);
Конец Если;
Если НЕ Константы. Функциональная Опция Заказ При Поступлении В Шапке. Получить ()
И Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить () Тогда
Новая Строка. Заказ = Неопределено;
Конец Если;
Если НЕ Значение Заполнено (Новая Строка.Содержание) Тогда
Новая Строка. Содержание = Управление Небольшой Фирмой Сервер. Получить Представление Номенклатуры Для Печати
? (Значение Заполнено (Строка Табличной Части. Номенклатура. Наименование Полное),
Строка Табличной Части. Номенклатура. Наименование Полное, Строка Табличной Части. Номенклатура. Наименование),
Строка Табличной Части. Характеристика, Строка Табличной Части. Номенклатура. Артикул);
Конец Если;
Если Налогообложение НДС = Данные Заполнения. Налогообложение НДС Тогда
Продолжить;
Конец Если;
Если Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Облагается НДС Тогда
Для каждого Строка Табличной Части Из Запасы Цикл
Если Значение Заполнено (Строка Табличной Части. Номенклатура. Ставка НДС) Тогда
Строка Табличной Части. Ставка НДС = Строка Табличной Части. Номенклатура. Ставка НДС;
Иначе
Строка Табличной Части. Ставка НДС = Организация. Ставка НДС По Умолчанию;
Конец Если;
Ставка НДС = Управление Небольшой Фирмой Повт Исп. Получить Значение Ставки НДС (Строка Табличной Части. Ставка НДС);
Строка Табличной Части. Сумма НДС = ? (Сумма Включает НДС,
Строка Табличной Части. Сумма - (Строка Табличной Части. Сумма) / ((Ставка НДС + 100) / 100),
Строка Табличной Части. Сумма * Ставка НДС / 100);
Строка Табличной Части. Всего = Строка Табличной Части. Сумма + ? (Сумма Включает НДС, 0, Строка Табличной Части. Сумма НДС);
Конец Цикла;
Иначе
Если Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Не Облагается НДС Тогда
Ставка НДС По Умолчанию = Управление Небольшой Фирмой Повт Исп. Получить Ставку НДС Без НДС ();
Иначе
Ставка НДС По Умолчанию = Управление Небольшой Фирмой Повт Исп. Получить Ставку НДС Ноль ();
Конец Если;
Для каждого Строка Табличной Части Из Запасы Цикл
Строка Табличной Части. Ставка НДС = Ставка НДС По Умолчанию;
Строка Табличной Части. Сумма НДС = 0;
Строка Табличной Части. Всего = Строка Табличной Части. Сумма;
Конец Цикла;
Конец Если;
Конец Цикла;
Конец Процедуры // Заполнить По Приходная Накладная ()
// Процедура заполнения документа на основании приходной накладной.
// Параметры:
// ДокументОснование - ДокументСсылка.ПриходнаяНакладная - приходная накладная
// ДанныеЗаполнения - Структура - Данные заполнения документа
Процедура Заполнить По Заказ Покупателя (Данные Заполнения, Заполнять Колонку Резерв = Ложь)
// Заполнение шапки документа.
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю;
Если Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить () Тогда
Заказ = Данные Заполнения. Ссылка;
Иначе
Заказ = Неопределено;
Конец Если;
Организация = Данные Заполнения. Организация;
Контрагент = Данные Заполнения. Контрагент;
Договор = Данные Заполнения. Договор;
Вид Цен = Данные Заполнения. Вид Цен;
Вид Скидки Наценки = Данные Заполнения. Вид Скидки Наценки;
Валюта Документа = Данные Заполнения. Валюта Документа;
Сумма Включает НДС = Данные Заполнения. Сумма Включает НДС;
НДС Включать В Стоимость = Данные Заполнения. НДС Включать В Стоимость;
Налогообложение НДС = Данные Заполнения. Налогообложение НДС;
Ответственный = Данные Заполнения. Ответственный;
Если Валюта Документа = Справочники. Валюты. Национальная Валюта Тогда
Курс = Данные Заполнения. Курс;
Кратность = Данные Заполнения. Кратность;
Иначе
Структура По Валюте = Регистры Сведений. Курсы Валют. Получить Последнее (Дата, Новый Структура ("Валюта", Договор. Валюта Расчетов));
Курс = Структура По Валюте. Курс;
Кратность = Структура По Валюте. Кратность;
Конец Если;
// Заполнение табличной части документа.
Запасы. Очистить();
Для каждого Строка Табличной Части Из Данные Заполнения. Запасы Цикл
Если Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Запас
ИЛИ Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Услуга Тогда
Новая Строка = Запасы. Добавить ();
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части);
Если Заполнять Колонку Резерв Тогда
Новая Строка. Резерв = Строка Табличной Части. Количество;
Конец Если;
Новая Строка. Заказ = Данные Заполнения. Ссылка;
Конец Если;
Конец Цикла;
Конец Процедуры // Заполнить По Заказ Покупателя ()
// Процедура заполнения документа на основании приходной накладной.
// Параметры:
// ДокументОснование - Документ Ссылка. Приходная Накладная - приходная накладная
// Данные Заполнения - Структура - Данные заполнения документа
Процедура Заполнить По Заказ Поставщику (Данные Заполнения)
// Заполнение шапки документа.
Организация = Данные Заполнения. Организация;
Если Данные Заполнения. Вид Операции = Перечисления. Виды Операций Заказ Поставщику. Заказ На Переработку Тогда
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Передача В Переработку;
Налогообложение НДС = Управление Небольшой Фирмой Сервер. Налогообложение НДС (Организация, Дата);
Иначе
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Поставщику;
Налогообложение НДС = Данные Заполнения. Налогообложение НДС;
Конец Если;
Если Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить () Тогда
Заказ = Данные Заполнения. Ссылка;
Иначе
Заказ = Неопределено;
Конец Если;
Контрагент = Данные Заполнения. Контрагент;
Договор = Данные Заполнения. Договор;
Валюта Документа = Данные Заполнения. Валюта Документа;
Сумма Включает НДС = Данные Заполнения. Сумма Включает НДС;
НДС Включать В Стоимость = Данные Заполнения. НДС Включать В Стоимость;
Если Валюта Документа = Справочники. Валюты. Национальная Валюта Тогда
Курс = Данные Заполнения. Курс;
Кратность = Данные Заполнения. Кратность;
Иначе
Структура По Валюте = Регистры Сведений. Курсы Валют. Получить Последнее (Дата, Новый Структура ("Валюта", Договор. Валюта Расчетов));
Курс = Структура По Валюте. Курс;
Кратность = Структура По Валюте. Кратность;
Конец Если;
// Заполнение табличной части документа.
Запасы. Очистить();
Если Данные аполнения. Вид Операции = Перечисления. Виды Операций Заказ Поставщику. Заказ На Переработку Тогда
Для каждого Строка Табличной Части Из Данные Заполнения. Материалы Цикл
Если Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Запас Тогда
Новая Строка = Запасы. Добавить ();
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части);
Новая Строка. Заказ = Данные Заполнения. Ссылка;
Если НЕ Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Облагается НДС Тогда
Если Налогообложение НДС = Перечисления. Типы Налогообложения НДС. НеОблагается НДС Тогда
Новая Строка. Ставка НДС = Управление Небольшой Фирмой Повт Исп. Получить Ставку НДС Без НДС ();
Иначе
Новая Строка. Ставка НДС = Управление Небольшой Фирмой Повт Исп. Получить Ставку НДС Ноль ();
Конец Если;
Иначе Если Значение Заполнено (Новая Строка. Номенклатура. СтавкаНДС) Тогда
Новая Строка. Ставка НДС = Новая Строка. Номенклатура. Ставка НДС;
Иначе
Новая Строка. Ставка НДС = Организация. Ставка НДС По Умолчанию;
Конец Если;
Новая Строка. Содержание = Управление Небольшой Фирмой Сервер. Получить Представление Номенклатуры Для Печати
? (Значение Заполнено (Строка Табличной Части. Номенклатура. Наименование Полное),
Строка Табличной Части. Номенклатура. Наименование Полное, Строка Табличной Части. Номенклатура. Наименование),
Строка Табличной Части. Характеристика, Строка Табличной Части. Номенклатура. Артикул);
Конец Если;
Конец Цикла;
Иначе
Для каждого Строка Табличной Части Из Данные Заполнения. Запасы Цикл
Если Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Запас Тогда
Новая Строка = Запасы. Добавить ();
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части);
Новая Строка. Заказ = Данные Заполнения. Ссылка;
Конец Если;
Конец Цикла;
Конец Если;
Конец Процедуры // Заполнить По Заказ Поставщику ()
// Процедура заполнения документа на основании приходной накладной.
// Параметры:
// Документ Основание - Документ Ссылка. Приходная Накладная - приходная накладная
// Данные Заполнения - Структура - Данные заполнения документа
Процедура Заполнить По Счет На Оплату (Данные Заполнения)
// Заполнение шапки документа.
Этот Объект. Документ Основание = Данные Заполнения. Ссылка;
Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю;
Организация = Данные Заполнения. Организация;
Контрагент = Данные Заполнения. Контрагент;
Договор = Данные Заполнения. Договор;
Вид Цен = Данные Заполнения. Вид Цен;
Вид Скидки Наценки = Данные Заполнения. Вид Скидки Наценки;
Валюта Документа = Данные Заполнения. Валюта Документа;
Сумма Включает НДС = Данные Заполнения. Сумма Включает НДС;
Налогообложение НДС = Данные Заполнения. Налогообложение НДС;
Если Валюта Документа = Справочники. Валюты. Национальная Валюта Тогда
Курс = Данные Заполнения. Курс;
Кратность = Данные Заполнения. Кратность;
Иначе
Структура По Валюте = Регистры Сведений. Курсы Валют. Получить Последнее (Дата, Новый Структура ("Валюта", Договор. Валюта Расчетов));
Курс = Структура По Валюте. Курс;
Кратность = Структура По Валюте. Кратность;
Конец Если;
Заказ В Табличной Части = Константы. Функциональная Опция Заказ При Отгрузке В Табличной Части. Получить ();
Если Тип Знч (Данные Заполнения. Документ Основание) = Тип ("Документ Ссылка. Заказ Покупателя") Тогда
Заказ Покупателя Для Заполнения = Данные Заполнения. Документ Основание;
Иначе
Заказ Покупателя Для Заполнения = Документы. Заказ Покупателя. Пустая Ссылка ();
Конец Если;
Если НЕ Заказ В Табличной Части Тогда
Заказ = Заказ Покупателя Для Заполнения;
Конец Если;
// Заполнение табличной части документа.
Запасы. Очистить ();
Для каждого Строка Табличной Части Из Данные Заполнения. Запасы Цикл
Если Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Запас
ИЛИ Строка Табличной Части. Номенклатура. Тип Номенклатуры = Перечисления. Типы Номенклатуры. Услуга Тогда
Новая Строка = Запасы. Добавить ();
Заполнить Значения Свойств (Новая Строка, Строка Табличной Части);
Если Заказ В Табличной Части Тогда
Новая Строка. Заказ = Заказ Покупателя Для Заполнения;
Конец Если;
Если НЕ Значение Заполнено (Новая Строка.Содержание) Тогда
Новая Строка. Содержание = Управление Небольшой ФирмойСервер. Получить Представление Номенклатуры Для Печати
? (Значение Заполнено (Строка Табличной Части. Номенклатура. Наименование Полное),
Строка Табличной Части. Номенклатура. Наименование Полное, Строка Табличной Части. Номенклатура. Наименование),
Строка Табличной Части. Характеристика, Строка Табличной Части. Номенклатура. Артикул);
Конец Если;
Конец Если;
Конец Цикла;
Конец Процедуры // Заполнить По Счет На Оплату ()
// ОБРАБОТЧИКИ СОБЫТИЙ
// Процедура - обработчик события Обработка Заполнения.
Процедура Обработка Заполнения (Данные Заполнения, Стандартная Обработка) Экспорт
Если (Тип Знч (Данные Заполнения) = Тип ("Документ Ссылка. Заказ Покупателя")
И Данные Заполнения. Вид Операции = Перечисления. Виды Операций Заказ Покупателя. Заказ Наряд)
ИЛИ (Тип Знч (Данные Заполнения) = Тип("Структура") И Данные Заполнения. Свойство ("Основание")
И Данные Заполнения. Основание. Вид Операции = Перечисления. Виды Операций Заказ Покупателя. Заказ Наряд) Тогда
Вызвать Исключение НСтр ("ru = 'Нельзя ввести Расходную накладную на основании заказ-наряда!'");
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Документ Ссылка. Приходная Накладная") Тогда
Заполнить По Приходная Накладная (Данные Заполнения);
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Документ Ссылка. Заказ Покупателя") Тогда
Заполнить По Заказ Покупателя (Данные Заполнения);
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Структура") И Данные Заполнения. Свойство ("Основание") Тогда
Заполнить По Заказ Покупателя (Данные Заполнения. Основание, Истина);
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Документ Ссылка. Заказ Поставщику") Тогда
Заполнить По Заказ Поставщику (Данные Заполнения);
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Документ Ссылка. Счет На Оплату") Тогда
Заполнить По Счет На Оплату (Данные Заполнения);
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Структура")
И Данные Заполнения. Свойство ("Документ Основание Продажа") Тогда
Заполнить По Приходная Накладная (Данные Заполнения. Документ Основание Продажа, "Продажа");
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Структура")
И Данные Заполнения. Свойство ("Документ Основание Возврат")
Заполнить По Приходная Накладная (Данные Заполнения. Документ Основание Возврат, "Возврат");
Иначе Если Тип Знч (Данные Заполнения) = Тип ("Структура") Тогда
Заполнить Значения Свойств (Этот Объект, Данные Заполнения);
Конец Если;
Конец Процедуры // Обработка Заполнения ()
// Процедура - обработчик события Перед Записью объекта.
Процедура Перед Записью (Отказ, Режим Записи, Режим Проведения)
Если Обмен Данными. Загрузка Тогда
Возврат;
Конец Если;
Если Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить () Тогда
Для каждого Строка Табличной Части Из Запасы Цикл
Строка Табличной Части. Заказ = Заказ;
Конец Цикла;
Для каждого Строка Табличной Части Из Предоплата Цикл
Строка Табличной Части. Заказ = Заказ;
Конец Цикла;
Конец Если;
Сумма Документа = Запасы. Итог ("Всего");
Конец Процедуры // Перед Записью ()
// Процедура - обработчик события Обработка Проверки Заполнения объекта.
Процедура Обработка Проверки Заполнения (Отказ, Проверяемые Реквизиты)
Если Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю Тогда
Проверяемые Реквизиты. Добавить ("Подразделение");
Конец Если;
Если Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Комитенту
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Из Переработки
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат С Ответхранения Тогда
Проверяемые Реквизиты. Добавить ("Запасы. Партия");
Конец Если;
Если Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Поставщику
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат Комитенту
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Возврат С Ответхранения Тогда
Проверяемые Реквизиты. Добавить ("Документ Основание");
Конец Если;
Заказ В Шапке = Константы. Функциональная Опция Заказ При Отгрузке В Шапке. Получить ();
Таблица Запасы = Запасы. Выгрузить ("Заказ, Всего");
Таблица Запасы. Свернуть ("Заказ", "Всего");
Таблица Предоплата = Предоплата. Выгрузить ("Заказ, Сумма Платежа");
Таблица Предоплата. Свернуть ("Заказ", "Сумма Платежа");
Если Заказ В Шапке Тогда
Для каждого Строка Запасы Из Таблица Запасы Цикл
Строка Запасы. Заказ = Заказ;
Конец Цикла;
Для каждого Строка Предоплата Из Таблица Предоплата Цикл
Строка Предоплата. Заказ = Заказ;
Конец Цикла;
Конец Если;
Для каждого Строка Из Таблица Предоплата Цикл
Если Строка. Заказ <> Неопределено И Строка. Заказ <> Документы. Заказ Покупателя. Пустая Ссылка () И Строка. Заказ <> Документы. Заказ Поставщику. Пустая Ссылка () Тогда
Найденная Строка Запасы = Таблица Запасы. Найти (Строка. Заказ, "Заказ");
Иначе
Найденная Строка Запасы = Таблица Запасы. Найти (Неопределено, "Заказ");
Найденная Строка Запасы = ? (Найденная Строка Запасы = Неопределено, Таблица Запасы. Найти (Документы. Заказ Покупателя. Пустая Ссылка (), "Заказ"), Найденная Строка Запасы);
Найденная Строка Запасы = ? (Найденная Строка Запасы = Неопределено, Таблица Запасы. Найти (Документы. Заказ Поставщику. Пустая Ссылка (), "Заказ"), Найденная Строка Запасы);
Конец Если;
Всего = ? (Найденная Строка Запасы = Неопределено, 0, Найденная Строка Запасы. Всего);
Если Найденная Строка Запасы = Неопределено Тогда
Текст Сообщения = НСтр ("ru = 'Нельзя зачесть аванс по заказу отличному от указанных в табличных частях ""Запасы"" или ""Расходы""!'");
Управление Небольшой Фирмой Сервер. Сообщить Об Ошибке
(Текст Сообщения,
Неопределено,
Неопределено,
"Предоплата Итог Сумма Расчетов Валюта",
Отказ);
Иначе Если Всего < Строка. Сумма Платежа Тогда
Текст Сообщения = НСтр ("ru = 'Сумма зачитываемых авансов превышает сумму запасов и расходов!'");
Управление Небольшой Фирмой Сервер. Сообщить Об Ошибке
(Текст Сообщения,
Неопределено,
Неопределено,
"Предоплата Итог Сумма Расчетов",
Отказ);
Конец Если;
Конец Цикла;
Если Константы. Функциональная Опция Резервирование Запасов. Получить ()
И (Вид Операции = Перечисления. Виды Операций Расходная Накладная. Продажа Покупателю
ИЛИ Вид Операции = Перечисления. Виды Операций Расходная Накладная. Передача На Комиссию) Тогда
Для каждого Строка Запасы Из Запасы Цикл
Если Строка Запасы. Резерв > Строка Запасы. Количество Тогда
Текст Сообщения = Н Стр ("ru = 'В строке №%Номер% табл. части ""Запасы и услуги"" количество отгружаемых позиций из резерва превышает общее количество запасов.'");
Текст Сообщения = Стр Заменить (Текст Сообщения, "%Номер%", Строка Запасы. Номер Строки);
Управление Небольшой Фирмой Сервер. Сообщить Об Ошибке
Этот Объект,
Текст Сообщения,
"Запасы",
Строка Запасы. Номер Строки,
"Резерв",
Отказ
Конец Если;
Конец Цикла;
Конец Если;
Конец Процедуры // Обработка Проверки Заполнения ()
Процедура Недостача Подотчетника (Сумма Недостачи, ж)
Док = Документы. Расход Из Кассы;
Док. Выбрать (Ссылка. Дата, Ссылка. Дата);
Если ж=0 Тогда
Проверка = Док. Найти По Реквизиту ("Уникальный Код", Ссылка. Номер+Строка (Год (Ссылка. Дата))+"Н");
Иначе Если ж=1 Тогда
Проверка = Док. Найти По Реквизиту ("Уникальный Код", Ссылка. Номер+Строка (Год (Ссылка. Дата))+"З");
Конец Если;
Если Пустая Строка (Проверка) Тогда
Док = Док. Создать Документ ();
Иначе
Док = Проверка. Получить Объект ();
Конец Если;
Если ж=0 Тогда
Док. Вид Операции = Перечисления. Виды Операций Расход Из Кассы. Подотчетнику;
Док. Статья = Справочники. Статьи Движения Денежных Средств. Недостачи Сотрудников;
Док. Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Не Облагается НДС;
Док. Уникальный Код = Ссылка. Номер+Строка (Год (Ссылка. Дата))+"Н";
Иначе Если ж=1 Тогда
Док. Вид Операции = Перечисления. Виды Операций Расход Из Кассы. Подотчетнику;
Док. Статья = Справочники. Статьи Движения Денежных Средств. Зарплата Сотруднику;
Док. Уникальный Код = Ссылка. Номер+Строка (Год (Ссылка. Дата))+"З";
Док. Статья = Справочники. Статьи Движения Денежных Средств. Зарплата Сотруднику;
Док. Период Регистрации = Начало Месяца (Ссылка. Дата);
Док. Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Не Облагается НДС;
Док. Подразделение = Ссылка. Подразделение;
Конец Если;
Док. Сумма Документа = Сумма Недостачи;
Док. Касса = Ссылка. Структурная Единица. Касса;
Док. Подотчетник = Продавец;
Док. Валюта Денежных Средств = Ссылка. Валюта Документа;
Док. Документ Основание = Ссылка;
Док. Дата = Ссылка. Дата;
Док. Организация = Ссылка. Организация;
Док. Автор = Ссылка. Автор;
Попытка
Док. Записать (Режим Записи Документа. Проведение);
Исключение
Док. Записать (Режим Записи Документа. Запись);
Сообщить ("Документ кассы не проведен!");
Конец Попытки;
Конец Процедуры
Процедура Перемещение ДС (Новая Перемещение ДС, Касса Отправитель, Касса Получатель, Сумма Перемещения, сан)
Новая Перемещение ДС. Дата = Ссылка. Дата;
Новая Перемещение ДС. Организация = Ссылка. Организация;
Новая Перемещение ДС. Сумма Документа = Сумма Перемещения;
Новая Перемещение ДС. Касса = Касса Отправитель;
Новая Перемещение ДС. Документ Основание = Ссылка;
Новая Перемещение ДС. Статья = Справочники. Статьи Движения Денежных Средств. Оплата Поставщикам;
Новая Перемещение ДС. Валюта Денежных Средств = Ссылка. Валюта Документа;
Новая Перемещение ДС. Тип Денежных Средств = Перечисления. Типы Денежных Средств. Наличные;
Новая Перемещение ДС. Тип Денежных Средств Получатель = Перечисления. Типы Денежных Средств. Наличные;
Новая Перемещение ДС. Касса Получатель = Касса Получатель;
Новая Перемещение ДС. Терминал Клиент = сан;
Попытка
Новая Перемещение ДС. Записать (Режим Записи Документа. Проведение);
Исключение
Новая Перемещение ДС. Записать (Режим Записи Документа. Запись);
Сообщить ("Документ кассы не проведен!");
Конец Попытки;
Конец Процедуры
// Процедура - обработчик события Обработка Проведения объекта.
// Процедура Обработка Проведения (Отказ, Режим Проведения)
// Инициализация дополнительных свойств для проведения документа.
Управление Небольшой Фирмой Сервер. Инициализировать Дополнительные Свойства Для Проведения (Ссылка, Дополнительные Свойства);
// Инициализация данных документа.
Документы. Расходная Накладная. Инициализировать Данные Документа (Ссылка, Дополнительные Свойства);
// Подготовка наборов записей.
Управление Небольшой Фирмой Сервер. Подготовить Наборы Записей К Регистрации Движений (Этот Объект);
// Отражение в разделах учета.
Управление Небольшой Фирмой Сервер. Отразить Запасы (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Закупки (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Продажи (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Запасы На Складах (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Запасы К Расходу Со Складов (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Запасы Принятые (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Запасы Переданные (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Заказы Покупателей (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Заказы Поставщикам (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Доходы И Расходы (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Доходы И Расходы Кассовый Метод (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Доходы И Расходы Нераспределенные (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Доходы И Расходы Отложенные (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Потребность В Запасах (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Расчеты С Поставщиками (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Расчеты С Покупателями (Дополнительные Свойства, Движения, Отказ);
Управление Небольшой Фирмой Сервер. Отразить Управленческий (Дополнительные Свойства, Движения, Отказ);
// Запись наборов записей.
Управление Небольшой Фирмой Сервер. Записать Наборы Записей (Этот Объект);
// Контроль возникновения отрицательного остатка.
Документы. Расходная Накладная. Выполнить Контроль (Ссылка, Дополнительные Свойства, Отказ);
Дополнительные Свойства. Для Проведения. Структура Временные Таблицы. Менеджер Временных Таблиц. Закрыть ();
Касса Терминала = Справочники. Кассы;
Найденная Ссылка = Касса Терминала. Найти По Коду ("000000004");
Касса Лото = Справочники. Кассы;
Найденная Ссылка Лото = Касса Лото. Найти По Коду ("000000019");
Касса Основная = Справочники. Кассы;
Найденная Ссылка Сдал = Касса Основная. Найти По Коду("000000001");
Док Перемещение ДС = Документы. Перемещение ДС;
Док Перемещение ДС. Выбрать (Ссылка. Дата);
Проверка ДС = Док Перемещение ДС. Найти По Реквизиту ("Терминал Клиент", Ссылка. Номер+"Т");
Док Перемещение ДС. Выбрать (Ссылка. Дата);
Проверка ДС1 = Док Перемещение ДС. Найти По Реквизиту ("Терминал Клиент", Ссылка. Номер+"К");
Док = Документы. Поступление В Кассу;
Док. Выбрать (Ссылка. Дата);
Проверка = Док. Найти По Реквизиту ("Документ Основание", Ссылка);
Если Пустая Строка (Проверка) Тогда
Док = Документы. Поступление В Кассу. Создать Документ ();
Иначе
Док = Проверка. Получить Объект ();
Конец Если;
Док. Документ Основание = Ссылка;
Док. Дата = Дата (Год (Ссылка. Дата), Месяц (Ссылка. Дата), День (Ссылка. Дата), Час (Ссылка. Дата), Минута (Ссылка. Дата)+1, Минута (Ссылка. Дата));
Док. Организация = Ссылка. Организация;
Док. Автор = Ссылка. Автор;
Док. Контрагент = Ссылка. Контрагент;
Док. Статья = Справочники. Статьи Движения Денежных Средств. Оплата От Покупателей;
Док. Валюта Денежных Средств = Ссылка. Валюта Документа;
Док. Налогообложение НДС = Перечисления. Типы Налогообложения НДС. Облагается НДС;
Если Док. Расшифровка Платежа. Количество ()>0 Тогда
Договор 1 = Док. Расшифровка Платежа. Получить (0);
Иначе
Договор 1 = Док. Расшифровка Платежа. Добавить ();
Конец Если;
Договор 1. Договор = Ссылка. Контрагент. Договор По Умолчанию;
Договор 1. Сумма Расчетов = Ссылка. Сумма Документа;
Договор 1. Курс = Ссылка. Курс;
Договор 1. Ставка НДС = Ссылка. Запасы. Получить (0). Ставка НДС;
Договор 1. Документ = Ссылка;
Договор 1. Сумма Платежа = Ссылка. Сумма Документа;
Док. Касса = Ссылка. Структурная Единица. Касса;
Док. Сумма Документа = Ссылка. Сумма Документа;
Док. Вид Операции = Перечисления. Виды Операций Поступление В Кассу. От Покупателя;
Попытка
Док. Записать (Режим Записи Документа. Проведение);
Исключение
Док. Записать (Режим Записи Документа. Запись);
Сообщить ("Документ кассы не проведен!");
Конец Попытки;
Если Пустая Строка (Проверка ДС) Тогда
Парам Перемещение ДС = Док Перемещение ДС. Создать Документ();
Иначе
Парам Перемещение ДС = Проверка ДС. Получить Объект();
Конец Если;
Перемещение ДС (Парам Перемещение ДС, Найденная Ссылка, Ссылка. Структурная Единица. Касса, Ссылка. Терминал, Ссылка. Номер+"Т");
Если Пустая Строка (Проверка ДС1) Тогда
Парам Перемещение ДС = Док Перемещение ДС. Создать Документ();
Иначе
Парам Перемещение ДС = ПроверкаДС1.ПолучитьОбъект();
Конец Если;
Перемещение ДС (Парам Перемещение ДС, Ссылка. Структурная Единица. Касса, Найденная Ссылка Сдал, Ссылка. Сдал, Ссылка. Номер+"К");
//Недостача проводится документом Расход из кассы подотчетного лица.
Если Недостача>0 Тогда
Недостача Подотчетника (Недостача, 0);
Конец Если;
Если Зарплата>0 Тогда
Недостача Подотчетника (Зарплата, 1);
Конец Если;
Если Супер Лото>0 Тогда
Док Перемещение ДС = Документы. Перемещение ДС;
Док Перемещение ДС. Выбрать (Ссылка. Дата);
Проверка ДС = Док Перемещение ДС. Найти По Реквизиту ("Терминал Клиент", Строка (Год (Ссылка. Дата))+Прав (Ссылка. Номер,6)+"Л");
Если Пустая Строка (Проверка ДС) Тогда
Парам Перемещение ДС = Док Перемещение ДС. Создать Документ();
Иначе
Парам Перемещение ДС = ПроверкаДС. Получить Объект();
Конец Если;
Перемещение ДС (Парам Перемещение ДС, Найденная Ссылка Лото, Ссылка. Структурная Единица. Касса, Ссылка. Супер Лото, Строка (Год (Ссылка. Дата))+Прав (Ссылка. Номер,6)+"Л");
Конец Если;
Конец Процедуры // Обработка Проведения()
// Процедура - обработчик события Обработка Удаления Проведения объекта.
// Процедура Обработка Удаления Проведения (Отказ)
// Инициализация дополнительных свойств для проведения документа
Управление Небольшой Фирмой Сервер. Инициализировать Дополнительные Свойства Для Проведения (Ссылка, Дополнительные Свойства);
// Подготовка наборов записей
Управление Небольшой Фирмой Сервер. Подготовить Наборы Записей К Регистрации Движений (Этот Объект);
// Запись наборов записей
Управление Небольшой Фирмой Сервер. Записать Наборы Записей (Этот Объект);
// Контроль возникновения отрицательного остатка.
Документы. Расходная Накладная. Выполнить Контроль (Ссылка, Дополнительные Свойства, Отказ, Истина);
Конец Процедуры // Обработка Удаления Проведения()
Размещено на Allbest.ru
...Подобные документы
Экономическая сущность и классификация доходов, состав и способы списания расходов. Роль бухгалтерского учета в повышении доходов и эффективности расходов, принципы учета. Документальное оформление и отражение доходов и расходов на бухгалтерских счетах.
курсовая работа [41,2 K], добавлен 26.11.2010Особенности продажи канцтоваров. Положение о бухгалтерском учете. Работа с 1С через интернет: тонкий клиент, веб-клиент и низкоскоростные подключения. Создание конфигурации для фирмы ООО "Динамо", реализующей канцтовары. Современный дизайн и инструменты.
курсовая работа [2,9 M], добавлен 26.04.2014Сущность учета доходов и расходов организации. Задачи бухгалтерского учета. Учет доходов и расходов предприятия. Анализ доходов и расходов предприятия (на примере ДООО ПКП "Инструментальщик"). Информационное обеспечение анализа доходов и расходов.
дипломная работа [66,2 K], добавлен 02.10.2008Организация учета и анализ хозяйственной деятельности ООО "Парус". Порядок признания и определения доходов и расходов для целей начисления прибыли. Учет доходов и расходов в соответствии с требованиями МСФО и их соответствие отечественным стандартам.
курсовая работа [71,5 K], добавлен 11.08.2011Теоретические аспекты учета и анализа доходов и расходов предприятия. Законодательная и нормативно-правовая база, регулирующая учет доходов и расходов предприятия. Организационно-экономическая характеристика ООО "СуперСтрой-Уфа", учет доходов и расходов.
дипломная работа [308,1 K], добавлен 25.10.2009Экономическая сущность и классификация доходов и расходов. Система их учета и нормативно-правовое регулирование. Сравнительный анализ доходов и расходов в бухгалтерском и налоговом учете. Предложения по увеличению эффективности использования доходов.
дипломная работа [351,2 K], добавлен 27.12.2015Объективная необходимость исчисления доходов и расходов. Учетная политика предприятия ТОО "Ален 7". Классификация доходов и расходов предприятия. Методика их анализа. Рекомендации по совершенствованию бухгалтерского учета доходов и расходов на фирме.
дипломная работа [223,3 K], добавлен 06.07.2015Экономическое значение и сущность доходов. Понятие о расходах, их характеристика и классификация. Бухгалтерский учет доходов и расходов предприятия на примере ТОО "Алматы Энерго Сбыт" РОЭС-1. Аудиторская проверка и анализ доходов и расходов предприятия.
дипломная работа [1,6 M], добавлен 05.01.2012Доходы и расходы как потоки ресурсов организации, особенности их классификации. Цель и методика анализа доходов и расходов. Учет и анализ доходов и расходов на предприятии РГП "Костанайводхоз". Анализ доходов и расходов по данным бухгалтерского баланса.
дипломная работа [373,4 K], добавлен 06.07.2015Характеристика предприятия ООО "Нива". Экономическая сущность задачи по учету и анализу заказов на товары. Анализ существующей системы руководства предприятием. Порядок ведения книги учета доходов и расходов. Положение об учетной политике ООО "Нива".
отчет по практике [28,3 K], добавлен 26.04.2009Характеристика доходов и расходов, их классификация и оценка, признание в учете и отражение в отчетности. Формирование прочих доходов и расходов. Учет прочих доходов и расходов и анализ показателей прибыли. Методики системного и комплексного анализа.
курсовая работа [40,7 K], добавлен 29.03.2012Анализ финансовых результатов предприятия: общие принципы учета доходов и расходов, учет прибыли по методу начисления и кассовому методу. Учет доходов и расходов предприятия по обычным видам деятельности. Формирование финансовых результатов предприятия.
курсовая работа [34,4 K], добавлен 04.12.2009Сущность и значение анализа доходов и расходов коммерческого банка. Порядок отражения доходов и расходов банка в бухгалтерском учете. Практика учета и анализ доходов в ОАО "Томскпромстройбанк", разработка рекомендаций по увеличению доходов предприятия.
дипломная работа [94,2 K], добавлен 28.06.2011Задачи бухгалтерского учета доходов и расходов, их классификация. Учет доходов и расходов от текущей деятельности и будущего периода. Учет прочих доходов и расходов. Аннотированный перечень нормативных документов, регламентирующих учет доходов и расходов.
курсовая работа [121,4 K], добавлен 05.05.2015Организационная характеристика предприятия. Область деятельности предприятия. Нормативно–правовая база и задачи учёта. Понятие и классификация доходов и расходов. Синтетический и аналитический учет операционных и внереализационных расходов и доходов.
курсовая работа [84,0 K], добавлен 15.09.2009Краткая характеристика информационной системы 1С: Предприятие 8.1. Введение учета расчетов с помощью системы 1С. Анализ информации отчетов и формирование налоговых регистров движения кредиторской и дебиторской задолженности в системе 1С: Предприятие.
контрольная работа [1,5 M], добавлен 11.06.2012Теоретические аспекты учета и анализа доходов и расходов предприятия, информационное обеспечение анализа доходов и расходов. Организационно-экономическая характеристика ООО "Ремонт-Юг", особенности учета и анализа доходов и расходов предприятия.
курсовая работа [393,0 K], добавлен 24.05.2010Теоретические аспекты учета доходов и расходов предприятия, их классификация и состав. Порядок налогообложения доходов предприятия. Анализ учета доходов и расходов ГУИПП Бендерская типография "Полиграфист". Принципы формирования финансового результата.
дипломная работа [126,0 K], добавлен 23.12.2010Сущность доходов и расходов предприятия. Исследование комплексной проблемы учета и анализа доходов и расходов предприятия. Учет доходов и расходов, связанных с обычными видами деятельности предприятия и определение финансового результата по ним.
курсовая работа [33,0 K], добавлен 17.04.2012Доходы предприятия: понятие, классификация, признание. Учет доходов будущих периодов. Классификация расходов предприятия по обычным видам деятельности. Признание расходов предприятия. Учет расходов будущих периодов. Учет чрезвычайных доходов и расходов.
курсовая работа [32,8 K], добавлен 03.12.2010
