Hola espero me puedan ayudar, Cual es la forma de guardar en varias tablas a la vez con transacciones y calcelar la transaccion en caso de error?
Se que es con comming y roolback.
He intentado hacerlo buscando en por la red pero no he podido hacer que guarde eficientemente.
por ejemplo:
quiero insertar en dos tablas datos similares
Global.cn.Begin
hresult = Global.cn.Create("comprasdetalle")
hresult2 = Global.cn.Create("tmpcompras")
IF hresult.Count > 0 THEN
FOR i = 0 TO GridView1.Rows.Count - 1
hresult!folio = Folio.Text
hresult!piezas = GridView1[i, 0].text
hresult!clave = GridView1[i, 1].text
hresult!descrip = GridView1[i, 2].text
hresult!precio = Global.Formatx(GridView1[i, 3].text)
hresult!subtotal = Global.Formatx(GridView1[i, 4].text)
hresult.Update()
NEXT
si aquí ocurre un error, en la tabla comprasdetalle ya se han insertado los registros.
No se deberian insertar hasta que no se haga el comming o me equivoco?
hresult1 = Global.cn.Create("compras")
hresult1!folio = Folio.Text
hresult1!fecha = tfecha2.Text
hresult1!proveedor = Text3.Text
hresult1!nproveedor = Label7.Text
hresult1!descuento = Global.Formatx(TextBox2.Text)
hresult1!subtotal = Global.Formatx(Tsubtotal.Text)
hresult1!iva = Global.Formatx(Tiva.Text)
hresult1!piezas = GridView1.Rows.Count
hresult1!total = Global.Formatx(Ttotal.Text)
hresult1!empleado = Global.user
hresult1.Update()
Global.cn.Commit()