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 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 insercionR(String tabla, String columnas, String valores, String tabla_detalle, String clave_detalle, Boolean detalle, List <String[]> val_detalle, VentanaReporte vr)
{
DataTable fragmentos = dame_fragmentos_de(tabla);
int indx_fsec = dame_indice_fragmento_principal(fragmentos);
String clave = "";
String clave_reporte = "";
if (indx_fsec > -1) //Si hay secuencia
{
DataRow fragmento_ppal = fragmentos.Rows[indx_fsec];
Sitio sitio = dame_sitio_del_fragmento(fragmento_ppal);
DataSet data_set = new DataSet();
sitio.dame_clave_secuencia(fragmento_ppal[SEC].ToString(), ref clave);
sitio.inserta(fragmento_ppal[NOM].ToString(), columnas, "", valores);
fragmentos.Rows.RemoveAt(indx_fsec);
}
if (clave != "")
{
clave_reporte = clave;
clave += ",";
}
if (clave_detalle != "")
{
clave = clave_detalle + ",";
}
if (detalle)
{
insercion_detalleR(tabla_detalle, clave, val_detalle);
}
inserta_dependientes(fragmentos, columnas, clave, valores);
llena_superGrid_de(tabla);
if (clave_reporte != "")
{
vr = new VentanaReporte();
SO.generaReporteReceta(vr, clave_reporte);
}
}
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 insercionR(String tabla, String columnas, String valores, String tabla_detalle, String clave_detalle, Boolean detalle, List<String[]> val_detalle,VentanaReporte vr)
{
DataTable fragmentos = dame_fragmentos_de(tabla);
int indx_fsec = dame_indice_fragmento_principal(fragmentos);
String clave = "";
String clave_reporte = "";
if (indx_fsec > -1) //Si hay secuencia
{
DataRow fragmento_ppal = fragmentos.Rows[indx_fsec];
Sitio sitio = dame_sitio_del_fragmento(fragmento_ppal);
DataSet data_set = new DataSet();
sitio.dame_clave_secuencia(fragmento_ppal[SEC].ToString(), ref clave);
sitio.inserta(fragmento_ppal[NOM].ToString(), columnas, "", valores);
fragmentos.Rows.RemoveAt(indx_fsec);
}
if (clave != "")
{
clave_reporte = clave;
clave += ",";
}
if (clave_detalle != "")
clave = clave_detalle + ",";
if (detalle)
insercion_detalleR(tabla_detalle, clave, val_detalle);
inserta_dependientes(fragmentos, columnas, clave, valores);
llena_superGrid_de(tabla);
if (clave_reporte != "")
{
vr = new VentanaReporte();
SO.generaReporteReceta(vr, clave_reporte);
}
}
public void generaReporteTratamiento(VentanaReporte vr, String codigo)
{
SPG.generaReporteCitas(vr, codigo);
}
public void generaReporteDemanda(VentanaReporte vr)
{
SO.generaReporteMedicamentos(vr);
}
public void generaReporteTratamiento(VentanaReporte vr, String codigo)
{
SPG.generaReporteCitas(vr, codigo);
}
public void generaReporteDemanda(VentanaReporte vr)
{
SO.generaReporteMedicamentos(vr);
}
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();
}
