CURSO BÁSICO DE EXCEL
Aprende Excel en 60 minutos, este curso tiene 6 videos en los cuales tocamos los principales trabajos que se hacen en Excel, muchos cursos en academias e instituciones educativas enseñan estos cursos en meses, aquí tienes la oportunidad de aprender Excel en unas pocas horas y luego seguir la parte dos del curso.
Mi primer contacto con Excel
Formato de Celdas en Excel y Formulas BásicasHaciendo Formulas más Complejas y Tablas
La forma Controlada de Crear Gráficos
Crear y Administrar el Formato Condicional en Excel
Validación de Datos de Números y Listas
Funciones Importantes de Excel
Aclaraciones importantes
VER TODO EL CURSO BÁSICO DE EXCEL
Procedimientos Almacenados
Un procedimiento es un programa dentro de la base de datos que ejecuta una acción o conjunto de acciones específicas. Un procedimiento tiene un nombre, un conjunto de parámetros (opcional) y un bloque de código.
En Transact SQL los procedimientos almacenados pueden devolver valores (numérico entero, texto, fecha, etc.) o conjuntos de resultados. Los procedimientos almacenados al estar dentro de la base de datos pueden contener un conjunto complejo de instrucciones que al utilizarlos nos reducen la complejidad de las instrucciones.
- ■ Para crear un procedimiento almacenado debemos emplear la sentencia CREATE PROCEDURE.
- ■ Para ejecutar el procedimiento que ya esta creado se usa la orden EXECUTE
- ■ Para declarar una variable usamos la orden DECLARE
- ■ Para asignar valores a una variable usamos la orden SET
- ■ Para mostrar mensajes podemos usar PRINT y SELECT
- ■ En estos ejercicios mostraré el uso de las estructuras de control IF y WHILE
Aunque no usamos tablas ni registros, el objetivo de esta publicación es entender la creación de los procedimientos almacenados, la declaración de variables, asignación de valores y estructuras de control.
/*Crear siempre una base de datos en la cual trabajar*/
CREATE DATABASE bdProcedimientos
go
USE bdProcedimientos
go
/*Crear un procedimiento almacenado que muestre un saludo*/
CREATE PROCEDURE spSaludo
AS
BEGIN
PRINT 'Hola Mundo'
END
go
execute spSaludo
go
/*Crear un procedimiento almacenado que muestre un saludo variante 2*/
create procedure spSaludo2
as
begin
select 'Hola Mundo' as 'Mensaje'
end
go
execute spSaludo2
go
/*Crear un procedimiento almacenado para sumar dos números (usamos dos parametros)*/
CREATE PROCEDURE spSuma
@dato1 INT,
@dato2 INT
AS
BEGIN
DECLARE @suma INT
SET @suma = (@dato1 + @dato2)
PRINT 'La suma es: ' + CAST(@suma as VARCHAR(50))
END
go
execute spSuma 70, 11
go
/*Hacer un procedimiento que permita calcular el area de un trapecio*/
CREATE PROCEDURE spAreaTrapecio
@bMay DECIMAL(12,4),@bMen DECIMAL(12,4),@altura DECIMAL(12,4)
AS
BEGIN
DECLARE @area DECIMAL(12,4)
SET @area = (@bMay +@bMen)*@altura/2
SELECT @area 'El area es:'
END
go
EXECUTE spAreaTrapecio 5, 6, 7
go
CREATE PROCEDURE spAreaTrapecio
@bMay DECIMAL(12,4),@bMen DECIMAL(12,4),@altura DECIMAL(12,4)
AS
BEGIN
DECLARE @area DECIMAL(12,4)
SET @area = (@bMay +@bMen)*@altura/2
SELECT @area 'El area es:'
END
go
EXECUTE spAreaTrapecio 5, 6, 7
go
/*Hacer un procedimiento almacenado para dividir dos números*/
CREATE PROCEDURE spDivision
@dato1 decimal(12,4), @dato2 decimal(12,4)
AS
BEGIN
declare @resp decimal(12,4)
if(@dato2=0)
print 'ERROR en la División'
else
begin
set @resp = @dato1 / @dato2
print 'La Division es: '+cast(@resp as varchar)
end
END
go
execute spDivision 8,7
go
/*Crear un procedimiento que funcione como una calculadora de operaciones básicas*/
CREATE PROCEDURE spCalculadora
@dato1 DECIMAL(12,6),
@dato2 DECIMAL(12,6),
@operador CHAR(1)
AS
BEGIN
DECLARE @respuesta DECIMAL(12,6)
IF @operador = '+'
BEGIN
SET @respuesta = (@dato1 + @dato2)
PRINT 'La suma es: ' + CAST(@respuesta as VARCHAR(20))
END
IF @operador = '-'
BEGIN
SET @respuesta = (@dato1 - @dato2)
PRINT 'La resta es: ' + CAST(@respuesta as VARCHAR(20))
END
IF @operador = '*'
BEGIN
SET @respuesta = (@dato1 * @dato2)
PRINT 'La suma es: ' + CAST(@respuesta as VARCHAR(20))
END
IF @operador = '/'
BEGIN
SET @respuesta = (@dato1 / @dato2)
PRINT 'La división es: ' + CAST(@respuesta as VARCHAR(20))
END
END
go
EXEC spCalculadora 8,6,'+'
go
/*Usando Transact SQL imprimir el nombre mensaje "Hola Mundo" 10 veces*/
CREATE PROCEDURE spHolaMundo
AS
BEGIN
DECLARE @num INT
SET @num = 1 --Incializar el contador
WHILE @num<= 10
BEGIN
PRINT 'Hola Mundo'
SET @num = @num + 1 --Actualizar el contador en mas uno
END
END
go
EXECUTE spHolaMundo;
go
/* Mostrar una lista de numeros elevados al cuadrado hasta n: 1, 4, 9, 16, 25, 36, 49, 64, 81 ... */
CREATE PROCEDURE spCuadrados
@limite AS INT
AS
BEGIN
DECLARE @num INT, @resp INT
SET @num = 1 --Incializar el contador
WHILE @num<= @limite
BEGIN
SET @resp = @num * @num
PRINT 'El ' + CAST(@num AS VARCHAR) + ' al cuadrado es '+ CAST(@resp AS VARCHAR)
SET @num = @num + 1 --Actualizar el contador en mas uno
END
END
go
EXEC spCuadrados 7;
go
/* Hacer un procedimiento almacenado para mostrar la tabla de multiplicar de cualquier numero por ejemplo si necesitamos la tabla de multiplicar del 7, la respuesta será:
1x7=7
2x7=14
...
11x7=77
12x7=84 */
CREATE PROCEDURE spTablaMutiplicar
@dato AS INT
AS
BEGIN
DECLARE @num INT, @resp INT
SET @num = 1 --Incializar el contador
WHILE @num<= 12
BEGIN
SET @resp = @num * @dato
PRINT CAST(@num AS VARCHAR) + ' x '+ CAST(@dato AS VARCHAR) + ' = '+CAST(@resp AS VARCHAR)
SET @num = @num + 1 --Actualizar el contador en mas uno
END
END
go
EXEC spTablaMutiplicar 8;
go
/*Crear un procedimiento almacenado para mostrar los terminos de la serie fibonacci menores a m*/
CREATE PROCEDURE spFibonacci
@m int
as
Begin
declare @a int
declare @b int
declare @c int
set @a = 1
set @b = 1
while @a < @m
begin
print 'El valor: ' + cast(@a as varchar)
set @c = @a+@b
set @a = @b
set @b = @c
end
End
go
EXECUTE spFibonacci 100
CREATE PROCEDURE spFibonacci
@m int
as
Begin
declare @a int
declare @b int
declare @c int
set @a = 1
set @b = 1
while @a < @m
begin
print 'El valor: ' + cast(@a as varchar)
set @c = @a+@b
set @a = @b
set @b = @c
end
End
go
EXECUTE spFibonacci 100
go
Aplicación Agenda - Parte 2.
Ya hemos visto la forma de dar mantenimiento a una tabla, ahora haremos lo mismo con la tabla tPersona, la diferencia esta en que ahora usaremos un objeto el cual facilitará el trabajo y optimizará nuestro código.La clase consta de dos atributos, uno es la cadena de conexión y la otra es una variable de tipo texto para obtener los mensajes de validez o error del comando. La clase tiene dos métodos, uno llamado EjecutarComando para ejecutar ordenes que no sean consultas, es decir, ordenes insert, update, delete, etc.
el otro método se llama EjecutarConsulta que lo usaremos para cualquier orden que devuelva datos de tipo consulta, es decir, que da resultados con select.
public class CDatos
{
string cadenaDeConexion = @"Data Source=(local);Initial Catalog=bdAgenda;Integrated Security=True";
public string Mensaje;
public bool EjecutarComando(string textoSql)
{
try
{
//Para la cadena de conexión
string sCnn = cadenaDeConexion;
//Creamos la conexión
SqlConnection cnn = new SqlConnection(sCnn);
//Texto del comando insert
string iTexto = textoSql;
//Creamos el comando con su texto y conexión
SqlCommand cmd = new SqlCommand(iTexto, cnn);
cmd.CommandType = CommandType.Text;
//abrimos la conexión y ejecutamos el comando
cnn.Open();
//Ejecutamos el comando sql
cmd.ExecuteNonQuery();
//Cerramos la conexión
cnn.Close();
//Agregamos el Mensaje de Correcto
Mensaje = "0: Comando realizado con éxito...";
return true;
}
catch
{
Mensaje = "0: Error en Conexión con la base de datos o el comando de SqlServer";
return false;
}
}
public DataTable EjecutarConsulta(string textoSQL)
{
try
{
//Creamos la cadena de conexion
string sCnn = cadenaDeConexion;
//Creamo el comando de sql para listar
string sSel = textoSQL;
//Creamos el adaptador que capturara los datos
SqlDataAdapter da = new SqlDataAdapter(sSel, sCnn);
//Creamos un data table que contendra los datos
DataTable dt = new DataTable();
//Llenamos el data table con el adaptador
da.Fill(dt);
//Colocando Mensaje
Mensaje = "0: Consulta realizada con éxito...";
return dt;
}
catch
{
Mensaje = "0: Error en Conexión o Consulta de SqlServer...";
return null;
}
}
}
Requerimientos de la Aplicación
Diseño y Codificación de la Aplicación
Codificación de los Botones y el Formulario frmPersona
private void FrmPersona_Load(object sender, EventArgs e)
{
//Crear el objeto
CDatos oDa = new CDatos();
//Crear la tabla de datos
DataTable oTabla = new DataTable();
//Ejecutar el comando
oTabla = oDa.EjecutarConsulta("select * from ttipo");
//Asignar la tabla al combo
cboTipo.DataSource = oTabla;
//Indicar los elementos visibles
cboTipo.DisplayMember = oTabla.Columns[1].Caption.ToString();
//Indicar los valores usables del combo
cboTipo.ValueMember = oTabla.Columns[0].Caption.ToString();
}
private void btnInsertar_Click(object sender, EventArgs e)
{
try
{
//Crear el objeto
CDatos oDa = new CDatos();
//Creando el comando insert
string textoSQL = "insert into tPersona values('" + txtNombre.Text + "', '" + cboSexo.SelectedItem.ToString() + "', '" + txtDireccion.Text + "', '" + txtTelefono.Text + "','" + txtEmail.Text + "','" + txtObservacion.Text + "','" + cboTipo.SelectedValue.ToString() + "')";
//Ejecutando el comando
oDa.EjecutarComando(textoSQL);
//Mostrando mensaje
MessageBox.Show(oDa.Mensaje);
}
catch
{
MessageBox.Show("Los datos no estan completos...");
}
}
private void btnEliminar_Click(object sender, EventArgs e)
{
//Crear el objeto
CDatos oDa = new CDatos();
//Creando el comando delete
string textoSQL = "delete from tPersona where idPersona = " + txtIdPersona.Text + "";
//Ejecutando el comando
oDa.EjecutarComando(textoSQL);
//Mostrando mensaje
MessageBox.Show(oDa.Mensaje);
}
private void btnModificar_Click(object sender, EventArgs e)
{
try
{
//Crear el objeto
CDatos oDa = new CDatos();
//Creando el comando delete
string textoSQL = "update tPersona set nombreapellido = '" + txtNombre.Text + "', sexo='" + cboSexo.SelectedItem.ToString() + "', direccion='" + txtDireccion.Text + "',telefono='" + txtTelefono.Text + "',email='" + txtEmail.Text + "',observacion='" + txtObservacion.Text + "', fkTipo='" + cboTipo.SelectedValue.ToString() + "' where idPersona=" + txtIdPersona.Text + "";
//Ejecutando el comando
oDa.EjecutarComando(textoSQL);
//Mostrando mensaje
MessageBox.Show(oDa.Mensaje);
}
catch
{
MessageBox.Show("Los datos no estan completos...");
}
}
private void btnBuscar_Click(object sender, EventArgs e)
{
//Crear el objeto
CDatos oDa = new CDatos();
//Crear la tabla de datos
DataTable oTabla = new DataTable();
//La consulta en SQL
string textoSQL = "select * from tpersona where idpersona="+txtIdPersona.Text+"";
//Ejecutar la consulta
oTabla = oDa.EjecutarConsulta(textoSQL);
//Extraer datos del data table a los controles del formulario
if (oTabla != null && oTabla.Rows.Count > 0)
{
txtNombre.Text = oTabla.Rows[0][1].ToString();
cboSexo.SelectedItem = oTabla.Rows[0][2].ToString();
txtDireccion.Text = oTabla.Rows[0][3].ToString();
txtTelefono.Text = oTabla.Rows[0][4].ToString();
txtEmail.Text = oTabla.Rows[0][5].ToString();
txtObservacion.Text = oTabla.Rows[0][6].ToString();
cboTipo.SelectedValue = oTabla.Rows[0][7].ToString();
}
else
{
txtNombre.Text = "";
cboSexo.SelectedItem = "";
txtDireccion.Text = "";
txtTelefono.Text = "";
txtEmail.Text = "";
txtObservacion.Text = "";
cboTipo.SelectedValue = "";
MessageBox.Show("No existe este código...");
}
}
Aplicación Agenda - Parte 1.
Para realizar una aplicación que maneje una base de datos, se debe tener bien definida esta base de datos ya que cualquier alteración o modificación en esta traerá muchos inconvenientes y volver a codificar muchas partes del código.En este ejemplo vamos a usar una base de datos (bdAgenda) simple que tiene dos tablas, esta base de datos tiene las siguientes reglas del negocio, código y diagrama:
Reglas o Requerimientos de la Base de Datos
- ■ Se necesita guardar datos de las personas, estos datos son: nombre y apellido, sexo, dirección, teléfono, correo electrónico y observaciones.
- ■ Las personas deben estar clasificadas por tipo, por ejemplo: como amigos, familiares, compañeros, etc. de esta clasificación se necesita el nombre y un código que la caracterice.
Solución:
use master
go
drop database bdAgenda
go
create database bdAgenda
go
use bdAgenda
go
create table tTipo
(
idTipo char(4) primary key,
nombre varchar(80)
)
go
create table tPersona
(
idPersona int identity,
nombreapellido varchar(200),
sexo char(1),
direccion varchar(200),
telefono char(20),
email varchar(50),
observacion text,
fkTipo char(4) ,
foreign key (fkTipo) references tTipo(idTipo)
)
/*Insersión de datos*/
insert into tTipo values('FAM', 'Familiares')
insert into tTipo values('COMT', 'Compañeros de Trabajo')
insert into tTipo values('AMIG', 'Amigos')
insert into tTipo values('AMIX', 'Amigos de Siempre')
insert into tTipo values('COME', 'Compañeros de Estudio')
go
insert into tPersona values('Juan Perez', 'M', 'Av. La Rioja 6545', '97564654','jp@gmail.com','Ninguna','COME')
insert into tPersona values('Maria Rojas', 'F', 'Av. La Republica 4954', '878787878','mr@gmail.com','Ninguna','FAM')
insert into tPersona values('Jesus Lopez', 'M', 'Av. Belen 654', '6666666','jl@gmail.com','Ninguna','AMIX')
insert into tPersona values('Jose Guzman', 'M', 'Av. Estudiante', '123456789','jg@gmail.com','Ninguna','COME')
go
Reglas o Requerimientos de la Aplicación
La aplicación tiene una clasificación de personas, la cual hemos llamado Tipo, es decir, tipo de persona de nuestra agenda, esta tiene las siguientes reglas.
- ■ Se debe tener controles para ingresar los datos, estos datos son los necesarios para agregar datos a la base de datos, específicamente a la tabla tTipo que tiene los campos IdTipo y Nombre.
- ■ El formulario debe permitir eliminar un registro de la base de datos, mediante el IdTipo.
- ■ Se debe poder modificar los nombres de los tipos, teniendo como referencia siempre el IdTipo.
- ■ También se deberá tener un botón que permita listar todos los registro de la tabla tTipo.
Diseño e Implementación de los Requerimientos
Para estos requerimientos de esta parte de la aplicación, diseñamos el siguiente formulario:
El código de los botones será el siguiente:
private void btnInsertar_Click(object sender, EventArgs e)
{
/*Crear una cadena de conexion para sql*/
string conexion = @"Data Source=(local);Initial Catalog=bdAgenda;Integrated Security=True";
/*Creando el objeto para ejecutar script de sql*/
SqlCommand comando = new SqlCommand();
/*Crear un objeto para la conexion*/
SqlConnection cone = new SqlConnection(conexion);
/*Colocando el script sql al comando*/
comando.CommandText = "insert into tTipo values('"+txtIdTipo.Text+"', '"+txtNombre.Text+"')";
/*Colocando la conexion al comando*/
comando.Connection = cone;
/*Abrir conexion*/
cone.Open();
/*Ejecutando el comando*/
comando.ExecuteNonQuery();
/*Cerrar la conexion*/
cone.Close();
/*Limpiando los datos del DataGridView*/
dgvDatos.DataSource = null;
}
private void btnEliminar_Click(object sender, EventArgs e)
{
/*Crear una cadena de conexion para sql*/
string conexion = @"Data Source=(local);Initial Catalog=bdAgenda;Integrated Security=True";
/*Creando el objeto para ejecutar script de sql*/
SqlCommand comando = new SqlCommand();
/*Crear un objeto para la conexion*/
SqlConnection cone = new SqlConnection(conexion);
/*Colocando el script sql al comando*/
comando.CommandText = "delete from tTipo where idTipo = '"+txtIdTipo.Text+"'";
/*Colocando la conexion al comando*/
comando.Connection = cone;
/*Abrir conexion*/
cone.Open();
/*Ejecutando el comando*/
comando.ExecuteNonQuery();
/*Cerrar la conexion*/
cone.Close();
/*Limpiando los datos del DataGridView*/
dgvDatos.DataSource = null;
}
private void btnModificar_Click(object sender, EventArgs e)
{
/*Crear una cadena de conexion para sql*/
string conexion = @"Data Source=(local);Initial Catalog=bdAgenda;Integrated Security=True";
/*Creando el objeto para ejecutar script de sql*/
SqlCommand comando = new SqlCommand();
/*Crear un objeto para la conexion*/
SqlConnection cone = new SqlConnection(conexion);
/*Colocando el script sql al comando*/
comando.CommandText = "update tTipo set nombre = '"+txtNombre.Text+"' where idTipo='"+txtIdTipo.Text+"'";
/*Colocando la conexion al comando*/
comando.Connection = cone;
/*Abrir conexion*/
cone.Open();
/*Ejecutando el comando*/
comando.ExecuteNonQuery();
/*Cerrar la conexion*/
cone.Close();
/*Limpiando los datos del DataGridView*/
dgvDatos.DataSource = null;
}
private void btnListar_Click(object sender, EventArgs e)
{
/*Crear una cadena de conexion para sql*/
string conexion = @"Data Source=(local);Initial Catalog=bdAgenda;Integrated Security=True";
/*Crear un objeto tipo tabla de datos*/
DataTable tabla = new DataTable();
/*Creando el adaptador con la conexion y el comando*/
SqlDataAdapter oAdaptador = new SqlDataAdapter("select * from tTipo", conexion);
/*Llenando la tabla con datos de la consulta mediante el adaptador*/
oAdaptador.Fill(tabla);
/*Asignando el contenido del DataGridView con la tabla*/
dgvDatos.DataSource = tabla;
}
Nota Importante.
Ahora puedes ver como se puede ejecutar ordenes de SQL desde el CSharp, pero este código es muy poco práctico a la hora de hacer aplicaciones grandes, en la siguiente entrada veremos como unificamos este código para poder manejar objetos y así simplificar y mejorar nuestra aplicación.
Programación Cliente Servidor
La arquitectura cliente-servidor es un modelo de aplicación distribuida en el que las tareas se reparten entre los proveedores de recursos o servicios, llamados servidores, y los demandantes, llamados clientes. Un cliente realiza peticiones a otro programa, el servidor, quien le da respuesta. Esta idea también se puede aplicar a programas que se ejecutan sobre una sola computadora, aunque es más ventajosa en un sistema operativo multiusuario distribuido a través de una red de computadoras.
La red cliente-servidor es una red de comunicaciones en la cual los clientes están conectados a un servidor, en el que se centralizan los diversos recursos y aplicaciones con que se cuenta; y que los pone a disposición de los clientes cada vez que estos son solicitados.
En este documento vamos ha realizar una aplicación en CSharp con base de datos en SqlServer, para ello debemos tener en cuenta que la base de datos es la que va en el servidor y la aplicación de CSharp va en los clientes, los cuales gestionarán los datos y operaciones en la base de datos. Como puedes observar en la figura, se muestra que la base de datos esta alojada en el servidos y son los clientes los que piden información al servidor y este da acceso a la base de datos para realizar las transacciones.
BASE DE DATOS HOSPITAL
La siguientes es la base de datos de un hospital, el subsistema de hospitalizan que sigue las siguientes reglas:- El hospital tiene varias plantas, cada una de las cuales tiene un nombre y una cantidad de camas.
- Las camas que están en los niveles tienen un código que las identifican.
- Los pacientes cuentan con un número de seguro, dni y nombre, cada vez que el paciente llega al hospital se anota en su historia una fecha de entrada y una de salida.
- A su vez cuando llega al hospital y es internado se le asigna una cama.
- Existen médicos que atienden a los pacientes, estas atenciones las denominan visitas medicas.
Diseño de la base de datos:
set dateformat dmy;
go
use master
go
drop database bdHospital;
go
create database bdHospital;
go
use bdHospital;
go
alter authorization on database::bdHospital to sa;
go
create table tPlanta
(
idPlanta char(3) primary key,
nombre varchar(50),
numeroCamas int
);
go
create table tPaciente
(
idNumeroSeguro int identity primary key,
dni varchar(12),
nombre varchar(max) not null,
apellido varchar(max) not null,
fechaNacimiento datetime
);
go
create table tMedico
(
idMedico int identity primary key,
nombre varchar(max) not null,
apellido varchar(max) not null
);
go
create table tCama
(
idCama int primary key,
fkPlanta char(3),
foreign key (fkPlanta) references tPlanta(idPlanta)
);
go
create table tHistoria
(
idHistoria int identity primary key,
FechaEntrada datetime,
FechaAlta datetime,
FkNumeroSeguro int,
foreign key (fkNumeroSeguro) references tPaciente(idNumeroSeguro)
);
go
create table tPacienteCama
(
idPacienteCama int identity primary key,
fechaAsignacion datetime,
fechaSalida datetime,
fkCama int,
fkHistoria int,
foreign key (fkCama) references tCama(idCama),
foreign key (fkHistoria) references tHistoria(idHistoria)
);
go
create table tVisitaMedica
(
FechaHoraVisita datetime,
DiagnosticoEnfermedad text,
fkMedico int,
fkPacienteCama int,
foreign key (fkMedico) references tMedico(idMedico),
foreign key (fkPacienteCama) references tPacienteCama(idPacienteCama)
);
go
insert into tMedico(nombre,apellido) values('Juan','Perez');
insert into tMedico(nombre,apellido) values('Maria','Lopez');
insert into tMedico(nombre,apellido) values('Cristina','Rodriguez');
insert into tMedico(nombre,apellido) values('Jesica','Tapia');
go
insert into tPlanta values('A','Piso 1','20');
insert into tPlanta values('B','Piso 2','15');
insert into tPlanta values('C','Piso 3','19');
insert into tPlanta values('D','Piso 4','5');
go
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('1646798','Julian','Guzman','01/11/01');
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('4534534','Jesus','Vaca','03/10/02');
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('5456345','Marta','Tito','05/09/03');
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('7686786','Richard','Merca','07/08/04');
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('1233434','Saul','Huaman','09/07/05');
insert into tPaciente(dni,nombre,apellido,fechaNacimiento)
values('9878977','Gerardo','Soto','11/06/06');
go
insert into tCama values(101,'A');
insert into tCama values(102,'A');
insert into tCama values(103,'A');
insert into tCama values(104,'A');
insert into tCama values(201,'B');
insert into tCama values(202,'B');
insert into tCama values(203,'B');
insert into tCama values(204,'B');
insert into tCama values(205,'B');
insert into tCama values(206,'B');
insert into tCama values(301,'C');
insert into tCama values(302,'C');
insert into tCama values(303,'C');
insert into tCama values(304,'C');
go
insert into tHistoria(FechaEntrada, FechaAlta,FkNumeroSeguro)
values('11/02/02','02/02/02',2);
insert into tHistoria(FechaEntrada, FechaAlta,FkNumeroSeguro)
values('09/03/03','03/03/03',3);
insert into tHistoria(FechaEntrada, FechaAlta,FkNumeroSeguro)
values('07/04/03','03/03/03',4);
insert into tHistoria(FechaEntrada, FechaAlta,FkNumeroSeguro)
values('05/06/04','04/04/04',5);
insert into tHistoria(FechaEntrada, FechaAlta,FkNumeroSeguro)
values('09/07/05','05/05/05',6);
go
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('10/01/2014','12/01/2014',101,1);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('15/02/2014','16/02/2014',201,2);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('18/03/2014','18/03/2014',302,3);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('21/04/2014','25/04/2014',102,4);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('19/05/2014','19/05/2014',201,5);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('30/06/2014','30/06/2014',302,1);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('12/07/2014','19/07/2014',103,3);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('15/08/2014','19/08/2014',203,4);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('23/09/2014','30/09/2014',303,5);
insert into tPacienteCama(fechaAsignacion,fechaSalida,fkCama,fkHistoria)
values('29/10/2014','30/10/2014',104,1);
go
insert into tVisitaMedica
values('11/11/2014','Bajo de peso',1,1);
insert into tVisitaMedica
values('13/11/2014','No tiene Mejoras',1,9);
insert into tVisitaMedica
values('15/11/2014','Fiebre alta',2,8);
insert into tVisitaMedica
values('17/11/2014','Perdida de consiencia por momentos',2,7);
insert into tVisitaMedica
values('19/11/2014','Dolor en articulaciones',3,6);
insert into tVisitaMedica
values('21/11/2014','Sangrado por nariz',3,5);
insert into tVisitaMedica
values('23/11/2014','No tiene Mejoras',4,4);
insert into tVisitaMedica
values('25/11/2014','No tiene Mejoras',4,3);
insert into tVisitaMedica
values('27/11/2014','Presión alta',4,2);
insert into tVisitaMedica
values('29/11/2014','De alta en 2 dias',1,1);
insert into tVisitaMedica
values('30/11/2014','Ritmo cardiaco elevado',1,9);
insert into tVisitaMedica
values('02/12/2014','No tiene Mejoras',2,8);
insert into tVisitaMedica
values('04/12/2014','Poco apetito',2,7);
insert into tVisitaMedica
values('06/12/2014','Esta mucho mejor',2,6);
insert into tVisitaMedica
values('08/12/2014','No tiene Mejoras',2,5);
insert into tVisitaMedica
values('10/12/2014','Dolores articulares intensos',3,4);
insert into tVisitaMedica
values('12/12/2014','No tiene Mejoras',3,3);
insert into tVisitaMedica
values('14/12/2014','De alta en 2 días',3,2);
insert into tVisitaMedica
values('16/12/2014','No tiene Mejoras',3,1);
insert into tVisitaMedica
values('18/12/2014','Los dolores abdominales siguen',4,7);
