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

Error al guardar prepoliza

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2021-11-29 16:43:18 -07:00
parent fac0b93c29
commit c30ff59853
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Contabilidad/RegPrePolizaS.aspx.vb
View File

@@ -1045,8 +1045,9 @@ Partial Class ContabilidadC_RegPrePolizaS
Else Else
MsgError = "No se pudo insertar la póliza" MsgError = "No se pudo insertar la póliza"
End If End If
Catch ex As Exception Catch ex As Exception
MsgError = "Error" MsgError = "Ocurrió un error al guardar la póliza"
OnError("Ocurrió un error al guardar la póliza.", ex)
End Try End Try
If MsgError = "" Then If MsgError = "" Then
@@ -1351,6 +1352,8 @@ Partial Class ContabilidadC_RegPrePolizaS
Dim dr As DataRow = DtMovimientos.NewRow Dim dr As DataRow = DtMovimientos.NewRow
dr("IdCtaContable") = IdCtaContable dr("IdCtaContable") = IdCtaContable
dr("CveCuenta") = DdlCuentaContableE.SelectedValue dr("CveCuenta") = DdlCuentaContableE.SelectedValue
'dr("CodigoCuenta") = CodigoCuenta & "<br>" & NombreCuenta
dr("CodigoNombreCuenta") = DdlCuentaContableE.SelectedItem.Text
dr("ConceptoContable") = DdlConceptosContablesE.SelectedItem.Text dr("ConceptoContable") = DdlConceptosContablesE.SelectedItem.Text
dr("CveConceptoContable") = DdlConceptosContablesE.SelectedValue dr("CveConceptoContable") = DdlConceptosContablesE.SelectedValue
dr("Concepto") = TxtConceptoE.Text dr("Concepto") = TxtConceptoE.Text