Файл: Проектирование реализации операций бизнес-процесса «Расчет заработной платы».pdf

Бесспорно, MS Excel - мощное средство, но в действительности не весь потенциал его используется для автоматизации систем бюджетирования, и на практике создаются упрощенные модели планирования, для которых использование MS Excel является целесообразным. Эффективно применять MS Excel и для бюджетирования в части планирования, контроля и анализа денежных потоков. Однако, для средних и крупных производственных компаний, деятельность которых сложная многопараметрическая система, этого недостаточно. Особенности производственного процесса могут определять не всегда линейную систему взаимозависимости множества факторов, которые формируют финансово-экономические показатели.

Появление в составе пакета Microsoft Office системы управления базами данных Access изменило взгляд на проблему разработки баз данных. Первоначально MS Access не входила в пакет Office и имела отдельную нумерацию версий. Начиная с версии 7.0, эта СУБД стала входить в профессиональный пакет "офиса".

Приложение Microsoft Access 2007 исключительно удобно в использовании благодаря готовым шаблонам и эффективным средствам, которые сохраняют свою важность по мере увеличения объема данных.

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

С помощью Access 2007 обычные пользователи получили удобное средство для создания и эксплуатации достаточно мощных баз данных без необходимости что-либо программировать. В то же время работа с Access 2007 не исключает возможности программирования, т. к. система включает поддержку языка программирования Visual Basic for Applications, который позволяет создавать дополнительные модули и элементы управления.

Одним из важных достоинств Access 2007 является интеграция этой программы с Excel, Word и другими программами пакета MS Office. Данные, созданные в разных приложениях, входящих в этот пакет, легко импортируются и экспортируются из одного приложения в другое. Распространенность пакета Microsoft Office делает такие базы преемственными.

3. ОПИСАНИЕ РАБОТЫ ПРОГРАММЫ

При открытии программы появляется форма, на которой находится таблица с нужной нам информацией (рисунок 3.1).

Рисунок 3.1 Скрин работы программы

Изначально можно выбрать уже занесенного в базу данных работника, или же добавить нового, щелкнув на кнопку добавить, после чего появится окно «Добавления работника» как на рисунке 3.2.

Рисунок 3.2 Скрин работы программы

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

После выбора работника из списка можно так же изменить какие-то его данные для этого нужно выделить данного работника и нажать на кнопку «Изменить» (рисунок 3.3)

Рисунок 3.3 Скрин работы программы

Так же можно удалить не нужного вам работника из базы для этого нужно выделить данного работника и нажать кнопку «Удалить». После этого запись данного работника из базы данных удалиться.

В данной программе предусмотрено открытие любой другой нужной вам базы данных для этого нужно нажать на кнопку «Открыть» и загрузить ее (рисунок 3.4).

Рисунок 3.4 Скрин работы программы

Данная программа имеет возможность вывода справки для расчета заработной платы каждому работнику. Нажав на кнопку «Формирование справки» (рисунок 3.5)

Рисунок 3.5 Скрин работы программы

Появляется форма, в ней мы нажимаем далее, после чего появляется следующая форма лист расчета заработной платы (рисунок 3.6).

Рисунок 3.6 Скрин работы программы

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

Рисунок 3.7 Скрин работы программы

Теперь форма заполнена данными.

До заполнения форма справка имела вид как на рисунке 3.8.

Рисунок 3.8 Изображение формы до заполнения

После заполнения она принимает вид как на рисунке 3.9.

Рисунок 3.9 Изображение формы после заполнения

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

Можно вывести отчет с данными на всех сотрудников и отправить ее на печать. Нужно предварительно выбрать отдельные поля для отображения (рисунок 3.10).

Рисунок 3.10 Скрин работы программы

ЗАКЛЮЧЕНИЕ

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

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

Это приложение значительно облегчает работу пользователя, экономя временя и усилия, однако программа не совершенна и не исключает дальнейшей доработки. Гибкость выбранной визуальной среды позволяет вносить в приложения необходимые коррективы. Удобный интерфейс позволяет создать необходимые условия для комфортной работы с приложением.

Разработанное приложение, состоящее из процедур и функций, позволяет:

- добавлять, редактировать, удалять, править и хранить в электронном виде данные по сотрудникам.

- легко отслеживать и управлять основными сведениями на сотрудника.

- использовать набор поисковой функции.

- выводить отчет на печать.

- выводить данные в справку в Excel.

