Раздел 3. Расчет начислений на заработную плату (социальное страхование). Социальное страхование в РФ является обязательным каждый хозяйствующий субъект, любой организационно правовой формы собственности отчисляет денежные средства
Социальное страхование в РФ является обязательным каждый хозяйствующий субъект, любой организационно правовой формы собственности отчисляет денежные средства в фонд ЗП во вне бюджетные фонды отчисляют на:
1.Фонд социального страхования – 2,9 %
ФСС= ЗП общ*2,9%/100% (13)
ФСС=34578*2,9%/100%=1002,7 руб.
2. Пенсионный фонд России – 22 %
ПФР= ЗП общ*22%/100% (14)
ПФР= 34578*22%/100%=7607,16 руб.
3. Федеральный фонд обеспечения медицинского страхования – 5,1 %
ФФОМС= ЗП общ*5,1%/100% (15)
ФФОМС=34578*5,1%/100%=1763,5 руб.
ФСС+ПФР+ФФОМС=10373,36руб.
Раздел 4. Расчет расходов на содержание и эксплуатацию ПЭВМ
Расходы на содержание и эксплуатацию ПЭВМ рассчитываются по следующим статьям:
1)Основная ЗП работников, обеспечивающих функционирование ПВЭМ.
Для системных программистов: Нобсл=25, Кт=2,02 , Х=31067,4руб
ЗПосн.год.=((Х*Кт/Нобсл.)*(1+П/100))*12 (16)
ЗПосн.год=((X*Кт/Нобсл.)*(1+П/100))*12=(31067,4руб *2,02/25)*(1+40%/100%)*12мес=42172руб
2)Дополнительная ЗП обслуживающего персонала – 11,3% от основной заработной платы
ЗПдоп=42172*11,3%/100%=4765,4 руб.(за год)
Общая ЗП будет равна сумме основной и дополнительной:
ЗПобщая=ЗПосн+ЗПдоп (17)
ЗПобщ.год=42172+4765,4 =46937,4 руб.
3)Начисления на ЗП обслуживающего персонала (30%):
Нзп=ЗПгод.о.п*30% (18)
Нзп. год.= 46937,4 *0,3=14081,22руб.
4) Социальные отчисление с заработной платы вспомогательного персонала (30% от общей заработной платы)
Совп. год=(ЗПобщая год + Нзп год)*30%= 46937,4 *0,3=14081,22 руб.(19)
5)Амортизационные отчисления определяются в размере 25% от балансовой стоимости ПВЭМ (Кб)(исходные данные).
А=Кб*25 (20)
Балансовая стоимость ЭВМ равна 30000 руб. (в том числе: системный блок-22000 руб.; монитор-6000 руб.; комплектующие изделия-2000 руб.)
А= 30000*25%/100%=7500 руб. (моральный износ ЭВМ)
6)Затраты на электроэнергию:
Зс.эн(осв)=Фэф * Цэ * P (21)
Фэф - эффективный годовой фонд работы ПЭВМ в часах (исходные данные 2016 час)
Цэ - стоимость 1кВт/ч. (определяется самостоятельно исходя из рыночной стоимости)
P – мощность ПЭВМ с периферией в кВт/ч.
P= 0,7-1,2- в зависимости от периферии (определяется самостоятельно)
Зс.эн(осн)=2016час*3,65*1,0*0,8=5886,72 руб.
7) Расходы на профилактику составляют 2% от балансовой стоимости ПВЭМ с периферией.
Зпроф.=Кб*2% (22)
Зпроф=30000*0,02=600 руб.
8) Прочие производственные расходы берутся в размере 30% от основной ЗП работников, обеспечивающих функционирование ПВЭМ.
Ппр=42172*0,3=12651,6руб.
Зобщ.год=46937,4+12651,6+10373,3+5886,72+600+14081,22=90530,24 руб.
Сложив все компоненты, определяем годовые расходы на содержание и эксплуатацию 1-ой ПЭВМ.
Далее определяем себестоимость 1-го машино-часа работы ПВЭМ, которая определяется по формуле:
Смч .= (Зобщ/12мес*30дн*8час)*Т (23)
Смч=(90530,24 /12*30*8) 227,6 =7154,4руб.
Раздел 5. Расчет себестоимости программного продукта
Себестоимость продукции представляет собой стоимостную оценку используемых в процессе производства продукции природных ресурсов, сырья, материалов, топлива, энергии, основных фондов, трудовых ресурсов, а также затрат связанных с реализацией.
В себестоимость программного продукта входят следующие элементы:
1)Основная ЗП исполнителя работ по созданию программного продукта;
2)Дополнительная ЗП исполнителя работ по созданию программного продукта;
3)Начисления на ЗП:
4)Расходы на содержание и эксплуатацию ПВЭМ, относящихся к данному программному продукту;
5)Прочие расходы.
Первые 4 элемента уже известны, а прочие расходы составляют 10% от суммы первых 4-х элементов.
Структуру себестоимости программного продукта опишите в таблице № 5
Таблица 5
| № | Элементы себестоимости | Сумма (руб.) | % в общей сумме себестоимости |
| 1 | Основная ЗП исполнителя | 31067,4 | 52% |
| 2 | Доп. ЗП исполнителя | 3510,6 | 6% |
| 3 | Начисления на ЗП | 10373,36 | 17% |
| 4 | РС и ПЭВМ | 600 | 2% |
| 5 | Прочие расходы (1+2+3+4)*10% | 4555,1 | 23% |
| Итого: | 54661,56 | 100% |
Раздел 6. Расчет цены программного продукта
Цена – это денежное выражение стоимости продукции.
Цена складывается из нескольких компонентов:
Ц=С+П+НДС (24)
где
С – себестоимость программного продукта
П – прибыль, которую берем в размере 40% от себестоимости
НДС- налог на добавленную стоимость, который берется в размере 18% от суммы себестоимости и прибыли.
П=54661,56*40%/100%=21864,6 руб.
НДС=(54661,56+21864,6)*0,18=13774,7 руб.
Ц=54661,56+21864,6 +13774,7 =90300,86 руб.
Раздел 7. Расчет экономической эффективности
Эффективностьэто результативность т.е. получение результата с учетом затрат – более того с минимальными затратами трудовых, материальных, финансовых средств труда.
(более 15 %) (25)
∆ ПР = приблизительный рост прибыли за два года
∆ ПР= Пр отч.год - Пр прош.год
КВ – капитальные вложения = себестоимость программного продукта
Во втором году планируется увеличение прибыли с 40% до 65%, следовательно, планируемая прибыль за второй год составляет Ппр=54661,56*0,65=35530руб.
∆ П=35530-21864,6 =13665,4 руб.
Эа=13665,4 /54661,56=0,25=25%
Вывод: В экономической части ДП произведен расчет себестоимости и цены программного продукта «разработка базы банных строительной компании «Красногорскстрой» »
Расчеты отвечают современным требованиям ведения бухгалтерского учета и плановой политики предприятия.
Создание программного продукта считается эффективным.
Заключение
Тема дипломного проекта была выбрана в соответствии с заданием, выданном руководителем преддипломной практики.
В первой главе выполнены следующие задачи, а именно: конкретизирована постановка задачи, проведён обзор существующих решений и обоснован выбор языка программирования.
Во второй главе выполнены следующие задачи, а именно: разработана структурная схема, разработан интерфейс программного продукта, определены технические требования к оборудованию, на котором будет выполняться разработанная программа, проведён тест программного продукта, разработано оператора и руководство системного программиста.
В третьей главе выполнены следующие задачи, а именно:
Составленная смета затрат на программный продукт.
Подводя итоги выполненного задания, следует отметить, что в нём были достигнуты поставленная цель и задачи.
Список используемой литературы
1. ГОСТ 19.402 – 78. Описание программы.
2. ГОСТ 19.503 – 79. Руководство системного программиста. Требования к содержанию и оформлению.
3. ГОСТ 19.505 – 79. Руководство оператора. Требования к содержанию и оформлению.
4. ГОСТ 24.207 – 80. Требования к содержанию документов по программному обеспечению.
5. Род Стивенс. Delphi. Готвые алгоритмы г. Санткт Петербург: издательство «Питер», 2004г. – 384с.
6. Галисеев Г. В. Программирование в среде Delphi . Самоучитель;
7.Жуков А. В. Изучаем Delphi. г. Санкт-Петербург: издательство «Питер», 2001 г. - 352 с.;
8. Фаронов В. В. Delphi. Программирование на языке высокого уровня г. Санкт-Перетбург: издательство «Питер», 2007 г. - 640 с.;
9. Бобровский С.И. Delphi - Учебный курс. г. Санкт-Петербург: издательство «Питер», 2004 г. - 736 с.;
10. www.edelphi.ru/
11. www.delphi.int.ru/
12. www.delphiexpert.ru/
Приложение. Код программы
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, DB, StdCtrls, Grids, ComObj, DBGrids, ADODB, ExtCtrls, DBCtrls,
ComCtrls, jpeg;
type
TForm1 = class(TForm)
con1: TADOConnection;
qry1: TADOQuery;
mm1: TMainMenu;
btn1: TButton;
btn2: TButton;
btn3: TButton;
btn4: TButton;
ds: TDataSource;
File1: TMenuItem;
Exit1: TMenuItem;
N1: TMenuItem;
Print1: TMenuItem;
N2: TMenuItem;
Save1: TMenuItem;
dlgOpen1: TOpenDialog;
dlgSave1: TSaveDialog;
N3: TMenuItem;
dlgPnt1: TPrintDialog;
Button1: TButton;
MonthCalendar1: TMonthCalendar;
Timer1: TTimer;
Image1: TImage;
Label1: TLabel;
procedure btn1Click(Sender: TObject);
procedure btn2Click(Sender: TObject);
procedure btn3Click(Sender: TObject);
procedure btn4Click(Sender: TObject);
procedure Exit1Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure Button1Click(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure Save1Click(Sender: TObject);
procedure N4Click(Sender: TObject);
procedure Print1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit3, Unit2, Unit5, Unit6, Unit7, Unit8, Unit9;
{$R *.dfm}
procedure TForm1.btn1Click(Sender: TObject);
begin
form5.show;
qry1.Active:=false;
qry1.SQL.clear;
qry1.sql.Add('select * from jilie');
qry1.ExecSQL;
qry1.Active:=true;
end;
procedure TForm1.btn2Click(Sender: TObject);
begin
form6.show;
qry1.Active:=false;
qry1.SQL.clear;
qry1.sql.Add('select * from mun');
qry1.ExecSQL;
qry1.Active:=true;
end;
procedure TForm1.btn3Click(Sender: TObject);
begin
form7.show;
qry1.Active:=false;
qry1.SQL.clear;
qry1.sql.Add('select * from sluj');
qry1.ExecSQL;
qry1.Active:=true;
end;
procedure TForm1.btn4Click(Sender: TObject);
begin
form8.show;
qry1.Active:=false;
qry1.SQL.clear;
qry1.sql.Add('select * from soc');
qry1.ExecSQL;
qry1.Active:=true;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
XL: Variant;
AppLocation:string;
begin
try XL := CreateOLEObject('Excel.Application'); // Создание OLE объекта
except
ShowMessage('Cannot start MS Excel.');
end;
GetDir(0,AppLocation); // Возвращает текущий каталог диска
XL.WorkBooks.Open(AppLocation +'\Test.xls');
XL.visible := true;
end;
procedure TForm1.Exit1Click(Sender: TObject);
begin
case MessageBox(0,'Выйти из программы?','Выход из программы', MB_YESNO) of
IDYES:
begin
Form1.Close;
end;
IDNO:
end;
form2.Close;
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
form2.close;
end;
procedure TForm1.N3Click(Sender: TObject);
var
PathToDb:string;
begin
con1.Connected:=false;
If dlgOpen1.Execute then
PathToDb:=dlgOpen1.FileName
else ShowMessage('Ошибка');
begin
con1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +PathToDb+';Persist Security Info=False';
con1.LoginPrompt := False;
con1.Connected:=true;
end;
end;
procedure TForm1.N4Click(Sender: TObject);
var fn: string;
begin
if dlgsave1.Execute then
begin
fn := dlgsave1.FileName;
Case Form1.dlgsave1.FilterIndex of
1 : fn:=ChangeFileExt(fn,'.txt');
end;
end;
end;
procedure TForm1.Print1Click(Sender: TObject);
begin
dlgpnt1.execute;
end;
procedure TForm1.Save1Click(Sender: TObject);
begin
if not dlgsave1.Execute then exit;
if CopyFile(Pchar(dlgopen1.FileName),Pchar(dlgsave1.FileName+'.mdb'),true)
then ShowMessage('Фаил сохранен')
else ShowMessage('Ошибка сохранения');
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
label1.Caption:=timetostr(time);
end;
end.
Дата добавления: 2018-02-15; просмотров: 781; Мы поможем в написании вашей работы! |
Мы поможем в написании ваших работ!