лаба 7 / laba6_7

/*Создайте хранимую процедуру pr_КолебанияСпросаТоваров,
 которая решает рассмотренную выше (см. раздел I) задачу
  определения наименования товара, по которому был 
  наибольший или наименьший спрос за последние N дней.
  Эта процедура должна иметь два входных параметра 
  (@Интервал, @ТипРезультата) и два выходных параметра 
  (@Имя, @Итог). Если значение входного параметра @ТипРезультата
  равно 1, находится товар наибольшего спроса. 
  Если же значение параметра равно 2 – находится товар 
  наименьшего спроса.*/


  use СкладЛаба5
  go

  create procedure pr_КолебанияСпросаТоваров
	  @Интервал INT,
	  @ТипРезультата int,
	  @Имя varchar(50) output,
	  @Итог numeric (12,3) output
  as
  declare @Code INT /*создание переменной*/
	if @ТипРезультата = 1
		select @Code=КодТовара, @Итог=sum(Количество) /*присвоение значений нескольким переменным*/
		from Заказ
		where ДатаЗаказа between getdate()-@Интервал and getdate()
		group by КодТовара
		order by sum(Количество)
	else
		select @Code=КодТовара, @Итог=sum(Количество)
		from Заказ
		where ДатаЗаказа between getdate()-@Интервал and getdate()
		group by КодТовара
		order by sum(Количество) desc
	SELECT @Имя = Наименование
	FROM Товар 
	WHERE КодТовара = @Code
  go

  declare @Имя varchar(50), @Итог numeric (12,3)
  exec pr_КолебанияСпросаТоваров 60, 1, @Имя output, @Итог output /*запуск хранимых процедур*/ -- output это выходные параметры
  select @Имя as [Название], @Итог as [Итог]
  go

  declare @Name varchar(50), @Result numeric (12,3)
  exec pr_КолебанияСпросаТоваров 60, 2, @Name output, @Result output
  select @Name as [Название], @Result as [Итог]
  go

 

 /*Создайте хранимую процедуру pr_КлиентПоставщик_СтранаИнтервал, которая подсчитывает,
  сколько различных клиентов и различных поставщиков из указанной страны фигурирует 
  в таблице Заказ, причем анализируются только те заказы, в которых значение поля 
  Дата заказа попадает в указанный интервал дат. Эта процедура должна иметь 
  три входных параметра (@Страна, @НачалоИнтервала, @КонецИнтервала)
  и два выходных параметра (@ЧислоКлиентов, @ЧислоПоставщиков). 
  Если же значение параметра @Страна не будет указано (т.е. будет равно NULL),
  то подсчет клиентов и поставщиков должен вестись независимо от их национальной принадлежности.*/

    DROP PROCEDURE pr_КлиентПоставщик_СтранаИнтервал /*удаление хранимой процедуры*/
 GO


create procedure pr_КлиентПоставщик_СтранаИнтервал
	@Страна VARCHAR(20) null   ,
	@НачалоИнтервала DATE,
	@КонецИнтервала DATE,
	@ЧислоКлиентов int output,
	@ЧислоПоставщиков int output
as
	if @Страна is not null
	begin
		select @ЧислоКлиентов = count(DISTINCT(Заказ.КодКлиента)) /*используется для возврата только отдельных (разных) значений*/
		from Заказ inner join Клиент
			on Заказ.КодКлиента=Клиент.КодКлиента
			inner join Регион on Клиент.КодРегиона=Регион.КодРегиона
		where ДатаЗаказа between @НачалоИнтервала and @КонецИнтервала and Страна=@Страна
		select @ЧислоПоставщиков = count(DISTINCT(Заказ.КодПоставщика)) 
		from Заказ inner join Поставщик
			on Заказ.КодПоставщика=Поставщик.КодПоставщика
			inner join Регион on Поставщик.КодРегиона=Регион.КодРегиона
		where ДатаЗаказа between @НачалоИнтервала and @КонецИнтервала and Страна=@Страна
	end
	else 
		select @ЧислоКлиентов = count(DISTINCT(Заказ.КодКлиента)), @ЧислоПоставщиков = count(DISTINCT(Заказ.КодПоставщика)) --DISTINCT используется для указания на то, что следует работать только с уникальными значениями столбца
		from Заказ 
		where ДатаЗаказа between @НачалоИнтервала and @КонецИнтервала 
