Files
AdditionalLibs/B4A/Snippets/beginTransaction.txt

8 lines
429 B
Plaintext

Starter.skmt.BeginTransaction
For Each records() As Object In $result$.Rows
Log($"COL: ${$result$($result$.Columns.Get("$dbCol$"))}, VALUE: ${records($result$.Columns.Get("$dbCol$"))}"$)
Dim $dbCol$ As String = $result$($result$.Columns.Get("$dbCol$"))
Starter.skmt.ExecNonQuery2($"$sql_statement$"$)
Next
Starter.skmt.TransactionSuccessful 'Si no se pone TransactionSuccessful no se escribe NADA!!
Starter.skmt.EndTransaction