AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- mejoras

Browse Source
This commit is contained in:
rrene
2024-01-09 10:46:40 -07:00
parent 6eddb646c4
commit a30a377601
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Transportes/Boletos.aspx.vb
View File

@@ -86,6 +86,7 @@ Partial Class Boletos
Protected Sub InicializaCombos() Protected Sub InicializaCombos()
'Lista Destinos''carga específicos 'Lista Destinos''carga específicos
Dim ObjDestinos As New ClsTransportes() Dim ObjDestinos As New ClsTransportes()
If ObjDestinos.GetDestinos(CveRuta:=CveRuta) Then If ObjDestinos.GetDestinos(CveRuta:=CveRuta) Then
If ObjDestinos.DtResultados.Rows.Count > 0 Then If ObjDestinos.DtResultados.Rows.Count > 0 Then
@@ -159,6 +160,7 @@ Partial Class Boletos
ObjTransporte.Commit() ObjTransporte.Commit()
End If End If
Catch ex As Exception Catch ex As Exception
ObjTransporte.RollBack()
Alert($"No se pudo generar el boleto {ex}", TipoMensaje.MsgError) Alert($"No se pudo generar el boleto {ex}", TipoMensaje.MsgError)
Finally Finally
ObjTransporte.Dispose() ObjTransporte.Dispose()