go

  declare @Client int, @Service int
  declare @Start DATE, @End DATE
  select @Start = '2017-01-01' 
  select @End='2021-04-04' 
  exec pr_КлиентПоставщик_СтранаИнтервал 'Беларусь', @Start, @End, @Client output, @Service output
  select @Client as [Количество клиентов], @Service as [Количество поставщиков]
  go


  declare @Client int, @Service int
  declare @Start datetime, @End datetime
  select @Start='2017-01-01'
  select @End='2021-04-03'
  exec pr_КлиентПоставщик_СтранаИнтервал null, @Start, @End, @Client output, @Service output
  select @Client as [Количество клиентов], @Service as [Количество поставщиков]
  go


  
  /*Создайте хранимую процедуру pr_Товар_СтранаВалютаИнтервал, которая подсчитывает,
  сколько различных товаров в конкретной валюте было заказано клиентами из указанной страны,
  причем анализируются только те заказы, в которых значение поля Дата заказа попадает 
  в заданный интервал дат. Эта процедура должна иметь четыре входных параметра
  (@Страна, @Валюта, @НачалоИнтервала, @КонецИнтервала)
  и один выходной параметр (@ЧислоТоваров). 
  При этом расширьте возможности процедуры следующим образом: 
-  если значение параметра @Страна не будет указано (т.е. будет равно NULL), 
то подсчет товаров должен вестись независимо от национальной принадлежности клиента;
-  если значение параметра @Валюта не будет указано (т.е. будет равно NULL), 
то подсчет товаров должен вестись применительно к национальной валюте (код валюты – BYR).
*/

alter procedure pr_Товар_СтdранаВалютаИнтервал
	@Страна VARCHAR(20) null,
	@Валюта CHAR(3) null,
	@НачалоИнтервала datetime,
	@КонецИнтервала datetime,
	@ЧислоТоваров int output
as
	if @Валюта is null set @Валюта='BYR'
	if @Страна is not null
		select distinct @ЧислоТоваров = count(Заказ.КодТовара)
		from Заказ 
			join Товар on Заказ.КодТовара=Товар.КодТовара
			join Клиент on Заказ.КодКлиента=Клиент.КодКлиента
			join Регион on Клиент.КодРегиона=Регион.КодРегиона
		where КодВалюты=@Валюта and ДатаЗаказа between @НачалоИнтервала and @КонецИнтервала
			and Страна=@Страна
	else
		select distinct @ЧислоТоваров = count(Заказ.КодТовара)
		from Заказ 
			join Товар on Заказ.КодТовара=Товар.КодТовара
			join Клиент on Заказ.КодКлиента=Клиент.КодКлиента
		where КодВалюты=@Валюта and ДатаЗаказа between @НачалоИнтервала and @КонецИнтервала
go


  declare @Country VARCHAR(20), @Currency char(3), @Start datetime, @End datetime, @Res int
  select @Start='2017-01-01', @End='2021-05-05', @Country = 'Россия', @Currency = 'USD'
  exec pr_Товар_СтdранаВалютаИнтервал @Country, @Currency, @Start, @End, @Res output
  select @Res as [Количество товаров]
  go

  declare @Start smalldatetime, @End smalldatetime, @Res int
  select @Start='2017-01-01', @End='2021-13-09'
  exec pr_Товар_СтdранаВалютаИнтервал null, null, @Start, @End, @Res output
  select @Res as [Количество товаров]
  go



  
/*Создайте пользовательскую функцию fn_getЧислоДней_вМесяце типа Scalar,
которая для конкретной даты возвращает число дней в месяце, который  определяется этой датой
(високосность года не учитывается). Эта функция должна иметь один входной параметр (@Дата).*/


create function fn_getЧислоДней_вМесяце
	(@Дата date)
returns int
begin
	declare @Res int
	set @Res=day(EOMONTH(@Дата))
	return @Res
end
go

declare @Date date

set @Date ='2016-02-12'
select  @Date AS [ВЫБРАННАЯ ДАТА] , dbo.fn_getЧислоДней_вМесяце(@Date) as [Количество дней]
go

/*Создайте пользовательскую функцию fn_getФИО_вФормате типа Scalar, которая на основе текстовой строки,
содержащей фамилию, имя и отчество, формирует текстовую строку в одном из следующих форматов:
1) исходная строка переводится в верхний регистр;
2) исходная строка переводится в нижний регистр;
3) на верхнем регистре должны быть только первые буквы слов;
4) выводится только фамилия, а имя и отчество заменяются их первыми буквами с точкой.
Эта функция должна иметь два входных параметра (@ФИО, @Формат).
Усложненный вариант. Расширьте возможности функции таким образом,
	чтобы была допустима исходная строка (задаваемая параметром @ФИО), содержащая не один,
	а несколько пробелов между фамилией и именем или между именем и отчеством,
	а также допускающая наличие лидирующих пробелов перед фамилией.
*/

