Consulta múltiple en Access

[Bravenap]

Muy buenas. A diferencia de SQL Server y otras bases de datos, Access no me permite realizar consultas múltiples en una sola sentencia. En concreto lo que quiero es insertar un nuevo registro e inmediatamente seleccionar el valor de una campo númerico (no autonumérico).

la consulta sería esta:

Código:

INSERT INTO Entrada (Fecha, Num,Partes,Pro,Rem,Tipo,Res,Obs) VALUES('12/06/2006',(SELECT (MAX(Num)+1) FROM Entrada),'','Álava','','TRABAJO','','');SELECT (MAX(Num)) FROM Entrada

Y el error: Se encontraron caracteres después del final de la instrucción SQL

El campo Num es numérico pero no puedo hacerlo autonumérico por otras cuestiones que no voy a detallar. No sé si se puede hacer una especie de subconsulta.

¿Alguna idea?

Gracias y un saludo.

[Worp9975]

Ese error que comentas parece el típico error que sale cuando alguna cadena entrecomillada no está correctamente cerrada. Comprueba los tipos en los campos de la tabla y los valores que pasas en la claúsula VALUES.

Salu2

[Bravenap]

No, no, la cadena está perfectamente. Si separo las dos consultas, es decir INSERT y SELECT funcionan perfectamente. Se trata de que Access no me admite sentencias múltiples como sí hace por ejemplo SQL Server.

Por tanto, la inserción de un nuevo registro y la consulta al valor del campo Num del nuevo registro se deberían hacer en una sola sentencia.

Debe ser así, porque el programa que realiza la consulta abre una sola conexión por consulta sin que ésta permanezca abierta para más consultas. Por tanto, si coinciden en el tiempo la inserción de varios registros a la vez por distintos usarios, podría obtener valores del campo Num que no se correspondieran con el del registro insertado en el proceso.

Para esto SQL Server dispone de INSERT INTO....;SELECT @@IDENTITY pero no en Access.

Gracias de todas formas.

Un saludo.

[Worp9975]

Puedes hacerlo con VBA ,

declarate una variable de tipo numérico y guardas en ella el valor de ese sentencia SELECT que quieres antes de lanzar el INSERT

Después lanzas la INSERT .

Salu2

[Bravenap]

Ummm... vamos a ver. estoy programando en ASP.Net y ADO.Net.

He estado probando la siguiente sentencia simple, independientemente de obtener el último número:

Código:

INSERT INTO Entrada (Fecha,Num,Partes,Pro,Rem,Tipo,Res,Obs) VALUES ('12/06/2006',(SELECT (MAX(Num)+1) FROM Entrada),'1','Madrid','','TRABAJO','Resumen','Observaciones')

y me devuelve un error no especificado. Supongo que es por la subconsulta, aunque no sé porqué está mal.