Проектирование программы формирования заказов по грузоперевозкам
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
10% от суммы первых 4-х элементов.
,11*10%=3695,01 (руб.)
Структуру себестоимости программного продукта опишите в таблице №7.
Структуру себестоимости программного продукта
№Элементы себестоимостиСумма (руб.)% в общей сумме себестоимости1Основная ЗП исполнителя17670,71282Доп. ЗП исполнителя1996,7933Начисления на ЗП5900,24104РС и ПЭВМ30948,001505Прочие расходы5651,579Итого:62167,31100
,71/62167,31*100=28,42%
,79/62167,31*100=3,21%
5900,24/62167,31*100=9,49%
30948,001/62167,31*100=49,78%
5651,57/62167,31*100=9,09%
3.6 Расчет цены программного продукта
Цена - это денежное выражение стоимости продукции.
Цена складывается из нескольких компонентов:
Ц=С+П+НДС, где
С - себестоимость программного продукта 62167,31 (руб.)
П отчетного периода (первого года) - прибыль, которую берем в размере 40% от себестоимости
,31*40%= 24866,92 (руб.)
НДС - налог на добавленную стоимость, который берется в размере 18% от суммы себестоимости и прибыли 11190,11 (руб.)
,31* 18%=11190,11 (руб.)
Ц=С+П+НДС= 62167,31+24866,92 + 11190,11=98224,34 (руб.)
.7 Расчет экономической эффективности
Эффективность это результативность т.е. получение результата с учетом затрат - более того с минимальными затратами трудовых, материальных, финансовых средств труда.
? ПР = приблизительный рост прибыли за два года
КВ - капитальные вложения = себестоимость программного продукта =62167,31 (руб.)
? ПР= ПР отчетного периода - ПР базисного периода
На второй год продажи программного продукта планируется увеличение прибыли с 40% до 60%, следовательно,
ПР планируемая за 1 год = 62167,31*40%= 24866,92 (руб.)
ПР планируемая за 2 год = 62167,31*60%= 37300,38 (руб.)
Отклонения прибыли = 37300,38 - 24866,92= 12433,46 (руб.)
Эа = 12433,46 / 62167,31= 0,2 или 20%
В экономической части ДП произведен расчет себестоимости и цены программного продукта ПО Грузоперевозки, которая показала эффективность создания данного программного продукта, т.к. экономическая эффективность составляет 20%.
Расчеты отвечают современным требованиям ведения бухгалтерского учета и плановой политики предприятий.
Программа полностью соответствует современным требованиям и стандартам.
Заключение
Тема дипломного проекта была выбрана в соответствии с заданием, выданном руководителем преддипломной практики.
В первой главе выполнены следующие задачи, а именно: конкретизирована постановка задачи, проведён обзор существующих решений и обоснован выбор языка программирования.
Во второй главе выполнены следующие задачи, а именно: разработана структурная схема, разработан интерфейс программного продукта, определены технические требования к оборудованию, на котором будет выполняться разработанная программа, проведён тест программного продукта, разработано оператора и руководство системного программиста.
В третьей главе выполнены следующие задачи, а именно:
Составленная смета затрат на программный продукт.
Подводя итоги выполненного задания, следует отметить, что в нём были достигнуты поставленная цель и задачи.
программа заказ грузоперевозка руководство
Список литературы
1. Технологии Delphi 2006. Новые возможности
2. Delphi 6/7. Базы данных и приложения. Лекции и упражнения
3. Самоучитель Delphi.NET
4. www.devdelphi.ru/
. www.edelphi.ru/
Приложение
Код программы
Главная формаUnit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Grids, DBGrids, DB, ADODB, StdCtrls, ExtCtrls, DBCtrls, Menus, ComObj,, ShellAPI;= class(TForm): TADOConnection;: TADODataSet;: TDataSource;: TDBGrid;: TButton;: TButton;: TButton;: TDBNavigator;: TMainMenu;: TMenuItem;: TMenuItem;: TButton;: TMenuItem;: TButton;: TButton;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TMenuItem;: TButton;: TButton;: TButton;: TOpenDialog;: TMenuItem;: TMenuItem;: TButton;: TImage;: TPanel;: TButton;: TEdit;: TEdit;: TLabel;: TLabel;: TLabel;: TButton;Button1Click (Sender: TObject);Button2Click (Sender: TObject);Button3Click (Sender: TObject);N6Click (Sender: TObject);Button4Click (Sender: TObject);N1Click (Sender: TObject);Button5Click (Sender: TObject);Button6Click (Sender: TObject);N3Click (Sender: TObject);N5Click (Sender: TObject);N7Click (Sender: TObject);N8Click (Sender: TObject);N9Click (Sender: TObject);N10Click (Sender: TObject);N11Click (Sender: TObject);N12Click (Sender: TObject);N13Click (Sender: TObject);N14Click (Sender: TObject);Button7Click (Sender: TObject);Button8Click (Sender: TObject);Button9Click (Sender: TObject);N16Click (Sender: TObject);Button10Click (Sender: TObject);Button12Click (Sender: TObject);Button11Click (Sender: TObject);
{Private declarations}
{Public declarations};: TForm1;:string;, Table: Variant;, j: Integer;Unit2, Unit3, Unit4, Unit5, Unit6, Unit7, Unit8, Unit9, Unit10;
{$R *.dfm}TForm1. Button10Click (Sender: TObject);. Active:=false;. CommandText:=select * from Klienti;. Active:=true;.show;;TForm1. Button11Click (Sender: TObject);c, d:string;:=Edit1. Text;:=Edit2. Text;(c=max) and (d=123) then. Visible:=false;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;. Visible:=true;
// если нет выводим сообщение
else
ShowMessage (Авторизация не пройдена!);
end;TForm1. Button12Click (Sender: TObject);. Close;;TForm1. Button1Click (Sender: TObject);. Active:=false;. CommandText:=select * from Gruzi;. Active:=true;;TForm1. Button2Click (Sender: TObject);. Active:=false;. CommandText:=select * from Klienti;. Active:=true;;TForm1. Button3Click (Sender: TObject);. Active:=false;. CommandText:=select * from Postavshiki;. Active:=true;;TForm1. Button4Click (Sender: TObject);. Show;;TForm1. Button5Click (Sender: TObject);. Active:=false;. CommandText:=select * from transport;. Active:=true;;TForm1. Button6Click (Sender: TObject);. Active:=false;. CommandText:=select * from zakazi;. Active:=true;;TForm1. Button7Click (Sender: TObject);.insert;;TForm1. Button8Click (Sender: TObject);.delete;;TForm1. Button9Click (Sender: TObject);. Post;;TForm1.N10Click (Sender: TObject);.show;;TForm1.N11Click (Sender: TObject);. Show;;TForm1.N12Click (Sender: TObject);. Show;;TForm1.N13Click (Sender: TObject);.show;;TForm1.N14Click (Sender: TObject);, Table: Variant;, j: Integer;:= CreateOleObject (Word. Application);. Documents. Add;. ActiveDocument. Tables. Add (WordApp. ActiveDocument. Range,.DBGrid1. DataSource. DataSet. RecordCount, Form1.DBGrid1. DataSource. DataSet. FieldCount);:= WordApp. ActiveDocument. Tables. Item(1);. Style:= Сетка таблицы;.DBGrid1. DataSource. DataSet. First;i:= 0 to Form1.DBGrid1. DataSource. DataSet. RecordCount-1 doj:= 0 to Form1.DBGrid1. DataSource. DataSet. FieldCount - 1 do. Cell (i+1, j+1).Rang