Añado los fuentes de java

2025-06-09 13:37:06 +02:00
parent d6c990e5d5
commit a97a6350ee
226 changed files with 57246 additions and 0 deletions
@@ -0,0 +1,67 @@
+/**
+ * @(#) PersistenciaPaciente.java
+ */
+
+package com.tarisan.control;
+
+import com.tarisan.excepcion.*;
+import com.tarisan.log.*;
+
+import java.sql.*;
+import java.util.Calendar;
+
+
+/**
+ * Controla los accesos a la persistencia para la entidad <code>Paciente</code>.
+ * @author <a href="mailto:sistemas@imqnavarra.com">Dpto. Informática</a>.
+ * @version 1.0, 24/09/2003
+ */
+public class PersistenciaTTColect implements Constantes
+{
+
+	/**
+	 * Selecciona el primer registro de la tabla ttbenefi encontrado para la tarjeta de paciente pasada por el médico.
+	 * @param tarjeta El objeto <code>Tarjeta</code> para el que se realiza la búsqueda.
+	 * @return El <code>Paciente</code> encontrado en la tabla de beneficiarios,
+	 * o null si se produce alguna excepción.
+	 * @throws	 
+	 */
+	public int obtenerContrato(int entidad, long colectivo) throws ExcepcionTarisan
+	{
+		int contrato=0;
+		StringBuffer sqlSelect = new StringBuffer();
+
+		try
+		{			
+			sqlSelect.append("SELECT CONTRATO");
+			sqlSelect.append(" FROM TTCOLECT");
+			sqlSelect.append(" WHERE ENTIDAD = ?");
+			sqlSelect.append(" AND COLECTIVO = ?");
+
+			Connection conexion = ParametrosConfiguracion.dataStore.obtenerConexion();
+
+			Object aCondiciones[] = new Object[2];
+			aCondiciones[0] = Integer.valueOf(entidad);
+			aCondiciones[1] = Long.valueOf(colectivo);
+			
+			ResultSet rs = ParametrosConfiguracion.dataStore.seleccionar(conexion, sqlSelect.toString(), aCondiciones);
+			while(rs.next())
+			{
+				contrato = rs.getInt("CONTRATO");
+			}
+			rs.close();
+
+			ParametrosConfiguracion.dataStore.liberarConexion(conexion);
+			LogTarisan.logger.log(NivelLog.DEBUG, "Seleccionado el contrato: " + contrato + " de la tabla TTCOLECT (" + sqlSelect + ")");
+		}
+		catch(SQLException sqle)
+		{
+			LogTarisan.logger.log(NivelLog.ERROR, "Error en la selección de morosidad del cliente: " + sqle + " (" + sqlSelect + ")");
+			throw new ExcepcionTarisan();
+		}
+
+		return contrato;
+	}
+
+
+}