AprendizVB
07-03-2006, 10:14 PM
Olá!
Estou desenvolvendo um sistema em camadas onde o acesso a dados está isolado.
estou com uma dúvida em relação ao trabalho com transação.
O conceito é o mesmo de uma nota fiscal e seus Ãtens.
Preciso fazer algo parecido com isto:
No formulário (apenas um exemplo simples do funcionamento):
Dim nf as new clsNota
'instanciar a classe nota fiscal
nf.numero = numnf
nf.valor = valortotalnf
nf...
'chamar o método de inclusão da nota
nf.incluir
for i = 1 to qtdeitens
nf.item = i
nf.iditem = id
nf.qt = qtde
nf.vlrunit = valorunitario
nf...
'chamar o método de inclusão do item da nota
nf.incluiitem
next
Em clsNota terÃamos algo semelhante a isto:
Public Sub incluir()
Dim conn As New SqlConnection(ConexaoSQL)
Dim cmd As New SqlCommand()
Dim Transacao As SqlTransaction
Dim sql As String
conn.Open()
Transacao = conn.BeginTransaction()
sql = "INSERT INTO TBNOTA... "
With cmd
.Connection = conn
.CommandText = sql
.CommandType = CommandType.Text
.Transaction = Transacao
.ExecuteNonQuery()
End With
Transacao.Commit()
End Sub
Public Sub incluiitem()
Dim conn As New SqlConnection(ConexaoSQL)
Dim cmd As New SqlCommand()
Dim Transacao As SqlTransaction
Dim sql As String
conn.Open()
Transacao = conn.BeginTransaction()
sql = "INSERT INTO TBITEMNOTA...
With cmd
.Connection = conn
.CommandText = sql
.CommandType = CommandType.Text
.Transaction = Transacao
.ExecuteNonQuery()
End With
Transacao.Commit()
End Sub
========
As transações funcionam perfeitamente, mas caso eu tenha uma nota com 50
itens e houver algum problema no 40º, apenas este é cancelado...
Como trabalhar com uma única transação para inclusões como esta? uma nota e
diversos itens?
É possÃvel fazer isto sem trabalhar com a conexão/banco de dados na chamada
dos métodos? Lembrando que na camada do formulário, não existe acesso a
dados, apenas a chamada de tais métodos!
Em uma aplicação real, em alguns casos, precisamos trabalhar com transações,
mesmo trabalhando com dados em diferentes classes, como proceder nestes casos?
Grato!
Estou desenvolvendo um sistema em camadas onde o acesso a dados está isolado.
estou com uma dúvida em relação ao trabalho com transação.
O conceito é o mesmo de uma nota fiscal e seus Ãtens.
Preciso fazer algo parecido com isto:
No formulário (apenas um exemplo simples do funcionamento):
Dim nf as new clsNota
'instanciar a classe nota fiscal
nf.numero = numnf
nf.valor = valortotalnf
nf...
'chamar o método de inclusão da nota
nf.incluir
for i = 1 to qtdeitens
nf.item = i
nf.iditem = id
nf.qt = qtde
nf.vlrunit = valorunitario
nf...
'chamar o método de inclusão do item da nota
nf.incluiitem
next
Em clsNota terÃamos algo semelhante a isto:
Public Sub incluir()
Dim conn As New SqlConnection(ConexaoSQL)
Dim cmd As New SqlCommand()
Dim Transacao As SqlTransaction
Dim sql As String
conn.Open()
Transacao = conn.BeginTransaction()
sql = "INSERT INTO TBNOTA... "
With cmd
.Connection = conn
.CommandText = sql
.CommandType = CommandType.Text
.Transaction = Transacao
.ExecuteNonQuery()
End With
Transacao.Commit()
End Sub
Public Sub incluiitem()
Dim conn As New SqlConnection(ConexaoSQL)
Dim cmd As New SqlCommand()
Dim Transacao As SqlTransaction
Dim sql As String
conn.Open()
Transacao = conn.BeginTransaction()
sql = "INSERT INTO TBITEMNOTA...
With cmd
.Connection = conn
.CommandText = sql
.CommandType = CommandType.Text
.Transaction = Transacao
.ExecuteNonQuery()
End With
Transacao.Commit()
End Sub
========
As transações funcionam perfeitamente, mas caso eu tenha uma nota com 50
itens e houver algum problema no 40º, apenas este é cancelado...
Como trabalhar com uma única transação para inclusões como esta? uma nota e
diversos itens?
É possÃvel fazer isto sem trabalhar com a conexão/banco de dados na chamada
dos métodos? Lembrando que na camada do formulário, não existe acesso a
dados, apenas a chamada de tais métodos!
Em uma aplicação real, em alguns casos, precisamos trabalhar com transações,
mesmo trabalhando com dados em diferentes classes, como proceder nestes casos?
Grato!