Sub tblFrmCliArt_Changed(Params As Map)
Dim row As String = Params.Get("row")
Dim column As String = Params.Get("column")
Dim Value As String = Params.Get("value")
'Log("valor cambiado-[" & row & " " & column & "] = " & Value)
Dim tbl As ABMTable = RetSheetEdicionFrmCliArt.Content.Component("tblFrmCliArt")
Dim cCajas As String = Value
Dim cUniCaja As String = tbl.GetString(row, 5)
Dim cCantidad As String = cCajas * cUniCaja
tbl.SetString(row, column, Value) ' Necesario para que el tbl.Refresh no lo quite
tbl.SetString(row, column+ 1, cCantidad)
tbl.Refresh ' Problem. Kill focus cell edition
)
End Sub