b. D hospital

--Creando la Base de Datos

use master
go
if exists(select name from sysdatabases where name='Hospital')
drop database Hospital
go
create database Hospital
go
use Hospital
go

--Creando la Tabla Médico

create table Medico
(
CodMed char(4) primary key,
Medico varchar(20),
Esp varchar(20),
Telf varchar(7),
Dir varchar(30),
Sueldo int
)
Go

--Ingresando Datos a la tabla Medico

insert into Medico values('M001','Bernardo Lopez','Cirujía','2859478','Av. Los Angeles',1000)
insert into Medico values('M002','Chavez Gonzales','Respiratorio','4587899','Av. Los Angeles',2000)
insert into Medico values('M003','Suarez Leandro','Circulatorio','2365478','Av. Los Angeles',1500)
insert into Medico values('M004','Contreras Galvez','Traumatología','2859478','Av. Los Angeles',1800)
insert into Medico values('M005','Vasquez Sanchez','Traumatología','2831744','Av. Los Angeles',1700)
insert into Medico values('M006','Flores Surita','Circulatorio','6833478','Av. Los Angeles',1800)
insert into Medico values('M007','Ramos Vilca ','Traumatología','7821756','Av. Los Angeles',1700)

go
select * from Medico
go
--Creando la Tabla Cama
create table Cama
(
Codcam char(4) primary key,
pabellon varchar(1)
)
Go

--Ingresando Datos a la tabla Cama
insert into Cama values('C001','A')
insert into Cama values('C002','B')
insert into Cama values('C003','C')
insert into Cama values('C004','A')
insert into Cama values('C005','D')
insert into Cama values('C006','C')
go
select * from cama
go

--Creando la Tabla Paciente
create table Paciente
(
CodPas char(4) primary key,
ApePas varchar(15),
NomPas varchar(15),
TelPas varchar(7),
DirPas varchar(20)
)
Go

--Ingresando datos a la Tabla Paciente
insert into Paciente values('P001','Perea','Julio','2323232','Jr. Las palomas')
insert into Paciente values('P002','Montes','Cesar','5689554','Jr. Los Laureles')
insert into Paciente values('P003','Jimenez','Miguel','2325698','Jr. Los