Программный продукт реализован с помощью пакета MS Office, а так же при помощи языка объектно-ориентированного программирования Borland Delphi 7.0. Использование разработанной программы должно помочь работникам, рассчитывающим заработную плату. Код программы приведен в приложении А.

СПИСОК ЛИТЕРАТУРЫ

1. Петров В.Н. Информационные системы. – СПб.: ПИТЕР, 2006;
2. Семакин И.Г., Шестаков А.П. Основы программирования: Учебник. – М.: Мастерство, 2009.
3. Сорокин, А.В. «Delphi. Разработка баз данных». / А.В. Сорокин – СПб.: Питер, 2005.- 447с.
4. Фараонов, В.В. Delphi5. Руководство разработчика баз данных. /В.В. Фаронов, П.В. Шумаков – М.: «Нолидж», 2000. – 640с.
5. Баженова И. Delphi7: Самоучитель программиста.- М.: КУДИЦ-ОБРАЗ, 2008.
6. Microsoft Office Excel 2007. Библия пользователя, Джон Уокенбах.
7. Синенко О., Леньшин В. Автоматизация предприятия вчера, сегодня, завтра. PC Week. 2000. № 29. С.15 – 16.

ПРИЛОЖЕНИЕ А

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, DB, ADODB, Grids, DBGrids, DBGridEh, StdCtrls, ComCtrls, Mask,

DBCtrls, DBCtrlsEh, PrnDbgeh, Buttons, DBGridEhGrouping, ToolCtrlsEh,

DBGridEhToolCtrls, DynVarsEh, GridsEh, DBAxisGridsEh;

type

TForm1 = class(TForm)

ADOConnection1: TADOConnection;

ADOQuery1: TADOQuery;

DataSource1: TDataSource;

Button1: TButton;

Button2: TButton;

Button3: TButton;

StatusBar1: TStatusBar;

Button4: TButton;

DBEditEh4: TDBEditEh;

DBEditEh5: TDBEditEh;

Label4: TLabel;

Label5: TLabel;

DBEditEh6: TDBEditEh;

Label6: TLabel;

Button5: TButton;

Button6: TButton;

Button7: TButton;

OpenDialog1: TOpenDialog;

DBGridEh1: TDBGridEh;

Button8: TButton;

procedure Button1Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure Button6Click(Sender: TObject);

procedure Button7Click(Sender: TObject);

procedure FormCreate(Sender: TObject);

procedure Button8Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

fs: string;

implementation

uses Unit2, Unit3;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

form2.show;

form2.button1.Visible:=true;

form2.button2.Visible:=true;

form2.button3.Visible:=False;

Form1.ADOQuery1.insert;

end;

procedure TForm1.Button3Click(Sender: TObject);

begin

ADOQuery1.Delete;

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Form2.show;

form2.button1.Visible:=true;

form2.button2.Visible:=true;

form2.button3.Visible:=False;

end.

procedure TForm1.Button4Click(Sender: TObject);

begin

ADOQuery1.Active := False;

ADOQuery1.SQL.Clear;

ADOQuery1.SQL.Add('SELECT *');

ADOQuery1.SQL.Add('FROM таблица1');

ADOQuery1.SQL.Add('WHERE Фамилия LIKE' + #39 + dbEditeh4.Text + '%' + #39 +' AND ');

ADOQuery1.SQL.Add('Профессия LIKE' + #39 + dbEditeh5.Text + '%' + #39 +' AND ');

ADOQuery1.SQL.Add('Табномер LIKE' + #39 + dbEditeh6.Text + '%' + #39);

ADOQuery1.Active := True;

end;

procedure TForm1.Button5Click(Sender: TObject);

begin

Form3.show;

end;

procedure TForm1.Button6Click(Sender: TObject);

begin

dbEditeh4.text:='';

dbEditeh5.text:='';

dbEditeh6.text:='';

Button4Click(Sender);

DBGrideh1.Columns[0].Visible := False;

DBGrideh1.Columns[1].Visible := true;

DBGrideh1.Columns[2].Visible := true;

DBGrideh1.Columns[3].Visible := true;

DBGrideh1.Columns[4].Visible := true;

DBGrideh1.Columns[5].Visible := true;

DBGrideh1.Columns[6].Visible := true;

DBGrideh1.Columns[7].Visible := true;

DBGrideh1.Columns[8].Visible := true;

end;

procedure TForm1.Button7Click(Sender: TObject);

begin

if OpenDialog1.Execute then

begin

ADOConnection1.Close;

adoquery1.Active:=False;

try

if OpenDialog1.Execute then