Error al guardar prepoliza

This commit is contained in:
2021-11-29 16:43:18 -07:00
parent fac0b93c29
commit c30ff59853

View File

@@ -1046,7 +1046,8 @@ Partial Class ContabilidadC_RegPrePolizaS
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