116
В результате сравнения средств информационного моделирования для целей
проектирования было выбрано Case-средство PowerDesigner 16.0 фирмы Sybase. В
результате сравнения СУБД-кандидатов по обобщенному показателю с учетом
отсутствия требования заказчика к применению конкретной СУБД, для целей
проекта наиболее пригодной является система управления базой данных MS SQL
Server 2014. Для разработки был выбран язык программирования Object Pascal и
среда программирования Embarcadero Delphi XE8. Решение по техническому
обеспечению было сформулировано таким образом, чтобы не использовать
дополнительные технических средства, в связи с чем повышается экономическая
эффективность проекта. Для этапа конструирования была применена модель
быстрой разработки ПО - Rapid Application Development (RAD), а на этапе внедрения
- параллельная стратегия.
При решении поставленной задачи автоматизации разработка проекта
производилась собственными силами, без привлечения специалистов со стороны.
Поэтому сопровождение проекта и его эксплуатация в дальнейшем будут
осуществляться внутренними силами, то есть персоналом Управления
информационных технологий АССП.
Спроектированная систему была успешно реализована и внедрена в АССП во
время преддипломной практики.
В рамках проведения анализа экономической эффективности были получены
следующие результаты. Затраты на создание программного обеспечения составили
27819,0 рублей. Годовой экономический эффект от разработанного программного
продукта составил 716611,8 руб., при этом коэффициент экономической
эффективности – 25,7. Внедрение разработанной программы окупится за 14 дней.
Полученные результаты позволяют сделать вывод о том, что внедрение
разработанного программного обеспечения повысит скорость обработки обращений
граждан и организаций.
117
СПИСОК ЛИТЕРАТУРЫ
1. Аппаратное обеспечение вычислительных систем / Д.В. Денисов, В.А.
Артюхин, М. Ф. Седненков; под ред. Д.В. Денисова. – М.: Маркет ДС, 2010 – 184 с.
2. Арчибальд Р. Управление высокотехнологичными программами и
проектами / Рассел Д. Арчибальд. - 3-є изд., перераб. и доп. - М.: Компания АйТи ;
ДМК Пресс, 2010. -464 с.
3. Беленькая М.Н., Малиновский С.Т., Яковенко Н.В. Администрирование
в информационных системах. Научно-популярное издание. - М.: Горячая линия -
Телеком, 2011. - 300 с.
4. Бледнова Е.М. Правовое и информационное обеспечение
индивидуальных форм электронного общения государственных служащих с
гражданами и организациями: на примере работы с обращениями граждан //
Конституционное и муниципальное право. 2009. №23. С. 4-6.
5. Брауде, Э. Технологии разработки программного обеспечения. - СПб:
Питер, 2004. - 655 с.
6. Грекул В.И., Денищенко Г.Н., Коровкина Н.Л. Проектирование
информационных систем - М.: ИУИТ, 2012 - 300 с.
7. ГОСТ Р ИСО/МЭК 12207-2010. Информационная технология. Процессы
жизненного цикла программных средств. - Москва: Стандартинформ, 2011. - 100 с.
8. ГОСТ Р ИСО/МЭК 15288-2005. Информационная технология.
Системная инженерия. Процессы жизненного цикла систем. - Москва:
Стандартинформ, 2006. - 54 с.
9. Закон Республики Таджикистан от 19 марта 2013 года №955 «Об
обязательном пенсионном страховании»
10. Закон Республики Таджикистан от 23 июля 2016 года №1339 «Об
обращениях физических и юридических лиц». // Ахбори Маджлиси Оли Республики
Таджикистан, 2016 г., №7, ст. 617
11. Закон Республики Таджикистан «О страховых и государственных
пенсиях» // Ахбори Маджлиси Оли Республики Таджикистан, 2010 год, № 1, ст.19;
2011 год, № 3, ст. 175)
118
12. Закон Республики Таджикистан «Об информации» от 10 мая 2002 г. //
Ахбори Маджлиси Оли Республики Таджикистан. 2002. №4. Ч. 2. С. 166-176.
13. Закон Республики Таджикистан «О защите информации» от 2 декабря
2002 года // Ахбори Маджлиси Оли Республики Таджикистан. 2002, №11, ст. 696;
200, №12, ст.646.
14. Кузнецов, С.Д. Базы данных. Модели и языки – М.: Бином-Пресс, 2013.
- 720 с.
15. Кузнецов И.Н. Делопроизводство / И.Н. Кузнецов. М.: Издательский дом
«Дашков и К», 2011. 520 с.
16. Кутузов В.И. Особенности организации работы с обращениями граждан
в органы власти и управления / В.И. Кутузов, О.М. Масюто. Оренбург: ГОУ ОГУ,
2011.
17. Култыгин О.П. Администрирование баз данных. СУБД MS SQL Server.
- М: Московская финансово-промышленная академия, 2012 -232 с.
18. РД IDEF0-2000. Методология функционального моделирования IDEF0.
– Москва: Издательство стандартов, 2000. – 75 с.
19. Мавлияров А. А. Автоматизация обработки обращений граждан (на
примере администрации Альшеевского района) / А.А. Мавлияров,
Т.М. Шамсутдинова // NovaInfo, №49-2, 09.08.2016 [Электронный ресурс]:
http://novainfo.ru/article/7417
20. Назарова О.Б., Ткачук В.К., Новикова Е.Е. Моделирование бизнес-
процессов управления социальной защиты населения по учету обращений граждан
// Современные научные исследования и инновации. 2015. № 12 [Электронный
ресурс]. URL: http://web.snauka.ru/issues/2015/12/61692 (дата обращения:
20.11.2016).
21. Назарова, О.Б. Теория экономических информационных систем:
учебник: в 2 ч./ О.Б. Назарова. – Магнитогорск: Изд-во Магнитогорск.гос. ун-та,
2012. – 182 с.
22. Официальный сайт Агентства социального страхования и пенсий при
правительстве Республики Таджикистан [Электронный ресурс]: URL:
http://www.nafaka.tj (дата обращения: 20.01.2017).
119
23. Положение агентства социального страхования и пенсий при
правительстве Республики Таджикистан / Утверждено постановлением
Правительства Республики Таджикистан от 3 марта 2014 года, №151
24. Статистический ежегодник Республики Таджикистан - 2015 - Душанбе:
Агентство по статистике при Президенте Республики Таджикистан, 2015. - 339 с.
25. Социально-экономическое положение Республики Таджикистан: январь-
декабрь 2016 / Доклад. - Душанбе: Агентство по статистике при Президенте
Республики Таджикистан, 2017. - 141 с.
26. Устина Л.Н. Ведение делопроизводства по обращениям граждан / Л.Н.
Устина, Е.С. Плошкина // Делопроизводство. 2011. №3. С. 34-39.
27. Фионова Л.Р. Современная организация работы с обращениями граждан
на примере Пензенской области / Л.Р. Фионова // Делопроизводство. 2010. №10. С.
22-28.
28. Фисун А. П., Гращенко Л. А. и др. Теоретические и практические основы
человеко-компьютерного взаимодействия: базовые понятия человеко-
компьютерных систем в информатике и информационной безопасности / А. П.
Фисун. — Деп. в ВИНИТИ 15.10. 2004 г. № 1624 – В 2004. — Орел: Орловский
государственный университет, 2004. — 169 с. — (Рукопись).
29. Технология разработки программного обеспечения: конспект лекции /
сост. И.И. Савенко; Томский политехнический университет. –Томск: Изд-во
Томского политехнического университета, 2014. – 67с.
30. Торрес Р.Д. Практическое руководство по проектированию и разработке
пользовательского интерфейса.: Пер. с англ. – М.: Издательский дом «Вильямс»,
2002. – 400 с.
31. Якобсон А., Буч Г., Рамбо Дж. Унифицированный процесс разработки
программного обеспечения. СПб.: Питер, 2002. - 496 стр.
120
Приложение 1. Справочник причин обращений в Агентство социального
страхования и пенсий при Правительстве Республики Таджикистан
1
Сверка платежей
2
Ведомость РСВ
3
Отчет по Индивидуальным сведениям
4
Ведомость РСВ
5
Отчет по РСВ
6
Открытие, переоформление, закрытие предприятия
7
Выставление инкассо
8
Изготовление страхового свидетельства
9
Смена страхового свидетельства
10
Заявление на ДСВ
11
Запрос выписки ИЛС
12
Сверка льготного стажа
13
Проверка трудовой книжки
14
Сверка списков льготников
15
Прием на предварительную проверку
16
Прием на ДПО
17
Выдача сертификата МСК
18
Первичный прием документов на МСК
19
Прием заявлений на распоряжение МСК
20
Оформление документов на МСК
21
Заявление на первоначальное назначение Пенсии
22
Заявление на первоначальное назначение доплат и компенсаций
23
Выдача справок о размере выплачиваемой суммы
24
Заявление на перерасчет пенсий доплат
25
Пособие на погребение
26
Компенсация трудоспособному неработающему
27
Смена адреса
28
Смена способа выплаты
29
Первичный прием документов
30
Прочее
121
Приложение 2. Листинги программных кодов системы
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, StdCtrls, ExtCtrls,DateUtils,Unit3,Unit4,Unit5;
type
TMainForm = class(TForm)
StatusBar1: TStatusBar;
Panel1: TPanel;
DateLabel: TLabel;
TimeLabel: TLabel;
AddButton: TButton;
SelectionButton: TButton;
CloseButton: TButton;
AdminButton: TButton;
Timer1: TTimer;
procedure FormCreate(Sender: TObject);
procedure Timer1Timer(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure CloseButtonClick(Sender: TObject);
procedure AdminButtonClick(Sender: TObject);
procedure SelectionButtonClick(Sender: TObject);
procedure AddButtonClick(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure AddButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure SelectionButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure CloseButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure AdminButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
private
{ Private declarations }
public
{ Public declarations }
// переменные для соединения с БД, логина и роли пользователя
Alias : String;
Login: String;
122
ConnectionStr: String;
end;
var
MainForm: TMainForm;
implementation
{$R *.dfm}
procedure TMainForm.FormCreate(Sender: TObject);
begin
//включаем таймер чтобы каждую секунду менять дату и время
Timer1.Enabled:=True;
end;
procedure TMainForm.Timer1Timer(Sender: TObject);
begin
// меняем дату и время на форме
TimeLabel.Caption:='Время: ' + TimeToStr(Time);
DateLabel.Caption:='Дата: ' + DateToStr(Date);
end;
procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
// при закрытии формы выключаем таймер закрываем все приложение
Timer1.Enabled:=False;
Application.Terminate();
end;
procedure TMainForm.CloseButtonClick(Sender: TObject);
begin
// закрываем приложение
Application.Terminate();
end;
procedure TMainForm.AdminButtonClick(Sender: TObject);
begin
// показываем форму добавления
AdminForm.Show();
end;
procedure TMainForm.SelectionButtonClick(Sender: TObject);
begin
//передаем соединение к БД другой форме настраиваем форму
123
SelectionForm.ADOConnection1.ConnectionString:=ConnectionStr;
if((Alias='BOSS') or (Alias='ADMIN')) then
begin
// для босс и админ доступна выборка по всем журналам и пользователям
SelectionForm.ADOQuery2.SQL.Clear();
SelectionForm.ADOQuery2.SQL.Text:= 'Select dbo.USERS.Login from dbo.USERS';
SelectionForm.ADOQuery2.Active:=True;
while(not SelectionForm.ADOQuery2.Eof) do
begin
// добавляем всех пользователей из базы в комбобокс
SelectionForm.UserComboBox.Items.Add(SelectionForm.ADOQuery2.FieldByName('Login').A
sString);
SelectionForm.ADOQuery2.Next;
end;
SelectionForm.UserComboBox.Text:=SelectionForm.UserComboBox.Items[0];
SelectionForm.ADOConnection1.Open();
SelectionForm.ADOConnection1.Close();
SelectionForm.ADOQuery2.Active:=False;
end
else
begin
SelectionForm.UserComboBox.Enabled:=False;
SelectionForm.UserComboBox.Text:=Login;
end;
if((Alias='CLS') or (Alias='MSK')) then
begin
// для cls и msk доступна лишь база физ лиц
SelectionForm.GurComboBox.Items.Clear();
SelectionForm.GurComboBox.Items.Add('GUR_REG_ZL');
SelectionForm.GurComboBox.Enabled:=False;
end;
// ставим сегодняшнюю дату для периода выборки
SelectionForm.Show();
SelectionForm.EndDateTime.DateTime:= Date;
end;
procedure TMainForm.AddButtonClick(Sender: TObject);
var ii : integer;
begin
// настройка формы добавления в зависимости от роли пользователя
AddForm.Login:=Login;
AddForm.Alias:=Alias;
for ii:=0 to AddForm.PageControl1.PageCount-1 do
AddForm.PageControl1.Pages[ii].TabVisible:=False;
124
if(Alias='OPU') then
begin
// пользователь опу может вводить физических и юридич лиц
AddForm.PageControl1.Pages[0].TabVisible:=True;
AddForm.PageControl1.Pages[1].TabVisible:=True;
end;
if(Alias='OPP') then
begin
// тоже самое
AddForm.PageControl1.Pages[0].TabVisible:=True;
AddForm.PageControl1.Pages[1].TabVisible:=True;
end;
if(Alias='MSK') then
begin
// мск видит также 2 вкладки
AddForm.PageControl1.Pages[0].TabVisible:=True;
AddForm.PageControl1.Pages[1].TabVisible:=True;
end;
if(Alias='CLS') then
begin
// одна вкладка
AddForm.PageControl1.Pages[0].TabVisible:=True;
end;
// передаем строку подключения
AddForm.ADOConnection1.ConnectionString:=ConnectionStr;
MainForm.Hide();
AddForm.Show();
end;
procedure TMainForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
// если insert то вызываем событие нажатия кнопки addbutton
if(key=VK_INSERT) then
AddButton.Click;
end;
procedure TMainForm.AddButtonKeyDown(Sender: TObject; var Key: Word;
125
Shift: TShiftState);
begin
if(key=VK_INSERT) then
AddButton.Click;
end;
procedure TMainForm.SelectionButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(key=VK_INSERT) then
AddButton.Click;
end;
procedure TMainForm.CloseButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(key=VK_INSERT) then
AddButton.Click;
end;
procedure TMainForm.AdminButtonKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(key=VK_INSERT) then
AddButton.Click;
end;
end.
unit Unit4;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, StdCtrls, DBCtrls, ComCtrls, DB, ADODB,ComObj;
type
TSelectionForm = class(TForm)
SelectButton: TButton;
PrintButton: TButton;
DateTimeGroupBox: TGroupBox;
StartDateTime: TDateTimePicker;
EndDateTime: TDateTimePicker;
UserGroupBox: TGroupBox;