create function fn_getФИО_вФормате 
	(@ФИО varchar(50), @Формат int)
returns varchar(50)
begin
	declare @Temp char, @Ind int, @Name varchar(50)
	set @ФИО=ltrim(@ФИО) /*обрезает пробелы, которые стоят в начале строки*/
	set @ФИО=rtrim(@ФИО) /*обрезает пробелы, которые стоят в конце строки*/
	if @Формат=1
		set @ФИО=upper(@ФИО) /* в верхний регистр*/
		else if @Формат=2
			set @ФИО=lower(@ФИО)
				else if @Формат=3
					begin
						set @ФИО = lower(@ФИО)
						set @Temp = left(@ФИО,1)
						set @ФИО = stuff(@ФИО, 1, 1, upper(@Temp))
						set @Ind = charindex(' ', @ФИО)
						set @Temp = substring(@ФИО, @Ind+1, 1)
						set @ФИО = stuff(@ФИО, @Ind+1, 1, upper(@Temp))
						set @Ind = charindex(' ', @ФИО, @Ind+1)
						set @Temp = substring(@ФИО, @Ind+1, 1) -- вырезает и возвращает заданное количество символов из строки
						set @ФИО = stuff(@ФИО, @Ind+1, 1, upper(@Temp))
					end
						else if @Формат=4
							begin
								set @ФИО = lower(@ФИО)
								set @Temp = left(@ФИО,1)
								set @ФИО = stuff(@ФИО, 1, 1, upper(@Temp))
								set @Ind = charindex(' ', @ФИО)
								set @Temp = substring(@ФИО, @Ind+1, 1)
								set @ФИО = stuff(@ФИО, @Ind+1, 1, upper(@Temp))
								set @Name = substring (@ФИО, 1, @Ind+1) + '. '
								set @Ind = charindex(' ', @ФИО, @Ind+1)
								set @Temp = upper(substring(@ФИО, @Ind+1, 1))
								set @Name = @Name + @Temp + '.'
								set @ФИО = @Name
							end
	return @ФИО
end
go


declare @str nvarchar(50)
set @str=' Рушева маргарИТА владисла  '
set @
select dbo.fn_getФИО_вФормате(@str, 4)


--Создайте пользовательскую функцию fn_getG	roup_НаименованиеВалюта типа Inline Table-valued, которая 
--возвращает таблицу со следующими столбцами: Наименование товара, Имя валюты, Заказанное кол-во, Стоимость
--в валюте, Стоимость в нац.валюте. Эта таблица должна отражать результат группировки данных по полям 
--Наименование и ИмяВалюты. Для каждой такой группы подсчитывается итоговое количество заказанного 
--товара и итоговая стоимость в валюте и в национальной валюте.
--Пользовательская функция fn_getGroup_НаименованиеВалюта должна иметь два входных параметра 
--(@НачалоИнтервала, @КонецИнтервала), поэтому при формировании результирующей таблицы необходимо 
--учитывать только те строки из таблицы Заказ, в которых значение поля Дата заказа попадает в 
--указанный параметрами интервал дат.


create function fn_getGroup_НаименованиеВалюта
	(@НачалоИнтервала date, @КонецИнтервала date)
returns table
as return
	SELECT Товар.Наименование AS [Наименование товара], Валюта.ИмяВалюты AS [Имя валюты], COUNT(Заказ.КодЗаказа) AS [Заказанное количество], SUM(Цена) AS [Стоимость в валюте], SUM(Цена*Валюта.КурсВалюты) AS [Стоимость в нац. валюте]
	FROM Заказ 
		INNER JOIN Товар ON Заказ.КодТовара = Товар.КодТовара
		INNER JOIN Валюта ON Товар.КодВалюты = Валюта.КодВалюты
	WHERE (ДатаЗаказа BETWEEN @НачалоИнтервала AND @КонецИнтервала)
	GROUP BY Товар.Наименование, Валюта.ИмяВалюты
GO

SELECT * FROM fn_getGroup_НаименованиеВалюта('2012-01-01', '2026-12-31')
GO



