19877 (602838), страница 3

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 3)

Рис.19

Редактируем форму журнала проводок.

1. Создаем форму списка

2. Добавим в форму переключатель. Заголовок - "разделять по журналам", Идентификатор –"ФлагПоЖурналам", Формула – ПоЖурналам();

4. В модуле формы пропишем процедуру:

Процедура ПриОткрытии()

ФлагПоЖурналам=ВосстановитьЗначение("ФлагПоЖурналам");

// Получаем сохраненное между сеансами значение

Если ФлагПоЖурналам=1 Тогда

ЗакладкиОтбора("НомерЖурнала",1);

// Устанавливаем отбор

Иначе

ЗакладкиОтбора("",1);

// Отключаем отбор

КонецЕсли;

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

//=====================================================

Процедура ПоЖурналам()

СохранитьЗначение("ФлагПоЖурналам",ФлагПоЖурналам);

// Указываем какое значение и под каким именем сохранить для

// текущего пользователя между сеансами его работы

Если ФлагПоЖурналам=1 Тогда

ЗакладкиОтбора("НомерЖурнала",1);

Иначе

ЗакладкиОтбора("",1);

КонецЕсли;

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

Рис.20

После определения всех реквизитов проводок можно перейти к созданию формы Операции. Вернемся в окно редактирования свойств объекта метаданных Операция. Вызовем окно редактирования формы операции.

Рис.21

Напишем в модуле формы процедуру:

Процедура ПриОткрытии()

ИспользоватьВалюту(Константа.ОснВалюта);

// Здесь мы указываем, что в форме операции по умолчанию использовать основную

// валюту

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

Создадим и форму списка операций, самого простого вида.

2.4 Создание документов и журналов

Документ Приходная Накладная.

Составляется при оприходовании на склад ТМЦ.

В дереве метаданных выбираем раздел "Документы". Создаем новый документ.

Идентификатор: ПриходнаяНакладная

Журнал: ПриходныеНакладные

Нумератор: Нет Периодичность: Год

Длина: 5 Тип: число

Уникальность: да Автонумерация: да

Может являться основанием для документа любого вида?: нет

Отредактируем журнал ПриходныеНакладные. Добавим в него две графы – Кол из реквизита таблицы Кол, и Сумма из реквизита Сумма. Настроим форму журнала.

Перейдем к форме документа. Создаем ее.

В поле Наименование пишем формулу Товар(), в поле Цена – Цена (). Под таблицей добавим текст с формулой для вычисления суммы по колонке Итог("Кол"), Итог("Сумма").

В модуле формы документа пишем:

Процедура ПриОткрытии()

ПриЗаписиПерепроводить(1);

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

Процедура Наименование()

Если Наименование.Выбран()=1 Тогда

КонецЕсли;

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

Процедура Цена()

Цена=Окр(Наименование.Цена);

Сумма=Окр(Кол*Цена,2,1);

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

Процедура Печать()

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

Таб.ИсходнаяТаблица("Таблица");

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

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

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

НС=НомерСтроки;

// атрибут НомерСтроки возвращает номер текущей строки

// табличной части

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

КонецЦикла;

ИтогПр=Формат(Итог("Сумма"),"ЧПДС");

// В переменную ИтогПр мы выведем сумму прописью

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

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

Таб.ПараметрыСтраницы(1,100,1);

Таб.Показать("");

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

Рис.22

Создаем печатную форму документа:

Рис.23

Теперь переходим к модулю документа. Пишем процедуру:

Процедура ОбработкаПроведения()

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

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

Операция.НоваяПроводка();

Операция.Дебет.Счет = СчетПоКоду("10",ПланыСчетов.Наш);

Операция.Дебет.МестоХранения = Склад;

Операция.Дебет.ТоварУслуга = Наименование;

Операция.Дебет.ПриходнаяНакладная = ТекущийДокумент();

Операция.Кредит.Счет = СчетПоКоду("60.0",ПланыСчетов.Наш);

Операция.Кредит.Поставщики = Поставщик;

Операция.Кредит.ПриходнаяНакладная = ТекущийДокумент();

Операция.Кредит.МОЛ = ЧерезТов;

Операция.Сумма = Сумма;

КонецЦикла;

Операция.Содержание = "Поступили материалы от поставщиков";

Операция.СуммаОперации = Итог("Сумма");

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

Операция.Записать();

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

Создадим документ в 1С:

Рис.24

