Проектирование и разработка БД «Компьютерные курсы»

Now.Month - 1;txYear.Text = DateTime.Now.Year.ToString(); }privatevoidTxYear_KeyPress(object sender, KeyPressEventArgs e) {if(!char.IsDigit(e.KeyChar) || !char.IsControl(e.KeyChar))e.Handled = true; }privatevoid ToolStripButton3_Click(object sender, EventArgs e) {curseSelTableAdapter.Fill(curseSelDataSet.curseSel, cbMonth.SelectedIndex + 1, int.Parse(txYear.Text)); }privatevoid ToolStripButton2_Click(object sender, EventArgs e) {if (grDate.CurrentRow == null) return;SqlConnectioncn = newSqlConnection(Properties.Settings.Default.teachersConnectionString);SqlCommandcmd = newSqlCommand() { Connection = cn,CommandType = CommandType.StoredProcedure,CommandText = "curseDel" };cmd.Parameters.AddWithValue("@id_gr", (int)grDate.CurrentRow.Cells["idgr"].Value);cmd.Parameters.AddWithValue("@id_gr", (int)grDate.CurrentRow.Cells["idpr"].Value);try {cn.Open();cmd.ExecuteNonQuery(); }catch (Exception ex) {MessageBox.Show(ex.Message);DialogResult = DialogResult.None; }finally {cn.Close(); } }privatevoid ToolStripButton1_Click(object sender, EventArgs e) {fKursAddfrm = newfKursAdd();frm.ShowDialog(this);if (frm.DialogResult == DialogResult.OK)curseSelTableAdapter.Fill(curseSelDataSet.curseSel, cbMonth.SelectedIndex + 1, int.Parse(txYear.Text));} }}KursAdd.csusing System;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Linq;usingSystem.Text;usingSystem.Threading.Tasks;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespace teachers{publicpartialclassfKursAdd : Form {publicfKursAdd() {InitializeComponent(); }privatevoidFKursAdd_Load(object sender, EventArgs e){// TODO: данная строка кода позволяет загрузить данные в таблицу "prepodsDataSet.prepods". При необходимости она может быть перемещена или удалена.this.prepodsTableAdapter.Fill(this.prepodsDataSet.prepods);// TODO: данная строка кода позволяет загрузить данные в таблицу "programsDataSet.programs". При необходимости она может быть перемещена или удалена.this.programsTableAdapter.Fill(this.programsDataSet.programs);// TODO: данная строка кода позволяет загрузить данные в таблицу "groupsDataSet.groups". При необходимости она может быть перемещена или удалена.this.groupsTableAdapter.Fill(this.groupsDataSet.groups);}privatevoid Button1_Click(object sender, EventArgs e) {SqlConnectioncn = newSqlConnection(Properties.Settings.Default.teachersConnectionString);SqlCommandcmd = newSqlCommand() { Connection = cn,CommandType = CommandType.StoredProcedure,CommandText = "curseIns" };cmd.Parameters.AddWithValue("@id_gr", cbGroup.SelectedValue);cmd.Parameters.AddWithValue("@id_pr", cbProg.SelectedValue);cmd.Parameters.AddWithValue("@tabNo", cbPrep.SelectedValue);cmd.Parameters.AddWithValue("@krВBegin", dtBegin.Value);cmd.Parameters.AddWithValue("@krВEnd", dtEnd.Value);try {cn.Open();cmd.ExecuteNonQuery(); }catch (Exception ex) {MessageBox.Show(ex.Message);DialogResult = DialogResult.None; }finally {cn.Close();} } }}Приложение Б. SQLскрипт базы данныхSET DATEFORMAT ymdSET ARITHABORT, ANSI_PADDING, ANSI_WARNINGS, CONCAT_NULL_YIELDS_NULL, QUOTED_IDENTIFIER, ANSI_NULLS, NOCOUNT ONSET NUMERIC_ROUNDABORT, IMPLICIT_TRANSACTIONS, XACT_ABORT OFFGOUSE teachersGOIF DB_NAME() <> N'teachers' SET NOEXEC ONGO---- Создатьтаблицу [dbo].[programs]--PRINT (N'Создатьтаблицу [dbo].[programs]')GOCREATE TABLE dbo.programs (id_pr int IDENTITY,prNamevarchar(50) NULL,prCost money NULL, CONSTRAINT PK_programs PRIMARY KEY CLUSTERED (id_pr))ON [PRIMARY]GO---- Создатьтаблицу [dbo].[prepods]--PRINT (N'Создатьтаблицу [dbo].[prepods]')GOCREATE TABLE dbo.prepods (tabNo int IDENTITY,prFiovarchar(50) NULL, CONSTRAINT PK_prepods PRIMARY KEY CLUSTERED (tabNo))ON [PRIMARY]GO---- Создатьтаблицу [dbo].[groups]--PRINT (N'Создатьтаблицу [dbo].[groups]')GOCREATE TABLE dbo.groups (id_gr int IDENTITY,grNamevarchar(50) NULL,grDate date NULL, CONSTRAINT PK_groups PRIMARY KEY CLUSTERED (id_gr))ON [PRIMARY]GO---- Создатьтаблицу [dbo].[client]--PRINT (N'Создатьтаблицу [dbo].[client]')GOCREATE TABLE dbo.client (id_kl int IDENTITY,klFiovarchar(50) NULL,klPasspvarchar(20) NULL,klPhonevarchar(20) NULL,klAdresvarchar(150) NULL, CONSTRAINT PK_client PRIMARY KEY CLUSTERED (id_kl))ON [PRIMARY]GO---- Создатьтаблицу [dbo].[sostav]--PRINT (N'Создатьтаблицу [dbo].[sostav]')GOCREATE TABLE dbo.sostav (id_kl int NOT NULL,id_gr int NOT NULL,stBall int NULL, CONSTRAINT PK_sostav PRIMARY KEY CLUSTERED (id_kl, id_gr))ON [PRIMARY]GO---- Создатьиндекс [IX_Relationship1] дляобъектатипатаблица [dbo].[sostav]--PRINT (N'Создатьиндекс [IX_Relationship1] дляобъектатипатаблица [dbo].[sostav]')GOCREATE INDEX IX_Relationship1 ON dbo.sostav (id_kl) ON [PRIMARY]GO---- Создатьиндекс [IX_Relationship2] дляобъектатипатаблица [dbo].[sostav]--PRINT (N'Создатьиндекс [IX_Relationship2] дляобъектатипатаблица [dbo].[sostav]')GOCREATE INDEX IX_Relationship2 ON dbo.sostav (id_gr) ON [PRIMARY]GOSET QUOTED_IDENTIFIER, ANSI_NULLS ONGO---- Создать процедуру [dbo].[sostavUpd]--GOPRINT (N'Создатьпроцедуру [dbo].[sostavUpd]')GOCREATE OR ALTER PROCEDURE dbo.sostavUpd @id_kl INT, @id_gr INT, @stBall INTAS UPDATE sostav SETstBall = @stBall WHERE id_kl = @id_kl AND id_gr = @id_gr;GO---- Создать процедуру [dbo].[sostavSel]--GOPRINT (N'Создатьпроцедуру [dbo].[sostavSel]')GOCREATE OR ALTER PROCEDURE dbo.sostavSel @id_gr INTAS SELECTsostav.id_kl,client.klFio,sostav.id_gr,groups.grName,groups.grDate,sostav.stBall FROM dbo.sostav INNER JOIN dbo.groups ON sostav.id_gr = groups.id_gr INNER JOIN dbo.client ON sostav.id_kl = client.id_kl WHERE groups.id_gr = @id_gr;GO---- Создать процедуру [dbo].[sostavIns]--GOPRINT (N'Создатьпроцедуру [dbo].[sostavIns]')GOCREATE OR ALTER PROCEDURE dbo.sostavIns @id_kl INT, @id_gr INTAS INSERT INTO sostav (id_kl, id_gr, stBall) VALUES (@id_kl, @id_gr, 0);GO---- Создать процедуру [dbo].[sostavDel]--GOPRINT (N'Создатьпроцедуру [dbo].[sostavDel]')GOCREATE OR ALTER PROCEDURE dbo.sostavDel @id_kl INT, @id_gr INTAS DELETE FROM sostav WHERE id_kl = @id_kl AND id_gr = @id_gr;GO---- Создать таблицу [dbo].[curse]--PRINT (N'Создатьтаблицу [dbo].[curse]')GOCREATE TABLE dbo.curse (id_gr int NOT NULL,id_pr int NOT NULL,tabNo int NOT NULL,krВBegin date NULL,krВEnd date NULL, CONSTRAINT PK_curse PRIMARY KEY CLUSTERED (id_gr, id_pr))ON [PRIMARY]GO---- Создатьиндекс [IX_Relationship3] дляобъектатипатаблица [dbo].[curse]--PRINT (N'Создатьиндекс [IX_Relationship3] дляобъектатипатаблица [dbo].[curse]')GOCREATE INDEX IX_Relationship3 ON dbo.curse (id_gr) ON [PRIMARY]GO---- Создатьиндекс [IX_Relationship4] дляобъектатипатаблица [dbo].[curse]--PRINT (N'Создатьиндекс [IX_Relationship4] дляобъектатипатаблица [dbo].[curse]')GOCREATE INDEX IX_Relationship4 ON dbo.curse (id_pr) ON [PRIMARY]GO---- Создатьиндекс [IX_Relationship5] дляобъектатипатаблица [dbo].[curse]--PRINT (N'Создатьиндекс [IX_Relationship5] дляобъектатипатаблица [dbo].[curse]')GOCREATE INDEX IX_Relationship5 ON dbo.curse (tabNo) ON [PRIMARY]GO---- Создатьпроцедуру [dbo].[curseSel]--GOPRINT (N'Создатьпроцедуру [dbo].[curseSel]')GOCREATE OR ALTER PROCEDURE dbo.curseSel @pMonth INT, @pYear INTAS SELECTcurse.id_gr,curse.id_pr,curse.tabNo,curse.krВBegin,curse.krВEnd,prepods.prFio,groups.grName,programs.prName,programs.prCost FROM dbo.curse INNER JOIN dbo.groups ON curse.id_gr = groups.id_gr INNER JOIN dbo.prepods ON curse.tabNo = prepods.tabNo INNER JOIN dbo.programs ON curse.id_pr = programs.id_pr WHERE DATEPART(YEAR, krВBegin) = @pYear AND DATEPART(MONTH, krВBegin) = @pMonth;GO---- Создать процедуру [dbo].[curseIns]--GOPRINT (N'Создатьпроцедуру [dbo].[curseIns]')GOCREATE OR ALTER PROCEDURE dbo.curseIns @id_gr INT, @id_pr INT, @tabNo INT, @krВBegin DATE, @krВEnd DATEAS INSERT INTO curse (id_gr, id_pr, tabNo, krВBegin, krВEnd) VALUES (@id_gr, @id_pr, @tabNo, @krВBegin, @krВEnd);GO---- Создать процедуру [dbo].[curseDel]--GOPRINT (N'Создатьпроцедуру [dbo].[curseDel]')GOCREATE OR ALTER PROCEDURE dbo.curseDel @id_gr INT, @id_pr INT AS DELETE FROM curse WHERE id_gr = @id_gr ANDid_pr = @id_prGOUSE teachersGOIF DB_NAME() <> N'teachers' SET NOEXEC ONGO---- Создать внешний ключ [Relationship1] для объекта типа таблица [dbo].[sostav]--PRINT (N'Создать внешний ключ [Relationship1] для объекта типа таблица [dbo].[sostav]')GOALTER TABLE dbo.sostav ADD CONSTRAINT Relationship1 FOREIGN KEY (id_kl) REFERENCES dbo.client (id_kl)GO---- Создать внешний ключ [Relationship2] для объекта типа таблица [dbo].[sostav]--PRINT (N'Создать внешний ключ [Relationship2] для объекта типа таблица [dbo].[sostav]')GOALTER TABLE dbo.sostav ADD CONSTRAINT Relationship2 FOREIGN KEY (id_gr) REFERENCES dbo.groups (id_gr)GO---- Создать внешний ключ [Relationship3] для объекта типа таблица [dbo].[curse]--PRINT (N'Создать внешний ключ [Relationship3] для объекта типа таблица [dbo].[curse]')GOALTER TABLE dbo.curse ADD CONSTRAINT Relationship3 FOREIGN KEY (id_gr) REFERENCES dbo.groups (id_gr)GO---- Создать внешний ключ [Relationship4] для объекта типа таблица [dbo].[curse]--PRINT (N'Создать внешний ключ [Relationship4] для объекта типа таблица [dbo].[curse]')GOALTER TABLE dbo.curse ADD CONSTRAINT Relationship4 FOREIGN KEY (id_pr) REFERENCES dbo.programs (id_pr)GO---- Создать внешний ключ [Relationship5] для объекта типа таблица [dbo].[curse]--PRINT (N'Создать внешний ключ [Relationship5] для объекта типа таблица [dbo].[curse]')GOALTER TABLE dbo.curse ADD CONSTRAINT Relationship5 FOREIGN KEY (tabNo) REFERENCES dbo.prepods (tabNo)GOSET NOEXEC OFFGO