/*Создайте пользовательскую функцию fn_getTable_СтоимостьНВ типа Multi-statement Table-valued, которая возвращает таблицу со следующими столбцами:
Номер Дата заказа Имя клиента Наименование товара Количество Цена в НВ Стоимость в НВ

Эта таблица строится в три этапа. Сначала создается таблица со столбцами, показанными выше, где столбец 
Номер является автоинкрементным первичным ключом, столбцы Цена в НВ (цена в национальной валюте) и Стоимость в НВ 
(стоимость в национальной валюте) являются вычисляемыми. Число строк этой таблицы будет равно числу строк в таблице Заказ.
На втором этапе подсчитывается средняя стоимость в национальной валюте всех заказанных товаров. 
На третьем этапе из полученной таблицы удаляются все те строки, в которых значение столбца Стоимость в НВ будет меньше, 
чем подсчитанная на втором этапе средняя стоимость в национальной валюте. В результате будет получена таблица, 
которую и должна возвращать данная пользовательская функция. Эта функция не имеет ни одного входного параметра. */


create function fn_getTable_СтоимостьНВ
()
returns @СтоимостьНВ table(
	Номер INT  IDENTITY(1,1)  PRIMARY KEY,
	ДатаЗаказа DATETIME  DEFAULT getdate()  NULL,
	ИмяКлиента VARCHAR(40)  NOT NULL,
	НаименованиеТовара VARCHAR(50)  NOT NULL,
	Количество NUMERIC(12, 3)  NULL  CHECK (Количество > 0),
	ЦенаНВ MONEY  NULL  CHECK (ЦенаНВ > 0),
	СтоимостьНВ MONEY  NULL  CHECK (СтоимостьНВ > 0)
)
begin
	declare @temp table(
		Номер INT  IDENTITY(1,1)  PRIMARY KEY,
		ДатаЗаказа DATETIME  DEFAULT getdate()  NULL,
		ИмяКлиента VARCHAR(40)  NOT NULL,
		НаименованиеТовара VARCHAR(50)  NOT NULL,
		Количество NUMERIC(12, 3)  NULL  CHECK (Количество > 0),
		ЦенаНВ MONEY  NULL  CHECK (ЦенаНВ > 0),
		СтоимостьНВ MONEY  NULL  CHECK (СтоимостьНВ > 0)
	)
	insert @temp (ДатаЗаказа, ИмяКлиента, НаименованиеТовара, Количество, ЦенаНВ, СтоимостьНВ)
		select ДатаЗаказа, ИмяКлиента, Наименование, Количество, Цена*КурсВалюты, Цена*КурсВалюты*Количество
		from Заказ 
			inner join Клиент on Заказ.КодКлиента=Клиент.КодКлиента
			inner join Товар on Заказ.КодТовара=Товар.КодТовара
			inner join Валюта on Товар.КодВалюты=Валюта.КодВалюты
	
	declare @avg money
	select @avg=avg(СтоимостьНВ)
	from @temp

	delete from @temp
	where СтоимостьНВ<@avg

	insert @СтоимостьНВ 
		select ДатаЗаказа, ИмяКлиента, НаименованиеТовара, Количество, ЦенаНВ, СтоимостьНВ
		from @temp

	return
end
go

select *
from fn_getTable_СтоимостьНВ()




/*Процедура называется блоком PL / SQL, который выполняет одну или несколько задач. 
где функция называется блоком PL / SQL, который выполняет определенное действие. 
Процедура может возвращать или не возвращать значение, 
когда функция as должна возвращать одно значение*/

\



/*создаем процедуру в которой делаем (селект )запрос на выборку выводим
(код зак ,код товара, дата заказа, наимнование товара, цена товара)
для записей у которых дата заказа больше 1ого параметра цена товара процедуры , цена товара в промежутке межлу 2 и 3 параметрмо процедуры
либо наименование начинается с 4 параметра*/


/*создаем процедуру в которой делаем (селект )запрос на выборку выводим КОД ЗАКАЗА, ДАТА ЗАКАЗА, колво заказа, имя клиента  
для записей у которых дата заказа больше 1ого параметра цена товара процедуры , колво в промежутке межлу 2 и 3 параметрмо процедуры
и имя клиента начинается с 4 параметра*/

create PROCEDURE pr_йфыадание
@Парам1 DATETIME,
@Парам2 INT,
@Парам3 INT,
@Парам4 char(20)
AS
SELECT КодЗаказа, ДатаЗаказа, Количество, Товар.Наименование, Товар.Цена
FROM Заказ
INNER JOIN Товар
ON Заказ.КодЗаказа = Товар.КодТовара
WHERE (ДатаЗаказа > @Парам1) OR (Цена BETWEEN @Парам2 AND @Парам3) OR (Товар.Наименование like @Парам4 + '%')
GO

SET DATEFORMAT dmy
DECLARE @Парам1 DATETIME
SET @Парам1 = GETDATE()
EXEC pr_йфыадание @Парам1, 100 , 2000, 'и'
GO

DROP PROCEDURE pr_йфыадание
GO