Автоматизированная система управления медицинского страхования
Дипломная работа - Компьютеры, программирование
Другие дипломы по предмету Компьютеры, программирование
tus(@social)=0) insert into socialstatus (ssname,sscategory) values (@social,@sscategory) end";_mdf.ExecuteNonQuery();category="";//категория: работающий/не работающий(rdr_dbf.Read())
{
{((rdr_dbf["name"].ToString() == "В\\служащий") || (rdr_dbf["name"].ToString() == "Пенсионер (работающий)") || (rdr_dbf["name"].ToString() == "Работающий, служащий"))= "Работающее население";= "Неработающее население";
//вызов хранимой процедуры для добавления записи_mdf.CommandText = string.Format("exec social_status_insert {0},{1}", rdr_dbf["name"].ToString(),category);_mdf.ExecuteNonQuery();
}
{ }
}_dbf.Close();
}
//Извлекаем типы ЛПУextract_lpu_types()
orderbyname";_dbf=cmd_dbf.ExecuteReader();_mdf.CommandText="ifobject_id(select_lpu_type)isnotnulldropfunctionselect_lpu_type";_mdf.ExecuteNonQuery();_mdf.CommandText="createfunctionselect_lpu_type(@namevarchar(40))returnsintasbeginreturn(selectcount(ltname)fromlputypewhereltname=@name)end";_mdf.ExecuteNonQuery();_mdf.CommandText="ifobject_id(lpu_type_insert)isnotnulldropprocedurelpu_type_insert";_mdf.ExecuteNonQuery();_mdf.CommandText="createprocedurelpu_type_insert@typevarchar(40)asbeginif(dbo.select_lpu_type(@type)=0)insertintolputype(ltname)values(@type)end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())">{_dbf.CommandText = "select distinct name from sltlpu where name<> order by name";_dbf = cmd_dbf.ExecuteReader();_mdf.CommandText = "if object_id(select_lpu_type) is not null drop function select_lpu_type";_mdf.ExecuteNonQuery();_mdf.CommandText = "create function select_lpu_type(@name varchar(40)) returns int as begin return (select count(ltname) from lputype where ltname=@name) end";_mdf.ExecuteNonQuery();_mdf.CommandText = "if object_id(lpu_type_insert) is not null drop procedure lpu_type_insert";_mdf.ExecuteNonQuery();_mdf.CommandText = "create procedure lpu_type_insert @type varchar(40) as begin if(dbo.select_lpu_type(@type)=0) insert into lputype (ltname) values (@type) end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())
{
{
//вызов хранимой процедуры для добавления записи_mdf.CommandText = string.Format("exec lpu_type_insert {0}", rdr_dbf["name"].ToString());_mdf.ExecuteNonQuery();
}
{ }
}_dbf.Close();
}
//Извлекаем список признака движения полисаextract_policie_movement()
orderbyname";_dbf=cmd_dbf.ExecuteReader();_mdf.CommandText="ifobject_id(select_policie_movement)isnotnulldropfunctionselect_policie_movement";_mdf.ExecuteNonQuery();_mdf.CommandText="createfunctionselect_policie_movement(@namevarchar(40))returnsintasbeginreturn(selectcount(pmname)frompoliciesmovementwherepmname=@name)end";_mdf.ExecuteNonQuery();_mdf.CommandText="ifobject_id(policie_movement_insert)isnotnulldropprocedurepolicie_movement_insert";_mdf.ExecuteNonQuery();_mdf.CommandText="createprocedurepolicie_movement_insert@policievarchar(40)asbeginif(dbo.select_policie_movement(@policie)=0)insertintopoliciesmovement(pmname)values(@policie)end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())">{_dbf.CommandText = "select distinct name from slprp where name<> order by name";_dbf = cmd_dbf.ExecuteReader();_mdf.CommandText = "if object_id(select_policie_movement) is not null drop function select_policie_movement";_mdf.ExecuteNonQuery();_mdf.CommandText = "create function select_policie_movement(@name varchar(40)) returns int as begin return (select count(pmname) from policiesmovement where pmname=@name) end";_mdf.ExecuteNonQuery();_mdf.CommandText = "if object_id(policie_movement_insert) is not null drop procedure policie_movement_insert";_mdf.ExecuteNonQuery();_mdf.CommandText = "create procedure policie_movement_insert @policie varchar(40) as begin if(dbo.select_policie_movement(@policie)=0) insert into policiesmovement (pmname) values (@policie) end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())
{
{
//вызов хранимой процедуры для добавления записи_mdf.CommandText = string.Format("exec policie_movement_insert {0}", rdr_dbf["name"].ToString());_mdf.ExecuteNonQuery();
}
{ }
}_dbf.Close();
}
//Извлекаем список подчинённости ЛПУextract_lpu_subord()
orderbyname";_dbf=cmd_dbf.ExecuteReader();_mdf.CommandText="ifobject_id(select_lpu_subord)isnotnulldropfunctionselect_lpu_subord";_mdf.ExecuteNonQuery();_mdf.CommandText="createfunctionselect_lpu_subord(@namevarchar(40))returnsintasbeginreturn(selectcount(lsname)fromlpusubordwherelsname=@name)end";_mdf.ExecuteNonQuery();_mdf.CommandText="ifobject_id(lpu_subord_insert)isnotnulldropprocedurelpu_subord_insert";_mdf.ExecuteNonQuery();_mdf.CommandText="createprocedurelpu_subord_insert@subordvarchar(40)asbeginif(dbo.select_lpu_subord(@subord)=0)insertintolpusubord(lsname)values(@subord)end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())">{_dbf.CommandText = "select distinct name from slpod where name<> order by name";_dbf = cmd_dbf.ExecuteReader();_mdf.CommandText = "if object_id(select_lpu_subord) is not null drop function select_lpu_subord";_mdf.ExecuteNonQuery();_mdf.CommandText = "create function select_lpu_subord(@name varchar(40)) returns int as begin return (select count(lsname) from lpusubord where lsname=@name) end";_mdf.ExecuteNonQuery();_mdf.CommandText = "if object_id(lpu_subord_insert) is not null drop procedure lpu_subord_insert";_mdf.ExecuteNonQuery();_mdf.CommandText = "create procedure lpu_subord_insert @subord varchar(40) as begin if(dbo.select_lpu_subord(@subord)=0) insert into lpusubord (lsname) values (@subord) end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())
{
{
//вызов хранимой процедуры для добавления записи_mdf.CommandText = string.Format("exec lpu_subord_insert {0}", rdr_dbf["name"].ToString());_mdf.ExecuteNonQuery();
}
{ }
}_dbf.Close();
}
//Извлекаем список имёнextract_list_names()
andname order by im)";_dbf = cmd_dbf.ExecuteReader();
//Функция проверки наличия имени в базе данных_mdf.CommandText = "if object_id(select_name) is not null drop function select_name";_mdf.ExecuteNonQuery();_mdf.CommandText = "create function select_name(@name varchar(20)) returns int as begin return(select count(nname) from names where nname=@name) end";_mdf.ExecuteNonQuery();
//Процедура добавления имени_mdf.CommandText = "if object_id(names_insert) is not null drop procedure names_insert";_mdf.ExecuteNonQuery();_mdf.CommandText = "create procedure names_insert @name varchar(20) as begin if(dbo.select_name(@name)=0) insert into names (nname) values (@name) end";_mdf.ExecuteNonQuery();(rdr_dbf.Read())
{
{
//вызов хранимой процедуры для добавления записи_mdf.CommandText = string.Format("exec names_insert {0}", rdr_dbf["name"].ToString());_mdf.ExecuteNonQuery();
}
{ }
}_dbf.Close();
}
//Извлекаем список отчествextract_list_second_names()
andname order by ot)";_dbf = cmd_dbf.ExecuteReader();
//Функция проверки наличия отчества в базе данных_mdf.CommandText = "if object_id(select_second_name) is not null drop function select_second_name";_mdf.ExecuteNonQuery();_mdf.CommandText = "create function select_second_name(@sname varchar(20)) returns int as begin return(select count(snname) from secondnames where snname=@sname) end";_mdf.ExecuteNonQuery();