t (Sender: TObject) ;;; TfmMain.ComPortRxChar (Sender: TObject; Count: Integer) ;, SS: String ;: Integer; .ReadStr (Str, Count);:=Pos (FTermChar , Str); CurPos=0begin:=FTempStr + Str; begin:=FTempStr + Copy (Str, 1, CurPos - 1);:=ScStr + FTempStr;:=Copy (ScStr, 1,3); (SS ??= laquo ;] C1 ) /// Оплата за ЖКУbegin (1) ;; (SS ??= PD4 ) /// Оплата за ел.енергіюbegin (2) ;;:= raquo ;;:= ;;; TfmMain.ComPortAfterClose (Sender: TObject); buF8 lt; gt; nil then.Caption:= F8-Вкл. сканер raquo ;;; TfmMain.ComPortAfterOpen (Sender: TObject) ;. Caption:= F8-Викл. сканер raquo ;;; TfmMain.buExitClick (Sender: TObject) ;;; TfmMain.buAccessOKClick (Sender: TObject) ;: Word;:=0;:=cbUsers.Text;:=edPassword.Text; CurrentUser=Adminbegin//1: =0; (CurrentPassw=AdminPassw) and (CurrentPassw=AdminPassw) PasswOK:=2;//1begin//0i:=1 to MaxNumUser do begin //(1).Password:=StrToInt(AdminPassw);.TableNumber:= 2; .RowNumber:=i; .FieldNumber:=2; ECR.ReadTable=0 thenCurrentUser=ECR.ValueOfFieldString then begin//(2):=i;:=1 ;;;// 2;//(1) (CurrentUserNo lt; gt; 0) and (PasswOK=1) then begin //1.Password:=StrToInt(AdminPassw);.TableNumber:=2;.RowNumber:=CurrentUserNo;.FieldNumber:=1;ECR.ReadTable=0 then begin //2CurrentPassw=ECR.ValueOfFieldIntegerPasswOK:=2PasswOK:=0 ;;// 2;// 1; //0(PasswOK=2)begin.Text:=laquo;raquo;;.Text:=laquo;raquo;;.gsUser.Caption:=CurrentUser;;begin(laquo;Отказ в доступі! raquo ;, mtWarning, [mbOk], 0);:=CountAccess + 1;:= raquo ;;. Text:= raquo ;;. SetFocus; CountAccess gt; 3AppExit ;;.
ДОДАТКИ Б
Характеристики існуючих програмних продуктів.
) 1С Роздріб 2.0
Сайт: lt; # justify gt; 2) Сервіс + УКМ 4.0
Сайт: lt; # justify gt; ВІДГУК
Керівника дипломного проекту Ф, І. О. на проект студента П.І.Б. факультету автоматизації технологічних процесів Воронезького державного університету інженерних технологій.
На тему «Проектування автоматизованого робочого місця касира-операціоніста для ТОВ Розрахунково - касовий центр»
Склад проекту: 117 аркушів формату A4
а) графічна частина 12 формат А4
1. Тема, мета і завдання дипломного проектування (2 листа)
2. Схема архітектури інформаційної системи ТОВ «РКЦ» до і після автоматизації
. Діаграми прецедентів предметної області
. Процес прийому платежів з погляду платника комунальних платежів в BPMN (Business Process Modeling Notation) нотації
. Процес прийому платежів з погляду касира-операціоніста в BPMN нотації
. Схема обміну даними між АРМом касира та інформаційно-розрахунковою системою «ІНКОМУС Квартиронаймач»
. Функціональна структура АРМ «Касир»
. Екранні форми АРМ «Касир» (2 листа)
. Звіти та електронні реєстри
б) аналітична частина на 22 сторінках, містить такі розділи:
. Техніко-економічна характеристика предметної області
. Характеристика підприємства
. Характеристика підрозділу
. Обгрунтування необхідності використання обчислювальної техніки
. Постановка завдання
. Аналіз існуючих розробок і обгрунтування вибору
в) Проектна частина на 24 сторінках, містить такі розділи:
. Інформаційне забезпечення завдання
. Програмне забезпечення задачі
. Загальні положення
. Розробка екранних форм
. Структурна схема пакета
. Технологічне забезпечення завдання
. Організація забезпечення задачі
. Схема технологічного процесу збору, передачі, обробки та видачі інформації
. Характеристика проекту
Тема дипломної роботи ставиться до проблеми автоматизації збору платежів з населення за ЖКП та інші послуги.
Для вирішення поставленого завдання процес прийому платежів розглянутий як система масового обслуговування, побудований бізнес процес з використанням BPMN нотації для визначення «вузьких місць» предметної області.
У даній роботі дипломником проаналізовані: діяльність підприємства, предметна область, ринок існуючих розробок. Спроектована структура АРМ касира-операціоніста. Розроблено алгоритм функціонування АРМ касира-операціоніста та механізм обміну даними з існуючою інформаційною системою.
Розроблено програмне та інформаційне забезпечення компонент автоматизованого ро...
