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

validacion

Browse Source
This commit is contained in:
Rene Molina
2020-01-31 17:43:40 -07:00
parent 5346e6e018
commit 295dc64abf
1 changed files with 28 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Contabilidad/RegPrePoliza.aspx.vb
View File

@@ -1002,7 +1002,8 @@ Partial Class ContabilidadC_RegPrePoliza
ObjContabilidad.UpdatePrePoliza(MinFecha, -1, DdlTipoPoliza.SelectedValue.ToEntero, -1, CvePrePoliza, UsuarioActual.CveEmpresa, Concepto:=TxtConcepto.Text, FechaPoliza:=TxtFechaDocumento.Text.ToDate)
If ObjContabilidad.UpdatePrePoliza(MinFecha, -1, DdlTipoPoliza.SelectedValue.ToEntero, -1, CvePrePoliza, UsuarioActual.CveEmpresa, Concepto:=TxtConcepto.Text, FechaPoliza:=TxtFechaDocumento.Text.ToDate) Then
For Each row As GridViewRow In GvPrePoliza.Rows
@@ -1027,6 +1028,9 @@ Partial Class ContabilidadC_RegPrePoliza
End If
Next
Else
OcurrioError = True
End If
If Not OcurrioError Then
ObjContabilidad.Commit()