-- seguir registrando

Contabilidad/PlantillasPolizasDetalle.aspx.vb

@@ -231,9 +231,14 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
             If CvePlantillaPoliza > 0 Then
                 If ObjPlantillaPolizaDetalle.AddConta_PlantillasPolizasDetalles(CvePlantillaPoliza, DdlConcepto.SelectedValue.ToEntero, DdlTipoMovimiento.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.ToEntero, TxtOrden.Text.Trim.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero, DdlPorcentajeImpuesto.SelectedValue.ToDecimal) Then
                     TxtOrden.Text = ""
-                    updatatos()
-                    Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion)
-                    UpTitulos.Update()
+                    If Not ChkSeguirAgregando.Checked Then
+                        updatatos()
+                        Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion)
+                    Else
+                        RegistraScript(String.Format("$('#{0}').modal();", "divAgregarSucursal"))
+                        UpModal.Update()
+                    End If
+
                 Else
                     ErrorDetalle = True
                 End If