Tabla pacientes con campo clave
- Paciente *
- Foto
- FechaNacimiento
- Domicilio
- Telefono
- FechaRegistro
- Padre
- PadreOcupacion
- Madre
- MadreOcupacion
- PediatraOMedicoFamiliar
- HermanosNombresEdades
Tabla Consultas sin campo clave
- Paciente
- Fecha
- TipoTratamiento
- Motivo
- CostoTotal
- Inicio
- Mensualidad
- MensualidadActual
- TotalMensualidad
- Abonos
- Adeudo
- Estado
En la tabla pacientes puedo agregar y eliminar como si nada, pero la tabla consultas que originalmente la agregue sin un campo clave he tenido muchos problemas, uno de ellos era para subir datos, tuve que copiar el código UPDATE de la tabla pacientes y remplazar los campo por los campos de la tabla consultas, trate de repetir el procedimiento en DELETE, sin embargo, me arroja el error "No coinciden los tipos de datos en la expresión de criterios".
Todo se maneja a través de los comandos creados por default de Visual Basic.
Código CommandDelete
Código:
DELETE FROM Consultas WHERE (Paciente = ?) AND (? = 1 AND Fecha IS NULL OR Fecha = ?) AND (? = 1 AND TipoTratamiento IS NULL OR TipoTratamiento = ?) AND (? = 1 AND Motivo IS NULL OR Motivo = ?) AND (? = 1 AND CostoTotal IS NULL OR CostoTotal = ?) AND (? = 1 AND Inicio IS NULL OR Inicio = ?) AND (? = 1 AND Mensualidad IS NULL OR Mensualidad = ?) AND (? = 1 AND MensualidadActual IS NULL OR MensualidadActual = ?) AND (? = 1 AND TotalMensualidad IS NULL OR TotalMensualidad = ?) AND (? = 1 AND Abonos IS NULL OR Abonos = ?) AND (? = 1 AND Adeudo IS NULL OR Adeudo = ?) AND (? = 1 AND Estado IS NULL OR Estado = ?)