Реферат: Разработка системы по сбору информации
· выполнение стандартных параметрических запросов к базе данных с возможностью отображения найденной информации на экране, формирование печатных форм (справки, отчеты) по стандартным запросам;
· формирование выходных данных для налоговой инспекции, вышестоящей организации;
· занесение информации в базу данных с возможностью ее просмотра на экране;
· резервное копирование базы данных.
3.2. Требования к видам обеспечения
3.2.1. Требования к организационному обеспечению
Структура программно-информационного обеспечения в целом должна определяться взаимоотношениями между структурными подразделениями ОАО “Сургутгазпром”. Организационное обеспечение деятельности коллектива работников бухгалтерии, занимающихся налогами, должно быть реализовано в виде самостоятельных автоматизированных рабочих мест.
Запуск модулей в АРМе должен осуществляться через меню АРМа, пункты которого соответствуют конкретным функциональным задачам.
Доступ к информации должен определяться правами пользователей системы. Должна быть разработана система допуска, позволяющая ограничить права пользователей по группам:
· только просмотр информации;
· возможность редактировать базу данных;
· просмотр (редактирование части данных).
3.2.2. Требования к программному обеспечению
АРМ “Налогоплательщик” должен быть реализован на программно-технических средствах, совместимых с общей концепцией АСУ предприятия. Обязательным требованием к настоящему АРМу является корректная обработка им данных, содержащихся в базах данных программ, применяемых для расчета заработной платы в структурных подразделениях ОАО “СургутГазПром”.
Отчеты, формы ввода и процедуры обработки информации должны быть разработаны инструментальными средствами языка программирования Borland Delphi 4.0 с использованием СУБД InterBase v5.0.
Продукт должен быть разработан под операционную систему Microsoft Windows 95 или выше, сетевое программное обеспечение Microsoft.
Пример представления информации о доходах на магнитном носителе
ИдФайл:7707123456**980110150011
ТипИнф:ДОХОД
НаимОтпрЮЛ:ОАО Сургутгазпром
ТелОтпр:235-95-84
АдрОтпр:,646400,77,Мира УЛ,10,
ДолжнОтпр:БУХГАЛТЕР
ФИООтпр:МЕЛЬНИК АЛЕКСАНДР СЕРГЕЕВИЧ
КолДок:123
ВерсПрог:
ИдДок:7707123456**9700000001
ДатаДок:10.06.1999
ИННФЛ:770712345678
ФИО:ПУСЬ,ИРИНА,ВИКТОРОВНА
УдЛичн:01,Х1-ФР 178469
ДатаРожд:05.11.1955
АдрМЖ:,626400,36,,,,ОСТРОВСКОГО УЛ,1,,27
СтатусФЛ:1
МестоДох:1
ПериодДох:111000110001
ДоходМес:10000.00,10000.00,10000.00,0.00,0.00,0.00,15000.00,
5000.00,0.00,0.00,0.00,10000.00
ДоходВид:0200,50000.00,0,0.00;3100,10000.00,02,10000.00
Вычет:10,600.00;11,100.00;41,400.00
СкидСумм:10000.00
ВычСумм:1000.00
ВалСумм:60000.00
ОблСумм:49000.00
ОблСуммНалИс:5880.00
ОблСуммНалУд:5880.00
НадСумм:10000.00
НадОбл:9900.00
НадОблНалИс:1188.00
НадОблНалУд:1188.00
ВыгСумм:500.00
ВыгОбл:500.00
ВыгОблНалИс:75.00
ВыгОблНалУд:75.00
ВзыскГНИ:100.00
Приложение 3
SQL программа создающая базу данных системы
create table Org(
KeyOrg char(3) Not Null,
NameOrg char(254) Not Null,
Primary Key(KeyOrg));
create table Config (
CurrYear Integer,
CurrOrg Char(3),
ServerWay Char(254),
Tab_Start Char(5),
Tab_End Char(5),
God_Start Char(4),
Mes_Start Char(2),
God_End Char(4),
Curr_User Char(25),
Mes_End Char(2),
CONSTRAINT PO_KeyOrg7
FOREIGN KEY(CurrOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table Users(
User_ Char(25),
Pasword Char (25),
Type SmallInt)
create table RabPlaces (
KeyOrg Char(3) not Null,
NameRabPlace Char(254) Not Null,
Way Char(254) Not Null,
CONSTRAINT PO_KeyOrg6
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table FIO (
Tab Char(5),
Fio Char(100),
Zeh Char(2),
Ych Char(2),
Kat Char(2),
Oklad Float,
Sist_Opl Char(1),
Prin Date,
Yvol Date,
Skidka SmallInt,
Sovmest Char(1),
Inostr SmallInt,
Prof Char(2),
Deti SmallInt,
Ijd SmallInt,
Dolgn Char(2),
KeyOrg char(3));
create table Nach(
Tab Char(5) Not Null,
KeyOrg char(3) Not Null,
Kod char(3) Not Null,
Data_M Char(2),
Data_G Char(4) Not Null,
Symma Float,
Data_Ras_M Char(2),
Data_Ras_G Char(4) Not Null,
Data_R Char(4),
CONSTRAINT PO_KeyOrg8
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table Ud(
Tab Char(5) Not Null,
KeyOrg char(3) Not Null,
Kod char(3) Not Null,
Data_M Char(2),
Data_G Char(4) Not Null,
Symma Float,
Data_Ras_M Char(2),
Data_Ras_G Char(4) Not Null,
Data_R Char(4),
CONSTRAINT PO_KeyOrg9
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table Data (
KeyOrg char(3) Not Null,
Tab Char(5) Not Null,
Fami Char(25),
Nami Char(15),
Otch Char(15),
Dat_R Date,
Docum Char(2),
SerDoc Char(10),
NomDoc Char(6),
KVID Char(32),
Dvid Date,
Str Char(3),
PostInd Char(6),
Obl Char(4),
Raion Char(15),
Gorod Char(20),
Punct Char(25),
Ulica Char(25),
Dom Char(13),
Korp Char(10),
KV Char(10),
Tel Char(10),
Katp Char(4));
CREATE INDEX FAMILY ON DATA(FAMI);
CREATE INDEX tab_sum_n ON nach(tab, symma);
CREATE INDEX tab_sum_u ON ud(tab, symma);
CREATE INDEX zeh ON zeh(zeh);
CREATE INDEX ych ON ych(ych);
create table Zeh (
Zeh Char(2) not null,
KeyOrg char(3) Not Null,
Naim Char(25) not null,
CONSTRAINT PO_KeyOrg3
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table Ych (
Ych Char(2) not null,
KeyOrg char(3) Not Null,
Zeh Char(2) not null,
Naim Char(15) not null,
CONSTRAINT PO_KeyOrg4
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create trigger kaskad_ych for zeh
Active
After
Update
As
begin
if (old.zeh<>new.zeh) then
Update Ych
Set Zeh=new.Zeh
Where Zeh=Old.Zeh;
end
create table Kat (
Kat Char(2) not null,
Naim Char(15) not null,
Primary Key (Kat));
create table Sist_Opl (
Sist_Opl Char(1) not null,
Naim Char(30) not null,
Primary Key (Sist_Opl));
create table Prof (
Prof Char(2) not null,
Naim Char(20) not null,
Primary Key (Prof));
create table Dolgn (
Dolgn Char(2) not null,
Naim Char(20) not null,
Primary Key (Dolgn));
create table Strana (
Str Char(2) not null,
Strana Char(15) not null,
Primary Key (Str));
create table Oblast (
Obl Char(2) not null,
Oblast Char(30) not null,
Primary Key (Obl));
create table Kat_Plat (
KatP char(2) not null,
naim Char(35) not null,
Primary Key (KatP));
create table Docum (
Docum char(2) not null,
naim Char(75) not null,
Primary Key (Docum));
CREATE TABLE Minim(
Data date NOT NULL,
Minim Char(10) not null,
PRIMARY KEY(Data));
create table MLV (
Tab Char(5) Not Null,
KeyOrg char(3) Not Null,
Date_Nach Char(4),
For_Nal Float,
Sum_Nal Float,
Sum_Pens Float,
Skidka SmallInt,
Sum_RK_SN Float,
Nal_RC_SN Float,
Sum_Pens_RK_SN Float,
Lgot Float,
Lgot_RK_SN Float,
Mat_Pom Float,
Pr_Vkl Char(1),
Deti SmallInt,
Ijd SmallInt,
Zen_Pod Float,
Sum_Vig Float,
Nal_Vig Float,
CONSTRAINT PO_KeyOrg5
FOREIGN KEY(KeyOrg) REFERENCES Org(KeyOrg) ON UPDATE CASCADE);
create table SHK_SKID (
God Char(4) Not Null,
Summa_End Char(15) Not Null,
Koef SmallInt Not Null);
create table SHKALA (
God SmallInt Not Null,
Dox1 Char(15) Not Null,
Dox2 Char(15) Not Null,
Pr SmallInt Not Null,
Nal Char(15),
Use_3_Proz Char(1));
create table Type_Nach (
Kod Char(3) not Null,
Naim Char(254) Not Null,
Inp Char(1),
Primary KEY(Kod))
create table Type_Ud (
Kod Char(3) not Null,
Naim Char(254) Not Null,
Primary KEY(Kod))
create table imput_podoh(
kod char(3),
inp char(1))
declare external function sh_date_to_y cstring(4)
returns cstring(4)
entry_point "sh_date_to_y"
module_name "my_funct"
declare external function sh_date_to_m cstring(4)
returns cstring(2)
entry_point "sh_date_to_m"
module_name "my_funct"
create trigger corr_date for nach
Active
Before
Insert
As
begin
New.Data_M=sh_date_to_m(New.Data_G);
New.Data_G=sh_date_to_y(New.Data_G);
New.Data_Ras_M=sh_date_to_m(New.Data_Ras_G);
New.Data_Ras_G=sh_date_to_y(New.Data_Ras_G);
end
create trigger int_nach for Nach
Active
Before
Insert
As
begin
New.Gen=Gen_Id(Numb_Nach,1);
end
CREATE GENERATOR Numb_Nach;
SET GENERATOR Numb_Nach TO 1;
CREATE GENERATOR Numb_Ud;
SET GENERATOR Numb_Ud TO 1;
create view nach_01 (tab_, data_ras_m_, data_ras_g_, sum_)
as
select tab, data_ras_m, data_ras_g, sum(symma)as sum_n
from nach
group by tab, data_ras_m, data_ras_g
create view ud_01 (tab_, data_ras_m_, data_ras_g_, sum_)
as
select tab, data_ras_m, data_ras_g, sum(symma)as sum_u
from ud
group by tab, data_ras_m, data_ras_g
create view fio_01 (tab_, fio_, zeh_, ych_, prin_, yvol_)
as
select tab, fio, zeh, ych, prin, yvol
from fio
group by tab_, fio_, zeh_, ych_, prin_, yvol_
create view fio_02 (ych_, deal_tab_)
as
select ych, count(tab) as deal_tab
from fio
group by ych_
create view zeh_01 (zeh_, naim_)
as
select zeh, naim
from zeh
group by zeh, naim
create view ych_01 (ych_, zeh_, naim_)
as
select ych, zeh, naim
from ych
group by ych, zeh, naim
create view nach_04(data_, sum_, kat_)
as
select data_ras_m, sum(symma), fio.kat
from nach, fio
where nach.tab=fio.tab
group by data_ras_m, fio.kat
create view nach_03(data_, data__)
as
select data_ras_m_, count(data_ras_m_)
from nach_01
group by data_ras_m_
create view nach_05(data_ras_m_, sum_)
as
select data_ras_m, sum(symma/100000)
from nach
group by data_ras_m
