Primer problema:
Una clínica almacena los turnos para los distintos médicos en una tabla llamada "consultas" y en
otra tabla "medicos" los datos de los médicos.
1- Elimine las tablas si existen:
if object_id('consultas') is not null
drop table consultas;
if object_id('medicos') is not null
drop table medicos;
2- Cree las tablas con las siguientes estructuras:
create table medicos (
documento char(8) not null,
nombre varchar(30),
constraint PK_medicos
primary key clustered (documento)
);
create table consultas(
fecha datetime,
medico char(8) not null,
paciente varchar(30),
constraint PK_consultas
primary key (fecha,medico),
constraint FK_consultas_medico
foreign key (medico)
references medicos(documento)
on update cascade
on delete cascade
);
3- Ingrese algunos registros:
insert into medicos values('22222222','Alfredo Acosta');
insert into medicos values('23333333','Pedro Perez');
insert into medicos values('24444444','Marcela Morales');
insert into consultas values('2007/03/26 8:00','22222222','Juan Juarez');
insert into consultas values('2007/03/26 8:00','23333333','Gaston Gomez');
insert into consultas values('2007/03/26 8:30','22222222','Nora Norte');
insert into consultas values('2007/03/28 9:00','22222222','Juan Juarez');
insert into consultas values('2007/03/29 8:00','24444444','Nora Norte');
insert into consultas values('2007/03/24 8:30','22222222','Hector Huerta');
insert into consultas values('2007/03/24 9:30','23333333','Hector Huerta');
4- Elimine la función "f_nombreDia" si existe:
if object_id('f_nombreDia') is not null
drop function f_nombreDia;
5- Cree la función "f_nombreDia" que recibe una fecha (tipo string) y nos retorne el nombre del día
en español.
6- Elimine la función "f_horario" si existe:
if object_id('f_horario') is not null
drop function f_horario;
7- Cree la función "f_horario" que recibe una fecha (tipo string) y nos retorne la hora y minutos.
8- Elimine la función "f_fecha" si existe:
if object_id('f_fecha') is not null
drop function f_fecha;
9- Cree la función "f_fecha" que recibe una fecha (tipo string) y nos retorne la fecha (sin hora ni
minutos)
10- Muestre todas las consultas del médico llamado 'Alfredo Acosta', incluyendo el día (emplee la
función "f_nombreDia", la fecha (emplee la función "f_fecha"), el horario (emplee la función
"f_horario") y el nombre del paciente.
11- Muestre todos los turnos para el día sábado, junto con la fecha, de todos los médicos.
12- Envíe a la función "f_nombreDia" una fecha y muestre el valor retornado:
declare @valor char(30)
set @valor='2007/04/09'
select dbo.f_nombreDia(@valor);
Ver solución
if object_id('consultas') is not null
drop table consultas;
if object_id('medicos') is not null
drop table medicos;
create table medicos (
documento char(8) not null,
nombre varchar(30),
constraint PK_medicos
primary key clustered (documento)
);
create table consultas(
fecha datetime,
medico char(8) not null,
paciente varchar(30),
constraint PK_consultas
primary key (fecha,medico),
constraint FK_consultas_medico
foreign key (medico)
references medicos(documento)
on update cascade
on delete cascade
);
insert into medicos values('22222222','Alfredo Acosta');
insert into medicos values('23333333','Pedro Perez');
insert into medicos values('24444444','Marcela Morales');
insert into consultas values('2007/03/26 8:00','22222222','Juan Juarez');
insert into consultas values('2007/03/26 8:00','23333333','Gaston Gomez');
insert into consultas values('2007/03/26 8:30','22222222','Nora Norte');
insert into consultas values('2007/03/28 9:00','22222222','Juan Juarez');
insert into consultas values('2007/03/29 8:00','24444444','Nora Norte');
insert into consultas values('2007/03/24 8:30','22222222','Hector Huerta');
insert into consultas values('2007/03/24 9:30','23333333','Hector Huerta');
if object_id('f_nombreDia') is not null
drop function f_nombreDia;
create function f_nombreDia
(@fecha varchar(30))
returns varchar(10)
as
begin
declare @nombre varchar(10)
set @nombre='Fecha inválida'
if (isdate(@fecha)=1)
begin
set @fecha=cast(@fecha as datetime)
set @nombre=
case datename(weekday,@fecha)
when 'Monday' then 'lunes'
when 'Tuesday' then 'martes'
when 'Wednesday' then 'miércoles'
when 'Thursday' then 'jueves'
when 'Friday' then 'viernes'
when 'Saturday' then 'sábado'
when 'Sunday' then 'domingo'
end--case
end--si es una fecha válida
return @nombre
end;
if object_id('f_horario') is not null
drop function f_horario;
create function f_horario
(@fecha varchar(30))
returns varchar(5)
as
begin
declare @nombre varchar(5)
set @nombre='Fecha inválida'
if (isdate(@fecha)=1)
begin
set @fecha=cast(@fecha as datetime)
set @nombre=rtrim(cast(datepart(hour,@fecha) as char(2)))+':'
set @nombre=@nombre+rtrim(cast(datepart(minute,@fecha) as char(2)))
end--si es una fecha válida
return @nombre
end;
if object_id('f_fecha') is not null
drop function f_fecha;
create function f_fecha
(@fecha varchar(30))
returns varchar(12)
as
begin
declare @nombre varchar(12)
set @nombre='Fecha inválida'
if (isdate(@fecha)=1)
begin
set @fecha=cast(@fecha as datetime)
set @nombre=rtrim(cast(datepart(day,@fecha) as char(2)))+'/'
set @nombre=@nombre+rtrim(cast(datepart(month,@fecha) as char(2)))+'/'
set @nombre=@nombre+rtrim(cast(datepart(year,@fecha) as char(4)))
end--si es una fecha válida
return @nombre
end;
select dbo.f_nombredia(fecha) as dia,
dbo.f_fecha(fecha) as fecha,
dbo.f_horario(fecha) as horario,
paciente
from consultas as c
join medicos as m
on m.documento=c.medico
where m.nombre='Alfredo Acosta';
select fecha, m.nombre
from consultas as c
join medicos as m
on m.documento=c.medico
where dbo.f_nombredia(fecha)='sábado';
declare @valor char(30)
set @valor='2007/04/09'
select dbo.f_nombreDia(@valor);
Segundo problema:
Una empresa almacena datos de sus empleados en una tabla denominada "empleados".
1- Elimine la tabla si existe y créela con la siguiente estructura:
if object_id('empleados') is not null
drop table empleados;
create table empleados(
documento char(8) not null,
nombre varchar(30),
fechanacimiento datetime,
fechaingreso datetime,
telefono char(12),
mail varchar(50)
);
2- Ingrese algunos registros:
insert into empleados values('22222222', 'Ana Acosta', '1970/10/02', '1995/10/10', '4556677', 'anitaacosta@hotmail.com');
insert into empleados values('25555555', 'Bernardo Bustos', '1973/01/15', '1999/02/15', '4789012', null);
insert into empleados values('30000000', 'Carlos Caseros', '1980/5/25', '2001/05/05', null, null);
insert into empleados values('32222222', 'Estela Esper', '1985/02/20', '2006/12/12', null, 'estelaesper@gmail.com');
3- Elimine la función "f_edad" si existe:
if object_id('f_edad') is not null
drop function f_edad;
4- Cree la función "f_edad" que reciba 2 fechas (de tipo datetime) y nos retorne un valor positivo
correspondiente a la diferencia entre ambas.
Recuerde que en las funciones definidas por el usuario no pueden incluir funciones no
determinísticas (como getdate), por ello, debemos enviar la fecha actual.
Note que la función retorna un valor positivo (tinyint), en ella se valida que la primera fecha a la
cual se le resta la segunda fecha sea mayor. Si quisiéramos calcular la cantidad de años entre dos
fechas podríamos emplear la función del sistema "datediff" que retorna un int, esta función (ya
vista) retorna un valor negativo si la primera fecha es menor a la segunda fecha enviada. Pero
nosotros queremos la edad de una persona, así que siempre enviaremos como primera fecha una
posterior a la segunda.
5- Muestre los nombres de los empleados y la edad (calculada con la función anteriormente creada)
6- Muestre el nombre de los empleados y la edad (calculada con la función "f_edad") que tenían al
ingresar a la empresa y los años de servicio.
7- Llame a la función "f_edad" enviándole la fecha actual y su fecha de nacimiento y muestre el
valor retornado.
8- Intente invocar la función sin enviarle valores.
Mensaje de error.
9- Llame a la función para que tome el valor por defecto del segundo argumento.
10- Elimine la función "f_valorNulo" si existe:
if object_id('f_valorNulo') is not null
drop function f_valorNulo;
11- Cree una función para reemplazar un valor "null" por el texto "No tiene".
12- Muestre todos los empleados, empleando la función "f_valorNulo" enviándole como argumento los
campos "mail" y "telefono".
Ver solución
if object_id('empleados') is not null
drop table empleados;
create table empleados(
documento char(8) not null,
nombre varchar(30),
fechanacimiento datetime,
fechaingreso datetime,
telefono char(12),
mail varchar(50)
);
insert into empleados values('22222222', 'Ana Acosta', '1970/10/02', '1995/10/10', '4556677', 'anitaacosta@hotmail.com');
insert into empleados values('25555555', 'Bernardo Bustos', '1973/01/15', '1999/02/15', '4789012', null);
insert into empleados values('30000000', 'Carlos Caseros', '1980/5/25', '2001/05/05', null, null);
insert into empleados values('32222222', 'Estela Esper', '1985/02/20', '2006/12/12', null, 'estelaesper@gmail.com');
if object_id('f_edad') is not null
drop function f_edad;
create function f_edad
(@fechaactual datetime,
@fecha datetime='2007/01/01'
)
returns tinyint
as
begin
declare @edad tinyint
set @edad=null
if (@fechaactual>=@fecha)
begin
set @edad=datepart(year,@fechaactual)-datepart(year,@fecha)
if (datepart(month,@fecha)>datepart(month,@fechaactual))
set @edad=@edad-1
else
if (datepart(month,@fecha)=datepart(month,@fechaactual)) and
(datepart(day,@fecha)>datepart(day,@fechaactual))
set @edad=@edad-1
end--es mayor la actual
return @edad
end;
select nombre, dbo.f_edad(getdate(),fechanacimiento) as edad
from empleados;
select nombre, dbo.f_edad(fechaingreso,fechanacimiento) as 'edad al ingresar',
dbo.f_edad(getdate(),fechaingreso) as 'años de servicio'
from empleados;
select dbo.f_edad(getdate(),'1971/05/25');
select dbo.f_edad();
select dbo.f_edad(getdate(),default);
if object_id('f_valorNulo') is not null
drop function f_valorNulo;
create function f_valorNulo
(@valor varchar(50))
returns varchar(50)
begin
if @valor is null
set @valor='No tiene'
return @valor
end;
select documento,nombre,fechanacimiento,
dbo.f_valorNulo(telefono) as telefono,
dbo.f_valorNulo(mail) as mail
from empleados;