Error al guardar ejemplo xBrowse

[Claudio Roldan]

Hola a todos, como les comentaba no trabajo con SQL estoy haciendo unas pruebas con SqlAdo.prg para consultar una base SQL y me encuentro con este error, que adjunto, cuando quiero grabar luego de modificar el campo precio en el xBrowse.

Los datos no están en una sola tabla, son dos una tiene los datos del articulo y otra los precios. 

Por lo que estuve averiguando el error es cuando hay una relación entre dos tablas de uno varios.

Agradecería cualquier sugerencia. Adjunto el .prg por si se necesita.

Saludos.

Claudio Roldan.

[David Field]

Claudio,

Te comenté por correo directo que para actualizar en otra tabla tendrías que 

1. recorrer el recordset, ver qué registros se modificaron y realizar el update para cada uno.

2. Pudieras intentar cambia el comando SQL a:

aResult[1]:= "select STA11.cod_articu, STA11.descripcio, STA11.desc_adic, STA11.cod_barra, GVA17.precio "+;
"from GVA17 FULL OUTER JOIN STA11 ON STA11.cod_articu=GVA17.cod_articu "+;
"WHERE GVA17.nro_de_lis=1"

3. Modificar el aReplace[5] := {|x| oConn:Execute("UPDATE GVA17 SET precio = "+STR(x)+" WHERE cod_articu = '"+oRs:cod_articu+"'")}

Esto último te actualiza el precio al momento en que el usuario de ENTER después de capturar el precio por lo que el Update() ya no será necesario.

Saludos,

David Field

[Claudio Roldan]

Gracias por responder

Haré las pruebas y seguramente tendré otras consultas 

Saludos. 

Claudio Roldán 

--
Has recibido este mensaje porque estás suscrito al grupo "ADO Harbour" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a ado-harbour...@googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/ado-harbour/15b5563c-1d13-4d2a-aaaa-f56a3785f6e2n%40googlegroups.com.