Exemplo n.º 1
0
        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();
        }
Exemplo n.º 2
0
        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();
        }