Проведем накладную, документ отражается в журнале:

Рис.25

Документ Акт выполненных работ

Данный документ составляется при расчетах с подрядчиками, после завершения работы по договору подряда.

Данный документ составляется по такому же принципу как и предыдуший.

Рис.26

1. Создаем форму документа

2. в модуле формы пишем формулу:

Процедура ПриОткрытии()

ПриЗаписиПерепроводить(1);

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

Процедура ОбрВыпРаб()

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

Процедура Печать()

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

Таб.ИсходнаяТаблица("Таблица");

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

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

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

НС=НомерСтроки;

// атрибут НомерСтроки возвращает номер текущей строки

// табличной части

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

КонецЦикла;

// В переменную ИтогПр мы выведем сумму прописью

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

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

Таб.ПараметрыСтраницы(1,100,1);

Таб.Показать("");

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

4.Составляем печатную форму документа:

Рис.27

5.Создадим документ В 1С:

Рис.28

Данный документ при проведении отражается в журнале "АктВыпРаб".

Документ Договор

На основании договоров производятся поставки ТМЦ и выполняются работы. Создадим два договора: "Договор поставки" и "Договор подряда".

Процесс создания рассмотрим на примере договора поставки.

1. В дереве метаданных в разделе "Документ" добавляем новый документ.

2. В окно редактирования вносим соответствующие значения.

3. Составляем форму документа.

4. В модуле формы пишем процедуру:

Процедура ПриОткрытии()

ПриЗаписиПерепроводить(1);

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

Процедура Печать()

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

Таб.ИсходнаяТаблица("Таблица");

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

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

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

НС=НомерСтроки;

// атрибут НомерСтроки возвращает номер текущей строки

// табличной части

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

КонецЦикла;

// В переменную ИтогПр мы выведем сумму прописью

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

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

Таб.ПараметрыСтраницы(1,100,1);

Таб.Показать("");

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

Рис.29

1. Создаем печатную форму договора.

2. В 1С заполняем форму договора, проводим его в журнале "Договора", смотрим печатную форму:

Рис.30

Документ Доверенность

Данный документ создается при получении товароматериальных ценностей, является оправдательным документом при передаче ТМЦ.

1. Создаем документ

2. Заполняем в окне редактирования необходимые данные

3. Создаем форму документа

4. В модуле формы пишем процедуру:

Процедура ПриОткрытии()

ПриЗаписиПерепроводить(1);

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

Процедура Печать()

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

Таб.ИсходнаяТаблица("Таблица");

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

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

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

НС=НомерСтроки;

// атрибут НомерСтроки возвращает номер текущей строки

// табличной части

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

КонецЦикла;

// В переменную ИтогПр мы выведем сумму прописью

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

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

Таб.ПараметрыСтраницы(1,100,1);

Таб.Показать("");

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

5. Создаем печатную форму документа:

Рис.31

6.Создадим доверенность в 1С. Проведем документ. Он находит свое отражение в журнале по учету доверенностей "Доверенность"

Рис.32

Рис.33

2.5 Создание отчетов

Отчет является документом, который обобщает, формирует, анализирует данные за весь отчетный период.

Создаем новый отчет "Счет60". Далее с помощью конструктора бухгалтерских запросов составляем форму отчета. Данный отчет будет иметь несколько кнопок, каждая из которых будет соответствовать конкретному счету, в частности:

Сформировать- сч.60.0

Печать- сч. 60.1

Анализ – сч. 51, в части уплаченных средств поставщикам.

Рис.34

Рис.35

Отдельно создан отчет по сч.10

Рис.36

III. Пути совершенствования АИС учета расчетов с поставщиками и подрядчиками на примере ГУИПП "Типар"

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

На ГУИПП "Типар" данная проблема стоит остро, так как этот участок учета не автоматизирован, следовательно, замедляется процесс обработки экономической и бухгалтерской информации. На других участках учета установлены отдельные модули, разработанные на базе FOXPRO, разработчик "Лаборатория Мега", Кишинев, Молдова.

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

Рис.37

Отсюда далее следует возможность в документе "Приходная накладная" в реквизит шапки "ЧерезТов" сделать автоматизированным, в свойстве реквизита указать тип значения "Справочник.ЧерезТов".

Это позволит нам из справочника сразу выбирать лицо, на которого выписывается доверенность.

Рис.38

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

Заключение

Характеристики

Список файлов курсовой работы