%@ page import="com.tarisan.control.*" %>
<%@ page import="com.tarisan.data.*" %>
<%@ page import="com.tarisan.excepcion.*" %>
<%@ page import="java.util.Vector" %>
<%@ page import="com.tarisan.log.*" %>
<%@ page import="com.tarisan.util.Utilidades" %>
<%@ page import="com.tarisan.persistencia.PersistenciaParametros" %>
<%@ page import="java.text.SimpleDateFormat" %>
<%
LogTarisan.logger.log(NivelLog.INFO, "Inicio página de impresion de pacientes (imp/impDetallePacientes.jsp)");
response.setHeader("Expires", "0");
response.setHeader("Pragma", "no-cache");
response.setHeader("Cache-Control", "no-cache");
HttpSession sesion = request.getSession(true);
if(sesion.isNew() || (sesion.getAttribute("USUARIO") == null))
{
LogTarisan.logger.log(NivelLog.INFO, "Sesión invalidada");
%>
<%
}
else
{
try
{
// Definicion de variables
SimpleDateFormat sdfFormateadorFecha=new SimpleDateFormat(PersistenciaParametros.formatoFechas);
String strFecha = (String)request.getParameter("fecha");
String[] arrFecha = strFecha.split("-");
java.sql.Date dtFecha = new java.sql.Date(java.sql.Date.valueOf(arrFecha[2] + "-" + arrFecha[1] + "-" + arrFecha[0]).getTime());
double dblImporteTotal=0;
%>
Impresión Detalle Pacientes
|
| --- RELAción ACTOS MédicoS REALIZADOS --- |
| FECHA: |
<%=strFecha%> |
|
<%=((Usuario)sesion.getAttribute("USUARIO")).getNombreCab()%> |
|
|
| Nombre Paciente |
Acto realizado |
Importe |
|
<%
PersistenciaVTamovextTaclient per = new PersistenciaVTamovextTaclient();
Integer medico = Integer.valueOf( ((Usuario)sesion.getAttribute("USUARIO")).getMedico() );
Integer especialidad = Integer.valueOf( ((Usuario)sesion.getAttribute("USUARIO")).getEspecialidad() );
Vector vSeleccion = per.detalle_pacientes(medico, especialidad, dtFecha);
VTamovextTaclient vTamovextTaclient = null;
for(int i = 0; i < vSeleccion.size(); i++)
{
vTamovextTaclient = (VTamovextTaclient)vSeleccion.elementAt(i);
dblImporteTotal+=vTamovextTaclient.getPrecioActoMedico();
%>
| <%=vTamovextTaclient.getNombre() + " " + vTamovextTaclient.getApellidos()%> |
<%=vTamovextTaclient.getDescripcionActoMedico()%> |
<%=Utilidades.formatearDouble(vTamovextTaclient.getPrecioActoMedico(),PersistenciaParametros.decimales)%> |
<%
}
%>
| |
| |
|
Importe .... |
<%=Utilidades.formatearDouble(dblImporteTotal,PersistenciaParametros.decimales)%> |
<%
}
catch(Exception ex)
{
LogTarisan.logger.log(NivelLog.ERROR, "Exception: " + ex);
%>
<%
}
}
LogTarisan.logger.log(NivelLog.INFO, "Final página impresion de pacientes (imp/impDetallePacientes.jsp)");
%>