Sin problemas, a veces

Hola!

tenia esta secuencia de codigo:

'SQL para actualizar las tablas
strSQL = "Begin transaction" & vbCrLf

strSQL = "update VeControl set Contador=" & strArLine(2) &
"-1"
strSQL = strSQL & " where VeControl_Id='" & strArLine(0) &
"'" & vbCrLf

strSQL = strSQL & "update MovtosDia "
strSQL = strSQL & "set ContadorTotal=" & lngContTot & ","
strSQL = strSQL & "InicioCont=" & strArLine(1) & ","
strSQL = strSQL & "FinCont=" & strArLine(2) & "-1 "
strSQL = strSQL & "where Num_Ruta='" & strRutaNum & "' and "
strSQL = strSQL & "FechaRuta={d '" & Format$(dteFecha,
"yyyy-mm-dd") & "'}"
strSQL = strSQL & vbCrLf

strSQL = strSQL & "commit transaction"

Entre otras cosas, este programa mantiene un control de un contador. Hay
varias rutas y
cada una de ellas tiene uno. Datos que son recbidos por el programa se
importan a la base
de datos y entre ellos esta el contador inicial y final. Yo guardo estos
dos datos mas la
diferenca entre ellos para saber cuanto subio.

Aparte de que no tengo codigo para probar si hubo errores dentro de la
transaccion, este
SQL estaba actualizando bien la mayoria de los registros. Solo algunas
veces fallaba, no actualizando
los datos del contador. Despues de cuidadosamente analizar el codigo
descubri el problema, que
radica en la segunda linea. (= "update VeControl...". Como solo contaba
con el strSQL = "...
esta linea estaba sobre escribiendo el contenido de strSQL, siendo este
"begin transaction".

Mi pregunta es que tipo de problema se puede esperar cuando se tiene un
commit tran sin
un begin tran? Se me hace muy raro que este SQL este funcionando bien para
la mayoria de los
registros.

Cualquier comentario es bienvenido :-)
Gracias

Saga

Hola!

tenia esta secuencia de codigo:

'SQL para actualizar las tablas
strSQL = "Begin transaction" & vbCrLf

strSQL = "update VeControl set Contador=" & strArLine(2)
& "-1"
strSQL = strSQL & " where VeControl_Id='" & strArLine(0) &
"'" & vbCrLf

strSQL = strSQL & "update MovtosDia "
strSQL = strSQL & "set ContadorTotal=" & lngContTot & ","
strSQL = strSQL & "InicioCont=" & strArLine(1) & ","
strSQL = strSQL & "FinCont=" & strArLine(2) & "-1 "
strSQL = strSQL & "where Num_Ruta='" & strRutaNum & "' and
"
strSQL = strSQL & "FechaRuta={d '" & Format$(dteFecha,
"yyyy-mm-dd") & "'}"
strSQL = strSQL & vbCrLf

strSQL = strSQL & "commit transaction"

Entre otras cosas, este programa mantiene un control de un contador. Hay
varias rutas y
cada una de ellas tiene uno. Datos que son recbidos por el programa se
importan a la base
de datos y entre ellos esta el contador inicial y final. Yo guardo estos
dos datos mas la
diferenca entre ellos para saber cuanto subio.

Aparte de que no tengo codigo para probar si hubo errores dentro de la
transaccion, este
SQL estaba actualizando bien la mayoria de los registros. Solo algunas
veces fallaba, no actualizando
los datos del contador. Despues de cuidadosamente analizar el codigo
descubri el problema, que
radica en la segunda linea. (= "update VeControl...". Como solo contaba
con el strSQL = "...
esta linea estaba sobre escribiendo el contenido de strSQL, siendo este
"begin transaction".

Mi pregunta es que tipo de problema se puede esperar cuando se tiene un
commit tran sin
un begin tran? Se me hace muy raro que este SQL este funcionando bien
para la mayoria de los
registros.

Cualquier comentario es bienvenido :-)
Gracias

Saga

Primeramente, gracias a los dos por sus comentarios.

La rutina que manda llamar el codigo que presente cuenta con un
manejador de error. Lo que hace este es que asigna la descripcion
del error a una variable (tipo String).

Esta variable es procesada por la rutina que manda llamar la rutina que
decribo. Por lo tanto, si un error ocurre, el codigo sigue con su
ejecucion,
unicamente tomando nota del error.

El problema que daba es que los campos InicioCont y FinCont de
MovtosDia no se estaban actualizando en algunos casos. Lo misterioso
de esto es que en la mayoria de los casos todo estaba funcionando bien,
o por lo menos daba esa percepcion.

Saludos
Saga

uff, eso parece más bien otra cosa, cambia la estructura de tu tabla y
no permitas nulos en esos campos, tu aplicación fallará pero podrás
ver que es lo que está pasando si sql pone ahí un null, es que ese
valor que le estás pasando vale null


i
Miguel Egea
Visita mi web http://www.portalsql.com
SQL Server MVP, Mentor
Solid Quality Learning
http://www.SolidQualityLearning.com
"Solid Quality Learning is the trusted global provider of advanced
education and solutions for the entire Microsoft database platform"

"Saga" wrote in message
news:

Primeramente, gracias a los dos por sus comentarios.

La rutina que manda llamar el codigo que presente cuenta con un
manejador de error. Lo que hace este es que asigna la descripcion
del error a una variable (tipo String).

Esta variable es procesada por la rutina que manda llamar la rutina
que
decribo. Por lo tanto, si un error ocurre, el codigo sigue con su
ejecucion,
unicamente tomando nota del error.

El problema que daba es que los campos InicioCont y FinCont de
MovtosDia no se estaban actualizando en algunos casos. Lo misterioso
de esto es que en la mayoria de los casos todo estaba funcionando
bien,
o por lo menos daba esa percepcion.

Saludos
Saga