public void generaReporteReceta(VentanaReporte vr,String numero_receta)
{
String consulta = "SELECT R.NUMERO AS \"Número\",P.ID AS \"IDP\",(P.NOMBRE_PILA||' '||P.APELLIDO_PATERNO||' '||P.APELLIDO_MATERNO) AS \"Paciente\","
+"M.ID AS \"IDM\",(M.NOMBRE_PILA||' '||M.APELLIDO_PATERNO||' '||M.APELLIDO_MATERNO) AS \"Médico\",TO_CHAR(R.FECHA,'DD-MON-YYYY HH24:MI:SS') AS \"Fecha\","
+ "R.INDICACIONES AS \"Indicaciones\" FROM RECETAF R, NOMBRE_PACIENTE P,NOMBRE_MEDICO M WHERE P.ID = R.ID_PACIENTE AND M.ID=R.ID_MEDICO AND R.NUMERO="+numero_receta;
String consulta2 = "SELECT M.ID,T.NOMBRE AS \"Tipo\",M.NOMBRE_COMPUESTO AS \"Compuesto\",M.PRESENTACION AS \"Presentación\","
+ "M.CONTENIDO AS \"Contenido\",M.VIA_ADMINISTRACION AS \"Vía de administración\",M.CBP AS \"c.b.p\",MX.DOSIS AS \"Dosis\" "
+ "FROM MEDICAMENTOF M,TIPO_MEDICAMENTOF T, MXRF MX WHERE M.ID_TIPO_MEDICAMENTO = T.ID "
+"AND M.ID = MX.ID_MEDICAMENTO AND MX.NUMERO_RECETA =" + numero_receta;
dsReportes ds = new dsReportes();
crReceta cr = new crReceta();
CrystalReportViewer crv = vr.dame_viewer();
OracleDataAdapter adapter = new OracleDataAdapter();
OracleDataAdapter adapter2 = new OracleDataAdapter();
adapter.SelectCommand = new OracleCommand(consulta, conexion);
adapter.Fill(ds, "Encabezado_receta");
adapter2.SelectCommand = new OracleCommand(consulta2, conexion);
adapter2.Fill(ds, "MXRF");
cr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
public void generaReporteCitas(VentanaReporte vr, String codigo_tratamiento)
{
String consulta = "SELECT CODIGO AS \"Código\",NOMBRE AS \"Tratamiento\" FROM TRATAMIENTOC WHERE CODIGO = " + codigo_tratamiento;
String consulta2 = "SELECT ID,NUMERO_CONSULTORIO,NOMBRE_PILA,APELLIDO_PATERNO,APELLIDO_MATERNO,FECHA_NACIMIENTO,EDAD,SEXO "
+ "FROM PACIENTEC WHERE CODIGO_TRATAMIENTO=" + codigo_tratamiento;
String consulta3 = "SELECT (NOMBRE_PILA||' '||APELLIDO_PATERNO||' '||APELLIDO_MATERNO) AS \"Paciente\","
+ "FECHA AS \"Fecha\",TO_CHAR(HORA,'HH24:MI:SS') AS \"Hora\",ASISTENCIA AS \"Asistencia\" "
+ "FROM CITAC C INNER JOIN PACIENTEC P ON C.ID_PACIENTE=P.ID AND ID_PACIENTE IN "
+ "(SELECT ID FROM PACIENTEC WHERE CODIGO_TRATAMIENTO=" + codigo_tratamiento + ")";
dsReportes ds = new dsReportes();
crCitas cr = new crCitas();
crSubCitas scr = new crSubCitas();
CrystalReportViewer crv;
NpgsqlDataAdapter adapter = new NpgsqlDataAdapter();
NpgsqlDataAdapter adapter2 = new NpgsqlDataAdapter();
NpgsqlDataAdapter adapter3 = new NpgsqlDataAdapter();
vr = new VentanaReporte();
crv = vr.dame_viewer();
adapter.SelectCommand = new NpgsqlCommand(consulta, conexion);
adapter.Fill(ds, "Tratamiento");
adapter2.SelectCommand = new NpgsqlCommand(consulta2, conexion);
adapter2.Fill(ds, "Paciente");
adapter3.SelectCommand = new NpgsqlCommand(consulta3, conexion);
adapter3.Fill(ds, "Consulta");
cr.SetDataSource(ds);
scr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
public void generaReporteMedicamentos(VentanaReporte vr)
{
String consulta = "SELECT M.ID,M.NOMBRE_COMPUESTO,M.PRESENTACION,M.CONTENIDO,SC.DEMANDA "
+ "FROM (SELECT MX.ID_MEDICAMENTO, COUNT(MX.ID_MEDICAMENTO) AS DEMANDA "
+ "FROM MXRF MX GROUP BY MX.ID_MEDICAMENTO ORDER BY COUNT(ID_MEDICAMENTO) DESC) SC,MEDICAMENTOF M "
+ "WHERE SC.ID_MEDICAMENTO = M.ID AND ROWNUM <=10";
dsReportes ds = new dsReportes();
crMedicamento cr = new crMedicamento();
CrystalReportViewer crv;
OracleDataAdapter adapter = new OracleDataAdapter();
vr = new VentanaReporte();
crv = vr.dame_viewer();
adapter.SelectCommand = new OracleCommand(consulta, conexion);
adapter.Fill(ds, "Medicamentos");
cr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
public void generaReporteMedicamentos(VentanaReporte vr)
{
String consulta = "SELECT M.ID,M.NOMBRE_COMPUESTO,M.PRESENTACION,M.CONTENIDO,SC.DEMANDA "
+ "FROM (SELECT MX.ID_MEDICAMENTO, COUNT(MX.ID_MEDICAMENTO) AS DEMANDA "
+ "FROM MXRF MX GROUP BY MX.ID_MEDICAMENTO ORDER BY COUNT(ID_MEDICAMENTO) DESC) SC,MEDICAMENTOF M "
+ "WHERE SC.ID_MEDICAMENTO = M.ID AND ROWNUM <=10";
dsReportes ds = new dsReportes();
crMedicamento cr = new crMedicamento();
CrystalReportViewer crv;
OracleDataAdapter adapter = new OracleDataAdapter();
vr = new VentanaReporte();
crv = vr.dame_viewer();
adapter.SelectCommand = new OracleCommand(consulta, conexion);
adapter.Fill(ds, "Medicamentos");
cr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
public void generaReporteReceta(VentanaReporte vr,String numero_receta)
{
String consulta = "SELECT R.NUMERO AS \"Número\",P.ID AS \"IDP\",(P.NOMBRE_PILA||' '||P.APELLIDO_PATERNO||' '||P.APELLIDO_MATERNO) AS \"Paciente\","
+"M.ID AS \"IDM\",(M.NOMBRE_PILA||' '||M.APELLIDO_PATERNO||' '||M.APELLIDO_MATERNO) AS \"Médico\",TO_CHAR(R.FECHA,'DD-MON-YYYY HH24:MI:SS') AS \"Fecha\","
+ "R.INDICACIONES AS \"Indicaciones\" FROM RECETAF R, NOMBRE_PACIENTE P,NOMBRE_MEDICO M WHERE P.ID = R.ID_PACIENTE AND M.ID=R.ID_MEDICO AND R.NUMERO="+numero_receta;
String consulta2 = "SELECT M.ID,T.NOMBRE AS \"Tipo\",M.NOMBRE_COMPUESTO AS \"Compuesto\",M.PRESENTACION AS \"Presentación\","
+ "M.CONTENIDO AS \"Contenido\",M.VIA_ADMINISTRACION AS \"Vía de administración\",M.CBP AS \"c.b.p\",MX.DOSIS AS \"Dosis\" "
+ "FROM MEDICAMENTOF M,TIPO_MEDICAMENTOF T, MXRF MX WHERE M.ID_TIPO_MEDICAMENTO = T.ID "
+"AND M.ID = MX.ID_MEDICAMENTO AND MX.NUMERO_RECETA =" + numero_receta;
dsReportes ds = new dsReportes();
crReceta cr = new crReceta();
CrystalReportViewer crv = vr.dame_viewer();
OracleDataAdapter adapter = new OracleDataAdapter();
OracleDataAdapter adapter2 = new OracleDataAdapter();
adapter.SelectCommand = new OracleCommand(consulta, conexion);
adapter.Fill(ds, "Encabezado_receta");
adapter2.SelectCommand = new OracleCommand(consulta2, conexion);
adapter2.Fill(ds, "MXRF");
cr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
public void generaReporteCitas(VentanaReporte vr, String codigo_tratamiento)
{
String consulta = "SELECT CODIGO AS \"Código\",NOMBRE AS \"Tratamiento\" FROM TRATAMIENTOC WHERE CODIGO = "+codigo_tratamiento;
String consulta2 = "SELECT ID,NUMERO_CONSULTORIO,NOMBRE_PILA,APELLIDO_PATERNO,APELLIDO_MATERNO,FECHA_NACIMIENTO,EDAD,SEXO "
+"FROM PACIENTEC WHERE CODIGO_TRATAMIENTO="+codigo_tratamiento;
String consulta3 = "SELECT (NOMBRE_PILA||' '||APELLIDO_PATERNO||' '||APELLIDO_MATERNO) AS \"Paciente\","
+"FECHA AS \"Fecha\",TO_CHAR(HORA,'HH24:MI:SS') AS \"Hora\",ASISTENCIA AS \"Asistencia\" "
+"FROM CITAC C INNER JOIN PACIENTEC P ON C.ID_PACIENTE=P.ID AND ID_PACIENTE IN "
+"(SELECT ID FROM PACIENTEC WHERE CODIGO_TRATAMIENTO="+codigo_tratamiento+")";
dsReportes ds = new dsReportes();
crCitas cr = new crCitas();
crSubCitas scr = new crSubCitas();
CrystalReportViewer crv;
NpgsqlDataAdapter adapter = new NpgsqlDataAdapter();
NpgsqlDataAdapter adapter2 = new NpgsqlDataAdapter();
NpgsqlDataAdapter adapter3 = new NpgsqlDataAdapter();
vr = new VentanaReporte();
crv = vr.dame_viewer();
adapter.SelectCommand = new NpgsqlCommand(consulta, conexion);
adapter.Fill(ds, "Tratamiento");
adapter2.SelectCommand = new NpgsqlCommand(consulta2, conexion);
adapter2.Fill(ds, "Paciente");
adapter3.SelectCommand = new NpgsqlCommand(consulta3, conexion);
adapter3.Fill(ds, "Consulta");
cr.SetDataSource(ds);
scr.SetDataSource(ds);
crv.ReportSource = cr;
crv.Show();
vr.Show();
}
